Delphi 下找到目录中的所有文件夹

本文整理自网络，侵删。

 
uses 
  ioutils, Types
 
 
//获取指定目录下的文件与子目录
procedure TForm1.Button1Click(Sender: TObject);
var
  dfs: TStringDynArray;
  str: string;
begin
  dfs := TDirectory.GetFileSystemEntries(path);
  Memo1.Clear;
  for str in dfs do Memo1.Lines.Add(str);
end;

 

相关阅读 >>

Delphi 提取字符串左侧内容

Delphi 将memo转化为jpg输出

Delphi 从文件中读取图像类型

Delphi xe5 android toast

Delphi中使用 twebbrowser 编辑网页

Delphi win7中的uac与开机自动启动

Delphi api屏幕传输算法

Delphi 监视剪贴板内容

Delphi webbrowser1 缩放网页

Delphi xe5如何像手机qq一样最小化后显示图标

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

转载请注明出处：木庄网络博客 » Delphi 下找到目录中的所有文件夹