小弟在线急求，用DELPHI下文件夹覆盖拷贝的问题/100分

Question

小弟刚学DELPHI ，用delphi 写文件夹的拷贝，如把C:\temp整个文件夹和里面的子文件件夹文件全拷贝到D:\temp下，并且可以覆盖D:\temp里的同名文件夹和文件，新的文件也要拷贝到D:\temp下
最好能给个全部代码不仅是函数或者应用程序的例子。

Answer 1

下面的代码是复制一文件的，你参考一下
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是目标目录

Answer 2

下面的代码是复制一文件夹的，你参考一下
-------
sorry,刚才少打了一个"夹"字

Answer 3

忘月亮简单解释一下程序：谢谢。100分送给你
Function Copy_Dir(SourceDir,DestDir:String;nLx:Integer):BooleannLx 是干什么 用的