关于目录处理的一些函数

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

一、判断目录是否存在：

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

设char *Dir为带判断的目录

bool Exist; // 最后结果，表示目录是否存在

if(Dir[strlen(Dir)]=='//')Dir[strlen(Dir)-1]='/0'; // 先删除最后的“/”

WIN32_FIND_DATA wfd; // 查找

HANDLE hFind=FindFirstFile(Dir,&wfd);

if(hFind==INVALID_HANDLE_VALUE)Exist=false; // 没有找到配备，目录肯定不存在

else

{

if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) // 检查找到的结果是否目录

Exist=true; // 是目录,目录存在

else

Exist=false; // 是目录,目录不存在

FindClose(hFind);

}

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

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

HWND hwndOwner; // 拥有对话框的窗口，可以设置为Application->Handle

LPCITEMIDLIST pidlRoot; // ITEMIDLIST类型的指针,表示在哪个路径下选择，一般可以设置为NULL

LPSTR pszDisplayName; // 选择后，所选目录的名称(不包含父级目录)被拷贝到这个指针指向的位置

LPCSTR lpszTitle; // 作为标题显示在对话框中目录树的上面，可以根据实际情况设置

UINT ulFlags; // 标志位，有点复杂，一般设置为BIF_RETURNONLYFSDIRS

BFFCALLBACK lpfn; // 回调函数，一般不用，设置为NULL

LPARAM lParam; // 预定义的对话框传递给回调函数的值

int iImage; // 与所选目录相关联的图标在系统图标集合中的索引

可以看出，使用函数SHBrowseForFolder还真麻烦，普通爱好者掌握它确实有一定的难度，现给出完整程序段如下：

#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 = "请选择目录"; // 改成自己希望的

bi.ulFlags=BIF_RETURNONLYFSDIRS;

ItemID = SHBrowseForFolder(&bi); // 调用函数，打开目录选择对话框

if(ItemID)

{

SHGetPathFromIDList(ItemID, SelectedDir); // 获取所选目录的全名

GlobalFree(ItemID); // 返回的ItemID占用了系统资源，不要忘了释放

}

三、直接建立多级目录：

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

bool MakeDirectoryEx(const AnsiString &P) // 入参为打算创建的目录名,根据操作结果返回"true"或"false"

{

if(P.IsEmpty())return false;

int len=P.Length();

char *Path=P.c_str();

if(Path[len-1]=='//')

{

len--;

Path[len]='/0';

} // 删除末尾的"/"

// 本文转自 C Builder研究 - http://www.ccrun.com/article.asp?i=392&d=147pru
AnsiString Dir=Path;

// 分开父目录和本身目录名称

AnsiString Parent;

for(int i=len-1;i>0;i--)

{

if(Dir.IsPathDelimiter(i))

{

Parent=Dir.SubString(0,i);

break;

}

}

if(Parent.IsEmpty())return false; // 目录名称错误

bool Ret=true;

if(Parent.Length()>3) // 如果长度小于3，表示为磁盘根目录

Ret=DirectoryExistEx(Parent.c_str());// 检查父目录是否存在

if(!Ret)Ret=MakeDirectoryEx(Parent); // 父目录不存在,递归调用创建父目录

if(Ret) // 父目录存在,直接创建目录

{

SECURITY_ATTRIBUTES sa;

sa.nLength=sizeof(SECURITY_ATTRIBUTES);

sa.lpSecurityDescriptor=NULL;

sa.bInheritHandle=0;

Ret=CreateDirectory(Path,&sa);

}

return Ret;

}

可以看出基本方法是:

先检查父目录是否存在，这里用到的函数DirectoryExistEx可以按照前面介绍的方法设计；

如果父目录存在，则直接创建目录,否则自我调用创建父目录。

四、直接删除整个目录：

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

查找目录下的所有文件和目录，即调用API函数FindFirstFile、FindNextFile(*.*)

如果找到文件，则强制删除。所谓强制删除，即删除前先调用SetFileAttributes把它的属性设置为Normal，然后调用DeleteFile删除它。

如果找到目录，则进行自我调用，即开始递归过程。

如果没有找到目录，即表示为控目录，调用RemoveDirectory直接删除。

具体程序代码如下：

bool DeleteDirectoryEx(const AnsiString &P)

{

if(P.IsEmpty() || P.Length()<4)return false; // 参数长度必须大于3，即不能为磁盘根目录或空白

int len=P.Length();

char *Path=P.c_str();

AnsiString Dir=Path;

if(Path[len-1]!='//')Dir=Dir '//';

AnsiString Files=Dir "*.*";

WIN32_FIND_DATA wfd;

HANDLE hFind=FindFirstFile(Files.c_str(),&wfd);

bool Ret=true;

AnsiString Tmp;

if(hFind!=INVALID_HANDLE_VALUE)

{

bool bFind=true;

while(bFind)

{

if(wfd.cFileName[0]!='.') // . ..

{

Tmp=Dir wfd.cFileName;

if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)

{ // 删除所有子目录

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);

}

FindClose(hFind);

}

if(Ret)return RemoveDirectory(Path);

return false;

}