Тема: Tab и Enter
Показать сообщение отдельно
  #6  
Старый 23.12.2010, 14:22
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

настройка:
KeyPreview:=True;
код:
Код:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Key=VK_RETURN then SelectNext(ActiveControl, True, True);
end;
это обработчик события OnKeyDown у TForm
__________________
Пишу программы за еду.
__________________
Ответить с цитированием