目录处理函数

韩冰

目录处理函数

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

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

一、判断目录是否存在：

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

* N% j: P# \/ g3 |

设char *Dir为带判断的目录 ; ?& b; V! c& M9 g% L4 f7 {bool Exist; // 最后结果，表示目录是否存在 ; Z' i* |! b' z- y4 Aif(Dir[strlen(Dir)]=='\\')Dir[strlen(Dir)-1]='\0'; // 先删除最后的“\” ' J6 w% ~& ~/ m7 L0 fWIN32_FIND_DATA wfd; // 查找 HANDLE hFind=FindFirstFile(Dir,&wfd); ! {+ b8 R0 H9 z# b' m1 Wif(hFind==INVALID_HANDLE_VALUE)Exist=false; // 没有找到配备，目录肯定不存在 8 x3 o5 q4 E# j# {! Lelse { 3 ?3 Z# R+ V$ ] if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) // 检查找到的结果是否目录 , t* R1 v! \6 V! f& D/ C7 U Exist=true; // 是目录,目录存在 0 E( {6 ?$ K7 u9 X& s% I+ ? else 1 O0 h4 G. E; g- j, y7 E1 T Exist=false; // 是目录,目录不存在 : z: I& ? ?* K) D" k9 k FindClose(hFind); 8 v: a# A; X! x1 ]0 ^( i}

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

1 @" a" [8 I. O: V

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

HWND hwndOwner; // 拥有对话框的窗口，可以设置为Application->Handle 1 W2 P8 H* G1 d/ @) @* t$ g9 wLPCITEMIDLIST pidlRoot; // ITEMIDLIST类型的指针,表示在哪个路径下选择，一般可以设置为NULL LPSTR pszDisplayName; // 选择后，所选目录的名称(不包含父级目录)被拷贝到这个指针指向的位置 0 x' Y: ?6 c$ u4 W' D' D" ULPCSTR lpszTitle; // 作为标题显示在对话框中目录树的上面，可以根据实际情况设置 4 S9 n- h/ @- \3 }UINT ulFlags; // 标志位，有点复杂，一般设置为BIF_RETURNONLYFSDIRS + @4 p5 h( H$ A' n6 k hBFFCALLBACK lpfn; // 回调函数，一般不用，设置为NULL ( p7 t# }* C0 d+ a9 j Q! y: u2 SLPARAM lParam; // 预定义的对话框传递给回调函数的值 ' o! b; {/ J6 j9 p/ X9 Bint iImage; // 与所选目录相关联的图标在系统图标集合中的索引 ) M1 S, I. C7 |. s( g7 ?8 _' N0 }$ E E可以看出，使用函数SHBrowseForFolder还真麻烦，普通爱好者掌握它确实有一定的难度，现给出完整程序段如下： ! v- a. m) `: I5 M- _+ U#include <shlobj.h> // 必须包含的头文件 char SelectedDir[MAX_PATH]; // 最终结果 * J$ K0 V1 t4 Z1 J: r* VBROWSEINFO bi; // 入参 char FolderName[MAX_PATH]; // 所选目录名称，例如选择C:\Windows\Font,则为Font - f' n6 y) |6 q" v6 H/ {) f. KLPITEMIDLIST ItemID; // 所选目录的系统标志指针

memset(SelectedDir, 0, MAX_PATH); // 初始化最终结果 memset(&bi, 0, sizeof(BROWSEINFO)); // 初始化入参所有数据 5 X. |' z9 G( m, r3 u9 ~- | H9 }bi.hwndOwner = Application->Handle; bi.pszDisplayName = FolderName; ' |& X6 u; c" g4 Pbi.lpszTitle = "请选择目录"; // 改成自己希望的 1 v) X$ }1 w9 ]1 Z! Sbi.ulFlags=BIF_RETURNONLYFSDIRS; ItemID = SHBrowseForFolder(&bi); // 调用函数，打开目录选择对话框 ! c8 F6 A& u. |& r- ]if(ItemID) 2 r) t! }; M- [! N0 |{ SHGetPathFromIDList(ItemID, SelectedDir); // 获取所选目录的全名 GlobalFree(ItemID); // 返回的ItemID占用了系统资源，不要忘了释放 7 s1 c8 O8 R7 t- u, W}

( [4 H6 g/ P, S1 v

三、直接建立多级目录：

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

bool MakeDirectoryEx(const AnsiString &) // 入参为打算创建的目录名,根据操作结果返回"true"或"false" { if(P.IsEmpty())return false; int len=P.Length(); . Z0 O, L+ B: _4 Z1 R4 @$ y) a char *Path=P.c_str(); / E1 C3 ?# j+ f if(Path[len-1]=='\\') { len--; - [- }; N% i: @7 X. c( h! }0 y Path[len]='\0'; 5 p! I1 L& b3 f0 W/ ~/ v3 @: t0 Z } // 删除末尾的"\" : i7 Q5 K+ W4 j; t8 ]: x! r AnsiString Dir=Path; 8 F7 e+ F( z5 t; p) ^- A, t // 分开父目录和本身目录名称 AnsiString Parent; for(int i=len-1;i>0;i--) ' l% E! e5 Q6 L- B1 o- H7 ^ { # F! t& i4 s& c4 f; d' T$ A if(Dir.IsPathDelimiter(i)) 8 n9 w, d/ Z4 D { Parent=Dir.SubString(0,i); 2 g& N) ]# \' L2 @" G% A1 L& y' P break; 1 d" V& @( J1 i; @: s g } 3 y& a- N6 M" O9 k } * U1 T3 x$ x7 n if(Parent.IsEmpty())return false; // 目录名称错误 ! ~# }+ m& Q6 H bool Ret=true; ! i$ q4 Z( G* I1 ^, M5 k* f( G% x | if(Parent.Length()>3) // 如果长度小于3，表示为磁盘根目录 Ret=DirectoryExistEx(Parent.c_str());// 检查父目录是否存在 if(!Ret)Ret=MakeDirectoryEx(Parent); // 父目录不存在,递归调用创建父目录 + @' p# @$ N; T if(Ret) // 父目录存在,直接创建目录 { SECURITY_ATTRIBUTES sa; 5 r7 E4 p1 e+ B5 ]6 x9 e5 F5 \ sa.nLength=sizeof(SECURITY_ATTRIBUTES); sa.lpSecurityDescriptor=NULL; / r8 |- G7 X0 g; [+ W sa.bInheritHandle=0; Ret=CreateDirectory(Path,&sa); } 2 B }( E& W3 t return Ret; } 可以看出基本方法是: 先检查父目录是否存在，这里用到的函数DirectoryExistEx可以按照前面介绍的方法设计； 8 T6 U$ ]: h# d如果父目录存在，则直接创建目录,否则自我调用创建父目录。

% M" b7 y1 B# E3 [( r9 t四、直接删除整个目录：

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

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

bool DeleteDirectoryEx(const AnsiString &) { if(P.IsEmpty() || P.Length()<4)return false; // 参数长度必须大于3，即不能为磁盘根目录或空白 7 j- y% r, Q. Q x% _ int len=P.Length(); " p7 G4 q" O6 Z0 }5 _: k char *Path=P.c_str(); 7 ^& V$ e( g+ c; i AnsiString Dir=Path; if(Path[len-1]!='\\')Dir=Dir+'\\'; " q) [7 K7 |/ h AnsiString Files=Dir+"*.*"; WIN32_FIND_DATA wfd; HANDLE hFind=FindFirstFile(Files.c_str(),&wfd); bool Ret=true; 2 S# ~; b% K! o7 E AnsiString Tmp; if(hFind!=INVALID_HANDLE_VALUE) 5 y3 Y m' J3 [/ `& m+ E7 R* ^7 R# V { , I& u" h3 ~* g% D/ A; n bool bFind=true; + O% f. X2 O9 m: W2 c2 ] while(bFind) $ w+ N2 w1 \9 M { , _! S% ^* M: q, V if(wfd.cFileName[0]!='.') // . .. { Tmp=Dir+wfd.cFileName; if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) . d1 a1 w. L2 h$ s4 `4 P { // 删除所有子目录 , C; ~# k+ ~; F) F. ^: A Ret=Ret&&DeleteDirectoryEx(Tmp.c_str(),false); }else # U4 ]+ E" z% ^0 W9 F0 G% r { // 删除所有文件 - B3 W' d3 }& S0 k SetFileAttributes(Tmp.c_str(),FILE_ATTRIBUTE_NORMAL); . a7 D' H8 {, [7 w1 z9 v Ret=Ret&&DeleteFile(Tmp.c_str()); / v& X S# r7 S0 w$ c. f2 ~# q } } bFind=FindNextFile(hFind,&wfd); } FindClose(hFind); } if(Ret)return RemoveDirectory(Path); 0 Q' t0 r( }9 {9 v' i) Y- f return false; . z6 z) W; f6 |* W% j} 5 C. ]8 P, l% _8 k8 r完

3 F. I2 E& E ?# N% @: v( T# y& \