|
目录处理函数 2 [1 b* F1 O7 b; V5 A
编程语言:C++ Builder 作者:王行舟 0 t5 k, x; s* {2 P' z" O
在编程时,经常有一些针对目录的操作,如打开目录对话框选择一个目录,直接创建多级目录,直接删除多级目录,判断某个目录是否存在等。本文就这些问题给出编程实现方法,并给出详细的程序代码,供各位编程爱好者参考。
7 V( E, c" A t x一、判断目录是否存在: 2 [6 ?. Y9 m( R7 T' o) b, ~. d
C++ Builder中提供了检查文件是否存在的函数FileExists,但没有提供检查目录是否存在的函数,我们可以用Windows API函数FindFirstFile实现这个功能。程序实现如下:
* s8 T- U- b7 V$ T$ K: `+ f8 I设char *Dir为带判断的目录$ L7 m/ a2 z$ B$ F
bool Exist; // 最后结果,表示目录是否存在0 p9 \0 f& ^6 Z
if(Dir[strlen(Dir)]=='\\')Dir[strlen(Dir)-1]='\0'; // 先删除最后的“\”( c3 i# V+ [0 |& U! A
WIN32_FIND_DATA wfd; // 查找
; P+ B$ W* N' z+ oHANDLE hFind=FindFirstFile(Dir,&wfd); 2 \! T! ?& v# r7 v# ^
if(hFind==INVALID_HANDLE_VALUE)Exist=false; // 没有找到配备,目录肯定不存在
8 y: Z+ Z& Q( [7 }/ g2 f- Velse8 m( U. C% D X
{
6 z) n9 p4 S+ t if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) // 检查找到的结果是否目录$ L1 K9 b; I/ B9 [6 R) i
Exist=true; // 是目录,目录存在. l7 E2 h5 h K9 d6 J9 X0 I% e
else. n$ ?. e, F' _6 c8 [
Exist=false; // 是目录,目录不存在/ \; \$ a* N+ O1 y, B) Y5 V
FindClose(hFind);
1 f( S2 Y% h, H" P# D! s} ( h% K& R) r" `' j4 q2 C2 Q
二、打开目录选择对话框选择一个目录: 0 R9 z( R! p1 [# e Q
大多专业软件在要求输入目录的编辑框旁都放了一个按钮,点击后打开一个目录窗口,很多编程爱好者也希望能掌握这个方法。实现这个功能要调用Windows API函数SHBrowseForFolder,完整声明为WINSHELLAPI LPITEMIDLIST WINAPI SHBrowseForFolder(LPBROWSEINFO lpbi),返回一个ITEMIDLIST类型的指针,通过这个指针调用函数SHGetPathFromIDList可以确定所选择的目录的全名称。入参为BROWSEINFO结构的指针,这个结构较为复杂,成员如下所示: 4 S, Q3 U$ a, U3 ]6 f& `/ A
HWND hwndOwner; // 拥有对话框的窗口,可以设置为Application->Handle 6 z6 Z! B0 I4 C( y
LPCITEMIDLIST pidlRoot; // ITEMIDLIST类型的指针,表示在哪个路径下选择,一般可以设置为NULL$ q2 C! X5 l5 B
LPSTR pszDisplayName; // 选择后,所选目录的名称(不包含父级目录)被拷贝到这个指针指向的位置 5 q f/ G" r& J8 Z; E" ?
LPCSTR lpszTitle; // 作为标题显示在对话框中目录树的上面,可以根据实际情况设置
, c: @7 i& q; x' mUINT ulFlags; // 标志位,有点复杂,一般设置为BIF_RETURNONLYFSDIRS
1 K9 [+ c' d) K* X; T DBFFCALLBACK lpfn; // 回调函数,一般不用,设置为NULL ! [7 I5 Q8 Z1 ~5 v7 x4 ]
LPARAM lParam; // 预定义的对话框传递给回调函数的值
' i5 Z J2 s' @' j4 s! N2 @3 B Rint iImage; // 与所选目录相关联的图标在系统图标集合中的索引 5 ?! u B" K* |3 X! i2 g1 V
可以看出,使用函数SHBrowseForFolder还真麻烦,普通爱好者掌握它确实有一定的难度,现给出完整程序段如下: ( J2 D8 Q0 g" D- i
#include <shlobj.h> // 必须包含的头文件1 T2 k# e0 D& R% i' e
char SelectedDir[MAX_PATH]; // 最终结果3 `8 n: ^+ G6 ?5 H
BROWSEINFO bi; // 入参( x8 i* F1 j7 L8 k4 B( h
char FolderName[MAX_PATH]; // 所选目录名称,例如选择C:\Windows\Font,则为Font $ Y' t$ c) ], V8 M- _
LPITEMIDLIST ItemID; // 所选目录的系统标志指针 1 S5 H7 d+ ]) Q3 o; Q' f; t
memset(SelectedDir, 0, MAX_PATH); // 初始化最终结果
5 H, u! J1 N, b" {. c$ F$ c! }7 Imemset(&bi, 0, sizeof(BROWSEINFO)); // 初始化入参所有数据$ t) w" w' m3 f3 U
bi.hwndOwner = Application->Handle;
/ d' n& I9 b1 Mbi.pszDisplayName = FolderName;7 x8 l( D0 N* g; }3 L/ S) c
bi.lpszTitle = "请选择目录"; // 改成自己希望的0 ~1 [/ S$ ?) Q" w( E- d) R
bi.ulFlags=BIF_RETURNONLYFSDIRS;. z6 d& a# u8 A3 d/ S; } F' _2 m5 {
ItemID = SHBrowseForFolder(&bi); // 调用函数,打开目录选择对话框1 N" r" `( C, T8 I
if(ItemID)1 l5 g9 o* ?; S' O
{& a9 y2 m2 b$ T7 K7 E$ Z( Z! {
SHGetPathFromIDList(ItemID, SelectedDir); // 获取所选目录的全名
7 m/ {( i& ~7 `; E' U& @ GlobalFree(ItemID); // 返回的ItemID占用了系统资源,不要忘了释放
# T* h8 m+ n6 t5 M- X; H4 N}
& M) ]! U3 ^+ m0 u! |8 F8 c三、直接建立多级目录: ! w- m- O& Z* g9 ]5 Q
Windows API提供了建立目录的函数CreateDirectory,但是调用前要保证父目录必须存在,否则会失败。其实,有时越级建立多级目录很有用,因为在建立目录特别是建立多层目录时,层层加以判断会大大地增加程序的复杂程度。如何实现这个功能呢?本人用递归方法设计了一个可以直接建立多级目录的函数,现说明如下,供各位朋友参考。
; V( q" Y4 x8 N! r1 N2 C4 cbool MakeDirectoryEx(const AnsiString & ) // 入参为打算创建的目录名,根据操作结果返回"true"或"false"
( t* W# O: Q$ e8 V5 r{! O7 }% k# m4 R
if(P.IsEmpty())return false;
3 z ^6 j0 w+ G6 W int len=P.Length();
% [- u$ @2 h5 `* }6 J char *Path=P.c_str();7 i* G& a* X- P: R9 Y7 q, l3 C
if(Path[len-1]=='\\')
# d) V g9 m3 [6 ?+ [ {
t" @2 N" v+ }0 _" F$ h len--;$ r: Y) n! x( f) Y4 `) N+ m. a* b
Path[len]='\0';. m7 k9 F+ m! F$ {1 ^
} // 删除末尾的"\"* F g2 X# Q* H3 r5 E8 M; o9 g
AnsiString Dir=Path;# `4 y, Q2 W/ s; e, c1 n2 q: ?8 L
// 分开父目录和本身目录名称- O# s3 {' P9 d
AnsiString Parent;, ]( U9 D( m/ G+ ^( i a. L
for(int i=len-1;i>0;i--)! d3 j1 r3 c: U' B& G' }! w0 N
{( A2 J0 r) }9 p. [+ m: v0 ?
if(Dir.IsPathDelimiter(i))
1 g2 z5 }- u R/ F0 b: z% D5 h& Q {
0 b' Z) Q6 H! k( L$ } Parent=Dir.SubString(0,i);
4 O# y8 l p" e! W* g break;
- |+ T' p" e5 ^; _5 R }
2 ~( u2 x) J" X# O9 b }
. P5 V8 T0 K9 E" v if(Parent.IsEmpty())return false; // 目录名称错误' h8 _ w( K9 q: L
bool Ret=true;
& m9 Y3 |" X& M/ `9 W if(Parent.Length()>3) // 如果长度小于3,表示为磁盘根目录
5 p# V) q3 e/ m. L- P1 A+ U3 T Ret=DirectoryExistEx(Parent.c_str());// 检查父目录是否存在, z" e- V0 M2 ~ ~/ J* ]1 {
if(!Ret)Ret=MakeDirectoryEx(Parent); // 父目录不存在,递归调用创建父目录/ y; K( J8 L2 z
if(Ret) // 父目录存在,直接创建目录
: C0 B4 m5 Y& ?3 E4 I+ A" _ {" L$ u. Z6 _, ~& g. Y2 S, f
SECURITY_ATTRIBUTES sa;5 N: x9 a! L' X
sa.nLength=sizeof(SECURITY_ATTRIBUTES);
3 ]; A3 G; D# w- \; P2 F$ R4 N" V+ M sa.lpSecurityDescriptor=NULL;
0 Y- \7 I. g7 [6 Q' q2 T- C4 k sa.bInheritHandle=0;
7 }" L0 k. O) b6 H) w8 T Ret=CreateDirectory(Path,&sa);+ {2 H8 Y2 [' D$ M# B
}
- S% Y6 U. T$ G, `8 m return Ret;
1 F U, e+ }+ P3 D+ K} - s) \ \, R5 m* A! d3 _0 B
可以看出基本方法是:* B% W! [, o7 Q/ k
先检查父目录是否存在,这里用到的函数DirectoryExistEx可以按照前面介绍的方法设计;
- ]- a8 r; A: f: i; N如果父目录存在,则直接创建目录,否则自我调用创建父目录。 7 @! [( y0 e& w. z1 r. Z
/ t9 P; U# b/ d
四、直接删除整个目录:
. f/ l" U- d) p 在DOS下有一个Deltree命令,用来删除整个目录,这是一个很有用的功能,可惜,Windows API提供的函数RemoveDirectory只能删除控目录,就像DOS的RD命令一样。编程实现这个功能同样需要递归方法,基本流程是: / M; P; o* i( a0 s, K* w
查找目录下的所有文件和目录,即调用API函数FindFirstFile、FindNextFile(*.*) 1 _- K. m6 [6 e6 W' V3 p
如果找到文件,则强制删除。所谓强制删除,即删除前先调用SetFileAttributes把它的属性设置为Normal,然后调用DeleteFile删除它。 + `$ q; y1 r7 B( |6 o# Y* C5 a9 ~
如果找到目录,则进行自我调用,即开始递归过程。
0 a6 e' W! r; c) Y0 ^7 A5 x/ u如果没有找到目录,即表示为控目录,调用RemoveDirectory直接删除。
1 o; o* n! Q- c6 e K具体程序代码如下: : N4 ]" i1 `4 J( ~
bool DeleteDirectoryEx(const AnsiString & )
# ]3 r6 r' j. X. o+ {& E{
3 S7 u4 K! G) }# i if(P.IsEmpty() || P.Length()<4)return false; // 参数长度必须大于3,即不能为磁盘根目录或空白) E3 H, y8 W( l
int len=P.Length();
8 e: N/ K9 x& L. G. a3 a' K char *Path=P.c_str();
: Q3 E* F, \* ]5 b+ d AnsiString Dir=Path;
5 |/ l3 c2 \" E+ c if(Path[len-1]!='\\')Dir=Dir+'\\';% l0 L- Q9 A: r& D) n2 _+ k; v
AnsiString Files=Dir+"*.*";* ~6 d' z& L+ V# r" u$ b
WIN32_FIND_DATA wfd;
( V. n' i6 t2 b' p HANDLE hFind=FindFirstFile(Files.c_str(),&wfd);
! s7 { h7 F( v0 X bool Ret=true;
. h& V! L( \8 i6 r AnsiString Tmp;
; Z6 B3 `# ^7 Q9 S# i if(hFind!=INVALID_HANDLE_VALUE), j% ^/ |: ]: }- x# w0 ], i& [4 e
{& O# f L, P! J+ N/ L) h7 c
bool bFind=true;
9 R `* s' F, X+ N/ e+ L while(bFind)0 \# ?6 `( G* g& i" B0 B
{
% b3 C! Y7 T5 _( z9 p" x c. T if(wfd.cFileName[0]!='.') // . ..' I) c1 U1 N N# t% p* _
{
) b1 @( ^3 Y) D9 S3 n4 Y! ?/ s Tmp=Dir+wfd.cFileName;
- d# k" [- k6 t. ?/ j& p) U if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)4 F) e4 k3 m$ \" T; W
{ // 删除所有子目录
2 y+ N; |. b$ V- S1 i& F Ret=Ret&&DeleteDirectoryEx(Tmp.c_str(),false);* I# q4 ?' `; ~, x, z
}else
& }5 ]" x* L1 R. r1 J4 Y { // 删除所有文件4 f4 u7 p2 l2 v. a! s1 D- W
SetFileAttributes(Tmp.c_str(),FILE_ATTRIBUTE_NORMAL);
- t5 h$ G! r# ]9 ^ Ret=Ret&&DeleteFile(Tmp.c_str());
- ^0 {+ _1 w( q: i2 l# O3 v }% f8 \" R) K+ b3 z
}
# p& G; j4 |" c/ [, h) J bFind=FindNextFile(hFind,&wfd);
0 C# D( h- Y0 f- @7 H" a }; ^) A0 j) p9 i$ C- A' W, j
FindClose(hFind);) K6 H9 L9 s" R' x$ ]9 Z- L
}
2 k; d- M$ e# K if(Ret)return RemoveDirectory(Path);# Q" }1 F1 V+ R: T2 L( A& T# h
return false;. X% Q1 k; G2 @
}
# X5 _* t+ @6 j8 C4 X7 b. @( l完
; O; @" F+ B- q; |; j9 o
6 Y* M+ D% I' P# L& _; b |