Welcome to the Tweaking4All community forums!
When participating, please keep the Forum Rules in mind!
Topics for particular software or systems: Start your topic link with the name of the application or system.
For example “MacOS X – Your question“, or “MS Word – Your Tip or Trick“.
Please note that switching to another language when reading a post will not bring you to the same post, in Dutch, as there is no translation for that post!
[Solved] Delphi/Lazarus - How to close a window with the Esc key
Delphi, Lazarus, Free Pascal
(@hans)
Famed Member Admin
Joined: 12 years ago
Posts: 2859
Topic starter
February 10, 2014 10:12 AM
Sometimes you want a window to close when the Esc key is pressed, well, Delphi offers a neat trick to get to done very easily;
1) Set Keypreview=True for you form
2) In the onKeyPressed event add:
if key = #27 then Close;
For example:
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if key = #27 then Close;
end;
