Einzelnen Beitrag anzeigen

Hawkeye219

Registriert seit: 18. Feb 2006
Ort: Stolberg
2.227 Beiträge
 
Delphi 2010 Professional
 
#4

Re: OnFormDestroy Frage "wirklich schließen"

  Alt 14. Apr 2006, 10:40
...und wenn ich im MessageDialog auf das "x" klicke, wird das Hauptformular ebenfalls geschlossen

Die Abfrage sollte man besser so formulieren:

Delphi-Quellcode:
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  if MessageDlg('Wollen Sie wirklich beenden?', mtConfirmation, [mbYes, mbNo], 0) <> mrYes then
    CanClose := False;
end;
Gruß Hawkeye

//Edit: @ManuMF: gleiche Idee, aber kleiner Fehler

//Edit2: Mein Fehler
  Mit Zitat antworten Zitat