目录处理函数

韩冰

目录处理函数

+ D4 X$ J: b' d9 @, ?. P

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

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

一、判断目录是否存在：

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

a/ P" m2 r: B6 b3 @5 R7 @! K

设char *Dir为带判断的目录 bool Exist; // 最后结果，表示目录是否存在 5 G- Z5 z+ D: U1 }1 o( }if(Dir[strlen(Dir)]=='\\')Dir[strlen(Dir)-1]='\0'; // 先删除最后的“\” 5 \0 f5 j$ g# |) l9 V' {/ X4 [WIN32_FIND_DATA wfd; // 查找 0 m! T0 n! V% s6 U. g( @3 qHANDLE hFind=FindFirstFile(Dir,&wfd); 4 q( H1 F f8 O# o# {8 g8 v! Uif(hFind==INVALID_HANDLE_VALUE)Exist=false; // 没有找到配备，目录肯定不存在 3 u3 U5 c" O7 T: S3 ?: gelse { . D" p9 J2 Y+ `; L& a/ E if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) // 检查找到的结果是否目录 , H* l' B O5 G" J l Exist=true; // 是目录,目录存在 else # [: j! [7 x$ c7 B: l0 c* ^ Exist=false; // 是目录,目录不存在 " B6 i5 E" e+ x0 g FindClose(hFind); & F7 c# U. V a# ]! E}

& p- s: D; k/ P, t. I+ K

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

, l4 t2 S1 G z" P

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

; N0 {9 K m* J" V/ g9 ]

HWND hwndOwner; // 拥有对话框的窗口，可以设置为Application->Handle ! h( C& N+ U1 x% t K3 A/ ]LPCITEMIDLIST pidlRoot; // ITEMIDLIST类型的指针,表示在哪个路径下选择，一般可以设置为NULL LPSTR pszDisplayName; // 选择后，所选目录的名称(不包含父级目录)被拷贝到这个指针指向的位置 LPCSTR lpszTitle; // 作为标题显示在对话框中目录树的上面，可以根据实际情况设置 UINT ulFlags; // 标志位，有点复杂，一般设置为BIF_RETURNONLYFSDIRS 3 M% a: K1 y; ^) a( f; I8 Y& WBFFCALLBACK lpfn; // 回调函数，一般不用，设置为NULL # z( B/ l% U8 j& V9 {LPARAM lParam; // 预定义的对话框传递给回调函数的值 % N* ?# z" G& {) G) k2 P7 X" iint iImage; // 与所选目录相关联的图标在系统图标集合中的索引 6 L, Y7 w: K: y2 F8 @. r4 v可以看出，使用函数SHBrowseForFolder还真麻烦，普通爱好者掌握它确实有一定的难度，现给出完整程序段如下： 8 K; g7 G1 F1 Y1 O* u0 Z7 M#include <shlobj.h> // 必须包含的头文件 char SelectedDir[MAX_PATH]; // 最终结果 2 X' z; D1 ~$ @, V1 Y! _BROWSEINFO bi; // 入参 2 z5 A. s( |" kchar FolderName[MAX_PATH]; // 所选目录名称，例如选择C:\Windows\Font,则为Font 3 o" ]# t$ f& ~* J/ E. a: wLPITEMIDLIST ItemID; // 所选目录的系统标志指针

memset(SelectedDir, 0, MAX_PATH); // 初始化最终结果 8 T. u4 J+ h9 y' @memset(&bi, 0, sizeof(BROWSEINFO)); // 初始化入参所有数据 bi.hwndOwner = Application->Handle; bi.pszDisplayName = FolderName; bi.lpszTitle = "请选择目录"; // 改成自己希望的 7 A/ ]& O# j" D( Ebi.ulFlags=BIF_RETURNONLYFSDIRS; ItemID = SHBrowseForFolder(&bi); // 调用函数，打开目录选择对话框 8 G. j: T( e# o! n2 T+ Wif(ItemID) { SHGetPathFromIDList(ItemID, SelectedDir); // 获取所选目录的全名 $ {- [( y C) @6 H) ?/ [+ ? GlobalFree(ItemID); // 返回的ItemID占用了系统资源，不要忘了释放 }

三、直接建立多级目录：

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

bool MakeDirectoryEx(const AnsiString &) // 入参为打算创建的目录名,根据操作结果返回"true"或"false" { if(P.IsEmpty())return false; S K# K b8 I7 e int len=P.Length(); : ^2 m W, i( _ char *Path=P.c_str(); if(Path[len-1]=='\\') { len--; Path[len]='\0'; } // 删除末尾的"\" % F8 e: o/ l; E. N AnsiString Dir=Path; 9 O5 p- _4 o' ]- W: p // 分开父目录和本身目录名称 , v! M" [ Z+ g% N AnsiString Parent; % d- o. s; C" ~" B8 ~" r for(int i=len-1;i>0;i--) 0 E& N6 R3 f* u4 b& s8 ? { : R8 t* [. L# e* R0 B if(Dir.IsPathDelimiter(i)) { Parent=Dir.SubString(0,i); / G9 w9 \3 F0 p break; : r4 ?* v# o# d3 U V$ r6 A7 h } } 4 e* @1 V+ Y2 S$ r if(Parent.IsEmpty())return false; // 目录名称错误 bool Ret=true; 2 J$ p$ x9 z& p* B0 X. \ if(Parent.Length()>3) // 如果长度小于3，表示为磁盘根目录 Ret=DirectoryExistEx(Parent.c_str());// 检查父目录是否存在 if(!Ret)Ret=MakeDirectoryEx(Parent); // 父目录不存在,递归调用创建父目录 if(Ret) // 父目录存在,直接创建目录 { SECURITY_ATTRIBUTES sa; ) n5 W# v4 {0 ] J$ ?! L' ? sa.nLength=sizeof(SECURITY_ATTRIBUTES); sa.lpSecurityDescriptor=NULL; sa.bInheritHandle=0; Ret=CreateDirectory(Path,&sa); 0 e0 _: z/ M2 L5 i% H0 V# t8 i } $ |& G- g* Y4 ?, y; J# m7 s return Ret; % i) d7 N( @" \7 |! K} n; B8 x% j$ j2 O4 c, m! n6 Y 可以看出基本方法是: 4 G' B9 T( R" q" q2 U: I先检查父目录是否存在，这里用到的函数DirectoryExistEx可以按照前面介绍的方法设计； # j' x5 k; j( j/ B如果父目录存在，则直接创建目录,否则自我调用创建父目录。

四、直接删除整个目录：

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

查找目录下的所有文件和目录，即调用API函数FindFirstFile、FindNextFile(*.*) 如果找到文件，则强制删除。所谓强制删除，即删除前先调用SetFileAttributes把它的属性设置为Normal，然后调用DeleteFile删除它。 , f& Q) a/ q# |6 B- }$ l; E如果找到目录，则进行自我调用，即开始递归过程。 9 h3 F! n+ K9 T$ f) f2 V如果没有找到目录，即表示为控目录，调用RemoveDirectory直接删除。 + j0 |% z, j3 U/ ~6 h, U" F- j# Y+ ?具体程序代码如下：

