目录处理函数

韩冰

目录处理函数

: o& p0 k7 W3 D# i# S9 p$ G) H: m

编程语言：C++ Builder 作者：王行舟

在编程时,经常有一些针对目录的操作,如打开目录对话框选择一个目录,直接创建多级目录,直接删除多级目录,判断某个目录是否存在等。本文就这些问题给出编程实现方法，并给出详细的程序代码，供各位编程爱好者参考。

8 U% v N9 C: e: z% X, W! C) }

一、判断目录是否存在：

C++ Builder中提供了检查文件是否存在的函数FileExists，但没有提供检查目录是否存在的函数，我们可以用Windows API函数FindFirstFile实现这个功能。程序实现如下：

7 I) m% e" W2 } q

设char *Dir为带判断的目录 bool Exist; // 最后结果，表示目录是否存在 if(Dir[strlen(Dir)]=='\\')Dir[strlen(Dir)-1]='\0'; // 先删除最后的“\” ! M# B; a& c. V8 X6 ^2 D0 c6 d/ JWIN32_FIND_DATA wfd; // 查找 & ?& { J* ?/ Y8 KHANDLE hFind=FindFirstFile(Dir,&wfd); ! n- s* s- g' {/ w; J2 J* rif(hFind==INVALID_HANDLE_VALUE)Exist=false; // 没有找到配备，目录肯定不存在 ' ^' s) K5 k% F: R" [else ( ~0 K, m$ o" u6 U{ if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) // 检查找到的结果是否目录 ' M7 Z$ w' x; T; w+ X Exist=true; // 是目录,目录存在 else Exist=false; // 是目录,目录不存在 / O1 a8 l1 H7 B* Z FindClose(hFind); 3 F# P; F( P9 Y6 l/ F/ S7 m! s}

二、打开目录选择对话框选择一个目录：

大多专业软件在要求输入目录的编辑框旁都放了一个按钮，点击后打开一个目录窗口，很多编程爱好者也希望能掌握这个方法。实现这个功能要调用Windows API函数SHBrowseForFolder，完整声明为WINSHELLAPI LPITEMIDLIST WINAPI SHBrowseForFolder(LPBROWSEINFO lpbi)，返回一个ITEMIDLIST类型的指针，通过这个指针调用函数SHGetPathFromIDList可以确定所选择的目录的全名称。入参为BROWSEINFO结构的指针，这个结构较为复杂，成员如下所示：

HWND hwndOwner; // 拥有对话框的窗口，可以设置为Application->Handle ' t( ]) I& c1 f/ lLPCITEMIDLIST pidlRoot; // ITEMIDLIST类型的指针,表示在哪个路径下选择，一般可以设置为NULL LPSTR pszDisplayName; // 选择后，所选目录的名称(不包含父级目录)被拷贝到这个指针指向的位置 LPCSTR lpszTitle; // 作为标题显示在对话框中目录树的上面，可以根据实际情况设置 , m- X Y: o4 J1 D, m) u* PUINT ulFlags; // 标志位，有点复杂，一般设置为BIF_RETURNONLYFSDIRS BFFCALLBACK lpfn; // 回调函数，一般不用，设置为NULL 1 i( b6 m' } L: @ {) ]LPARAM lParam; // 预定义的对话框传递给回调函数的值 int iImage; // 与所选目录相关联的图标在系统图标集合中的索引 可以看出，使用函数SHBrowseForFolder还真麻烦，普通爱好者掌握它确实有一定的难度，现给出完整程序段如下： #include <shlobj.h> // 必须包含的头文件 char SelectedDir[MAX_PATH]; // 最终结果 BROWSEINFO bi; // 入参 / t: S/ ?7 T( M& v. B( I9 [6 }, fchar FolderName[MAX_PATH]; // 所选目录名称，例如选择C:\Windows\Font,则为Font LPITEMIDLIST ItemID; // 所选目录的系统标志指针

9 H( s! j* X* @$ z! L) }

memset(SelectedDir, 0, MAX_PATH); // 初始化最终结果 2 X- K+ j# h# ^+ n7 Nmemset(&bi, 0, sizeof(BROWSEINFO)); // 初始化入参所有数据 bi.hwndOwner = Application->Handle; ) S" w) f$ G: Y% R% Z3 W* `bi.pszDisplayName = FolderName; - k l0 W/ F+ H Obi.lpszTitle = "请选择目录"; // 改成自己希望的 bi.ulFlags=BIF_RETURNONLYFSDIRS; ItemID = SHBrowseForFolder(&bi); // 调用函数，打开目录选择对话框 if(ItemID) { SHGetPathFromIDList(ItemID, SelectedDir); // 获取所选目录的全名 " l" C# S2 W4 z/ M GlobalFree(ItemID); // 返回的ItemID占用了系统资源，不要忘了释放 }

