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

天云上人

  BOOL CPicture::SaveAsBitmap(CString sFilePathName)
; u% |6 ]0 f! i2 h& J0 v8 {//=============================================================================
{
) O( D1 O; l8 X3 l BOOL bResult = FALSE;
ILockBytes *Buffer = 0;
IStorage   *pStorage = 0;
" F9 K- c& e( \# N5 L; }8 w# d IStream    *FileStream = 0;
' p: s! s8 p, B BYTE    *BufferBytes;
STATSTG  BytesStatistics;
& R' u! \3 d6 p; _4 M2 F DWORD  OutData;
long  OutStream;
CFile  BitmapFile; CFileException e;
double  SkipFloat = 0;
* D+ k; T8 F3 s; ?) \; t4 S DWORD  ByteSkip = 0;
0 Y, L+ s7 p8 i+ o. o' R/ `" z _ULARGE_INTEGER RealData;

1 G8 Z. I% y" l4 h  ]2 q
2 N; e- Q8 x) t( o2 r6 _* o$ S+ r  I7 j
" o7 Q, h7 M! R  \1 W CreateILockBytesOnHGlobal(NULL, TRUE, &Buffer); // Create ILockBytes Buffer
. `! B! @4 P9 I. H

& M5 [& W" d9 h/ ]3 V: r' y
3 h# Q1 Q& k4 f( I9 G5 O, |- L# z HRESULT hr = ::StgCreateDocfileOnILockBytes(Buffer,
    STGM_SHARE_EXCLUSIVE | STGM_CREATE | STGM_READWRITE, 0, &pStorage);


7 v# ?. w% f( C! B
hr = pStorage->CreateStream(LPICTURE,
  STGM_SHARE_EXCLUSIVE | STGM_CREATE | STGM_READWRITE, 0, 0, &FileStream);

1 D& x( i9 c: n0 W) `9 d
( E; X; D, B, ?; F' Y1 D4 a
m_pPict->SaveAsFile(FileStream, TRUE, &OutStream); // Copy Data Stream
FileStream->Release();
. U) X3 {& V# V pStorage->Release();
Buffer->Flush();
" R) ?4 `+ r( ?! D0 a8 U
  d; r5 w$ ]0 c' C7 {/ v

- r6 N& y4 w, E // Get Statistics For Final Size Of Byte Array
; c# C' g7 X! r: u- C Buffer->Stat(&BytesStatistics, STATFLAG_NONAME);

. d. ~: R8 a3 ]$ F' E. u6 s- Y

& N5 H7 i+ X9 q) ?, i // Cut UnNeeded Data Coming From SaveAsFile() (Leave Only Pure Picture Data)
9 z; K( V7 j/ c4 D2 L5 L& C- [3 R7 N SkipFloat = (double(OutStream) / 512); // Must Be In a 512 Blocks...
if(SkipFloat > DWORD(SkipFloat)) ByteSkip = (DWORD)SkipFloat + 1;
1 x- a" n8 k( c& V4 D else ByteSkip = (DWORD)SkipFloat;
' H, R& Z  x" W* f0 W' g( O ByteSkip = ByteSkip * 512; // Must Be In a 512 Blocks...
! R% Y) C- x( f# P( u" ~+ |$ W
// Find Difference Between The Two Values
ByteSkip = (DWORD)(BytesStatistics.cbSize.QuadPart - ByteSkip);
: |5 B+ v) K) X, i


// Allocate Only The Pure Picture Data
RealData.LowPart = 0;
RealData.HighPart = 0;
8 s* g6 ^% p$ z: b3 E; n RealData.QuadPart = ByteSkip;
BufferBytes = (BYTE*)malloc(OutStream);
8 t0 `/ H+ ^, F# K5 u. { if(BufferBytes == NULL)
  X! v6 l3 D6 \0 v+ u# K' Z  {
+ a: \5 z4 C+ a. \% E( y  Buffer->Release();
  HWND hWnd = AfxGetApp()->GetMainWnd()->m_hWnd;
' ]# L* \5 u' C- |" w- y  MessageBoxEx(hWnd, Can not allocate enough memory\\t, ERROR_TITLE, MB_OK | MB_ICONSTOP, LANG_ENGLISH);
  }


9 J" K" i2 ~! s7 m4 W- n! @
$ p1 g' V6 @! k: t Buffer->ReadAt(RealData, BufferBytes, OutStream, &OutData);



if(BitmapFile.Open(sFilePathName, CFile::typeBinary | CFile::modeCreate | CFile::modeWrite, &e))
  {
  BitmapFile.Write(BufferBytes, OutData);
  BitmapFile.Close();
( Q) T1 s9 ^+ Q' c) h! L  bResult = TRUE;
  }
else // Write File Failed...
  {
  TCHAR szCause[255];
7 U8 J; [3 H2 A  e.GetErrorMessage(szCause, 255, NULL);
  HWND hWnd = AfxGetApp()->GetMainWnd()->m_hWnd;
% @* v5 |* U2 q+ X2 Y/ E  MessageBoxEx(hWnd, szCause, ERROR_TITLE, MB_OK | MB_ICONSTOP, LANG_ENGLISH);
  bResult = FALSE;
( u  i1 A- }% N" _4 K& u  }

4 N) w3 u0 Q" A, {8 a Buffer->Release();
) k5 P4 E, u6 }; V( F2 z0 B; l free(BufferBytes);


- i0 `* O3 A2 l$ W: A
return(bResult);
5 B1 V  l+ J, H0 Z2 D$ z4 e$ k}