Dateien Kopieren

[marabu]

Hallo René,

vielleicht liegt es ja nur daran, dass du keine Schreibrechte auf dem share hast, oder die Datei existiert bereits. Um den Fehler einzukreisen kannst du so vorgehen:

Delphi-Quellcode:

var
  src, tgt: string;
begin
  src := 'c:\test\1.jpg';
  tgt := '\\Rechnername\sharename\1.jpg';
  if not CopyFile(PChar(src), PChar(tgt), true) then
    ShowMessage(SysErrorMessage(GetLastError));;
end;

Grüße vom marabu