Форум: "Основная";
Поиск по всему сайту: 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.71 MB
Время: 0.024 c
3-80426           Privet                2002-02-26 17:14  2002.03.25  
Создание ALIAS в BDE


1-80508           Eco                   2002-03-13 06:21  2002.03.25  
Выделение строк в TListView


3-80393           Мефодий               2002-02-25 12:20  2002.03.25  
Алгоритм для редактирования данных


1-80558           SuperIgor             2002-03-10 01:16  2002.03.25  
Winamp


4-80714           Dr Dredd              2001-12-02 22:30  2002.03.25  
Как заморозить комп?