delphi复制整个文件夹(当然包括嵌套文件夹)-木庄网络博客

本文整理自网络，侵删。

 使用的是 Delphi 2010 下 IOUtils 单元的 TDirectory.Copy 函数:


--------------------------------------------------------------------------------
uses IOUtils;

procedure TForm1.Button1Click(Sender: TObject);
const
SourceDir = 'C:\Temp\Folder1'; { 源文件夹必须存在 }
DestDir = 'C:\Temp\Folder2'; { 如果目标文件夹不存在, 程序会自动创建 }
begin
TDirectory.Copy(SourceDir, DestDir);
end;

相关阅读 >>

Delphi xe6通过wifiapi得到wifi信息

Delphi insert 插入一个字符(串)

Delphi向当前窗口模拟键盘ctrl+v发送"粘贴"

Delphi 捕捉异常:try..except..end

Delphi中判断某个文件是否已经打开

Delphi 在windows右键菜单中加上关联

更多相关阅读请进入《Delphi》频道 >>