findfirst findnext 递归查找指定目录下所有子目录下所有文件，为什么总是死机？...

findfirst findnext 递归查找指定目录下所有子目录下所有文件，为什么总是死机？ Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiAPI/html/delphi_20061110231617254.html
procedure TForm1.FindAll(const Path: String);
var
sr:TSearchRec;
fr:Integer;
begin
fr:=FindFirst(Path,faAnyFile,sr);
while fr=0 do
begin
if (sr.Attr=faDirectory)and(sr.Name<>'.')and(sr.Name<>'..') then
FindAll(sr.Name)
else
begin
showmessage(sr.name);
end;
FindNext(sr);
end;
FindClose(sr);
end;

我是从网上找到的这个函数，可是调用时总是不停时showmessage，一直停不下来，这是为什么呢？万分感谢！

FindNext(sr);
改为：
fr:=FindNext(sr);

//别人为你消耗时间和生命
//你却什么都不付出，很不厚道。
//记得下次改正。

findfirst findnext 递归查找指定目录下所有子目录下所有文件，为什么总是死机？...相关推荐

Linux拓展之查找指定目录下的最大文件
概述有时候我们需要查找指定目录下的最大文件,通常说的指定目录包括该目录下的所有文件和子目录下的所有文件.如下是几种能查找最大文件的方法. 方法一查找指定目录下的最大文件,但不包括所有子目录,只包括 ...
linux如何查看指定目录下文件内容,Linux 系统下通过关键词查找指定目录下的文件内容...
#!/bin/bash # 作者:靑龍一笑(C.S.Ricen) # 功能:根据指定的关键词,查找指定目录下的文件内容 # 要查找的目录 Search_Dir=/opt/datas/ # 关键字列表 ...
Linux学习：读取目录内容 (目录名和类型)和递归统计指定目录下普通文件个数练习
一.读取目录内容 #include <stdio.h> #include <unistd.h> #include <dirent.h> #include <s ...
[Linux C]递归遍历指定目录下的子目录和文件
/* 功能:演示了在Linux下利用C语言递归遍历指定目录下的子目录(不含隐藏目录)和文件 */ #include <stdio.h> #include <dirent.h> ...
[Windowns C]递归遍历指定目录下的子目录和文件
/* 功能:演示了利用C语言递归遍历指定目录下的子目录和文件! 说明:经修改也可以搜索文件名符合特定格式的文件,如修改"\\*.*"为"\\*.log" */ ...
C#递归搜索指定目录下的文件或目录
来源:https://www.cnblogs.com/huhangfei/p/5012978.html 诚然可以使用现成的Directory类下的GetFiles.GetDirectories.Get ...
[Linux C]递归遍历指定目录，以目录树形式展示
/* 功能:演示了利用C语言递归遍历指定目录下的子目录(不含隐藏目录)和文件,并以目录树形式展示! 其中编译命令为:gcc -o travel travel.c -std=c99 */ #includ ...
bat递归查找指定文件_Windows下递归搜索文件及其所在目录 .bat脚本实现
[说明] 当我们要查找文件时,在 Linux 下可以使用 find 命令很方便的递归搜索到文件名含有某一关键字的文件及其件所在位置,如图1 所示. 图1 但在Windows 系统中却并没有这样方便的 ...
bat递归查找指定文件_bat递归查找指定文件_Windows下递归搜索文件及其所在目录 .bat脚本实现...
[说明] 当我们要查找文件时,在 Linux 下可以使用 find 命令很方便的递归搜索到文件名含有某一关键字的文件及其件所在位置,如图1 所示. 图1 但在Windows 系统中却并没有这样方便的 ...

findfirst findnext 递归查找指定目录下所有子目录下所有文件，为什么总是死机？...

findfirst findnext 递归查找指定目录下所有子目录下所有文件，为什么总是死机？...相关推荐

最新文章

热门文章