Как? Клавиша ENTER вместо клавиши TAB II
Установите свойство KeyPreview формы в True и используйте следующий обработчик события OnKeyPress.
procedure TMainForm.FormKeyPress(Sender: TObject; var Key: Char); beginif Key = #13 then beginKey := #0;PostMessage(Handle, WM_NEXTDLGCTL, 0, 0);end;end; |