Einzelnen Beitrag anzeigen

elch

Registriert seit: 21. Mär 2003
Ort: Hünfelden (Hessen), Germany
4 Beiträge
 
Delphi 5 Standard
 
#1

Form-OnClose abbrechen? | TForm1.FormClose

  Alt 21. Mär 2003, 16:26
hi!

ich möchte, wenn mein programm geschlossen wird, vorher eine abfrage machen ob gespeichert werden soll. das funktioniert auch - messagebox mit YES|NO. jetzt möchte ich aber noch nen button für abbrechen machen, also CANCEL.

Code:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  if notsaved then
  if (MessageBox(0, 'Änderungen speichern?', 'Nicht gesichert', MB_YESNOCANCEL or MB_ICONWARNING) = IDYES) then
  ved_save;
end;
wie kann ich, wenn auf "Abbrechen" gedrückt wurde, das schließen des forms abbrechen?


mfg,
elch
  Mit Zitat antworten Zitat