Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.25;
Скачать: [xml.tar.bz2];




Вниз

Диалог + TComboEdit и автоматический ModalResult 


Leonon   (2002-03-12 09:32) [0]

Есть диалоговое окно с элементами ввода TEdit и TComboEdit. Хочу выполнить смену фокуса, путем нажатия Enter. Для этого задаю всем обработчик:

procedure TfrmDocument.eGetIDKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case Key of
13 : FindNextControl(Sender as TWinControl, True, True, False).SetFocus;
end;
end;

Однако, если форма bsDialog, то в TComboEdit при нажатии Enter смена фокуса происходит с одновременным ModalResult:=mrOk. Подскажите пожалуйста Как избежать автоматического изменения ModalResult?



Alx2   (2002-03-12 09:34) [1]

Может, мешает какой-то Button со свойством Default=true?



Leonon   (2002-03-12 09:39) [2]

Огромное спасибо, это действительно так!!!




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.25;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.023 c
1-80620           Andreyka              2002-03-11 20:50  2002.03.25  
Объединение панелей инструментов


1-80520           Starkom               2002-03-12 14:13  2002.03.25  
Проблема с ItemIndex в ComboBox е


1-80504           pashka                2002-03-11 12:41  2002.03.25  
Разное


1-80544           yakshe                2002-03-07 23:54  2002.03.25  
Удалить строку из TStringGrid


1-80557           Lion                  2002-03-09 23:49  2002.03.25  
StringGrid