Entwickler-Ecke

Sonstiges (Delphi) - X-Funktion abfragen


dude - Fr 11.04.03 13:31
Titel: X-Funktion abfragen
Hi,

wie kann ich in einer IF Klammer abfragen, ob der Beenden(X) Button gedrückt wurde ?


Quelltext
1:
2:
3:
4:
5:
If SC_CLOSE = true then begin

CanClose := false;

end;


Ich weiss dass ich die IF Klammer eigentlich gar nicht schreiben muss und den Eintrag in FormCloseQuery reinschreiben muss. Das hab ich auch. Bloss kann dann Windows das Programm nicht mehr beenden - deswegen muss ich abfragen können ob nur der BeendenButton (X) vom Fenster gedrückt wurde !!

MFG


Udontknow - Fr 11.04.03 14:22

Du wirfst hier zwei Sachen durcheinander. Das eine ist das Drücken eines Buttons, das andere das Schliessen des Fensters.
Wenn du Code ausführen willst, sobald der Button gedrückt wurde, dann tust du das eben in dem Ereignis OnButtonClick. Keine If-Abfrage.

Edit: Vergiss es... Ist schon spät, und wird Zeit für´s Wochenende... :oops: :wink:
Du meinst den Systemknopf oben rechts... Welches Programmverhalten willst du denn eigentlich erreichen?

Cu,
Udontknow


dude - Sa 12.04.03 16:44

Also, da ich ja eine Andere Funktion in den Systembutton gemacht hab (dass das fenster minimiert wird und co...), und die ganze Operation ind FormCloseQuery reingemacht habe, kann Windows das Programm beim Herunterfahren nicht mehr schließen.
Hier der Code:

Quelltext
1:
2:
3:
4:
5:
6:
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
CanClose := false;
TaskBarAddIcon;
form1.Hide;
end;


Deshalb will ich wissen, wie ich das Programm fragen kann, wann der X Knopf gedrückt worden ist, weil es ja keine procedure für den "Systemknopf" X gibt !