Wie bei FormClose() auf abbrechen reagieren?

[Luckie]

Nutze das OnClose Ereignis der Form für solche Sachen oder OnCloseQuery kommt drauf an, was du machen willst.

Delphi-Quellcode:

// Button zum Schließen
procedure TForm1.Button1Click(Sender: TObject);
begin
  Close;
end;

// Wird immer ausgelöst, wenn Form geschlossen wird, auch über die Schaltfläche
// in der Titelleiste
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  if Messagebox(Handle, 'Programm schließen?', PChar(Caption), MB_YESNO or MB_ICONQUESTION) = IDNO then
    CanClose := False
  else
    CanClose := True;
end;