VC 6.0 用IPicture接口显示JPEG图片代码

1. HRESULT   ShowPic(LPCWSTR lpstrFile,HWND   hWnd,int   nScrWidth,int nScrHeight)     
2. {
3.     HDC   hDC_Temp=GetDC(hWnd);    
4.     IPicture   *pPic;     
5.     IStream   *pStm;  
6.     BOOL bResult; HANDLE hFile=NULL;
7.     DWORD dwFileSize,dwByteRead;
8.     //打开硬盘中的图形文件 
9.     hFile=CreateFile(lpstrFile,GENERIC_READ, FILE_SHARE_READ,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL); 
10.     if (hFile != INVALID_HANDLE_VALUE) 
11.     {
12.         dwFileSize=GetFileSize(hFile,NULL);//获取文件字节数 
13.         if(dwFileSize==0xFFFFFFFF)
14.             return E_FAIL; 
15.     } 
16.     else 
17.     {
18.         return E_FAIL; 
19.     } //分配全局存储空间
20.     HGLOBAL hGlobal = GlobalAlloc(GMEM_MOVEABLE, dwFileSize);
21.     LPVOID pvData = NULL;
22.     if (hGlobal == NULL)
23.         return E_FAIL;
24.     if ((pvData = GlobalLock(hGlobal)) == NULL)//锁定分配内存块
25.         return E_FAIL;
26.     ReadFile(hFile,pvData,dwFileSize,&dwByteRead,NULL);//把文件读入内存缓冲区
27.     GlobalUnlock(hGlobal);
28.     CreateStreamOnHGlobal(hGlobal, TRUE, &pStm); //装入图形文件
29.     bResult=OleLoadPicture(pStm,dwFileSize,TRUE,IID_IPicture,(LPVOID*)&pPic);
30.     if(FAILED(bResult)) return E_FAIL;
31.     OLE_XSIZE_HIMETRIC hmWidth;//图片的真实宽度 
32.     OLE_YSIZE_HIMETRIC hmHeight;//图片的真实高度
33.     pPic->get_Width(&hmWidth);
34.     pPic->get_Height(&hmHeight); //将图形输出到屏幕上（有点像BITBlt）
35.     RECT rc;
36.     GetClientRect(hWnd, &rc);
37.     bResult=pPic->Render(hDC_Temp,0,0,nScrWidth,nScrHeight, 0,hmHeight,hmWidth,-hmHeight,&rc);
38.     ::ReleaseDC(hWnd,hDC_Temp);
39.     pPic->Release(); 
40.     CloseHandle(hFile);//关闭打开的文件
41.     if (SUCCEEDED(bResult)) 
42.     {
43.         return S_OK;
44.     }
45.     else
46.     {
47.         return E_FAIL; 
48.     }
49. } 

没有测试过，今天随手偶得，整理了放上来，以备后用。