在實際開發中經常需要遍歷某個資料夾及其子資料夾下的檔案,看到很多人不知道如何做,忍不住寫段東西與大家分享。
procedure maketree(var slfile: tstrings;
const
fileext:
string
);var
sr : tsearchrec;
err : integer;
trsize, filepath :
string
;begin
err:
=findfirst(
'*.*
', $
11, sr) ;
while (err =0
) do
begin
ifsr.name[1]
<>'.
'then
begin
iffileext =''
then
slfile.add(sr.name)
else
begin
ifansiuppercase(copy(sr.name, length(sr.name) -3
, 4)) =
ansiuppercase(fileext) then
slfile.add(sr.name);
end;
end;
if((sr.attr and fadirectory)
<>
0) and (sr.name[1]
<>'.
') then
begin
chdir(sr.name) ;
maketree(slfile, fileext);
chdir('..
') ;
end ;
err:
=findnext(sr) ;
end ;
end;
slfile 傳入乙個字串列表以儲存得到的結果, fileext 為 '' 可以遍歷所有檔案,fileext 指定為 ".txt" 或者 ".***" 可以指定查詢檔案的字尾名.
如果需要將目錄也返回,可以修改一下**。
遍歷資料夾下所有檔案
對於遍歷資料夾來說,其實並不麻煩,使用file轉化位址物件,再用file組獲取內容,其實google都差不多做好了,我就懶得廢話了,直接上 public listlist new arraylist 遍歷所有檔案 public listgetfilelist string path else ret...
shell 遍歷資料夾下所有檔案
linux 下有tree命令可以檢視指定資料夾下的所有檔案 需要安裝tree,ubuntu下sudo apt get install tree 要實現這樣的功能,可以有多種實現方式,指令碼語言就是一種方便快捷的方式,python,shell都可以很容易實現。最近在學習makefile編寫,其中有很多...
OpenCV遍歷資料夾下所有檔案
opencv中有實現遍歷資料夾下所有檔案的類directory,它裡面包括3個成員函式 1 getlistfiles 遍歷指定資料夾下的所有檔案,不包括指定資料夾內的資料夾 2 getlistfolders 遍歷指定資料夾下的所有資料夾,不包括指定資料夾下的檔案 3 getlistfilesr 遍歷...