请问：如何拷贝目录下的所有文件（包括子目录）到另外的子目录？一定给分！！！

Question

ShFileOperation,你搜一下，很多的！

Answer 1

在delphi中如何调用，那位老兄给个例子?

Answer 2

dos command :xcopy , OK!

Answer 3

：　lovelypengpeng(鹏鹏)　:全部拷贝，不用担心用SHFILEOPERATION。
var source:PChar;
var Dest:PChar;
var FileOP:TSHFILEOPSTRUCT;
begin
    Source:=@('c:\windows\*');
    //可以改变源路径
    Dest:=@('c:\winbak');
    //设置目的路径
    FileOp.hwnd=Handle;
    FileOp.wFunc:=FO_COPY;
    //执行文件拷贝
    FileOp.pFrom:=Source;
    FileOp.pTo:=Dest;
    FileOp.fFlags:=FOF_ALLOWUNDO;
    //这个参数参考MSDN
    FileOp.hNameMappings:=nil;
    FileOp.lpszProgressTitle:=nil;
    SHFileOperation(@FileOp);
    //再加一些错误判断
end;