利用C++Builder遍歷文件目錄
2019-09-06 23:34:02
供稿：網(wǎng)友
利用C++Builder我們可以輕松地實現(xiàn)類似Windows的Explorer的目錄樹。OK,Let's go.
我們需要一個TTree和一個TImageList控件。如何獲得系統(tǒng)的盤符呢？Borland給我們提供了一個TDriveType類，什么？幫助里找不到，呵呵，這是實現(xiàn)TDirectoryComboBox用到的一個類，幫助里當然沒有了，它的定義如下：
typedef enum ATTR { atDirectory,atFile} Attr;
struct ITEMPROPERTY
{
Attr ItemAttr;
}ItemProperty;
typedef enum TDRIVETYPE {dtUnknown, dtNoDrive, dtFloppy, dtFixed, dtNetwork, dtCDROM,dtRAM}TDriveType;
那么如何知道這些盤符是軟驅(qū)是硬盤呢？這就需要用到WinAPI函數(shù)GetDriveType了。定義如下：
UINT GetDriveType(LPCTSTR lpRootPathName); 具體內(nèi)容請大家參考幫助文檔，我就不在這兒耽誤大家時間了。最后我們利用BCB的FindFirst,FindNext等函數(shù)就可以實現(xiàn)對目錄的遍歷了。
下面的兩個函數(shù)InitDriectoryTree用來獲得盤符和它們的屬性，BrowseDriectory采用遞歸法實現(xiàn)對目錄的遍歷，具體實現(xiàn)如下：
bool __fastcall TForm1::InitDirectoryTree()
{
DriveCount=GetAllDrive();
DriveType=new TDriveType[4];
for(int i=DriveCount;i>0;i--)
{
TTreeNode* Node=DirTree->Items->Item;
DriveType=TDriveType(GetDriveType(Node->Text.c_str()));
switch(DriveType)
{
case dtFloppy: //軟驅(qū)
case dtFixed: BrowseDirectory(Node->Text,Node);break;//硬盤
case dtNetwork: BrowseDirectory(Node->Text,Node);break;//網(wǎng)絡驅(qū)動器
case dtCDROM: //光驅(qū)
case dtRAM: BrowseDirectory(Node->Text,Node);break; //內(nèi)存虛擬盤?不大明白，可能像Win98啟動盤生成的那個E:盤一樣
};
}
return true;
//TODO: Add your source code here
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BrowseDirectory(AnsiString Dir, TTreeNode* Node)
{
TSearchRec sr;
TTreeNode* SubNode=Node;
if(FindFirst(Dir+"*.*",faDirectory,sr)==0)
while(1)
{ if(sr.Attr==faDirectory&&sr.Name!="."&&sr.Name!="..")
{
SubNode=DirTree->Items->AddChild(Node,sr.Name);
BrowseDirectory(Dir+sr.Name+"/",SubNode);
}
if(FindNext(sr)!=0) break;
}
FindClose(sr);
return;
//TODO: Add your source code here
}
//---------------------------------------------------------------------------
以上我們利用C++Builder實現(xiàn)了對計算機文件系統(tǒng)的訪問，實際上我們可以利用上面的函數(shù)創(chuàng)建一個可以訪問文件系統(tǒng)的VCL控件來代替BCB提供的TDirectoryListbox和TDirectoryComboBox，使你的程序更具有Win9X的風格。
