Программирование на Delphi и не только Как полностью скопировать папку? | Программирование на Delphi и не только
Delphi FAQ >> Файлы и каталоги uses ShellApi; … procedure CopyAFile(const Source, Dest: String); var FileOp: TSHFileOpStruct; SS, DD: String; begin SS := Source + #0; DD := Dest + #0; with FileOp do begin Wnd := 0; wFunc := FO_COPY; pFrom := PChar(SS); pTo …