線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1217
推到 Plurk!
推到 Facebook!

如何將檔案名稱add到ComoBox的Items內

答題得分者是:daldal
whitesnak
一般會員


發表:8
回覆:3
積分:2
註冊:2005-10-15

發送簡訊給我
#1 引用回覆 回覆 發表時間:2009-12-29 13:34:04 IP:118.160.xxx.xxx 訂閱
請教各位高手~~
我想將某一資料匣內所指定副檔名的檔案,全都Add到ComboBox的Items內,要如何做呢??
煩請幫忙解答..謝謝!!
daldal
高階會員


發表:6
回覆:102
積分:226
註冊:2007-06-18

發送簡訊給我
#2 引用回覆 回覆 發表時間:2009-12-30 09:42:08 IP:61.219.xxx.xxx 未訂閱
使用 winapi 的 FindFirst,FindNext 等函式

其他應用例如搜尋目錄、不要搜尋隱藏檔等等
改變 SearchRec.Attr 判斷的屬性即可
Constant Value Description
faReadOnly $00000001 Read-only files
faHidden $00000002 Hidden files
faSysFile $00000004 System files
faVolumeID $00000008 Volume ID files
faDirectory $00000010 Directory files
faArchive $00000020 Archive files
faAnyFile $0000003F Any file

[code cpp]
//ComboBox1的Items指定給pList
TStrings* pList = ComboBox1->Items;

//你要搜尋的位置與檔案名稱 *.jpg , auto*.* ....等等
AnsiString szPath = "C:\\*.*";

//---------------------------------------------------------------------------
//清空舊資料
pList->Clear();

//依照szPath路徑搜尋檔案名稱
TSearchRec SearchRec;
int iFound=FindFirst(szPath, faAnyFile, SearchRec);
while(iFound==0)
{
if(SearchRec.Attr!=faDirectory && SearchRec.Name!=".." && SearchRec.Name!=".")
{
pList->Append(SearchRec.Name);
}
iFound=FindNext(SearchRec);
Application->ProcessMessages();
}
FindClose(SearchRec);
//---------------------------------------------------------------------------
[/code]

編輯記錄
daldal 重新編輯於 2009-12-30 09:43:11, 註解 無‧
系統時間:2024-03-28 22:14:39
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!