Einzelnen Beitrag anzeigen

Benutzerbild von HeikoAdams
HeikoAdams

Registriert seit: 12. Jul 2004
Ort: Oberfranken
661 Beiträge
 
FreePascal / Lazarus
 
#3

Re: Windows wartet beim beenden auf mein Progr. Wie vehinder

  Alt 11. Jul 2008, 17:00
Ich würde eine private Variable definieren, die z.B. standardmäßig auf True steht. Dann würde ich in meinem Hauptform eine Procedure
Delphi-Quellcode:
procedure TMeinForm.WMQueryEndSession(var Msg: TWMQueryEndSession);
begin
  MeineVariable := False;
  Msg.Result := integer(true);
end;
definieren, in der die Variable auf False gesetzt wird. Im Closequery wurde ich die Messagebox nur anzeigen, wenn meine private Variable auf True steht.
Damit sollte Dein Problem gegessen sein.
Jeder kann ein Held werden und Leben retten!
Einfach beim NKR oder der DKMS als Stammzellenspender registrieren! Also: worauf wartest Du noch?
  Mit Zitat antworten Zitat