关于VC弹出选择文件夹对话框

转自：http://blog.csdn.net/wangyao1052/article/details/6652077

VC编程中经常需要弹出选择文件夹对话框供用户选择目标文件夹

基本实现的源码如下

[cpp]  view plain copy

1. void CTestDlg::OnBtnTest()   
2. {  
3.     // TODO: Add your control notification handler code here  
4.     TCHAR pszPath[MAX_PATH];  
5.     BROWSEINFO bi;   
6.     bi.hwndOwner      = this->GetSafeHwnd();  
7.     bi.pidlRoot       = NULL;  
8.     bi.pszDisplayName = NULL;   
9.     bi.lpszTitle      = TEXT("请选择文件夹");   
10.     bi.ulFlags        = BIF_RETURNONLYFSDIRS | BIF_STATUSTEXT;  
11.     bi.lpfn           = NULL;   
12.     bi.lParam         = 0;  
13.     bi.iImage         = 0;   
14.   
15.     LPITEMIDLIST pidl = SHBrowseForFolder(&bi);  
16.     if (pidl == NULL)  
17.     {  
18.         return;  
19.     }  
20.   
21.     if (SHGetPathFromIDList(pidl, pszPath))  
22.     {  
23.         AfxMessageBox(pszPath);  
24.     }  
25. }  

这一般均能够满足要求，但有时还是需要在此基础上增强一些功能。

比如在弹出选择文件夹对话框时选中默认的文件夹，或在STATUSTEXT区域显示一些信息等等。这需要在BrowseCallbackProc回调函数中实现。具体实现的源码如下：

（具体BrowseCallBackFun回调函数的用法请参照MSDN）

[cpp]  view plain copy

1. //选择文件夹对话框回调函数  
2. int CALLBACK BrowseCallBackFun(HWND hwnd, UINT uMsg, LPARAM lParam, LPARAM lpData)  
3. {  
4.     switch(uMsg)  
5.     {  
6.     case BFFM_INITIALIZED:  //选择文件夹对话框初始化  
7.         //设置默认路径为lpData即'D:\'  
8.         ::SendMessage(hwnd, BFFM_SETSELECTION, TRUE, lpData);  
9.         //在STATUSTEXT区域显示当前路径  
10.         ::SendMessage(hwnd, BFFM_SETSTATUSTEXT, 0, lpData);  
11.         //设置选择文件夹对话框的标题  
12.         ::SetWindowText(hwnd, TEXT("请先设置个工作目录"));   
13.         break;  
14.     case BFFM_SELCHANGED:   //选择文件夹变更时  
15.         {  
16.             TCHAR pszPath[MAX_PATH];  
17.             //获取当前选择路径  
18.             SHGetPathFromIDList((LPCITEMIDLIST)lParam, pszPath);  
19.             //在STATUSTEXT区域显示当前路径  
20.             ::SendMessage(hwnd, BFFM_SETSTATUSTEXT, TRUE, (LPARAM)pszPath);  
21.         }  
22.         break;  
23.     }  
24.     return 0;  
25. }  
26.   
27.   
28. void CTestDlg::OnBtnTest()   
29. {  
30.     // TODO: Add your control notification handler code here  
31.     TCHAR pszPath[MAX_PATH];  
32.     BROWSEINFO bi;   
33.     bi.hwndOwner      = this->GetSafeHwnd();  
34.     bi.pidlRoot       = NULL;  
35.     bi.pszDisplayName = NULL;   
36.     bi.lpszTitle      = TEXT("请选择文件夹");   
37.     bi.ulFlags        = BIF_RETURNONLYFSDIRS | BIF_STATUSTEXT;  
38.     bi.lpfn           = BrowseCallBackFun;     //回调函数  
39.     bi.lParam         = (LPARAM)TEXT("D:\\");  //传给回调函数的参数,设置默认路径  
40.     bi.iImage         = 0;   
41.       
42.     LPITEMIDLIST pidl = SHBrowseForFolder(&bi);  
43.     if (pidl == NULL)  
44.     {  
45.         return;  
46.     }  
47.       
48.     if (SHGetPathFromIDList(pidl, pszPath))  
49.     {  
50.         AfxMessageBox(pszPath);  
51.     }  
52. }  

附图片:

当然也可以设置选择文件对话框的其他样式，比如使其具有新增文件夹的功能，可如下实现

bi.ulFlags        =        BIF_USENEWUI        

附图:(改图来源于www.VCKBASE.com,本人电脑上安装的是VC6,不支持BIF_USENEWUI,请在VC2003+上尝试)

具体请参照MSDN