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

天云上人

  BOOL CPicture::SaveAsBitmap(CString sFilePathName)
0 m5 W# S! r& S6 F6 X7 j7 c//=============================================================================
{
5 I" C' x! R9 Y  b' W BOOL bResult = FALSE;
+ ~4 p% B8 h  q) t, e) j5 j* e* ^ ILockBytes *Buffer = 0;
5 o; m+ k) _" y! `8 ?- s5 t2 f IStorage   *pStorage = 0;
IStream    *FileStream = 0;
BYTE    *BufferBytes;
STATSTG  BytesStatistics;
) h- M0 ?  X4 Z DWORD  OutData;
long  OutStream;
/ M' R# d2 f0 D CFile  BitmapFile; CFileException e;
double  SkipFloat = 0;
DWORD  ByteSkip = 0;
_ULARGE_INTEGER RealData;

! s$ @: q5 F- G

! C5 t' h" h4 ]6 o" E CreateILockBytesOnHGlobal(NULL, TRUE, &Buffer); // Create ILockBytes Buffer

' ^! @& ^, B" V- r
& ?/ ?$ e8 E* O" O
HRESULT hr = ::StgCreateDocfileOnILockBytes(Buffer,
    STGM_SHARE_EXCLUSIVE | STGM_CREATE | STGM_READWRITE, 0, &pStorage);



/ L& Z; Z0 ]+ \ hr = pStorage->CreateStream(LPICTURE,
3 }. E$ w( ]; }   STGM_SHARE_EXCLUSIVE | STGM_CREATE | STGM_READWRITE, 0, 0, &FileStream);
% L9 W' u  |3 {3 d+ c0 H) w0 f


m_pPict->SaveAsFile(FileStream, TRUE, &OutStream); // Copy Data Stream
FileStream->Release();
4 h# S+ m( l4 v! H# K  C8 m pStorage->Release();
Buffer->Flush();
  U( c- K3 j* m! g! ?; J0 i
+ q3 p3 s1 ^  ]: D, \5 E
+ Z% E4 R6 v2 H& T9 `; m' y# B
! Y- \% {2 q5 P+ P4 Y // Get Statistics For Final Size Of Byte Array
Buffer->Stat(&BytesStatistics, STATFLAG_NONAME);

( K/ R% R1 l2 s5 g8 _. Y  \

// Cut UnNeeded Data Coming From SaveAsFile() (Leave Only Pure Picture Data)
' J1 @2 `2 I' W5 M6 j+ k( p: Y SkipFloat = (double(OutStream) / 512); // Must Be In a 512 Blocks...
0 N  x7 m9 U: q4 _ if(SkipFloat > DWORD(SkipFloat)) ByteSkip = (DWORD)SkipFloat + 1;
else ByteSkip = (DWORD)SkipFloat;
ByteSkip = ByteSkip * 512; // Must Be In a 512 Blocks...

/ O! `" ^" W8 k6 c' z# m( Z/ x // Find Difference Between The Two Values
ByteSkip = (DWORD)(BytesStatistics.cbSize.QuadPart - ByteSkip);
$ v) u: m/ X( A$ g2 x
! x/ q) w) t6 T1 X# c% l+ R& N

// Allocate Only The Pure Picture Data
9 S8 a. X7 a" X/ k7 K- k  w# E RealData.LowPart = 0;
RealData.HighPart = 0;
RealData.QuadPart = ByteSkip;
- |2 x! s0 v+ e  t2 }6 ] BufferBytes = (BYTE*)malloc(OutStream);
if(BufferBytes == NULL)
  |/ b9 y; Q' u4 _  {
  Buffer->Release();
  HWND hWnd = AfxGetApp()->GetMainWnd()->m_hWnd;
  MessageBoxEx(hWnd, Can not allocate enough memory\\t, ERROR_TITLE, MB_OK | MB_ICONSTOP, LANG_ENGLISH);
) y" [, E1 C: N7 b$ A0 p  }
& q/ Z1 U5 F1 x7 i+ _


Buffer->ReadAt(RealData, BufferBytes, OutStream, &OutData);
: e; X: t0 T1 Y, D

2 s9 a1 F6 x4 e0 T! u/ U' Z) E
8 V2 ^( F5 V" m* O0 i1 A0 s if(BitmapFile.Open(sFilePathName, CFile::typeBinary | CFile::modeCreate | CFile::modeWrite, &e))
5 R) s, G+ u: U  x  _; H1 y  C  {
$ `5 x1 N) V  j+ q  BitmapFile.Write(BufferBytes, OutData);
* q$ Q. A; t! y/ Z, w, S: u4 S  BitmapFile.Close();
  bResult = TRUE;
  }
/ I# m6 x' W9 l3 {7 ?3 X else // Write File Failed...
# m: z* v9 n/ K4 A0 {. o  {
% L7 }! I* a( b  TCHAR szCause[255];
$ l' h! r( m0 Y  e.GetErrorMessage(szCause, 255, NULL);
8 a" g2 U9 ^( N  HWND hWnd = AfxGetApp()->GetMainWnd()->m_hWnd;
6 X2 i5 Z( T# U7 J& V) @: G8 b  MessageBoxEx(hWnd, szCause, ERROR_TITLE, MB_OK | MB_ICONSTOP, LANG_ENGLISH);
* ?1 t6 T0 y# M2 P. ^9 o( }  bResult = FALSE;
$ n' l; _0 E% m+ g( |# ]  }

Buffer->Release();
) E$ i1 |" k" |6 ] free(BufferBytes);
( x5 ]! O) O8 ^% |
1 A% p9 y2 a7 ?2 m4 \  i4 @

return(bResult);
}