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

天云上人

  BOOL CPicture::SaveAsBitmap(CString sFilePathName)
. Q4 }9 M+ Y2 z* A/ y4 q: P! \9 r) I//=============================================================================
* }; ~- p- e! x! N{
BOOL bResult = FALSE;
1 M/ f" v5 j3 b4 } ILockBytes *Buffer = 0;
IStorage   *pStorage = 0;
IStream    *FileStream = 0;
BYTE    *BufferBytes;
2 g/ l, M3 S# T  Y8 U: E. f' O5 y STATSTG  BytesStatistics;
# o3 @* Q$ w5 F- L( c$ a' X& W( q DWORD  OutData;
2 A6 u' |* Q; y  M  u1 X long  OutStream;
. u3 }8 T- v9 W3 |/ n: o CFile  BitmapFile; CFileException e;
7 A1 ]- |- c3 x% v5 \ double  SkipFloat = 0;
DWORD  ByteSkip = 0;
0 N# _2 j# e/ a  Y1 ^& w, `6 x. t9 F3 t _ULARGE_INTEGER RealData;

1 z; e: r7 N  l0 f) O% E

6 k5 `/ M0 }' B( H! Y0 A2 N! z CreateILockBytesOnHGlobal(NULL, TRUE, &Buffer); // Create ILockBytes Buffer

3 G$ K2 r+ n; z5 \+ ]
- l5 O: H; {8 v4 A9 x. `
0 S9 }" D6 g$ P1 j0 D9 v HRESULT hr = ::StgCreateDocfileOnILockBytes(Buffer,
    STGM_SHARE_EXCLUSIVE | STGM_CREATE | STGM_READWRITE, 0, &pStorage);

' Y. }: {) v' l2 h! a* B' v# t
) @1 E% Q$ _# g; {
+ S$ o1 l4 M: `* ^' N hr = pStorage->CreateStream(LPICTURE,
: U+ {) l; f! W6 q: w; a$ h! o   STGM_SHARE_EXCLUSIVE | STGM_CREATE | STGM_READWRITE, 0, 0, &FileStream);



m_pPict->SaveAsFile(FileStream, TRUE, &OutStream); // Copy Data Stream
% ~; Z' s- b# b1 F FileStream->Release();
pStorage->Release();
Buffer->Flush();
" ]! R2 ]% k  X3 Z6 B. _2 t8 B

7 D% M5 D, O# R8 X# q/ O
- r# _1 {6 @* ^  W1 V6 f1 H0 _ // Get Statistics For Final Size Of Byte Array
Buffer->Stat(&BytesStatistics, STATFLAG_NONAME);

4 Z) c8 A$ S& [+ G* x
  ~  I0 G( ~+ |
$ r* W2 O2 `% ?# S$ I4 W) p+ Z5 _4 E3 x // Cut UnNeeded Data Coming From SaveAsFile() (Leave Only Pure Picture Data)
SkipFloat = (double(OutStream) / 512); // Must Be In a 512 Blocks...
! R; p4 l% V1 f if(SkipFloat > DWORD(SkipFloat)) ByteSkip = (DWORD)SkipFloat + 1;
else ByteSkip = (DWORD)SkipFloat;
ByteSkip = ByteSkip * 512; // Must Be In a 512 Blocks...

3 Y* ]0 I. }8 m  _  m4 f // Find Difference Between The Two Values
8 e+ c1 z0 j% A ByteSkip = (DWORD)(BytesStatistics.cbSize.QuadPart - ByteSkip);

" q$ \$ A" `9 y4 t2 I

! w' m  c. [/ e; f! b+ [ // Allocate Only The Pure Picture Data
RealData.LowPart = 0;
1 @6 f0 C# y6 O' E2 q RealData.HighPart = 0;
RealData.QuadPart = ByteSkip;
* M" @0 D- w: Z( @  h( h, _. l BufferBytes = (BYTE*)malloc(OutStream);
/ [: Q% h1 a  B) J8 T if(BufferBytes == NULL)
  {
  Buffer->Release();
0 j1 ^5 e+ Q* z. ?2 k' e  HWND hWnd = AfxGetApp()->GetMainWnd()->m_hWnd;
7 I) T  o9 ~" T3 }. S  MessageBoxEx(hWnd, Can not allocate enough memory\\t, ERROR_TITLE, MB_OK | MB_ICONSTOP, LANG_ENGLISH);
  }

& `( Y7 K3 x8 J" o$ V

Buffer->ReadAt(RealData, BufferBytes, OutStream, &OutData);


: ?: I9 J) x7 y4 k
if(BitmapFile.Open(sFilePathName, CFile::typeBinary | CFile::modeCreate | CFile::modeWrite, &e))
8 E. R1 P$ J% J7 _  {
  BitmapFile.Write(BufferBytes, OutData);
  BitmapFile.Close();
  bResult = TRUE;
6 [6 Y# j, C' U- [9 [- P2 W4 q  }
" ?: q: ~8 @6 W$ L else // Write File Failed...
  {
1 b: i9 X6 G; H  TCHAR szCause[255];
  e.GetErrorMessage(szCause, 255, NULL);
; W) {+ N  `% z* E) G, `  HWND hWnd = AfxGetApp()->GetMainWnd()->m_hWnd;
  x( Q# D7 T$ Y- k* D) S0 b  MessageBoxEx(hWnd, szCause, ERROR_TITLE, MB_OK | MB_ICONSTOP, LANG_ENGLISH);
  bResult = FALSE;
; Y, z! q+ G) B% T, r/ l. k  }
+ U. c* ~' g# W. x8 |6 [
' j0 Q3 l4 J& g8 ?6 E5 i' D" r Buffer->Release();
0 p/ i, W. h5 [4 Y: x" q+ G+ q free(BufferBytes);
5 M* s  a9 ^* x, E$ I; E+ ~

! D( P* e4 ]1 V4 L
return(bResult);
}