Zitat von
HeikoAdams:
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.
Das Problem ist zu Deinem Leidwesen leider noch nicht beseitigt. Mit
ExitProcess(0);
teilst du Windows beim beenden Deines Programmes nur mit, dass alles ok ist. Darum kommt keine Meldung mehr.