Back

How to use the Enter key instead of the tab key to move to the next control with a TEdit component:

procedure TForm1.Edit2KeyPress(Sender: TObject; var Key: Char);
begin
    if Key = Char(VK_RETURN) then
     begin
         SelectNext(ActiveControl, True, True);
     end;
end;


Back