Delphi 目录
张志峰
这个作者很懒,什么都没留下…
展开
-
Delphi 删除目录
Delphi 删除目录 2011-12-05 13:44:41| 分类:Delphi 目录 | 标签:|字号大中小 订阅---- 2、删除目录 ---- 删除目录与拷贝目录很类似,但为了能删除位于根目录下的一个空目录,需要在辅助函数中设置一个标志变量,即:如果删除的是空目录,则置bEmptyDir为True,这一句已经用深色框表示了。转载 2011-12-05 13:47:32 · 523 阅读 · 0 评论 -
Delphi 删除目录(二)
Delphi 删除目录(二) procedure TForm1.BitBtn1Click(Sender: TObject);var sr:TsearchRec; begin if directoryExists( 'g:\a ') then begin if转载 2011-12-05 13:44:45 · 977 阅读 · 0 评论 -
Delphi 移动目录
---- 3、移动目录 ---- 有了拷贝目录和删除目录的函数,移动目录就变得很简单,只需顺序调用前两个函数即可: function MoveDir(sDirName:String; sToDirName:string):Boolean; begin if CopyDir(sDirName,sToDirName) then转载 2011-12-05 13:46:11 · 790 阅读 · 0 评论 -
Delphi 拷贝目录
Delphi 拷贝目录 ---- 1、拷贝目录 ---- 为了能拷贝目录下带有子目录的情况,先定义一个辅助的拷贝函数,它是递归执行的,直到把目录下的所有文件和子目录都拷贝完。 ---- 1.1拷贝目录的递归辅助函数:DoCopyDir function DoCopyDir(sDirName:String; sToDirNam转载 2011-12-05 13:48:24 · 935 阅读 · 0 评论