Hallo!
Bevor mein Programm beendet werden kann, muss dies durch eine Bestätigung 'vollendet' werden.
Delphi-Quellcode:
procedure THauptform.FormCloseQuery(Sender: TObject;
var CanClose: Boolean);
begin
if MessageDlg('Wollen Sie VPlan Plus wirklich beenden?',
mtConfirmation, [mbYes, mbNo], 0) = mrYes then
CanClose:=True
else
CanClose:=False;
end;
Wenn nun Windows beendet wird, während das Programm noch läuft, funktioniert dies auf Grund einer Warnmeldung nicht.
Wie ist es möglich, dass bei einem Shutdown CanClose auf True gesetzt wird?
Oder gibt es da noch bessere Möglichkeiten hinsichtlich des Beendens?