Форум: "Основная";
Текущий архив: 2003.03.20;
Скачать: [xml.tar.bz2];
ВнизВопрос по ComboBox Найти похожие ветки
← →
zolotov (2003-03-08 19:48) [0]Ув. Мастера, подскажите, пожалуйста, как сделать, чтобы по нажатию клавиши Enter выпадал список Combobox.
Заранее спасибо.
← →
мыш (2003-03-08 19:50) [1]Да на этой же странице есть вопрос Как заставить выпасть меню FilterComboBox...?
Смотри там.
← →
zolotov (2003-03-08 20:02) [2]Спасибо большое
← →
zolotov (2003-03-08 20:36) [3]Не знаю, как для FilterComboBox, а для ComboBox такой код не годится.
SendMessage(ComboBox1.Handle,WM_LBUTTONDOWN,ComboBox1.Left+1,ComboBox1.Top+1);
И при нажатии на Enter ничего не происходит. Я прописывал в событии и OnKeyDown, и OnKeyPress.
Может я что-то не то делаю?
← →
Романов Р.В. (2003-03-08 20:58) [4]procedure TForm1.ComboBox1KeyPress(Sender: TObject; var Key: Char);
begin
if Ord(Key) = VK_Return then
begin
ComboBox1.DroppedDown := not ComboBox1.DroppedDown;
Key := #0;
end;
end;
← →
Song (2003-03-08 23:01) [5]CB_SHOWDROPDOWN
← →
Мыш (2003-03-09 07:49) [6]Что значит "не годится". Ведь это абсолютный аналог, как если бы ты кликнул мышью по комбобоксу в левый верхий угол. У тебя combobox имеет стиль csDropDown верно? ну так попробуй мышкой тыкнуть в левый верхний угол, в точку 1,1 - список не выпал, потому что ты попал по белому полю и вошел в редактирование.
Выхода два: либо меняй стиль combobox на csDropDownList, либо меняй координаты клика в сообщении, чтобы попасть по треугольничку.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.03.20;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.009 c