delophi formclose()が機能しない！

Question

delphiのformclose()についてです。
ヘルプにあるサンプル通り記述したのですが、コンパイルエラーはでないものの、begin endの中で行なっているメッセージの表示がされません。

何故でしょうか？

procedure TForm5.FormClose(Sender: TObject; var Action: TCloseAction);
begin
ShowMessage('Aaaa');
end;

Comments

[WoodenHamlet]

マルチポストはやめましょう https://teratail.com/help#posted-otherservice

Answer 1

プロジェクトインスペクタのイベントでOnCloseイベントにFormCloseが紐付いていないということはないですか?