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

天云上人

  BOOL CPicture::SaveAsBitmap(CString sFilePathName)
3 D: K% a8 @! ~* }% b//=============================================================================
2 l8 t4 T- V, u% I$ \{
: \/ o# W; z% a BOOL bResult = FALSE;
" y% i* ~: P) U% P9 M4 f" D ILockBytes *Buffer = 0;
  T' b; H; }0 r( W! | IStorage   *pStorage = 0;
9 F; X/ H1 |$ {* q* D0 e IStream    *FileStream = 0;
BYTE    *BufferBytes;
STATSTG  BytesStatistics;
& x* U5 v2 N7 R% t% _ DWORD  OutData;
long  OutStream;
/ J* I! C$ t5 [; Y/ v# U* p CFile  BitmapFile; CFileException e;
6 G' }) ^6 I" w" R3 L$ f double  SkipFloat = 0;
% v! b6 a, k9 o DWORD  ByteSkip = 0;
/ [# C- O$ r- b4 `5 `8 }3 ^) M9 `1 C _ULARGE_INTEGER RealData;
3 k) I# e$ J6 N; H! \
& ]  k+ o9 [& I" P' Y9 E
$ y' J. w6 D( ?) u
CreateILockBytesOnHGlobal(NULL, TRUE, &Buffer); // Create ILockBytes Buffer
$ i: |0 X2 s7 I3 O
" c+ R, b* v# _% v+ ^
9 s% T, Z* V( G5 ?8 U& R; R! Q! S
HRESULT hr = ::StgCreateDocfileOnILockBytes(Buffer,
) {5 ^% h6 b0 }! q- e7 z1 T. g     STGM_SHARE_EXCLUSIVE | STGM_CREATE | STGM_READWRITE, 0, &pStorage);

  ~* N( d( V! a5 l6 g

8 @. u  J8 B1 L6 ~. Q; n( D hr = pStorage->CreateStream(LPICTURE,
  STGM_SHARE_EXCLUSIVE | STGM_CREATE | STGM_READWRITE, 0, 0, &FileStream);

0 m! d% l, v; L* X4 b, M: D! m+ u! k; b( a

. g3 D4 W* C" d; \ m_pPict->SaveAsFile(FileStream, TRUE, &OutStream); // Copy Data Stream
FileStream->Release();
pStorage->Release();
) P: h: H  J7 a Buffer->Flush();

" z, ~. c$ P$ k8 E, D
! o& _8 K9 d3 P: w- g5 _
9 l7 ?7 \$ G% |9 r4 g // Get Statistics For Final Size Of Byte Array
Buffer->Stat(&BytesStatistics, STATFLAG_NONAME);

6 k6 n4 Z; q5 z0 S1 X: {/ y
5 r9 B2 n+ b8 I+ q2 x2 F( p
; v2 Z0 j5 |3 b8 L // Cut UnNeeded Data Coming From SaveAsFile() (Leave Only Pure Picture Data)
2 l) R+ {6 c0 J; _6 L4 f) y SkipFloat = (double(OutStream) / 512); // Must Be In a 512 Blocks...
. [* i4 \  S: I: n if(SkipFloat > DWORD(SkipFloat)) ByteSkip = (DWORD)SkipFloat + 1;
5 @0 n! {+ P; g8 C2 L else ByteSkip = (DWORD)SkipFloat;
* R) V2 W% b5 ^9 F* I ByteSkip = ByteSkip * 512; // Must Be In a 512 Blocks...

0 O3 O" a* h+ O6 s2 q+ a; M& j: i // Find Difference Between The Two Values
ByteSkip = (DWORD)(BytesStatistics.cbSize.QuadPart - ByteSkip);
7 y# x  A( H1 n7 M" D# h% L

/ b2 X" s8 x6 O* l- K/ e$ a; Y  U
// Allocate Only The Pure Picture Data
1 `6 s' `8 h  [0 v* V& W RealData.LowPart = 0;
RealData.HighPart = 0;
RealData.QuadPart = ByteSkip;
BufferBytes = (BYTE*)malloc(OutStream);
if(BufferBytes == NULL)
  {
. q* ~- v5 }! \/ m4 e4 ~2 f7 E  Buffer->Release();
6 Y6 q! q# G: R+ `7 d  HWND hWnd = AfxGetApp()->GetMainWnd()->m_hWnd;
  MessageBoxEx(hWnd, Can not allocate enough memory\\t, ERROR_TITLE, MB_OK | MB_ICONSTOP, LANG_ENGLISH);
2 |% P3 ]" W, L% l8 [8 d6 c  }

. F8 v+ ~( ]" R. u% b
6 u6 i# \: h' F! P3 q% W
" k8 Z; {8 \% `' P+ L' g- k Buffer->ReadAt(RealData, BufferBytes, OutStream, &OutData);


' [7 B; M7 l6 b+ P2 v: ?, o9 N
if(BitmapFile.Open(sFilePathName, CFile::typeBinary | CFile::modeCreate | CFile::modeWrite, &e))
  {
- S, `6 a4 v8 ~. r# Z  D  BitmapFile.Write(BufferBytes, OutData);
& p8 n" q* r/ A# d( z  k  BitmapFile.Close();
5 `) }7 O- Z8 c0 N5 i, m  bResult = TRUE;
/ K8 d. m9 E% V6 p  }
else // Write File Failed...
% o) l3 W. k8 W8 q; \) p  D  {
  TCHAR szCause[255];
  e.GetErrorMessage(szCause, 255, NULL);
  HWND hWnd = AfxGetApp()->GetMainWnd()->m_hWnd;
+ f( C+ r. `  R% e" w  MessageBoxEx(hWnd, szCause, ERROR_TITLE, MB_OK | MB_ICONSTOP, LANG_ENGLISH);
6 h4 S* C$ L3 C( y  bResult = FALSE;
5 |3 x) l1 p) V; e; s, P3 E3 w( B) o% r  u  }

! y# A2 E" v. @' E Buffer->Release();
% m+ G3 U! _* z3 g! h free(BufferBytes);
, C6 ?6 S( V' Z! u+ k

/ M2 E& b: z: Y) s, w2 _
/ {1 {0 k& C7 w$ [* O- R/ I% |& v return(bResult);
}