Einzelnen Beitrag anzeigen

THY4243

Registriert seit: 15. Dez 2012
Ort: München - Untermenzing
31 Beiträge
 
Delphi 11 Alexandria
 
#16

AW: Herunterfahren verhindern, Programm nicht beenden

  Alt 23. Jun 2016, 19:24
Nachtrag - natürlich zum Schluss noch:

Delphi-Quellcode:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
{Abfolge: 1. X -> Form.CloseQuery -> Form.Close -> Form.Hide}
begin
  ....

  ShutdownBlockReasonDestroy(Application.Handle);

  ....

end;
  Mit Zitat antworten Zitat