R& [4 q2 p8 l

三、直接建立多级目录：

Windows API提供了建立目录的函数CreateDirectory，但是调用前要保证父目录必须存在，否则会失败。其实，有时越级建立多级目录很有用，因为在建立目录特别是建立多层目录时，层层加以判断会大大地增加程序的复杂程度。如何实现这个功能呢？本人用递归方法设计了一个可以直接建立多级目录的函数，现说明如下，供各位朋友参考。

bool MakeDirectoryEx(const AnsiString &) // 入参为打算创建的目录名,根据操作结果返回"true"或"false" { + I' z3 t0 k" P$ U, q# K G if(P.IsEmpty())return false; int len=P.Length(); 4 L& |% h+ R! Y- S) m) b, R: J char *Path=P.c_str(); ) b6 R8 L4 {: p if(Path[len-1]=='\\') ( n3 { N5 ^7 J3 v$ a6 ~9 l2 z { $ ~" T9 g. j: m$ i$ N& k len--; Path[len]='\0'; } // 删除末尾的"\" 6 ~$ p! v/ X' G8 ~/ j AnsiString Dir=Path; . j/ C4 l* M- W // 分开父目录和本身目录名称 . ]% D: Y2 ^7 O8 n6 O5 j+ _ AnsiString Parent; 9 f4 f% Q! ?, ? for(int i=len-1;i>0;i--) : _& J' ^9 o& _8 ^* B { if(Dir.IsPathDelimiter(i)) { 2 m* v, I% F- _7 R W6 O Parent=Dir.SubString(0,i); * b( p L3 g/ F2 n" \0 d% | break; } 8 v% N! s4 P. t, ]6 S } if(Parent.IsEmpty())return false; // 目录名称错误 bool Ret=true; if(Parent.Length()>3) // 如果长度小于3，表示为磁盘根目录 Ret=DirectoryExistEx(Parent.c_str());// 检查父目录是否存在 % l) Q8 [$ ~. H4 w if(!Ret)Ret=MakeDirectoryEx(Parent); // 父目录不存在,递归调用创建父目录 % S+ d/ N4 C5 x' k: p if(Ret) // 父目录存在,直接创建目录 { 1 z1 v0 o ^' C5 u0 X N SECURITY_ATTRIBUTES sa; sa.nLength=sizeof(SECURITY_ATTRIBUTES); 5 P8 x7 x/ K) W. G4 I* | sa.lpSecurityDescriptor=NULL; ) ~* r% h* G9 }. r) h sa.bInheritHandle=0; Ret=CreateDirectory(Path,&sa); } return Ret; * k$ K/ ]1 b) M) w6 R} ) C3 ?% T! ~% H 可以看出基本方法是: 先检查父目录是否存在，这里用到的函数DirectoryExistEx可以按照前面介绍的方法设计； 2 g: r& C9 R9 ?# E4 u j, j如果父目录存在，则直接创建目录,否则自我调用创建父目录。

四、直接删除整个目录：

在DOS下有一个Deltree命令，用来删除整个目录，这是一个很有用的功能，可惜，Windows API提供的函数RemoveDirectory只能删除控目录，就像DOS的RD命令一样。编程实现这个功能同样需要递归方法，基本流程是：

' _8 [% \, y9 P/ b

查找目录下的所有文件和目录，即调用API函数FindFirstFile、FindNextFile(*.*) 如果找到文件，则强制删除。所谓强制删除，即删除前先调用SetFileAttributes把它的属性设置为Normal，然后调用DeleteFile删除它。 如果找到目录，则进行自我调用，即开始递归过程。 如果没有找到目录，即表示为控目录，调用RemoveDirectory直接删除。 3 [! b; F4 ]" y" E0 [$ s6 r0 T$ w具体程序代码如下：

$ o3 T, C7 y# G. O5 g6 j

bool DeleteDirectoryEx(const AnsiString &) { % w- u" G* M$ r& G" S if(P.IsEmpty() || P.Length()<4)return false; // 参数长度必须大于3，即不能为磁盘根目录或空白 int len=P.Length(); 2 j/ r8 x& X6 {$ h; @ char *Path=P.c_str(); 2 y6 A/ ^) k. f0 B; B! ?% q/ K AnsiString Dir=Path; : K4 C: m+ e* d h, T) M if(Path[len-1]!='\\')Dir=Dir+'\\'; & c# u u( i; r6 W AnsiString Files=Dir+"*.*"; WIN32_FIND_DATA wfd; , @/ u! t( h! Q6 ~- E HANDLE hFind=FindFirstFile(Files.c_str(),&wfd); ! U( _1 }- o) x8 } bool Ret=true; ) z) w! Q" U, W4 r0 t* @ AnsiString Tmp; if(hFind!=INVALID_HANDLE_VALUE) 7 ^" o9 C4 G0 F; Z7 t' m { bool bFind=true; while(bFind) { 1 I, I# P( b/ Y" q3 Q if(wfd.cFileName[0]!='.') // . .. { Tmp=Dir+wfd.cFileName; $ w" m+ a* k3 H* R if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) { // 删除所有子目录 g& c8 j/ D( C5 w Ret=Ret&&DeleteDirectoryEx(Tmp.c_str(),false); , `2 x$ q8 E( m( B' v' _ }else & w8 ?8 S" a, X0 F" `( B6 K { // 删除所有文件 # D" u& E+ O/ w, R. c SetFileAttributes(Tmp.c_str(),FILE_ATTRIBUTE_NORMAL); + {: D# d) D! I5 ?# L Ret=Ret&&DeleteFile(Tmp.c_str()); ) `3 O) ?' f$ H, k! L$ f; z7 G } 3 a& p* B+ c z2 `$ {3 Y } bFind=FindNextFile(hFind,&wfd); } FindClose(hFind); " j9 ~* o6 A/ N } ( K6 ~% d! w, W% a# A/ P% \8 O8 A if(Ret)return RemoveDirectory(Path); 3 a9 e" e2 i$ ^+ |/ M: E& l7 X( D return false; } 完

- b4 r0 \+ U0 f