[收藏]IPicture::SaveAsFile的一个使用例子

天云上人

  BOOL CPicture::SaveAsBitmap(CString sFilePathName)
//=============================================================================
{
BOOL bResult = FALSE;
ILockBytes *Buffer = 0;
IStorage   *pStorage = 0;
IStream    *FileStream = 0;
. z% k  U, S3 y$ Q8 c BYTE    *BufferBytes;
STATSTG  BytesStatistics;
# s: J. V* v  i$ p DWORD  OutData;
long  OutStream;
3 r% f; J3 W, d0 W. } CFile  BitmapFile; CFileException e;
" G. m  V, u1 T! Z double  SkipFloat = 0;
DWORD  ByteSkip = 0;
_ULARGE_INTEGER RealData;

9 j7 x4 ?7 |- O" l+ L' o

CreateILockBytesOnHGlobal(NULL, TRUE, &Buffer); // Create ILockBytes Buffer

" C  Z* w/ A9 T- X  n& D

% C6 O4 s9 a4 ]5 o8 m! E$ \$ c1 J HRESULT hr = ::StgCreateDocfileOnILockBytes(Buffer,
    STGM_SHARE_EXCLUSIVE | STGM_CREATE | STGM_READWRITE, 0, &pStorage);

) D. t7 y* o2 t
7 [* B3 ~1 B8 K4 \3 d4 v9 G+ o7 Q- B
hr = pStorage->CreateStream(LPICTURE,
  STGM_SHARE_EXCLUSIVE | STGM_CREATE | STGM_READWRITE, 0, 0, &FileStream);


: @5 _2 A  s% M! G) I' c
( b- y: `. t: F& k m_pPict->SaveAsFile(FileStream, TRUE, &OutStream); // Copy Data Stream
FileStream->Release();
pStorage->Release();
Buffer->Flush();


9 }: d' ]# m! N1 g, _* K
// Get Statistics For Final Size Of Byte Array
* ~% O) @& I! z$ d8 v6 _. x Buffer->Stat(&BytesStatistics, STATFLAG_NONAME);
4 J0 {" W% W1 B! ^) w


. H( I) z* T) V9 n: u // Cut UnNeeded Data Coming From SaveAsFile() (Leave Only Pure Picture Data)
SkipFloat = (double(OutStream) / 512); // Must Be In a 512 Blocks...
8 Y" O5 e- r4 I7 N2 M8 a# q5 T if(SkipFloat > DWORD(SkipFloat)) ByteSkip = (DWORD)SkipFloat + 1;
else ByteSkip = (DWORD)SkipFloat;
/ Y9 \2 _- k8 t* s5 D ByteSkip = ByteSkip * 512; // Must Be In a 512 Blocks...
; @( Y$ d2 R* m( M; j. _) U$ v
// Find Difference Between The Two Values
ByteSkip = (DWORD)(BytesStatistics.cbSize.QuadPart - ByteSkip);

& e: T% M! U# M9 o$ t; D

// Allocate Only The Pure Picture Data
7 Y$ H- |  V$ j0 [; l RealData.LowPart = 0;
RealData.HighPart = 0;
3 ^6 `$ c- L5 `3 J) Y# f RealData.QuadPart = ByteSkip;
. K: V9 I# U% _- h( s. t1 r BufferBytes = (BYTE*)malloc(OutStream);
if(BufferBytes == NULL)
! l$ K% f& M/ U* }) n/ \/ C  {
& U  }. R* O1 @6 d  Buffer->Release();
  HWND hWnd = AfxGetApp()->GetMainWnd()->m_hWnd;
  MessageBoxEx(hWnd, Can not allocate enough memory\\t, ERROR_TITLE, MB_OK | MB_ICONSTOP, LANG_ENGLISH);
4 P) @" Y% `  K9 g  }
, x5 E- _3 W$ Y% E4 c! ]; p

, O7 U: }" C- v/ e
) t8 J. T) |/ d+ b Buffer->ReadAt(RealData, BufferBytes, OutStream, &OutData);

! r/ ~& W4 Y4 {/ W
; x3 g; C3 S+ ^
if(BitmapFile.Open(sFilePathName, CFile::typeBinary | CFile::modeCreate | CFile::modeWrite, &e))
: V+ I" A# S: M  {
& @2 Q$ t4 ]5 z2 r  BitmapFile.Write(BufferBytes, OutData);
5 x+ g& `4 Z) P' R  BitmapFile.Close();
" \- p! i+ w# S  bResult = TRUE;
3 Q7 ~+ X# Q1 X5 S  }
8 E& \+ l2 D* I* w; s else // Write File Failed...
" x0 A- T) o4 n  {
& ?/ ?, H6 g3 O# X1 {  TCHAR szCause[255];
  e.GetErrorMessage(szCause, 255, NULL);
  HWND hWnd = AfxGetApp()->GetMainWnd()->m_hWnd;
  MessageBoxEx(hWnd, szCause, ERROR_TITLE, MB_OK | MB_ICONSTOP, LANG_ENGLISH);
  bResult = FALSE;
  }

Buffer->Release();
+ R/ @4 G1 k" M9 T$ N+ \ free(BufferBytes);


& j4 ~: E  o5 a1 [+ ^
return(bResult);
- |4 u6 J0 @$ \$ Y: Q}