Ich habe zwar keinen blaßen Schimmer warum, aber das bloße Ändern von
Delphi-Quellcode:
begin
Application.Initialize;
Application.Title := 'SyncBack4U';
Application.CreateForm(TdtmdlSyncBack, dtmdlSyncBack);
Application.CreateForm(TFrmBackup, FrmBackup);
Application.Run;
end.
in
Delphi-Quellcode:
begin
try
Application.Initialize;
Application.Title := '
SyncBack4U';
Application.CreateForm(TdtmdlSyncBack, dtmdlSyncBack);
Application.CreateForm(TFrmBackup, FrmBackup);
Application.Run;
except
on e:
Exception do
MessageBox(0, PChar(e.
Message), '
Fehler', MB_OK + MB_ICONSTOP + MB_TOPMOST);
end;
ExitProcess(0);
end.
hat das Problem beseitigt. Es kommt aber merkwürdigeweise
keine Exception-Meldung.
Soll mir aber auch egal sein, solange das Programm tut was es soll.