小弟在线急求，用DELPHI下文件夹覆盖拷贝的问题/100分
小弟刚学DELPHI ，用delphi 写文件夹的拷贝，如把C:\temp整个文件夹和里面的子文件件夹文件全拷贝到D:\temp下，并且可以覆盖D:\temp里的同名文件夹和文件，新的文件也要拷贝到D:\temp下
最好能给个全部代码不仅是函数或者应用程序的例子。
[解决办法]
下面的代码是复制一文件的，你参考一下
uses ShellAPI;
...
var
FileStruct:TSHFileOpStruct;
begin
FileStruct.Wnd :=0;
FileStruct.wFunc :=FO_COPY;
FileStruct.pFrom:=Pchar(SourceDir);
FileStruct.fFlags:=FOF_NOCONFIRMATION; //不需要提示.
FileStruct.pTo :=pchar(DestPath);
if SHFileOperation(FileStruct)=0 then
result:=true;
//SourceDir是源文件夹，DestPath是目标目录
[解决办法]
1拷贝
2删除
