目录处理函数

韩冰

目录处理函数

0 Q7 ~7 \) Y# R% X

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

; {' X1 j |# i% a- ?

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

一、判断目录是否存在：

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

% X9 f' i b. s" g F& v

设char *Dir为带判断的目录 bool Exist; // 最后结果，表示目录是否存在 ( G# Z4 I& Q2 z) X/ I/ rif(Dir[strlen(Dir)]=='\\')Dir[strlen(Dir)-1]='\0'; // 先删除最后的“\” 7 k1 ~ `9 O. J& F! SWIN32_FIND_DATA wfd; // 查找 % c( H0 O: j6 I& _: x2 `0 aHANDLE hFind=FindFirstFile(Dir,&wfd); ; x& b3 _% i6 Fif(hFind==INVALID_HANDLE_VALUE)Exist=false; // 没有找到配备，目录肯定不存在 3 J& h1 W5 k& x+ T" ielse { # D( Q s; ]# G0 @5 l9 d2 ^ if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) // 检查找到的结果是否目录 6 M$ R; r3 O8 j" q) Y& ?7 H" b+ | Exist=true; // 是目录,目录存在 else # P. N% C J# C; R Exist=false; // 是目录,目录不存在 FindClose(hFind); }

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

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

' E$ R; {; ^: X6 l

HWND hwndOwner; // 拥有对话框的窗口，可以设置为Application->Handle : `$ H! w$ ?, W( ILPCITEMIDLIST pidlRoot; // ITEMIDLIST类型的指针,表示在哪个路径下选择，一般可以设置为NULL ) M! k+ L W) `; jLPSTR pszDisplayName; // 选择后，所选目录的名称(不包含父级目录)被拷贝到这个指针指向的位置 & I: f" I7 s" Z+ r! l0 I1 f, XLPCSTR lpszTitle; // 作为标题显示在对话框中目录树的上面，可以根据实际情况设置 UINT ulFlags; // 标志位，有点复杂，一般设置为BIF_RETURNONLYFSDIRS BFFCALLBACK lpfn; // 回调函数，一般不用，设置为NULL $ F3 B, p/ u5 O8 dLPARAM lParam; // 预定义的对话框传递给回调函数的值 int iImage; // 与所选目录相关联的图标在系统图标集合中的索引 可以看出，使用函数SHBrowseForFolder还真麻烦，普通爱好者掌握它确实有一定的难度，现给出完整程序段如下： T. s9 T& X! K3 z5 {, i' Z#include <shlobj.h> // 必须包含的头文件 char SelectedDir[MAX_PATH]; // 最终结果 2 U' C+ J: m/ y9 J: sBROWSEINFO bi; // 入参 char FolderName[MAX_PATH]; // 所选目录名称，例如选择C:\Windows\Font,则为Font 9 H! W- r- N! e5 bLPITEMIDLIST ItemID; // 所选目录的系统标志指针

memset(SelectedDir, 0, MAX_PATH); // 初始化最终结果 ! X5 ]- u7 g4 c7 zmemset(&bi, 0, sizeof(BROWSEINFO)); // 初始化入参所有数据 ) r9 p4 v) a0 q- ~1 Vbi.hwndOwner = Application->Handle; bi.pszDisplayName = FolderName; bi.lpszTitle = "请选择目录"; // 改成自己希望的 bi.ulFlags=BIF_RETURNONLYFSDIRS; 1 b5 x! e% {, ]1 P" X7 hItemID = SHBrowseForFolder(&bi); // 调用函数，打开目录选择对话框 . N# b0 Z8 m E) K ~. Z" L" `+ o8 x3 Jif(ItemID) " i; a* l( d1 J& n* X3 n: X{ - r J: @0 U( c8 @7 A; l SHGetPathFromIDList(ItemID, SelectedDir); // 获取所选目录的全名 GlobalFree(ItemID); // 返回的ItemID占用了系统资源，不要忘了释放 2 y- X9 x6 [3 e) {# a}

三、直接建立多级目录：

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

( s. |2 u# [% S! i

bool MakeDirectoryEx(const AnsiString &) // 入参为打算创建的目录名,根据操作结果返回"true"或"false" { if(P.IsEmpty())return false; 3 M% ?1 U) R+ P int len=P.Length(); - H0 K% Z4 c. z2 u# d char *Path=P.c_str(); + z9 n5 ~5 d( t! S* j5 G w3 S if(Path[len-1]=='\\') { len--; Path[len]='\0'; } // 删除末尾的"\" 2 _3 f3 l5 z! P AnsiString Dir=Path; M2 y2 W [# P // 分开父目录和本身目录名称 ; \! ^4 E2 r H8 A0 G; g5 t3 L AnsiString Parent; for(int i=len-1;i>0;i--) : S( u. Y: C$ J5 ?( C2 E$ E { if(Dir.IsPathDelimiter(i)) { Parent=Dir.SubString(0,i); break; ) g% M0 ^( J1 m: L$ Y6 P* D } } 8 h) P5 C( l8 r% o) w5 m# Q if(Parent.IsEmpty())return false; // 目录名称错误 bool Ret=true; if(Parent.Length()>3) // 如果长度小于3，表示为磁盘根目录 Ret=DirectoryExistEx(Parent.c_str());// 检查父目录是否存在 & m; o# c6 a/ \& b; e) n/ V' S! \6 V5 h if(!Ret)Ret=MakeDirectoryEx(Parent); // 父目录不存在,递归调用创建父目录 6 c, F! G1 M- S if(Ret) // 父目录存在,直接创建目录 { SECURITY_ATTRIBUTES sa; , @, O8 k& m Y sa.nLength=sizeof(SECURITY_ATTRIBUTES); sa.lpSecurityDescriptor=NULL; sa.bInheritHandle=0; Ret=CreateDirectory(Path,&sa); 8 k, Q" }9 z/ A4 s0 E8 J7 X" c } % T: `- G7 E; m) g( S0 n2 k4 M- w return Ret; 1 L' P( T6 y" J- I} : T1 j9 g2 D- \9 r, @- V, r4 E 可以看出基本方法是: 9 O* O8 ?5 n: ]4 M先检查父目录是否存在，这里用到的函数DirectoryExistEx可以按照前面介绍的方法设计； e/ n* g0 s8 d; c+ U* b如果父目录存在，则直接创建目录,否则自我调用创建父目录。

四、直接删除整个目录：

/ {- h @! O8 d/ k' o+ q! k

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

5 }3 p& z# t( J; G/ o

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

bool DeleteDirectoryEx(const AnsiString &) { if(P.IsEmpty() || P.Length()<4)return false; // 参数长度必须大于3，即不能为磁盘根目录或空白 - D w: `" [" ]- ` int len=P.Length(); char *Path=P.c_str(); , {0 F0 u: e+ q# m. P AnsiString Dir=Path; if(Path[len-1]!='\\')Dir=Dir+'\\'; AnsiString Files=Dir+"*.*"; WIN32_FIND_DATA wfd; 0 x5 T H I. t HANDLE hFind=FindFirstFile(Files.c_str(),&wfd); [' z" S# o2 A. I' q$ q( E bool Ret=true; AnsiString Tmp; if(hFind!=INVALID_HANDLE_VALUE) * v- [( u* M$ q { bool bFind=true; while(bFind) ' p+ I% M! h4 l% a" {6 ? { . u' X9 H6 ]- a" w, ` if(wfd.cFileName[0]!='.') // . .. { Tmp=Dir+wfd.cFileName; if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) { // 删除所有子目录 9 p1 e& q$ [; Q5 b2 _ Ret=Ret&&DeleteDirectoryEx(Tmp.c_str(),false); }else { // 删除所有文件 . J+ g2 Q' Z% V$ a7 @ SetFileAttributes(Tmp.c_str(),FILE_ATTRIBUTE_NORMAL); ! N; o# X) w6 [, j0 S7 Q, ^ Ret=Ret&&DeleteFile(Tmp.c_str()); } } bFind=FindNextFile(hFind,&wfd); 0 w; N3 n* u0 z8 w" j7 o4 i } FindClose(hFind); 6 c. v1 r, Y6 e2 e2 G } / A0 @ @& E5 z! t8 E if(Ret)return RemoveDirectory(Path); $ F8 r$ W; l6 U @ E. ?& T return false; 4 v: _' y; {: x2 Y5 C* k) `} 完

) H8 \ \- k% a( n