目录处理函数

韩冰

目录处理函数

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

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

6 o" v# ]5 P8 G- H) C

一、判断目录是否存在：

8 D+ r" Z8 L9 \5 `; ~: N

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

设char *Dir为带判断的目录 a: u( |8 _2 d3 E; G) Dbool Exist; // 最后结果，表示目录是否存在 8 x, T% p: B3 F4 O6 k1 E* Dif(Dir[strlen(Dir)]=='\\')Dir[strlen(Dir)-1]='\0'; // 先删除最后的“\” WIN32_FIND_DATA wfd; // 查找 HANDLE hFind=FindFirstFile(Dir,&wfd); if(hFind==INVALID_HANDLE_VALUE)Exist=false; // 没有找到配备，目录肯定不存在 / V7 B% v4 P& l1 ^, {else { if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) // 检查找到的结果是否目录 7 ~. y5 g+ X+ Z- Q/ ~+ _ Exist=true; // 是目录,目录存在 : w, Z* p: f/ L+ t: J else Exist=false; // 是目录,目录不存在 ' G+ [, X% L% G1 \ FindClose(hFind); 3 u2 W. Q( E# t( g# f' g5 W}

5 v, V( u, L: D" U

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

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

$ O# G' }+ M3 h/ `' `( a

HWND hwndOwner; // 拥有对话框的窗口，可以设置为Application->Handle / Z2 D% ]5 u2 x) e* VLPCITEMIDLIST pidlRoot; // ITEMIDLIST类型的指针,表示在哪个路径下选择，一般可以设置为NULL 6 _1 h9 ^6 x! U& a) _LPSTR pszDisplayName; // 选择后，所选目录的名称(不包含父级目录)被拷贝到这个指针指向的位置 ' D, {0 T- R* T8 `! ~LPCSTR lpszTitle; // 作为标题显示在对话框中目录树的上面，可以根据实际情况设置 UINT ulFlags; // 标志位，有点复杂，一般设置为BIF_RETURNONLYFSDIRS ) |3 v! L- ?; j! y7 ~7 B: d4 ~BFFCALLBACK lpfn; // 回调函数，一般不用，设置为NULL LPARAM lParam; // 预定义的对话框传递给回调函数的值 ) F8 Q3 X V. w* t/ Kint iImage; // 与所选目录相关联的图标在系统图标集合中的索引 可以看出，使用函数SHBrowseForFolder还真麻烦，普通爱好者掌握它确实有一定的难度，现给出完整程序段如下： #include <shlobj.h> // 必须包含的头文件 char SelectedDir[MAX_PATH]; // 最终结果 BROWSEINFO bi; // 入参 char FolderName[MAX_PATH]; // 所选目录名称，例如选择C:\Windows\Font,则为Font ! z" D( ~; k X% C( n) u8 S+ WLPITEMIDLIST ItemID; // 所选目录的系统标志指针

$ c$ I" G# A, Z z, S

memset(SelectedDir, 0, MAX_PATH); // 初始化最终结果 memset(&bi, 0, sizeof(BROWSEINFO)); // 初始化入参所有数据 bi.hwndOwner = Application->Handle; 8 C/ t3 K6 A# \6 F4 dbi.pszDisplayName = FolderName; 7 }" x5 S9 s# j( hbi.lpszTitle = "请选择目录"; // 改成自己希望的 ( ]# K1 n! n+ x% P; Wbi.ulFlags=BIF_RETURNONLYFSDIRS; ItemID = SHBrowseForFolder(&bi); // 调用函数，打开目录选择对话框 if(ItemID) { & F3 [4 n+ f U: P SHGetPathFromIDList(ItemID, SelectedDir); // 获取所选目录的全名 GlobalFree(ItemID); // 返回的ItemID占用了系统资源，不要忘了释放 ' Z$ k# u; r# n}

三、直接建立多级目录：

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

- V& b: _0 Z- H H. d

bool MakeDirectoryEx(const AnsiString &) // 入参为打算创建的目录名,根据操作结果返回"true"或"false" { if(P.IsEmpty())return false; int len=P.Length(); char *Path=P.c_str(); if(Path[len-1]=='\\') - m+ R' c5 ]& j9 I7 q { ' c2 ] ?) _; R n& _0 O* `' }/ c len--; Path[len]='\0'; } // 删除末尾的"\" AnsiString Dir=Path; // 分开父目录和本身目录名称 AnsiString Parent; for(int i=len-1;i>0;i--) 8 \+ y8 v) d3 J" d4 P8 j { . U5 h1 x2 E; B& {0 r" Z% @ if(Dir.IsPathDelimiter(i)) { Parent=Dir.SubString(0,i); / s) `1 J* z. u) k& Q break; } } - x1 s5 ?6 H( Y9 y! l if(Parent.IsEmpty())return false; // 目录名称错误 bool Ret=true; 5 P3 d* ~: y7 H8 Y; {/ ? if(Parent.Length()>3) // 如果长度小于3，表示为磁盘根目录 * s5 b! I! N; {4 w5 [' B Ret=DirectoryExistEx(Parent.c_str());// 检查父目录是否存在 if(!Ret)Ret=MakeDirectoryEx(Parent); // 父目录不存在,递归调用创建父目录 4 }# ?- w2 v5 S4 ?& Y if(Ret) // 父目录存在,直接创建目录 { SECURITY_ATTRIBUTES sa; sa.nLength=sizeof(SECURITY_ATTRIBUTES); ) f$ l# Z5 v: |+ h% I sa.lpSecurityDescriptor=NULL; ( U8 z. k4 @; Y9 o& | sa.bInheritHandle=0; Ret=CreateDirectory(Path,&sa); ' E! k; l( ?( |, P, Z } m# h7 a/ z' s# ]4 V return Ret; } $ l' B4 k" W! O L: u 可以看出基本方法是: 先检查父目录是否存在，这里用到的函数DirectoryExistEx可以按照前面介绍的方法设计； 6 N; x- i+ E- a" ~' M& j. E* T; h如果父目录存在，则直接创建目录,否则自我调用创建父目录。

' M* }) J7 J5 l# E9 w& k I

四、直接删除整个目录：

$ |- J1 |* Z) o7 l; W

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

