Formular schliessen verhindern, wie?

[Noedel]

Zitat von Luckie:

Laut Aussage hat er das doch schon.

Dann hab ich die Problematik nicht verstanden

Zitat von freak4fun:

Delphi-Quellcode:

procedure TForm1.FormCloseQuery(Sender: TObject; var  CanClose: Boolean);
begin
  CanClose := MessageDlg('Beenden?',MTConfirmation,[MbYes,MbNo],0) = MrYes;
end;

Ok, das ist noch etwas schöner