, hoe te kopiëren, met grote bestanden en laat de ramen /vooruitgang maken ShellAPI vorm.,, dat is in je die gebruik maakt van een,,, de bron en de beste zijn. Een lijst van dossiers heeft met #0, voor bijvoorbeeld,'c:\\1.txt'+ #0, WinCopyFile (+'c:\\2.txt','a:\\1.txt'+ #0 +'a:\\2.txt');,,, functie WinCopyFile (bron, Dest: string): booleaanse;,,, var, onder de TSHFileOpStruct; Resultval::,,.,,, "; ResultVal:, = 1;,,, - proberen, Bron: = + #0#0;,, de beste: = de beste + #0#0;, Struct.wnd: = 0;,,,,, Struct.wFunc: = FO_COPY; Struct.pFrom (Bron: = PChar);,, Struct.pTo: = PChar (de beste);,, Struct.fFlags:= FOF_SIMPLEPROGRESS of FOF_NOERRORUI of FOF_NOCONFIRMATION;,,,,, struct.fanyoperationsaborted:= valse; struct.hnamemappings:= nul;,, resultval:= SHFileOperation (onder); en, tot slot, de resultaten, de: = (resultval = 0);,,,,, einde.