Forum: Win32/Win64 API (native code)
by rainerg,
16. Mai 2011
Öh, okay - dann sollte ich mir die Parameter nochmal genauer anschauen - ich habe (zugegebenermaßen, die Sache einfach nur dumm kopiert!
Forum: Win32/Win64 API (native code)
by rainerg,
16. Mai 2011
'Eigentlich' läuft das damit, ABER ...
so werden Unterverzeichnisse nicht mitkopiert und beim ersten Anlegen gibt es eine Rückfrage, ob das Verzechnis angelegt werden soll.
MyCopy('c:\source_path\', 'c:\dest_path');
oder
MyCopy('c:\source_path\', 'c:\dest_path\');
kopiert Unterverzechnisse mit.
:-(
Forum: Win32/Win64 API (native code)
by rainerg,
15. Mai 2011
Hallo, mal wieder ein kleines Problem!
Aus diesem Thread --> http://www.delphipraxis.net/50745-xcopy-mit-delphi-nachbauen.html habe ich von MaBuSe folgenden Code entnommen:
uses ShellAPI;
function MyCopy(Quelle, Ziel: string):Boolean;
var
fos: TSHFileOpStruct;
begin
ZeroMemory(@fos, SizeOf(fos));