目录处理函数

韩冰

目录处理函数

6 m3 a9 y2 R, @7 K3 G% B4 b

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

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

) `* Z: t9 F$ u* d. n# W

一、判断目录是否存在：

) v% a) B* a/ u/ n1 g8 J2 p

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

9 c) E/ {) D r- y' o* g4 g

设char *Dir为带判断的目录 % B: h5 a- S0 _$ j# t; A' @bool Exist; // 最后结果，表示目录是否存在 if(Dir[strlen(Dir)]=='\\')Dir[strlen(Dir)-1]='\0'; // 先删除最后的“\” WIN32_FIND_DATA wfd; // 查找 HANDLE hFind=FindFirstFile(Dir,&wfd); 2 N: E/ T$ A: yif(hFind==INVALID_HANDLE_VALUE)Exist=false; // 没有找到配备，目录肯定不存在 else { if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) // 检查找到的结果是否目录 % u5 }. b: }0 F Exist=true; // 是目录,目录存在 + f4 C& ~. [9 k: S5 z else Exist=false; // 是目录,目录不存在 % M+ s o8 o' _+ n FindClose(hFind); 8 N7 Z9 {# s; R1 q}

. C! X1 Y0 d9 m& m( p/ u# j7 o

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

( N& |4 m8 q: e

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

2 |3 J5 h1 k+ |( J) K/ t" ]2 S

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

memset(SelectedDir, 0, MAX_PATH); // 初始化最终结果 memset(&bi, 0, sizeof(BROWSEINFO)); // 初始化入参所有数据 bi.hwndOwner = Application->Handle; bi.pszDisplayName = FolderName; bi.lpszTitle = "请选择目录"; // 改成自己希望的 . m6 s$ }; ]' e5 \1 S( pbi.ulFlags=BIF_RETURNONLYFSDIRS; ItemID = SHBrowseForFolder(&bi); // 调用函数，打开目录选择对话框 q" a( Y, [: K$ |$ a* Z# ^3 Fif(ItemID) , X0 B5 B! Z# K{ SHGetPathFromIDList(ItemID, SelectedDir); // 获取所选目录的全名 . W. F* K2 ]5 x. y C3 ?; ?( i GlobalFree(ItemID); // 返回的ItemID占用了系统资源，不要忘了释放 }

, K+ ]5 N/ d+ K. U* ]

三、直接建立多级目录：

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

3 m# `; q' I1 T* T; c3 c9 F6 M

bool MakeDirectoryEx(const AnsiString &) // 入参为打算创建的目录名,根据操作结果返回"true"或"false" # @: M, x. F0 a& i{ 5 T1 M3 Q4 a, _( Q) n$ ]- V if(P.IsEmpty())return false; int len=P.Length(); 1 V+ {+ m, G) @ char *Path=P.c_str(); if(Path[len-1]=='\\') ( C; v- z' p) g( J$ f. z S { len--; ; {9 J2 D$ y% D4 R' F/ ~* ` Path[len]='\0'; . F' r$ w" \3 q! T5 W# S& M& @ } // 删除末尾的"\" ) p' Y0 a% q. D( }! R( ~' g3 k5 T AnsiString Dir=Path; // 分开父目录和本身目录名称 . s9 V% D3 \2 l6 B3 j8 \ AnsiString Parent; , E( ]: h* J& \8 ` for(int i=len-1;i>0;i--) { if(Dir.IsPathDelimiter(i)) { Parent=Dir.SubString(0,i); break; # a( a4 w" K. n) z0 X" T" l } 8 ?- w6 Z4 V7 b) C } 4 C# j' C8 \/ i' g" Z if(Parent.IsEmpty())return false; // 目录名称错误 3 |' D% h9 z: I4 P bool Ret=true; ! v# J7 {# O4 r& ~1 J3 s- P$ D if(Parent.Length()>3) // 如果长度小于3，表示为磁盘根目录 , v; R3 ~. `9 H; d3 W+ N Ret=DirectoryExistEx(Parent.c_str());// 检查父目录是否存在 if(!Ret)Ret=MakeDirectoryEx(Parent); // 父目录不存在,递归调用创建父目录 if(Ret) // 父目录存在,直接创建目录 { : Y/ W) A' A2 { SECURITY_ATTRIBUTES sa; sa.nLength=sizeof(SECURITY_ATTRIBUTES); : x1 o) [) ?% ^3 J( g X sa.lpSecurityDescriptor=NULL; / F8 }& t5 Z3 @0 K# Z; A' M sa.bInheritHandle=0; + c2 @. t. x" P% c5 w) c Ret=CreateDirectory(Path,&sa); , n9 k3 O7 i/ `2 ~" C# l# t4 i. K } return Ret; 1 y8 Q0 u( {- U& f$ Q4 X, }. b& p} 可以看出基本方法是: 8 ]6 \" w ~+ y, V8 D0 n' f先检查父目录是否存在，这里用到的函数DirectoryExistEx可以按照前面介绍的方法设计； 5 n/ D" o: b* s如果父目录存在，则直接创建目录,否则自我调用创建父目录。

