请教 vb里一个浏览目录的控件 在vc里怎么实现呢

Question

DriveListBox、DirList
DirListBox想弄个效果差不多的  用什么替换好谢谢

Answer 1

TCHAR   buffer[MAX_PATH];   
BROWSEINFO   m_pbi;    ::ZeroMemory(&m_pbi,   sizeof(BROWSEINFO));   
m_pbi.hwndOwner   =   GetSafeHwnd();   
m_pbi.pszDisplayName   =   buffer;   
m_pbi.lpszTitle   =   _T("");   
m_pbi.ulFlags   =   BIF_RETURNONLYFSDIRS;    ITEMIDLIST   *idl   =   SHBrowseForFolder(&m_pbi);

if   (idl)   
{   
SHGetPathFromIDList   (idl,   buffer);
CString strDir = buffer;
        }