Schliessen eines Formulars

[Matze]

Hier mal schön mit Delphi-tags: *pingeligbin*

Delphi-Quellcode:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if key = vk_escape then Application.MainForm.Close;
end;