Einzelnen Beitrag anzeigen

BlueStarHH

Registriert seit: 28. Mär 2005
Ort: Hamburg
848 Beiträge
 
Delphi 11 Alexandria
 
#3

AW: Herunterfahren verhindern, Programm nicht beenden

  Alt 23. Jun 2016, 11:35
Meine Idee wäre jetzt dem OnClose-Ereignis des Formulars eine Routine "zu verpassen" und dort Abzufragen, ob das Programmbeendet werden darf oder nicht.
Delphi-Quellcode:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Action := caNone; // Das Formular darf nicht geschlossen werden, daher geschieht nichts.
end;
Hier sollte das Programm dann nicht beendet werden.
Danke, aber das hat keinen Effekt: Windows beendet das Programm trotzdem.
  Mit Zitat antworten Zitat