（Delphi)ESCキーでWindowを閉じたい

質問

TFormにTmemoが張り付けてあるだけのメモ帳を作り、
ESCキーを押すだけで終了できるようにしたかったのですが、
情報がなくて困っています。
1),Escキーの識別方法がわかりません。
Form上でKeypressを拾えばいいのかと思ったのですが、そもそもESCキーはどのように
識別させたらよいのでしょうか？？
ヘルプにESCキーという項目があるのですが期待するような内容ではなくがっかりしました。
2)procedure節を任意に呼べるのか
Formをクローズする際にある処理をしているので、できればFormCloseのprocedure節を呼べると良いと思うのですが、Delphiでこういうことはできるのでしょうか？

よろしくお願いいたします。

回答No.1

bob_n · ベストアンサー

{$R *.dfm}より下をかきます。

procedure TForm1.FormCreate(Sender: TObject);
begin
KeyPreview := True;

end;

procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=VK_ESCAPE then form1.Close;
end;

end.

ESCは仮想キーで　VK_ESCAPE をつかいます。
かたは、WORD で、keyup をつかいます。

お礼

ああ！
素早い回答ありがとうございます。
取り急ぎお礼いたします！

もしかしたら補足させていただくかもしれません。
よろしくお願いします

補足

できた！！！できましたよ！！

動作も思っていた通りに動作しました。

大変助かりました。ありがとうございました！