Nochwas:
Mir ist eben aufgefallen dass er nicht den Else-Zweig ausführt, dafür aber die Datei nicht liest aber es kommt kein Fehler.
Außerdem habe ich noch diese Funktion im Programm die mir auch immer wieder den Fehler gibt, dass die Dateien nicht gefunden werden können, alles aber nur beim Autostart aus der Registry:
Delphi-Quellcode:
procedure TMain.ApplicationEventsException(Sender: TObject; E:
Exception);
begin
Application.MessageBox(PChar('
Folgender Fehler ist aufgetreten: '+ E.
Message + '
.' + #10 + '
Die Anwendung wird nun geschlossen. Bei erneuten auftreten des Fehlers wenden Sie sich bitte an den Autor Marcel Jänicke'), '
Fehler', 16);
Close;
end;
[EDIT]
@Cyberbob: ich werde es gleich probieren
[/EDIT]
[EDIT2]
OK, ich habe es eben probiert, es geht. Kann mir einer erklären warum das beim Autostart änders ist alsb beim normalen Start?
[/EDIT2]
Gruß
Mazel