Mega Code Archive

 

Categories / Delphi / Examples

 

Making enter key act as tab

To make the Enter key act as Tab key is a 3 step procedure: Set the form's KeyPreview property to True Set all form's buttons property Default to false Create an OnKeyPress event for the form like this: procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char); begin if Key = #13 then begin Key := #0; if (Sender is TDBGrid) then TDBGrid(Sender).Perform(WM_KeyDown,VK_Tab,0) else Perform(Wm_NextDlgCtl,0,0); end; end;