OnFormDestroy Frage "wirklich schließen"

[faux]

Hallo!

OnDestroy wird dann aufgerufen, wenn es bereits zu spät ist, um es mal kurz zu sagen.
Probier mal OnCloseQuery.

NACHTRAG:

Delphi-Quellcode:

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  if MessageDlg('Wollen Sie wirklich beenden?', mtConfirmation, [mbYes, mbNo], 0) = mrNo then
    CanClose := False;
end;

Grüße
Faux