Hab jezz das hier dazu gefunden .... wo geb ich denn da die Ordner ein die ich kopieren will ... wenn ich es so in mein Programm einfüge geht gar nix .... es hagelt nur unmengen fehler ....
Delphi-Quellcode:
[color=#ff004c]
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;[/color]
[EDIT=Christian Seehase]Delphi Tags hinzugefügt[/EDIT]