(1) 文件目录的搜索方法和算法是什么?
递归算吗?如果算,那它的算法是什么呢?
请详细解释一下,我现在不是太懂,但急需解决这个问题,请各位大侠帮帮我 的忙谢谢了。(2) 文件目录中的“.”和“..”是什么意思???
递归算吗?如果算,那它的算法是什么呢?
请详细解释一下,我现在不是太懂,但急需解决这个问题,请各位大侠帮帮我 的忙谢谢了。(2) 文件目录中的“.”和“..”是什么意思???
解决方案 »
- 如何根据取得的控件句柄获得该控件的名称?
- 最简单的数据库问题!请大家都来看一下,我是个初学者,希望高手指点入门
- 奇怪的问题,关于事件afterscroll?
- Tmediaplaye控件问题:驱动程序未找到?
- ComboBoxEx如何把用户输入的文字保存并滚动显示,文字保存在一个文件里
- ant纳入delphi...
- 关于数据库打包的问题
- 初学问题:ADO连接本地Access数据库(*.mdb)时connetionstring该如何设置?
- 0-9的key是多少?
- 笑熬江湖
- 此文件正由另一应用程序或用户使用!这是怎么回事??
- 请教,在Delphi中怎样使用IdTCPServer组件?或介绍一些有关的资料?
procedure searchfile(dir:string; subdir:boolean);//dir是要搜的目录,substring是判
//断是不是要搜寻子目录
var rec:TSearchRec;
found:integer;
begin
if dir[length(dir)]<>'\' then dir:=dir+'\';
found:=findfirst(dir+'*.*',faAnyFile,rec);
while found=0 do
begin
if (rec.Attr and faDirectory > 0) and (rec.Name[1]<>'.')and (subdir=true)
then
searchfile(dir+rec.Name,true);
//do somethinghere
found=findnext(rec);
end;
end;
你给的dir[length(dir)]是什么意思?