CString strDir; BROWSEINFO lpbi;
TCHAR lpDir[MAX_PATH]; CString path("");
lpbi.hwndOwner = this->m_hWnd; lpbi.pidlRoot = NULL; // 默认路径 lpbi.pszDisplayName = lpDir; lpbi.lpszTitle = _T("请选择文件夹:"); lpbi.ulFlags = BIF_RETURNONLYFSDIRS ; lpbi.lpfn = NULL; lpbi.lParam = NULL; lpbi.iImage = NULL;
LPITEMIDLIST lpidl = :: SHBrowseForFolder(&lpbi);
if(lpidl) if (SHGetPathFromIDList(lpidl, lpDir)) { strDir = lpDir; this->SetWindowText(strDir); return ; }