关于findfirst的问题 !!!!!!清高手进来一下(0)

  • 主题发起人 主题发起人 qwert8008
  • 开始时间 开始时间
Q

qwert8008

Unregistered / Unconfirmed
GUEST, unregistred user!
为什么先搜索findresult:=findfirst(apath+ffilename,faanyfile+fahidden+fasysfile+fareadonly,fsearchrec);再搜索findresult:=findfirst(apath+'*.*',fadirectory,dsearchrec);麻烦高手解释一下!!!begin apath:=getdirectoryname(apath); findresult:=findfirst(apath+ffilename,faanyfile+fahidden+fasysfile+fareadonly,fsearchrec); try while findresult=0 do begin listbox1.items.add(lowercase(apath+fsearchrec.name)); findresult:=findnext(fsearchrec); end; findresult:=findfirst(apath+'*.*',fadirectory,dsearchrec); while findresult=0 do begin if ((dsearchrec.attr and fadirectory)= fadirectory) and not isdirnotation(dsearchrec.Name) then findfiles(apath+dsearchrec.name); findresult:=findnext(dsearchrec); end; finally findclose(fsearchrec); end; end;
 
救救菜鸟吧
 
....第一个findresult:=findfirst(apath+ffilename,faanyfile+fahidden+fasysfile+fareadonly,fsearchrec);是查找固定文件第2个findresult:=findfirst(apath+'*.*',fadirectory,dsearchrec);是查找子文件夹....你注意看第2个参数的区别
 
菜鸟很穷,谢谢了,太感谢了
 
后退
顶部