Hallo zusammen,
ich verstehe nicht, wie Applicationen korrekt beendet werden.
Delphi-Quellcode:
Application.Initialize;
{hier prüfe ich, ob einen Datei vorhanden ist]
Application.CreateForm(TfrmMain, frmMain);
Application.Run;
Wenn ich feststelle, dass die Datei nicht vorhanden ist, soll CreateForm nicht aufgerufen und das Programm gleich beendet werden.
Wenn ich bspw. in der Prüfung Application.Destroy einfüge und das Erstellen der Form von Application.Terminated abhängig mache, also bspw.
Delphi-Quellcode:
Application.Initialize;
Application.Destroy;
if not Application.Terminated then
begin
Application.CreateForm(TfrmMain, frmMain);
Application.Run;
end;
, dann wird das Programm mit Fehler und Fenster beendet ".... funktioniert nicht mehr. Windows kann online nach einer Lösung für das Problem suchen.
online nach einer Lösung suchen und das Programm schließen
Programm schließen
Programm debuggen"
Wenn ich das Fenster schließe folgt der nächste Hinweis
Exception EReadError in module rtl100.bpl at 00038183 Fehler beim Lesen von Statusbar.Panels: Systemfehler. Code 1400. Ungültiges FEnsterhandle."
Wie muss ich denn im Falle, dass die entsprechende Datei nicht vorliegt, die Application beenden?
Gruß
Ralf