怎样调出 SHELL 中的路径选择对话框、、、？？

[TimiXu]

BROWSEINFO bi;
::ZeroMemory(&bi,sizeof(bi));
TCHAR szSelPath[MAX_PATH];
bi.pszDisplayName = szSelPath;
bi.lpszTitle= "title";
bi.ulFlags=BIF_RETURNONLYFSDIRS|
BIF_EDITBOX |
// BIF_RETURNFSANCESTORS|
BIF_STATUSTEXT|
BIF_VALIDATE;
LPITEMIDLIST pidl=::SHBrowseForFolder(&bi);
if(pidl!=NULL)
{
AfxMessageBox(bi.pszDisplayName);///////////
IMalloc* pMalloc = NULL;
::SHGetMalloc(&pMalloc);
pMalloc->Free(pidl);
pidl = NULL;
pMalloc->Release();
pMalloc=NULL;
}
这样得到只有一个文件夹名，没有得到完整的路径，？？
急。

[lixiaosan]

http://support.microsoft.com/support/kb/articles/Q179/3/78.asp

[TimiXu]

楼上
can't compile

看看上面那个，我只需要正确的结果。时间很急。

[sunsfq]

/**************************************************
*DirDlg_strPath 若返回1则它保存被选中的目录文件
*DirDlg_strTitle 对话框显示的标题标题
*DirDlg_strInitDir 初始目录,若为NULL则从桌面开始
**************************************************/
int dirDlg(CString *DirDlg_strPath, CString *DirDlg_strTitle, CString *DirDlg_strInitDir, int DirDlg_iImageIndex=0)
{
LPMALLOC pMalloc;
if (SHGetMalloc (&pMalloc)!= NOERROR)
{
return 0;
}

BROWSEINFO bInfo;
LPITEMIDLIST pidl;
ZeroMemory ( (PVOID) &bInfo,sizeof (BROWSEINFO));

if (!DirDlg_strInitDir->IsEmpty ())
{
OLECHAR olePath[MAX_PATH];
ULONG chEaten;
ULONG dwAttributes;
HRESULT hr;
LPSHELLFOLDER pDesktopFolder;
// // Get a pointer to the Desktop's IShellFolder interface. //
if (SUCCEEDED(SHGetDesktopFolder(&pDesktopFolder)))
{

//
// IShellFolder::ParseDisplayName requires the file name be in Unicode.
//
MultiByteToWideChar(CP_ACP, MB_PRECOMPOSED, DirDlg_strInitDir->GetBuffer (MAX_PATH), -1,
olePath, MAX_PATH);

DirDlg_strInitDir->ReleaseBuffer (-1);
//
// Convert the path to an ITEMIDLIST.
//
hr = pDesktopFolder->ParseDisplayName(NULL,
NULL,
olePath,
&chEaten,
&pidl,
&dwAttributes);
if (FAILED(hr))
{
pMalloc ->Free (pidl);
pMalloc ->Release ();
return 0;
}
bInfo.pidlRoot = pidl;
}
}
bInfo.hwndOwner = NULL;
bInfo.pszDisplayName = DirDlg_strPath->GetBuffer (MAX_PATH);
bInfo.lpszTitle = (DirDlg_strTitle->IsEmpty()) ? "????????????!":*DirDlg_strTitle;
bInfo.ulFlags = BIF_RETURNFSANCESTORS|BIF_RETURNONLYFSDIRS;


if ((pidl = ::SHBrowseForFolder (&bInfo)) == NULL)
{
return 0;
}
DirDlg_strPath->ReleaseBuffer ();
DirDlg_iImageIndex = bInfo.iImage;

if (::SHGetPathFromIDList(pidl,DirDlg_strPath->GetBuffer (MAX_PATH)) == FALSE)
{
pMalloc ->Free (pidl);
pMalloc ->Release ();
return 0;
}

DirDlg_strPath->ReleaseBuffer ();

pMalloc ->Free (pidl);
pMalloc ->Release ();
return 1;
}

void CVMDMakerApp::InitVar()
{
((CMainFrame*)m_pMainWnd)->m_pView=(CVMDMakerView*)((CMainFrame*)m_pMainWnd)->GetActiveView();
ASSERT(((CMainFrame*)m_pMainWnd)->m_pView);
}

调用方法
CString path,title,init;
title="select destination path";
if(1==dirDlg(&path,&title,&init))
{
m_destPath=path;
UpdateData(FALSE);
}