![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
"Поймать" и обработать Enter [D7, WinXP]
Caridi © (2005-07-14 13:44:00)На форме есть компоненты DBEdit. Надо, заполняя их, по клавише Enter переходить на следующий DBEdit.
procedure TForm2.DBEdit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then begin
SelectNext(Sender as TWinControl, true, true);
Key := #0;
end;
Почему-то не получается. Если ставлю: "if Key = <> #13..." то при нажатии любой клавиши (кроме Enter!!!) всё работает. Что не так?
Fay (2005-07-14 16:22:00) [1]Caridi © (14.07.05 16:04) [7]
Ясно.
Fay (2005-07-14 16:22:00) [2]Ясно. Всегда подалуйста.
Caridi (2005-07-14 16:04:00) [3]Получилось. Огромное спасибо.
Caridi (2005-07-14 16:04:00) [4]Получилось. Спасибо.
Fay (2005-07-14 15:48:00) [5]Caridi © (14.07.05 15:45) [4]
SetFocus ?
Caridi (2005-07-14 15:45:00) [6]Вопрос в тему. Как можно назначить переход к конкретному компоненту?
Caridi (2005-07-14 15:43:00) [7]Спасибо, wertolet!
И огромное спасибо ANB!!!
Была кнопка...
ANB (2005-07-14 15:17:00) [8]Значит Enter уже кем то перехвачен. Кнопок с Default нету ?
wertolet (2005-07-14 15:08:00) [9]код рабочий