Как сделать чтобы форма закрывалась при нажатии "Esc"

Как сделать, чтобы форма закрывалась при нажатии "Esc".

Компилятор: Delphi

Для начала необходимо установить свойство формы KeyPreview в True. А потом уже можно отлавливать "Esc":

procedure TForm1.FormCreate(Sender: TObject); begin Form1.KeyPreview := True; end; procedure TForm1.FormKeyPress (Sender: TObject; var Key: Char); begin if key = #27 then Close; end;