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

ну очевидно в той, когда фокус должен перейти на другой контрол я бы сделал в OnKeyPress формы (KeyPreview:=True):

Код:
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
  if Key=#13 then
  begin
    Key:=#0;
    FindNextControl(ActiveControl, True, True, False).SetFocus;
  end;
end;
__________________
Пишу программы за еду.
__________________
Ответить с цитированием