# J; c8 Q* H5 P

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

bool DeleteDirectoryEx(const AnsiString &) 7 I, V9 ?! e* H* T! ~& d+ A{ if(P.IsEmpty() || P.Length()<4)return false; // 参数长度必须大于3，即不能为磁盘根目录或空白 int len=P.Length(); ; }% R5 Y# h2 n( W r char *Path=P.c_str(); AnsiString Dir=Path; if(Path[len-1]!='\\')Dir=Dir+'\\'; AnsiString Files=Dir+"*.*"; WIN32_FIND_DATA wfd; ' E' |: ]* @, ]# a& \/ w @' K HANDLE hFind=FindFirstFile(Files.c_str(),&wfd); bool Ret=true; AnsiString Tmp; * m* W# J5 y3 `( l2 s! J; c6 Q if(hFind!=INVALID_HANDLE_VALUE) ! X. \& B8 }/ c { 2 T" }8 A5 Y" \ bool bFind=true; while(bFind) * L9 a2 ?, s' F0 K" t) j/ o { # j+ B' E8 g" j l4 r8 A! ~ if(wfd.cFileName[0]!='.') // . .. 5 t2 d1 r7 r) m { V' u; ?- I( [9 T6 a Tmp=Dir+wfd.cFileName; + }# t3 ?. Y. v7 {7 x4 W if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) { // 删除所有子目录 $ d2 U |# B& Y) A: m" R0 v Ret=Ret&&DeleteDirectoryEx(Tmp.c_str(),false); }else { // 删除所有文件 SetFileAttributes(Tmp.c_str(),FILE_ATTRIBUTE_NORMAL); Ret=Ret&&DeleteFile(Tmp.c_str()); } } bFind=FindNextFile(hFind,&wfd); } 1 z+ D3 v* J. z- }* V. R1 i FindClose(hFind); ; D0 X( w; y [( ]3 l } Y! M& | ~ J if(Ret)return RemoveDirectory(Path); return false; } 完

& d0 W7 x% p0 D

5 A2 W2 Q- R' W5 ?