2017年3月22日

delphi获取目录下所有文件夹名

摘要: delphi获取目录下所有文件名 procedure SearchFile(Path:String);//注意,path后面要有'\';var SearchRec:TSearchRec; Found:Integer;begin Found:=FindFirst(path+'*.*',faAnyFil 阅读全文

posted @ 2017-03-22 11:28 酷瑞 阅读(1212) 评论(0) 推荐(0) 编辑

导航