bool DeleteDirectoryEx(const AnsiString &) 8 }5 Q& \6 c# u; L; ]! D{ if(P.IsEmpty() || P.Length()<4)return false; // 参数长度必须大于3，即不能为磁盘根目录或空白 int len=P.Length(); + x$ \2 S+ E% ?! R: D char *Path=P.c_str(); 5 a+ j: @$ O. Q$ h" }+ { AnsiString Dir=Path; if(Path[len-1]!='\\')Dir=Dir+'\\'; 9 T4 {# I* B$ Q9 S; b AnsiString Files=Dir+"*.*"; WIN32_FIND_DATA wfd; 8 K. W. O8 ]# w HANDLE hFind=FindFirstFile(Files.c_str(),&wfd); bool Ret=true; $ Q) |, J, ?% ? AnsiString Tmp; ) s& S) R$ K& K9 p, _" B; N if(hFind!=INVALID_HANDLE_VALUE) : A$ C2 l& n1 @, Y4 z/ ~! r3 \: m { bool bFind=true; + b0 w8 l0 V8 r) |9 ?; Y! ] while(bFind) $ i# _/ E8 t! H7 C6 x* t, T8 ]- h { 3 x9 F+ Q1 D5 W* [6 x) p* W if(wfd.cFileName[0]!='.') // . .. / p: n* P( ~9 |4 V1 {6 O, `& z { Tmp=Dir+wfd.cFileName; $ ]$ i2 N" x! }0 {) o if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) { // 删除所有子目录 Ret=Ret&&DeleteDirectoryEx(Tmp.c_str(),false); 0 C" y1 Q0 l1 h }else { // 删除所有文件 + R1 X5 T, r/ X" ?6 T8 n SetFileAttributes(Tmp.c_str(),FILE_ATTRIBUTE_NORMAL); 4 t# [ |- Q, x3 x( \" ~ Ret=Ret&&DeleteFile(Tmp.c_str()); 7 K, o* H4 T v2 t } " X% d# k. p: j0 w, P+ h/ u } 7 e8 O& G1 K5 @) x& B' P9 Y2 ^1 y bFind=FindNextFile(hFind,&wfd); } FindClose(hFind); } # `7 m: J8 ]* n- u t7 s' \- z# k if(Ret)return RemoveDirectory(Path); return false; " I! j$ \$ O; o, L' S( h2 L} 完