( w) W5 o2 U, c; |. T2 C$ H四、直接删除整个目录：

. u# A) u9 D; X& n$ O

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

查找目录下的所有文件和目录，即调用API函数FindFirstFile、FindNextFile(*.*) : n4 A6 f8 L/ Y7 p6 B9 D; M7 _' o如果找到文件，则强制删除。所谓强制删除，即删除前先调用SetFileAttributes把它的属性设置为Normal，然后调用DeleteFile删除它。 6 i9 m. z3 F0 ^4 m* P3 w* U如果找到目录，则进行自我调用，即开始递归过程。 如果没有找到目录，即表示为控目录，调用RemoveDirectory直接删除。 6 m& f& G! j, w- n+ {具体程序代码如下：

W# k5 I. l/ ]& K* I& W

bool DeleteDirectoryEx(const AnsiString &) . v6 p% R' E1 ^ w{ if(P.IsEmpty() || P.Length()<4)return false; // 参数长度必须大于3，即不能为磁盘根目录或空白 int len=P.Length(); % z3 H( N- b: R char *Path=P.c_str(); 7 s5 ?) H+ Y( A2 G( g& d AnsiString Dir=Path; if(Path[len-1]!='\\')Dir=Dir+'\\'; 1 ]# Z _0 P& p6 v2 \; U% H4 Z' g AnsiString Files=Dir+"*.*"; WIN32_FIND_DATA wfd; 7 ]. d u3 I7 H- G- v* M5 q' m HANDLE hFind=FindFirstFile(Files.c_str(),&wfd); bool Ret=true; 3 _. \( C$ n# _1 X; | AnsiString Tmp; 4 ~& ]2 Y" F0 b+ r" e! g if(hFind!=INVALID_HANDLE_VALUE) { bool bFind=true; while(bFind) 7 A- [5 v7 C6 P4 Q: @ { if(wfd.cFileName[0]!='.') // . .. { ( l% I' }6 G) ]$ M- e2 Y& w- y" H Tmp=Dir+wfd.cFileName; 1 `) F7 C z+ p if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) - g5 w- ~( z+ s) X3 t { // 删除所有子目录 Ret=Ret&&DeleteDirectoryEx(Tmp.c_str(),false); Y0 c! |4 X1 G$ i) h) ?; G }else { // 删除所有文件 - t2 c8 W3 @9 \) j SetFileAttributes(Tmp.c_str(),FILE_ATTRIBUTE_NORMAL); 4 M t0 f6 j8 ~# r+ z3 ?6 B. z Ret=Ret&&DeleteFile(Tmp.c_str()); } } " T" I0 {* F' j bFind=FindNextFile(hFind,&wfd); ( H5 `$ W. t& q) ^ } FindClose(hFind); 1 c# z& b+ h+ P) h" u } if(Ret)return RemoveDirectory(Path); return false; } 完

' O& z2 c: d. O s0 r6 U

; I* ^- i- E8 u: P