home *** CD-ROM | disk | FTP | other *** search
/ C Programming Starter Kit 2.0 / SamsPublishing-CProgrammingStarterKit-v2.0-Win31.iso / bc45 / owlsrc.pak / METAFILE.CPP < prev    next >
C/C++ Source or Header  |  1997-07-23  |  5KB  |  187 lines
  1. //----------------------------------------------------------------------------
  2. // ObjectWindows
  3. // (C) Copyright 1992, 1994 by Borland International, All Rights Reserved
  4. //
  5. //   Implementation of TMetaFilePict class
  6. //----------------------------------------------------------------------------
  7. #pragma hdrignore SECTION
  8. #include <owl/owlpch.h>
  9. #include <owl/metafile.h>
  10. #include <owl/gdiobjec.h>
  11. #include <owl/clipboar.h>
  12. #include <owl/except.h>
  13.  
  14.  
  15. TMetaFilePict::TMetaFilePict(HMETAFILE handle, TAutoDelete autoDelete)
  16. :
  17.   TGdiBase(handle, autoDelete),
  18.   Extent(0,0)
  19. {
  20.   Mm = MM_ANISOTROPIC;
  21. }
  22.  
  23. TMetaFilePict::TMetaFilePict(const char* filename)
  24. :
  25.   TGdiBase(::GetMetaFile(filename), AutoDelete),
  26.   Extent(0,0)
  27. {
  28.   Mm = MM_ANISOTROPIC;
  29. }
  30.  
  31. //
  32. // Construct a TMetaFilePict that represents the metafilepict on the clipboard.
  33. // Should be copied if metafile needs to be kept.
  34. //
  35. TMetaFilePict::TMetaFilePict(const TClipboard&)
  36. :
  37.   Extent(0,0)
  38. {
  39.   HGLOBAL hmfp = ::GetClipboardData(CF_METAFILEPICT);
  40.   METAFILEPICT far* mfp = (METAFILEPICT far*)::GlobalLock(hmfp);
  41.  
  42.   if (mfp) {
  43.     Mm = mfp->mm;
  44.     Extent = TSize(mfp->xExt, mfp->yExt);
  45.     Handle = mfp->hMF;
  46.     ::GlobalUnlock(hmfp);
  47.   }
  48.   else
  49.     Handle = 0;
  50.  
  51.   ShouldDelete = false;
  52.   CheckValid();
  53. }
  54.  
  55. #if defined(BI_PLAT_WIN32)
  56.  
  57. TMetaFilePict::TMetaFilePict(uint size, void* data)
  58. :
  59.   TGdiBase(::SetMetaFileBitsEx(size, (LPBYTE)data), NoAutoDelete),
  60.   Extent(0,0)
  61. {
  62.   CheckValid();
  63.   Mm = MM_ANISOTROPIC;
  64. }
  65.  
  66. #else
  67.  
  68. TMetaFilePict::TMetaFilePict(HGLOBAL data)
  69. :
  70.   TGdiBase(::SetMetaFileBitsBetter(data), NoAutoDelete),
  71.   Extent(0,0)
  72. {
  73.   CheckValid();
  74.   Mm = MM_ANISOTROPIC;
  75. }
  76.  
  77. #endif
  78.  
  79. TMetaFilePict::TMetaFilePict(const TMetaFilePict& src, const char far* fileName)
  80. :
  81.   TGdiBase(::CopyMetaFile(src, fileName), AutoDelete),
  82.   Extent(src.Extent)
  83. {
  84.   CheckValid();
  85.   Mm = src.Mm;
  86. }
  87.  
  88. TMetaFilePict::~TMetaFilePict()
  89. {
  90.   if (ShouldDelete && Handle)
  91.     ::DeleteMetaFile(HMETAFILE(Handle));
  92. }
  93.  
  94. #if defined(BI_PLAT_WIN32)
  95.  
  96. uint32
  97. TMetaFilePict::GetMetaFileBitsEx(uint size, void* data)
  98. {
  99.   return ::GetMetaFileBitsEx(HMETAFILE(Handle), size, (LPBYTE)data);
  100. }
  101.  
  102. #endif
  103.  
  104. //
  105. // Calculates target play size based on info from the metafilepict (if any)
  106. // and default target size as necessary
  107. //
  108. TSize
  109. TMetaFilePict::CalcPlaySize(TDC& dc, const TSize& defSize) const
  110. {
  111.   // Given a fixed mapping mode, return precalculated extents
  112.   //
  113.   if (Mm != MM_ISOTROPIC && Mm != MM_ANISOTROPIC)
  114.     return Extent;    // Assumes extents were calculated correctly.
  115.  
  116.   // If no extent info given, then use defaults
  117.   //
  118.   if (!Extent.cx) {
  119.     return defSize;
  120.   }
  121.   // Use positive extents scaled to 0.01mm units
  122.   //
  123.   else if (Extent.cx > 0) {
  124.     return TSize(
  125.         int(long(Extent.cx)*dc.GetDeviceCaps(HORZRES)/dc.GetDeviceCaps(HORZSIZE)/100),
  126.         int(long(Extent.cy)*dc.GetDeviceCaps(VERTRES)/dc.GetDeviceCaps(VERTSIZE)/100)
  127.       );
  128.   }
  129.   // Use negative extents scaled to 0.01mm units w/ aspect ratio scaling
  130.   //
  131.   else {
  132.     long xscale = 100L * defSize.cx *
  133.       dc.GetDeviceCaps(HORZSIZE)/dc.GetDeviceCaps(HORZRES) / -Extent.cx;
  134.     long yscale = 100L * defSize.cy *
  135.       dc.GetDeviceCaps(VERTSIZE)/dc.GetDeviceCaps(VERTRES) / -Extent.cy;
  136.     long scale = min(xscale, yscale);
  137.     return TSize(
  138.       int(long(-Extent.cx)*scale*dc.GetDeviceCaps(HORZRES)/dc.GetDeviceCaps(HORZSIZE) / 100),
  139.       int(long(-Extent.cy)*scale*dc.GetDeviceCaps(VERTRES)/dc.GetDeviceCaps(VERTSIZE) / 100)
  140.     );
  141.   }
  142. }
  143.  
  144. //
  145. // Play this metafile onto a dc, possibly using a default size if this 
  146. // metafile doesn't have one. Does not save dc state.
  147. //
  148. bool
  149. TMetaFilePict::PlayOnto(TDC& dc, const TSize& defSize) const
  150. {
  151.   // Set target dc's mapping mode to this metafile's if there is one
  152.   //
  153.   if (Mm)        
  154.     dc.SetMapMode(Mm);
  155.  
  156.   // Set the viewport extent to the size that the metafile wil play to
  157.   //
  158.   if ((Mm == MM_ISOTROPIC || Mm == MM_ANISOTROPIC) && Extent.cx && Extent.cy)
  159.     dc.SetViewportExt(CalcPlaySize(dc, defSize));
  160.  
  161.   return ::PlayMetaFile(dc, *this);
  162. }
  163.  
  164. //
  165. // Move this metafile to the clipboard inside of a metafilepict struct.
  166. // Ownership of the metafilepict as well as the metafile is passed to the
  167. // clipboard.
  168. //
  169. void
  170. TMetaFilePict::ToClipboard(TClipboard& clipboard, unsigned mapMode,
  171.                            const TSize& extent)
  172. {
  173.  
  174.   HGLOBAL hmfp = ::GlobalAlloc(GMEM_MOVEABLE, sizeof(METAFILEPICT));
  175.   if (!hmfp)
  176.     THROW( TXOutOfMemory() );
  177.   METAFILEPICT far* mfp = (METAFILEPICT far*)::GlobalLock(hmfp);
  178.   mfp->mm = mapMode;
  179.   mfp->xExt = extent.cx;
  180.   mfp->yExt = extent.cy;
  181.   mfp->hMF = (HMETAFILE)Handle;
  182.   ::GlobalUnlock(hmfp);
  183.   
  184.   clipboard.SetClipboardData(CF_METAFILEPICT, hmfp);
  185.   ShouldDelete = false;
  186. }
  187.