Problem bei Datei kopieren. SHFileOperation, CopyFile,...

**manuel**

Hi Leute,

ich versuche schon seit einer Weile ein Programm zu schreiben, welches ein Backup von Benutzerdaten erstellt.

Eigentlich ein recht triviales Problem.
Nutze ich die SHFileOperation-Funktion bzw die

doFileWork-Procedure von Sakura, FileStreams, oder die Funktion CopyFile werden manche Dateien nicht kopiert, weil sie nicht geöffnet werden können.

Hier der Quelltext für dir Streams:

zusammenfalten · markieren

Delphi-Quellcode:

			
function ThreadCopy.CopyFile(Source, Dest: String): Boolean;

var F, T: TFileStream; 

begin 

  try 

    Result := true; 

    try 

      F := TFileStream.Create(Source, fmOpenRead);

      T := TFileStream.Create(Dest, fmOpenWrite);

      T.CopyFrom(F, 0); 

    finally 

      F.Destroy; 

      T.Destroy; 

    end;

  except 

    Result := false; 

  end; 

end;

Werden Die Dateien mittels Windows von Hand kopiert, funktioniert das Kopieren fehlerlos.

Alle zu kopierenden Dateien sind geschlossen !
kann man das irgendwie einrichtren dass alle Dateien kopiert werden?

Gruß

Manuel

Problem bei Datei kopieren. SHFileOperation, CopyFile,...

Problem bei Datei kopieren. SHFileOperation, CopyFile,...

Forumregeln