lass dir mal vor dem kopieren die ordner ausgeben:
Delphi-Quellcode:
begin
showmessage(sPfadNichtOffen + #13#10 + sPfadOffen);
showmessage(sPfadNichtOffen1 + #13#10 + sPfadOffen1);
showmessage(sPfadNichtOffen2 + #13#10 + sPfadOffen2);
CopyFile(PChar(sPfadNichtOffen), PChar(sPfadOffen),True);
CopyFile(PChar(sPfadNichtOffen1), PChar(sPfadOffen1),True);
if CopyFile(PChar(sPfadNichtOffen2), PChar(sPfadOffen2),True)Then
MessageDlgPos7('Dateien Kopiert',mtInformation,[mbOk],self);
end;
und guck mal ob die dinger überhaupt existieren
und ob zb die \ richtig gesetzt sind oder ob du irgendwo 2 hintereinander hast
das kann schnell passieren wenn man nen pfad aus mehreren quellen zusammenstellt