目录处理函数

韩冰

目录处理函数

+ y& ]. g# F: O) G/ Y" Y

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

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

一、判断目录是否存在：

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

+ |# i; L* k5 T3 C+ W

设char *Dir为带判断的目录 $ b7 ^" o, L+ W5 jbool Exist; // 最后结果，表示目录是否存在 if(Dir[strlen(Dir)]=='\\')Dir[strlen(Dir)-1]='\0'; // 先删除最后的“\” # T8 e+ G4 U7 R8 n5 v8 kWIN32_FIND_DATA wfd; // 查找 ( m4 @9 Z% r: h8 P6 O, L$ VHANDLE hFind=FindFirstFile(Dir,&wfd); if(hFind==INVALID_HANDLE_VALUE)Exist=false; // 没有找到配备，目录肯定不存在 else { if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) // 检查找到的结果是否目录 ]4 @' t( V4 l/ _5 q$ ?3 N Exist=true; // 是目录,目录存在 % Z2 Q0 T" v& @# j, L8 \- K else * r" W* {) ]8 B2 k# @3 N% n Z3 U! e Exist=false; // 是目录,目录不存在 FindClose(hFind); - Y" S! Q k3 ^; b B5 `7 A' F}

) h6 [* M, _ w- L. W- l; n8 b

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

/ S4 h4 B, E. r

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

5 o) `( _ a# D; M& s+ o8 Q

HWND hwndOwner; // 拥有对话框的窗口，可以设置为Application->Handle " C# H6 v' t# WLPCITEMIDLIST pidlRoot; // ITEMIDLIST类型的指针,表示在哪个路径下选择，一般可以设置为NULL LPSTR pszDisplayName; // 选择后，所选目录的名称(不包含父级目录)被拷贝到这个指针指向的位置 q9 H# w4 Y, _) t y/ _LPCSTR lpszTitle; // 作为标题显示在对话框中目录树的上面，可以根据实际情况设置 ( W# h5 i+ l4 F4 s. B8 [% VUINT ulFlags; // 标志位，有点复杂，一般设置为BIF_RETURNONLYFSDIRS : P1 _) L4 F( k5 s/ Y. ABFFCALLBACK lpfn; // 回调函数，一般不用，设置为NULL LPARAM lParam; // 预定义的对话框传递给回调函数的值 4 ~5 j8 |6 I' t ~int iImage; // 与所选目录相关联的图标在系统图标集合中的索引 可以看出，使用函数SHBrowseForFolder还真麻烦，普通爱好者掌握它确实有一定的难度，现给出完整程序段如下： #include <shlobj.h> // 必须包含的头文件 char SelectedDir[MAX_PATH]; // 最终结果 3 r- Q, X- c# B, `( W( @BROWSEINFO bi; // 入参 5 q$ ]0 ]) r3 r3 uchar FolderName[MAX_PATH]; // 所选目录名称，例如选择C:\Windows\Font,则为Font LPITEMIDLIST ItemID; // 所选目录的系统标志指针

! B* A$ w2 {8 A, e

memset(SelectedDir, 0, MAX_PATH); // 初始化最终结果 % ~ Y7 v& p+ }3 F- l% Wmemset(&bi, 0, sizeof(BROWSEINFO)); // 初始化入参所有数据 7 d$ z) h& ^8 S0 Z6 b. \bi.hwndOwner = Application->Handle; ' k- i+ z: N& P0 Pbi.pszDisplayName = FolderName; 1 x: n, P+ l w! G+ mbi.lpszTitle = "请选择目录"; // 改成自己希望的 : E7 ^6 d- o2 v# c. M" R- xbi.ulFlags=BIF_RETURNONLYFSDIRS; 7 B/ ^7 Q) s9 XItemID = SHBrowseForFolder(&bi); // 调用函数，打开目录选择对话框 5 F& ]8 I$ w9 e, O, f2 Tif(ItemID) { ) T/ p9 D7 Z: h! `4 r SHGetPathFromIDList(ItemID, SelectedDir); // 获取所选目录的全名 GlobalFree(ItemID); // 返回的ItemID占用了系统资源，不要忘了释放 9 o: V$ K$ u" a, e- g# Y" t}

! l" e" b& D( I

三、直接建立多级目录：

8 H7 L# _# @& ^* u0 l" }" N" u

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

bool MakeDirectoryEx(const AnsiString &) // 入参为打算创建的目录名,根据操作结果返回"true"或"false" { if(P.IsEmpty())return false; . b* T3 I9 _8 m& _9 e- A4 w5 _2 p int len=P.Length(); * `+ o3 u' L/ J% d char *Path=P.c_str(); if(Path[len-1]=='\\') 5 |& `+ e3 J7 g0 P5 m { " P) Y# j$ Q* a2 M. B len--; Path[len]='\0'; } // 删除末尾的"\" AnsiString Dir=Path; & d. p: b: m+ {% u" F // 分开父目录和本身目录名称 AnsiString Parent; for(int i=len-1;i>0;i--) 0 s8 J! m( R- F5 m# D2 {- D9 S { if(Dir.IsPathDelimiter(i)) { Parent=Dir.SubString(0,i); 4 H( y) c/ K' p' { break; 1 `5 b9 \8 ?7 ^* r0 A2 O4 P) i } } if(Parent.IsEmpty())return false; // 目录名称错误 bool Ret=true; if(Parent.Length()>3) // 如果长度小于3，表示为磁盘根目录 # w2 y; }- `5 p' Z3 b5 s$ u! g# t Ret=DirectoryExistEx(Parent.c_str());// 检查父目录是否存在 # V5 f7 [3 ]7 E9 U if(!Ret)Ret=MakeDirectoryEx(Parent); // 父目录不存在,递归调用创建父目录 2 w2 N( U" {$ b9 m if(Ret) // 父目录存在,直接创建目录 { SECURITY_ATTRIBUTES sa; sa.nLength=sizeof(SECURITY_ATTRIBUTES); ) w Q8 o8 w2 T5 G6 A2 h1 h sa.lpSecurityDescriptor=NULL; sa.bInheritHandle=0; 1 |/ A! D( R- z2 B$ ^# w% n Ret=CreateDirectory(Path,&sa); 7 l7 T* T; x' w& o, H } 3 v9 p6 @* Z( z return Ret; } 可以看出基本方法是: 先检查父目录是否存在，这里用到的函数DirectoryExistEx可以按照前面介绍的方法设计； 如果父目录存在，则直接创建目录,否则自我调用创建父目录。

四、直接删除整个目录：

6 T; p1 O6 Q% z& D+ a {

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

- l9 Z; P6 W" P4 j

查找目录下的所有文件和目录，即调用API函数FindFirstFile、FindNextFile(*.*) 如果找到文件，则强制删除。所谓强制删除，即删除前先调用SetFileAttributes把它的属性设置为Normal，然后调用DeleteFile删除它。 " P- I3 s5 I* |1 s* F9 Z5 H如果找到目录，则进行自我调用，即开始递归过程。 如果没有找到目录，即表示为控目录，调用RemoveDirectory直接删除。 具体程序代码如下：

bool DeleteDirectoryEx(const AnsiString &) { 4 j5 Y. G; Z7 I if(P.IsEmpty() || P.Length()<4)return false; // 参数长度必须大于3，即不能为磁盘根目录或空白 int len=P.Length(); * @! l: c# K& p! _# d& e char *Path=P.c_str(); / Z+ g6 D5 m, e# X8 `; \. f AnsiString Dir=Path; if(Path[len-1]!='\\')Dir=Dir+'\\'; AnsiString Files=Dir+"*.*"; & S$ c3 o3 [7 L- L WIN32_FIND_DATA wfd; 3 p3 T" t6 e) y( J. \# A" W* c' y HANDLE hFind=FindFirstFile(Files.c_str(),&wfd); 0 D: }5 I3 c, {& r bool Ret=true; $ z/ x% z+ e- Z6 L AnsiString Tmp; & ~3 y" D p5 _% u F% a if(hFind!=INVALID_HANDLE_VALUE) 7 T& w. ?/ u9 {. H, {$ r0 [, n { bool bFind=true; while(bFind) * c4 ~7 b# j1 R* v { if(wfd.cFileName[0]!='.') // . .. { # O5 f' \( ^' Q/ y5 } Tmp=Dir+wfd.cFileName; ' \( {6 `+ s% n, a9 w) e9 I9 k if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) { // 删除所有子目录 ) A6 x K! A" w Ret=Ret&&DeleteDirectoryEx(Tmp.c_str(),false); }else { // 删除所有文件 $ M$ m9 Q, U" Z3 i& x% a SetFileAttributes(Tmp.c_str(),FILE_ATTRIBUTE_NORMAL); Ret=Ret&&DeleteFile(Tmp.c_str()); 8 u8 Q- D R2 a9 p; T% O! Q8 T8 ~ } } " ]9 \/ w2 G S9 H# K; p1 d% V0 ]2 ^( W bFind=FindNextFile(hFind,&wfd); } FindClose(hFind); } ( W% L7 n% O$ {! v; ~1 a* e if(Ret)return RemoveDirectory(Path); return false; 7 s/ x2 M1 L& F( u} a& V5 |+ O/ `; q7 [' E完

- C* h" I; c: K/ H! y% J9 P, l