文件名称:Delphi 复制文件夹到其他路径中.rar
文件大小:7KB
文件格式:RAR
更新时间:2022-07-30 11:35:35
Delphi源码-文件操作
Delphi 复制文件夹到其他路径中,比较传统的复制,只是演示某些基础的Delphi文件操作函数的使用,比如: wnd:=handle; wfunc:=fo_copy; pfrom:=@frombuf; pto:=@tobuf; fflags:=fof_noconfirmation or fof_renameoncollision; fanyoperationsaborted:=false; hnamemappings:=nil; lpszprogresstitle:=nil; end; if shfileoperation(opstruc)=0 then messagedlg('文件复制成功!',mtinformation,[mbok],0) else showmessage('复制失败!请于我联系'); close;
【文件预览】:
codesc.net
----复制文件夹()
--------Unit1.ddp(51B)
--------Project1.res(876B)
--------Unit1.dcu(6KB)
--------Unit1.dfm(1KB)
--------Project1.cfg(434B)
--------Project1.dpr(188B)
--------Project1.dof(2KB)
--------Unit1.pas(2KB)