Wie wäre es mit einer aussagefähigeren Fehlermeldung?
Delphi-Quellcode:
if not CopyFile(PChar('F:\KS\EV\ev.ini'), PChar('F:\KS\EV\EVSAVE\ev.ini'), true) then
RaiseLastOSError;
if not CopyFile(PChar('F:\KS\EV\ev.ini'), PChar('F:\KS\EV\EVSAVE\ev.ini'), true) then
ShowMessage('Fehler beim Erstellen der Kopie!'#13#10 + SysErrorMessage(GetLastError));