1、易語言隊(duì)列尋找文件方法,2010.8.25 作者：Devil,附上源碼,.版本 2 .支持庫 EDataStructure .支持庫 iext .子程序 枚舉文件 .參數(shù) 目錄, 文本型 .局部變量 隊(duì)列, 隊(duì)列 .局部變量 節(jié)點(diǎn), 節(jié)點(diǎn) .局部變量 節(jié)點(diǎn)1, 節(jié)點(diǎn) .局部變量 路徑, 文本型 .局部變量 文件夾名稱, 文本型 .局部變量 文件名, 文本型 .局部變量 文件數(shù)目, 整數(shù)型,節(jié)點(diǎn).加入屬性 (“path”, 目錄) 把初始目錄加到隊(duì)列 隊(duì)列.壓入 (節(jié)點(diǎn)) .判斷循環(huán)首 (隊(duì)列.是否為空 () 假) 彈出隊(duì)列最前一個(gè)元素作為目錄,對(duì)該目錄進(jìn)行文件夾枚舉和文件枚舉 隊(duì)列.彈出 (節(jié)

2、點(diǎn)1) 節(jié)點(diǎn)1.取文本值 (“path”, 路徑) 路徑 選擇 (取文本右邊 (路徑, 1) “”, 路徑 “”, 路徑) 文件夾名稱 尋找文件 (路徑 “*.*”, #子目錄) .判斷循環(huán)首 (文件夾名稱 “”) .如果真 (文件夾名稱 “.” 且 文件夾名稱 “.”) 如果在當(dāng)前目錄下找到了文件夾,則把該文件夾壓,入到隊(duì)列,等待掃描該文件夾的下一級(jí)目錄和文件名 節(jié)點(diǎn).修改屬性 (“path”, 路徑 文件夾名稱) 隊(duì)列.壓入 (節(jié)點(diǎn)) .如果真結(jié)束 文件夾名稱 尋找文件 (, #子目錄) .判斷循環(huán)尾 () 處理事件 () 尋找當(dāng)前目錄的所有文件 文件名 尋找文件 (路徑 “*.*”, )

3、 .判斷循環(huán)首 (文件名 “”) 超級(jí)列表框1.插入表項(xiàng) (, 路徑 文件名, , , , ) 文件數(shù)目 文件數(shù)目 1 標(biāo)簽3.標(biāo)題 到文本 (文件數(shù)目) 文件名 尋找文件 (, ) .判斷循環(huán)尾 () .判斷循環(huán)尾 (),降根目錄壓入隊(duì)列，判斷隊(duì)列有無 內(nèi)容，真開始循環(huán),根目錄,根目錄,搜索子目錄,目錄,目錄1,目錄2,循環(huán)搜索根目錄中 子目錄并將 目錄壓入隊(duì)列中,隊(duì)列,根目錄,將根目錄彈出進(jìn)行搜索,搜索文件,目錄,目錄1,目錄2,循環(huán)搜索子目錄并將目錄壓 入隊(duì)列中直到?jīng)]有子目錄 開始搜索文件并將文件列 出來,文件列表,搜索下一級(jí)目錄,目錄,目錄2,文件搜索完畢時(shí)回到判斷循環(huán)首 隊(duì)列中有內(nèi)容，將目錄1彈出繼續(xù)搜索 并將目錄1子目錄壓入隊(duì)列,文件列表,目錄1,子目錄1,子目錄2,搜索下級(jí)目錄文件,目錄,目錄2,目錄搜索完畢，