Forum: Programmieren allgemein
by MPirious,
21. Jul 2003
Hallo
zuerst einmal: type
TForm1 = class(TForm)
private
{ Private-Deklarationen }
procedure WMQUERYENDSESSION(var msg: TMessage); message WM_QUERYENDSESSION;
public
{ Public-Deklarationen }
end;
Forum: Programmieren allgemein
by MPirious,
21. Jul 2003
@Luckie: Mit Windows herunterfahren meine ich den Befehl geben, mein Windoof braucht ca. 5 Sekunden, bis es alle Prozesse beendet hat. Sind bei mir immer sehr viele. Deswegen fürt mein Windows auch Programme "nach" dem Herunterfahren aus.
Und falls ich euch doch falsch verstanden habe und ihr meint, dass mein Programm beim ersten Verusch Windows herunterzufahren beendet wird, muss ich erwiedern,...
Forum: Programmieren allgemein
by MPirious,
21. Jul 2003
Hi
hatte gerade das selbe Problem, wollte eine Art Backupprogramm schreiben.
Ich habe es so gelöst:
Im onCloseQuery Ereignis meines Hauptformulars CanClose auf false gesetzt und anschließend die Prozedur zur Bearbeitung aufgerufen.
Am Ende dieser Prozedur Windows runterfahren und direkt danach Application.Terminate
Funktioniert soweit