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

天云上人

  BOOL CPicture::SaveAsBitmap(CString sFilePathName)
//=============================================================================
, n* C5 j! ^' h{
! }, c  B! [1 V5 O  \' K BOOL bResult = FALSE;
ILockBytes *Buffer = 0;
- N; @  i; _; C2 S: I7 N  z IStorage   *pStorage = 0;
& e( R5 c% d; [8 |. R IStream    *FileStream = 0;
BYTE    *BufferBytes;
' b/ b( _3 [1 m/ C& M) o' E) G STATSTG  BytesStatistics;
DWORD  OutData;
long  OutStream;
CFile  BitmapFile; CFileException e;
double  SkipFloat = 0;
' {8 i4 e0 L! F4 J. n* p6 P/ U DWORD  ByteSkip = 0;
* y+ L3 S8 K$ r6 B8 G! `8 S _ULARGE_INTEGER RealData;


" t2 W) p+ T; V' `, V" }( Y$ S
CreateILockBytesOnHGlobal(NULL, TRUE, &Buffer); // Create ILockBytes Buffer

! M$ Q$ ^( I! I# p0 i; y
" {$ d. T6 f; v3 {- f) Y
HRESULT hr = ::StgCreateDocfileOnILockBytes(Buffer,
+ T4 s& f2 ?5 Y/ ?6 A     STGM_SHARE_EXCLUSIVE | STGM_CREATE | STGM_READWRITE, 0, &pStorage);



hr = pStorage->CreateStream(LPICTURE,
  STGM_SHARE_EXCLUSIVE | STGM_CREATE | STGM_READWRITE, 0, 0, &FileStream);


& I1 Q& o0 o3 ?3 r6 s2 U% |3 R
m_pPict->SaveAsFile(FileStream, TRUE, &OutStream); // Copy Data Stream
FileStream->Release();
pStorage->Release();
Buffer->Flush();
; O% U6 v' e5 S+ x- L" e1 t1 J
, E! }+ S. {# O, L8 ^* Z* G7 B

/ ^+ b" C2 k8 r% W6 o% X // Get Statistics For Final Size Of Byte Array
$ M: p  y. q! P: c+ _ Buffer->Stat(&BytesStatistics, STATFLAG_NONAME);
; e) Z" x5 ?8 e" ~* d/ \
# Q! A) S) ^* `" [1 z, z0 s# p6 x

/ n" n1 {: W0 p& G9 ~ // Cut UnNeeded Data Coming From SaveAsFile() (Leave Only Pure Picture Data)
SkipFloat = (double(OutStream) / 512); // Must Be In a 512 Blocks...
if(SkipFloat > DWORD(SkipFloat)) ByteSkip = (DWORD)SkipFloat + 1;
, I+ I7 _7 J# k8 p1 V/ d* r0 k else ByteSkip = (DWORD)SkipFloat;
ByteSkip = ByteSkip * 512; // Must Be In a 512 Blocks...

3 W2 t& o9 L/ a% T* H // Find Difference Between The Two Values
. c  }$ \- r- ?8 k6 o# _: B& J ByteSkip = (DWORD)(BytesStatistics.cbSize.QuadPart - ByteSkip);

5 L7 u3 T) v7 L1 A* m3 k
% C0 C/ t6 g' r
: r8 }1 Z  z7 y$ H9 |: a6 [0 } // Allocate Only The Pure Picture Data
RealData.LowPart = 0;
" b# L' f' g5 D RealData.HighPart = 0;
- [8 Q( b1 B) ^2 }( l; O  D RealData.QuadPart = ByteSkip;
2 X0 N- B0 n% u# U BufferBytes = (BYTE*)malloc(OutStream);
$ P# M& |: D) p5 t( c: H+ Z) a if(BufferBytes == NULL)
  {
( b) u6 M$ x1 r  @+ w! M% {  Buffer->Release();
+ F( A; i) o) k: ~* F  HWND hWnd = AfxGetApp()->GetMainWnd()->m_hWnd;
  MessageBoxEx(hWnd, Can not allocate enough memory\\t, ERROR_TITLE, MB_OK | MB_ICONSTOP, LANG_ENGLISH);
  }
6 A/ t& z5 P( f3 a5 p' ?( {
/ C5 B" N! Z- o" n1 n1 w8 Q

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



if(BitmapFile.Open(sFilePathName, CFile::typeBinary | CFile::modeCreate | CFile::modeWrite, &e))
  {
" r; ]6 _9 h1 ?5 z* b9 k' Y  BitmapFile.Write(BufferBytes, OutData);
: ^% V% a  B# R8 F! g% d; T  BitmapFile.Close();
  bResult = TRUE;
  }
else // Write File Failed...
  {
  TCHAR szCause[255];
  J. \! E3 }4 Q2 |9 p3 D  U+ H  e.GetErrorMessage(szCause, 255, NULL);
0 q" q% O$ D: i% C, j+ N# O/ K  HWND hWnd = AfxGetApp()->GetMainWnd()->m_hWnd;
  MessageBoxEx(hWnd, szCause, ERROR_TITLE, MB_OK | MB_ICONSTOP, LANG_ENGLISH);
, H5 |, G; q! h' v) x, F& H( T  bResult = FALSE;
  }

Buffer->Release();
  a! P2 @* a& d free(BufferBytes);



return(bResult);
}