社区
Delphi
帖子详情
怎么取得某文件夹下的所有第一层文件夹名和文件名?
nenu0
2003-10-20 09:59:23
比如说取得film文件夹下的第一层文件及文件夹名,不需要再往下取了。就要一层的。
...全文
105
2
打赏
收藏
怎么取得某文件夹下的所有第一层文件夹名和文件名?
比如说取得film文件夹下的第一层文件及文件夹名,不需要再往下取了。就要一层的。
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
2 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
kingting
2003-10-21
打赏
举报
回复
uses ShellAPI, FileCtrl,…等其他
procedure TfrmMain.GetSrcDir;
var
sr: tsearchrec;
Found:integer;
s1, s2: integer;
begin
Memo1.Lines.Clear;
files.Clear;
Found:=FindFirst(Edit1.Text+'*',faAnyFile,sr);
try
while found=0 do
begin
Files.Add(sr.Name);
// Memo1.Lines.Add(' time | ' + DateTimeToStr(FileDateToDateTime(sr.Time)));
// Memo1.Lines.Add(' | ' + datetimeToStr(GetFiledateTime(sr.Name,fttCreation)));
if (sr.attr and faDirectory > 0) then
Memo1.Lines.Add('[' + sr.Name + ']') //表示目录
else
Memo1.Lines.Add(sr.Name);
Found:=FindNext(sr);
end;
finally
FindClose(sr);
end;
end;
nenu0
2003-10-21
打赏
举报
回复
up
C#实现,遍历ftp上的
文件夹
,
文件
名
C#实现,遍历ftp上的
文件夹
,
文件
名
如何批量快速提取复制
文件夹
里所有
文件夹
名
和
文件
名
(包括所有子文件里的所有
文件夹
名
和
文件
名
)详细步骤
@echo off的意思是在批处理运行命令的时候不会一条一条的显示执行的命令,与之相匹配的还有@echo on。 @echo off 与@echo on前者为关闭回显,后者为打开回显 当不想批处理文件中的命令一行一行在DOS中显示出来时...
零基础快速入门:Linux系统 系统的安装、局域网与外网 的配置、下载服务的多种方式
secureCRT 第一步在win10系统中下载并且安装ssh软件 secureCRT 第二步:只要知道centos系统所在电脑的公网IP 登录账户和密码 / win10和centos系统所在的两台电脑在同...
导出
文件夹
下所有
文件
名
导出
文件夹
下所有
文件
名
MATLAB读取
文件夹
下所有文件的
文件
名
并读取数据
MATLAB读取
文件夹
下特定类型格式文件的
文件
名
并读取该格式文件的数据 利用代码对大量数据进行自动批处理时,首先...第一步:获取
文件夹
下某类型数据的所有
文件
名
主要包括三个步骤: 设置数据存放的
文件夹
路径;...
Delphi
5,379
社区成员
262,722
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章