摘要: procedure GetFileListEx(FilePath, ExtMask: string; FileList: TStrings; SubDirectory: Boolean = True); // // 遍历目录及子目录procedure TForm2.GetFileListEx(Fil 阅读全文
posted @ 2019-08-29 11:09 小美lmt 阅读(832) 评论(0) 推荐(0) 编辑