TOpenPictureDialog选择大量图片

调用TOpenPictureDialog选择大量图片时候发现，返回的Files里面只有前面的一千多个文件，实际只有我选择文件的一半左右。开始以为 是CB的BUG，于是把OpenDialog源码中的MultiSelectBufferSize改大，测试没效果。网上有人 说，GetOpenFileName的Ansi版本有32K内存限制，Unicode版本没有限制。实际我的程序已经是Unicode的了。Ansi的 API只是进行的字符转换，之后还是调用Unicode版本的API，所以这个方法行不通。



在一个博客里面介绍，可以通过Shell接口自己获取选择的文件，有参考代码，这就好办了，有了解决问题的方向。



那 怎么加入CB中呢，直接调用GetOpenFileName？ 重写TOpenDialog？都太麻烦了，打开源码，发现有TOpenDialog有个函数void __fastcall GetFileNames(tagOFNW &OpenFileName)是用来取得所选文件的，正好就改它了。这里给出改好的代码，加入工程源码中就可以。

C/C++ code

#include<shlobj.h>#ifndef WM_GETISHELLBROWSER#defineWM_GETISHELLBROWSER (WM_USER+7)#endif#defineGetPIDLFolder(pida) (LPCITEMIDLIST)(((LPBYTE)pida)+(pida)->aoffset[0])#defineGetPIDLItem(pida, i) (LPCITEMIDLIST)(((LPBYTE)pida)+(pida)->aoffset[i+1])BOOL ILIsFile(LPCITEMIDLIST pidl) { BOOL bRet=FALSE; LPCITEMIDLIST pidlChild=NULL; IShellFolder*psf=NULL; HRESULT hr=SHBindToParent(pidl, IID_IShellFolder, (LPVOID*)&psf,&pidlChild);if(SUCCEEDED(hr)&&psf) { SFGAOF rgfInOut=SFGAO_FOLDER|SFGAO_FILESYSTEM; hr=psf->GetAttributesOf(1,&pidlChild,&rgfInOut);if(SUCCEEDED(hr)) {if((~rgfInOut&SFGAO_FOLDER)&&(rgfInOut&SFGAO_FILESYSTEM)) { bRet=TRUE; } } psf->Release(); }returnbRet; }void__fastcall TOpenDialog::GetFileNames(tagOFNW&OpenFileName) {staticTStringList*lst=newTStringList; FORMATETC fmte; STGMEDIUM stgmedium; LPITEMIDLIST pidlFull=NULL; IShellView*pIShellView=NULL; LPMALLOC pMalloc=NULL; IDataObject*pIDataObject=NULL; IShellBrowser*pSB=(IShellBrowser*)SendMessage(GetParent(Handle), WM_GETISHELLBROWSER,0,0); TCHAR szPath[_MAX_PATH];if(pSB==NULL)//GetFileNames被调用两次,第二次pSB为空, 返回第一次结果{if(lst) { FFileName=lst->Count>0?lst->Strings[0] : String(""); FFiles->Assign(lst); delete lst; lst=NULL; }return; }if(lst==NULL) lst=newTStringList; ZeroMemory((LPVOID)&fmte,sizeof(STGMEDIUM)); ZeroMemory((LPVOID)&fmte,sizeof(FORMATETC)); fmte.tymed=TYMED_HGLOBAL; fmte.lindex=-1; fmte.dwAspect=DVASPECT_CONTENT; fmte.cfFormat=RegisterClipboardFormat(CFSTR_SHELLIDLIST);do{ HRESULT hr=pSB->QueryActiveShellView(&pIShellView);if(FAILED(hr))break; hr=::SHGetMalloc(&pMalloc);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++) { 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)) { lst->Add((szPath)); } } pMalloc->Free(pidlFull); pidlFull=NULL; } } GlobalUnlock(stgmedium.hGlobal); ReleaseStgMedium(&stgmedium); }while(FALSE);if(pIDataObject) pIDataObject->Release();if(pIShellView) pIShellView->Release();if(pMalloc) {if(pidlFull) pMalloc->Free(pidlFull); pMalloc->Release(); } }

加入代码后，不管TOpenDialog还是TOpenPictureDialog，打开文件数量都不再受限制（当然受内存限制，也不是无限的）。



在此BS一下微软的程序员，同时也接受BS，欢迎拍砖。
原文链接: https://www.cnblogs.com/vmyspace/archive/2012/05/25/2517531.html

欢迎关注

微信关注下方公众号，第一时间获取干货硬货；公众号内回复【pdf】免费获取数百本计算机经典书籍