jiangsheng

在我们的程序中有时候需要一次选择多个文件，例如InstallShield的安装程序向导中的一个步骤就是为feature选择文件；但是在选择的文件过多（超过30个）的时候，这样的选择没有效果。我不得不在InstallShield的文件打开对话框中切换到小图标模式，并且一次选择两列的文件（很久之前就不得不用Linked Directory来动态链接整个目录中的文件了，不知道新的InstallShield版本改进没有）。

这种情况是因为默认的缓冲区只有两百多个字符。如果缓冲区不够长，那么调用对话框可能会失败，CommDlgExtendedError()会返回FNERR_BUFFERTOOSMALL。为了解决这个问题，你可以处理CDN_SELCHANGE来在选择项数目变化的时候动态重新分配缓冲区(参见http://support.microsoft.com/kb/131462/)或者在创建对话框的时候把缓冲区设大一点:

但是尽管提供了这么长的缓冲区(我是使用ANSI配置编译的，所以缓冲区有26M，足足可以容纳10万个文件名)，但是结果还是没有获得全部文件名，这是因为GetOpenFileName限制了复制到缓冲区中的文件名的总长度(http://msdn.microsoft.com/library/en-us/winui/winui/windowsuserinterface/userinput/commondialogboxlibrary/commondialogboxreference/commondialogboxfunctions/getopenfilename.asp)

OK，在文档中我看到了解决方案之一是使用UNICODE版本的函数GetOpenFileNameW,但是在Windows 9x上似乎只能用ANSI版本的函数。难道我要编写Windows版本检查代码来调用不同版本的函数？

这是推荐的作法。但是程序员是很懒的，所以有时候我会使用一些非官方方法。在我以前的一篇BLOG(http://blog.joycode.com/jiangsheng/archive/2004/09/17/33756.aspx)中我提到了如何访问文件打开对话框的IShellBrowser接口。通过这个接口我们可以访问文件打开对话框的IShellView接口，进而获得选中的文件(为节省篇幅，ILIsFile、GetPIDLFolder、GetPIDLItem和WM_GETISHELLBROWSER的定义就不重复了)：

class CCManyFileDialogDlg : public CFileDialog { ..... CStringList m_listFileNames; // list of actual items selected in listview } BOOL CCManyFileDialogDlg::OnInitDialog() { ...... m_listFileNames.RemoveAll(); return TRUE; // return TRUE unless you set the focus to a control } BOOL CCManyFileDialogDlg::OnFileNameOK() { IShellBrowser* pSB=(IShellBrowser *)GetParent()->SendMessage(WM_GETISHELLBROWSER,0,0); IShellView * pIShellView =NULL; LPMALLOC pMalloc = NULL; IDataObject* pIDataObject=NULL; FORMATETC fmte; STGMEDIUM stgmedium ; ZeroMemory( (LPVOID)&fmte, sizeof(STGMEDIUM) ); ZeroMemory( (LPVOID)&fmte, sizeof(FORMATETC) ); fmte.tymed = TYMED_HGLOBAL; fmte.lindex = -1; fmte.dwAspect = DVASPECT_CONTENT; fmte.cfFormat = RegisterClipboardFormatA(CFSTR_SHELLIDLIST); LPITEMIDLIST pidlFull=NULL; TCHAR szPath[_MAX_PATH]; do { HRESULT hr=pSB->QueryActiveShellView(&pIShellView); if(FAILED(hr))break; hr=::SHGetMalloc(&pMalloc); //Get pointer to shell alloc if(FAILED(hr))break; hr=pIShellView->GetItemObject(SVGIO_SELECTION ,IID_IDataObject,(LPVOID*)&pIDataObject); if(FAILED(hr))break; if(pIDataObject==NULL)break; hr=pIDataObject->GetData(&fmte,&stgmedium); if(FAILED(hr))break; LPIDA pida = (LPIDA) GlobalLock(stgmedium.hGlobal); if (pida) { LPCITEMIDLIST pidlFolder=GetPIDLFolder(pida); for(UINT i=0;i<pida->cidl;i++) { //filter folders LPCITEMIDLIST pidl=GetPIDLItem(pida,i); pidlFull=ILCombine(pidlFolder,pidl); if(ILIsFile(pidlFull)) { ZeroMemory(szPath,sizeof(TCHAR)*_MAX_PATH); hr=SHGetPathFromIDList(pidlFull,szPath); if(SUCCEEDED(hr)) { m_listFileNames.AddTail(szPath); } } pMalloc->Free(pidlFull); pidlFull=NULL; } } } while(FALSE); //Clean up GlobalUnlock(stgmedium.hGlobal); ReleaseStgMedium(&stgmedium); if(pIDataObject) pIDataObject->Release(); if(pIShellView) pIShellView->Release(); if(pMalloc){ if(pidlFull) pMalloc->Free(pidlFull); pMalloc->Release(); } return FALSE ; }

然后如下使用

CCManyFileDialogDlg dlg; m_pMainWnd = &dlg; int nResponse = dlg.DoModal(); if (nResponse == IDOK) { TRACE(_T("Selected %d Files\r\n"),dlg.m_listFileNames.GetCount()); CStringList listFileNames; POSITION pos=dlg.GetStartPosition(); while(pos) { CString strFileName=dlg.GetNextPathName(pos); listFileNames.AddTail(strFileName); } TRACE(_T("GetOpenFileName returned %d Files\r\n"),listFileNames.GetCount()); }

调试输出是

Selected 2415 Files（和资源管理器的报告相符）
GetOpenFileName returned 2378 Files（……）