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 ini文件操作用法

Delphi package

Delphi stringgrid 实例3： 本例功能: 1、修改 tstringgrid的默认宽与高; 2、添加行; 3、确认当前单元并赋值.

Delphi indy防止假死

Delphi获取进程快照(snapshot)

Delphi 很方便调用的log日志方法

Delphi touchkeyboard1 基本用法

Delphi removewhitespaces 过滤字符串所有空格

Delphi下的纯pascal的十六进制转十进制

Delphi 如何快速从列表框tlistbox中删除重复项

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

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