Hallo,
ich habe
hier folgenden Code gefunden der mein Vorhaben ermöglichen sollte.
Delphi-Quellcode:
function CopyDir(const fromDir, toDir: string): Boolean;
var
fos: TSHFileOpStruct;
begin
ZeroMemory(@fos, SizeOf(fos));
with fos do
begin
wFunc := FO_COPY;
fFlags := FOF_FILESONLY;
pFrom := PChar(fromDir + #0);
pTo := PChar(toDir)
end;
Result := (0 = ShFileOperation(fos));
end;
Wenn ich nun einen Ordner als Quelle angebe der nicht in meinem Programm genutzt wird, dann funktioniert es einwandfrei.
Nehme ich aber einen Ordner auf den ich mit meinem Programm zugreife, dann bekomme ich die Meldung das die Quelldatei nicht gelesen werden könnte.
Ich möchte aber den Ordner sichern und muß ihn somit kopieren wenn das Programm läuft. Ist es denn nicht möglich ein komplettes Verzeichnis zu kopieren wenn auf Dateien zugegriffen wird (es wird nicht geschrieben sondern nur aus Dateien Informationen geladen)?
Kann mir da jemand einen Tip geben wo mein Fehler liegt?
Danke schon einmal.