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 webbrowser设置自己定义user-agent

Delphi sysutils.lastdelimiter - 判断一个字符串在另一个字符串中最后出现的位置

Delphi 设置系统默认打印机

Delphi最全面的dbgrid点击标题实现排序

Delphi中使用tthread类实现多线程

Delphi winapi: getclassname - 获取指定窗口的类名

Delphi ioutils 获取当前目录下所有的文件/文件夹

Delphi入门语法

Delphi 简单的登录窗口

Delphi 去掉treeview水平滚动条

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

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