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 弹出带黄色感叹号对话框提醒

Delphi 递归算法遍历文件

Delphi decodeutf8str解决系统自带utf8解码缺陷

Delphi 得到ip三个值

Delphi 如何编写使stringgrid中的一列具有check功能,和checkbox效果一样

Delphi xe3里判断网络是否连接成功

截取程序的网络封包(Delphi hook api)

Delphi treeview基本用法

Delphi xe 新功能试用:多种皮肤样式静、动态设置方法

Delphi将文件删除至回收站

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...