AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Wie kann ich FormDestroy umgehen?

Ein Thema von Spiderpig_GER_15 · begonnen am 9. Jul 2008 · letzter Beitrag vom 10. Jul 2008
Antwort Antwort
Seite 2 von 2     12   
Benutzerbild von Spiderpig_GER_15
Spiderpig_GER_15

Registriert seit: 17. Mär 2008
298 Beiträge
 
Delphi 7 Personal
 
#11

Re: Wie kann ich FormDestroy umgehen?

  Alt 10. Jul 2008, 12:56
ok,alles klar
---Zufall ist das Inkognito Gottes---
  Mit Zitat antworten Zitat
alzaimar
(Moderator)

Registriert seit: 6. Mai 2005
Ort: Berlin
4.956 Beiträge
 
Delphi 2007 Enterprise
 
#12

Re: Wie kann ich FormDestroy umgehen?

  Alt 10. Jul 2008, 13:04
Bei OnCloseQuery kannst du festlegen, ob das Fenster überhaupt geschlossen wurde.

Wenn Du einen Unterschied zwischen 'Kreuzklick' und 'Abbrechen' machen willst, dann weise dem ModalResult des Abbrechen-Buttons einen anderen Wert zu und prüfe dies im OnClose;

Delphi-Quellcode:
Procedure TForm1.FormClose (Sender : TObject)
Begin
  Case ModalResult Of
    mrCancel : // Kreuz geklickt
    mrIrgendwass : // Dein Button
    else ... // OK, oder ein anderer Buttoni
  End;
End;
Denkbar wäre auch (schon erwähnt?) das im Click-Ereignis des 'Abbrechen'-Buttons ein Flag gesetzt wird und du das dann im FormClose abfragst. Du kannst auch im Click-Ereignis des Buttons das FormClose-Ereignis des Formulars auf Nil setzen, dann wird FormClose eben nicht aufgerufen...
"Wenn ist das Nunstruck git und Slotermeyer? Ja! Beiherhund das Oder die Flipperwaldt gersput!"
(Monty Python "Joke Warefare")
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 2     12   


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:33 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz