Delphi/Lazarus: Enter-Key in Edit

You can just react to the enter key in the OnKeyPress event of the Edit field.

The return key has the key code #13, so the if statement could look something like that:

procedure TForm1.Edit1KeyPress(Sender: TObject; 
  var Key: Char);
begin
  if Key = #13 then begin
    Button1.Click;  // for example: simulate button click
    Edit2.SetFocus; // or: jump to next edit 
    // ... or anything else
    Key := #0;
  end;
end; 

In this example, we are just calling the procedure Button1Click, so that the therein contained code will be executed after pressing the enter key, and we jump to the next edit field. Of course, you can also execute or write any other code or function at this point.

It is important to set the key to #0 afterwards. With this, you prevent the Edit from further processing the input.
Last update on 2024-01-03 | Created on 2016-06-10

If a button should be clicked when pressing the enter key, you can also set the property "Default" of the button to "true". With this, the button will be clicked automatically when pressing Enter.

The same applies for the ESC key. In this case, you have to set the property "Cancel" to "true".
2016-06-11 at 20:12