]> git.saurik.com Git - wxWidgets.git/blobdiff - src/msw/dc.cpp
projects / wxWidgets.git / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
Added GUI part of AppTraits for OS/2.
[wxWidgets.git] / src / msw / dc.cpp
diff --git a/src/msw/dc.cpp b/src/msw/dc.cpp
index 7ec41b1008baadf22a8d44d4f417306fae767d34..f3c558bf1195832ee43e05b5afba0d800c0a8d58 100644 (file)
--- a/src/msw/dc.cpp
+++ b/src/msw/dc.cpp
@@ -5,1634 +5,2436 @@
 // Modified by:
 // Created:     01/02/97
 // RCS-ID:      $Id$
 // Modified by:
 // Created:     01/02/97
 // RCS-ID:      $Id$
-// Copyright:   (c) Julian Smart and Markus Holzem
-// Licence:    wxWindows licence
+// Copyright:   (c) Julian Smart
+// Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 
 /////////////////////////////////////////////////////////////////////////////
 
-#ifdef __GNUG__
-#pragma implementation "dc.h"
+// ===========================================================================
+// declarations
+// ===========================================================================
+
+// ---------------------------------------------------------------------------
+// headers
+// ---------------------------------------------------------------------------
+
+#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
+    #pragma implementation "dc.h"
 #endif
 
 // For compilers that support precompilation, includes "wx.h".
 #include "wx/wxprec.h"
 
 #ifdef __BORLANDC__
 #endif
 
 // For compilers that support precompilation, includes "wx.h".
 #include "wx/wxprec.h"
 
 #ifdef __BORLANDC__
-#pragma hdrstop
+    #pragma hdrstop
 #endif
 
 #ifndef WX_PRECOMP
 #endif
 
 #ifndef WX_PRECOMP
-#include "wx/frame.h"
-#include "wx/dc.h"
-#include "wx/utils.h"
-#include "wx/dialog.h"
-#include "wx/app.h"
+    #include "wx/window.h"
+    #include "wx/dc.h"
+    #include "wx/utils.h"
+    #include "wx/dialog.h"
+    #include "wx/app.h"
+    #include "wx/bitmap.h"
+    #include "wx/dcmemory.h"
+    #include "wx/log.h"
+    #include "wx/icon.h"
 #endif
 
 #endif
 
+#include "wx/msw/private.h" // needs to be before #include <commdlg.h>
+
+#include "wx/sysopt.h"
 #include "wx/dcprint.h"
 #include "wx/dcprint.h"
-#include "wx/msw/private.h"
+#include "wx/module.h"
+#include "wx/dynload.h"
+
+#ifdef wxHAVE_RAW_BITMAP
+#include "wx/rawbmp.h"
+#endif
 
 #include <string.h>
 #include <math.h>
 
 #include <string.h>
 #include <math.h>
-#include <fstream.h>
 
 
-#if USE_COMMON_DIALOGS
-#include <commdlg.h>
+#if wxUSE_COMMON_DIALOGS && !defined(__WXMICROWIN__)
+    #include <commdlg.h>
 #endif
 
 #ifndef __WIN32__
 #endif
 
 #ifndef __WIN32__
-#include <print.h>
+    #include <print.h>
 #endif
 
 #endif
 
-#ifdef DrawText
-#undef DrawText
+#ifndef AC_SRC_ALPHA
+#define AC_SRC_ALPHA 1
 #endif
 
 #endif
 
-#ifdef GetCharWidth
-#undef GetCharWidth
+/* Quaternary raster codes */
+#ifndef MAKEROP4
+#define MAKEROP4(fore,back) (DWORD)((((back) << 8) & 0xFF000000) | (fore))
 #endif
 
 #endif
 
-#ifdef StartDoc
-#undef StartDoc
-#endif
+IMPLEMENT_ABSTRACT_CLASS(wxDC, wxDCBase)
 
 
-#if !USE_SHARED_LIBRARY
-IMPLEMENT_ABSTRACT_CLASS(wxDC, wxObject)
-#endif
+// ---------------------------------------------------------------------------
+// constants
+// ---------------------------------------------------------------------------
 
 
-// Declarations local to this file
+static const int VIEWPORT_EXTENT = 1000;
 
 
-#define YSCALE(y) (yorigin - (y))
+static const int MM_POINTS = 9;
+static const int MM_METRIC = 10;
 
 
-// #define     wx_round(a)    (int)((a)+.5)
+// usually this is defined in math.h
+#ifndef M_PI
+    static const double M_PI = 3.14159265358979323846;
+#endif // M_PI
 
 
-// Default constructor
-wxDC::wxDC(void)
-{
-  // Stop internal GDI objects being found and pointers kept
-  // after these objects have been deleted.
-  // No - it's OK; these lists won't return them
-  // because their 'visible' status will be FALSE.
-/*
-  wxTheFontList->RemoveFont(&m_font);
-  wxThePenList->RemovePen(&m_pen);
-  wxTheBrushList->RemoveBrush(&m_brush);
-  wxTheBrushList->RemoveBrush(&m_backgroundBrush);
-*/
-
-  m_minX = 0; m_minY = 0; m_maxX = 0; m_maxY = 0;
-  m_clipping = FALSE;
-  m_autoSetting = TRUE ;
-//  m_scaleGDI = TRUE;
-
-  m_filename = "";
-//  m_selectedBitmap = NULL;
-  m_canvas = NULL;
-/*
-  cur_dc = NULL ;
-  cur_bk = 0 ;
-  cur_cpen = NULL ;
-  cur_cbrush = NULL ;
-*/
-  m_oldBitmap = 0;
-  m_oldPen = 0;
-  m_oldBrush = 0;
-  m_oldFont = 0;
-  m_oldPalette = 0;
-  m_minX = 0; m_minY = 0; m_maxX = 0; m_maxY = 0;
-//  m_font = NULL;
-  m_logicalOriginX = 0;
-  m_logicalOriginY = 0;
-  m_deviceOriginX = 0;
-  m_deviceOriginY = 0;
-  m_logicalScaleX = 1.0;
-  m_logicalScaleY = 1.0;
-  m_userScaleX = 1.0;
-  m_userScaleY = 1.0;
-  m_systemScaleX = 1.0;
-  m_systemScaleY = 1.0;
-  m_mappingMode = MM_TEXT;
-//  m_dontDelete = FALSE;
-  m_bOwnsDC = FALSE;
-  m_hDC = 0;
-  m_clipping = FALSE;
-  m_ok = TRUE;
-  m_windowExtX = VIEWPORT_EXTENT;
-  m_windowExtY = VIEWPORT_EXTENT;
-  m_logicalFunction = -1;
-
-  m_backgroundBrush = *wxWHITE_BRUSH;
-//  m_backgroundBrush.UseResource();
-
-  m_textForegroundColour = *wxBLACK;
-  m_textBackgroundColour = *wxWHITE;
-
-  m_colour = wxColourDisplay();
-
-  m_hDCCount = 0;
-}
-
-
-wxDC::~wxDC(void)
-{
-  if ( m_hDC != 0 ) {
-    SelectOldObjects(m_hDC);
-    if ( m_bOwnsDC ) {
-      if ( m_canvas == NULL )
-        ::DeleteDC((HDC)m_hDC);
-      else
-        ::ReleaseDC((HWND)m_canvas->GetHWND(), (HDC)m_hDC);
-    }
-  }
+// ROPs which don't have standard names (see "Ternary Raster Operations" in the
+// MSDN docs for how this and other numbers in wxDC::Blit() are obtained)
+#define DSTCOPY 0x00AA0029      // a.k.a. NOP operation
+
+// ----------------------------------------------------------------------------
+// macros for logical <-> device coords conversion
+// ----------------------------------------------------------------------------
 
 /*
 
 /*
-  if (m_hDC)
-  {
-    SelectOldObjects(m_hDC);
-    ::DeleteDC((HDC) m_hDC);
-  }
-*/
-}
+   We currently let Windows do all the translations itself so these macros are
+   not really needed (any more) but keep them to enhance readability of the
+   code by allowing to see where are the logical and where are the device
+   coordinates used.
+ */
 
 
-// This will select current objects out of the DC,
-// which is what you have to do before deleting the
-// DC.
-void wxDC::SelectOldObjects(WXHDC dc)
-{
-#if DEBUG > 1
-  wxDebugMsg("wxDC::SelectOldObjects %X\n", this);
+// logical to device
+#define XLOG2DEV(x) (x)
+#define YLOG2DEV(y) (y)
+
+// device to logical
+#define XDEV2LOG(x) (x)
+#define YDEV2LOG(y) (y)
+
+// ---------------------------------------------------------------------------
+// private functions
+// ---------------------------------------------------------------------------
+
+// convert degrees to radians
+static inline double DegToRad(double deg) { return (deg * M_PI) / 180.0; }
+
+// call AlphaBlend() to blit contents of hdcSrc to hdcDst using alpha
+//
+// NB: bmpSrc is the bitmap selected in hdcSrc, it is not really needed
+//     to pass it to this function but as we already have it at the point
+//     of call anyhow we do
+//
+// return true if we could draw the bitmap in one way or the other, false
+// otherwise
+static bool AlphaBlt(HDC hdcDst,
+                     int x, int y, int w, int h,
+                     HDC hdcSrc,
+                     const wxBitmap& bmpSrc);
+
+#ifdef wxHAVE_RAW_BITMAP
+// our (limited) AlphaBlend() replacement
+static void
+wxAlphaBlend(HDC hdcDst, int x, int y, int w, int h, const wxBitmap& bmp);
 #endif
 #endif
-  if (dc)
-  {
-    if (m_oldBitmap)
+
+// ----------------------------------------------------------------------------
+// private classes
+// ----------------------------------------------------------------------------
+
+// instead of duplicating the same code which sets and then restores text
+// colours in each wxDC method working with wxSTIPPLE_MASK_OPAQUE brushes,
+// encapsulate this in a small helper class
+
+// wxColourChanger: changes the text colours in the ctor if required and
+//                  restores them in the dtor
+class wxColourChanger
+{
+public:
+    wxColourChanger(wxDC& dc);
+   ~wxColourChanger();
+
+private:
+    wxDC& m_dc;
+
+    COLORREF m_colFgOld, m_colBgOld;
+
+    bool m_changed;
+
+    DECLARE_NO_COPY_CLASS(wxColourChanger)
+};
+
+// this class saves the old stretch blit mode during its life time
+class StretchBltModeChanger
+{
+public:
+    StretchBltModeChanger(HDC hdc, int mode)
+        : m_hdc(hdc)
     {
     {
-#if DEBUG > 1
-      wxDebugMsg("wxDC::SelectOldObjects: Selecting old HBITMAP %X\n", m_oldBitmap);
+#ifndef __WXWINCE__
+        m_modeOld = ::SetStretchBltMode(m_hdc, mode);
+        if ( !m_modeOld )
+            wxLogLastError(_T("SetStretchBltMode"));
 #endif
 #endif
-      ::SelectObject((HDC) dc, (HBITMAP) m_oldBitmap);
-      if (m_selectedBitmap.Ok())
-      {
-        m_selectedBitmap.SetSelectedInto(NULL);
-      }
     }
     }
-    m_oldBitmap = 0 ;
-    if (m_oldPen)
+
+    ~StretchBltModeChanger()
     {
     {
-#if DEBUG > 1
-      wxDebugMsg("wxDC::SelectOldObjects: Selecting old HPEN %X\n", m_oldPen);
+#ifndef __WXWINCE__
+        if ( !::SetStretchBltMode(m_hdc, m_modeOld) )
+            wxLogLastError(_T("SetStretchBltMode"));
 #endif
 #endif
-      ::SelectObject((HDC) dc, (HPEN) m_oldPen);
     }
     }
-    m_oldPen = 0 ;
-    if (m_oldBrush)
+
+private:
+    const HDC m_hdc;
+
+    int m_modeOld;
+
+    DECLARE_NO_COPY_CLASS(StretchBltModeChanger)
+};
+
+// ===========================================================================
+// implementation
+// ===========================================================================
+
+// ----------------------------------------------------------------------------
+// wxColourChanger
+// ----------------------------------------------------------------------------
+
+wxColourChanger::wxColourChanger(wxDC& dc) : m_dc(dc)
+{
+    const wxBrush& brush = dc.GetBrush();
+    if ( brush.Ok() && brush.GetStyle() == wxSTIPPLE_MASK_OPAQUE )
     {
     {
-#if DEBUG > 1
-      wxDebugMsg("wxDC::SelectOldObjects: Selecting old HBRUSH %X\n", m_oldBrush);
-#endif
-      ::SelectObject((HDC) dc, (HBRUSH) m_oldBrush);
+        HDC hdc = GetHdcOf(dc);
+        m_colFgOld = ::GetTextColor(hdc);
+        m_colBgOld = ::GetBkColor(hdc);
+
+        // note that Windows convention is opposite to wxWindows one, this is
+        // why text colour becomes the background one and vice versa
+        const wxColour& colFg = dc.GetTextForeground();
+        if ( colFg.Ok() )
+        {
+            ::SetBkColor(hdc, colFg.GetPixel());
+        }
+
+        const wxColour& colBg = dc.GetTextBackground();
+        if ( colBg.Ok() )
+        {
+            ::SetTextColor(hdc, colBg.GetPixel());
+        }
+
+        SetBkMode(hdc,
+                  dc.GetBackgroundMode() == wxTRANSPARENT ? TRANSPARENT
+                                                          : OPAQUE);
+
+        // flag which telsl us to undo changes in the dtor
+        m_changed = TRUE;
     }
     }
-    m_oldBrush = 0 ;
-    if (m_oldFont)
+    else
     {
     {
-#if DEBUG > 1
-      wxDebugMsg("wxDC::SelectOldObjects: Selecting old HFONT %X\n", m_oldFont);
-#endif
-      ::SelectObject((HDC) dc, (HFONT) m_oldFont);
+        // nothing done, nothing to undo
+        m_changed = FALSE;
     }
     }
-    m_oldFont = 0 ;
-    if (m_oldPalette)
+}
+
+wxColourChanger::~wxColourChanger()
+{
+    if ( m_changed )
     {
     {
-#if DEBUG > 1
-      wxDebugMsg("wxDC::SelectOldObjects: Selecting old HPALETTE %X\n", m_oldPalette);
-#endif
-      ::SelectPalette((HDC) dc, (HPALETTE) m_oldPalette, TRUE);
-    }
-#if DEBUG > 1
-    wxDebugMsg("wxDC::SelectOldObjects: Done.\n");
-#endif
-    m_oldPalette = 0 ;
-  }
-/*
-  if (m_font.Ok())
-    m_font.ReleaseResource();
-  if (m_pen.Ok())
-    m_pen.ReleaseResource();
-  if (m_brush.Ok())
-    m_brush.ReleaseResource();
-  if (m_backgroundBrush.Ok())
-    m_backgroundBrush.ReleaseResource();
-*/
+        // restore the colours we changed
+        HDC hdc = GetHdcOf(m_dc);
 
 
-  m_brush = wxNullBrush ;
-  m_pen = wxNullPen;
-  m_palette = wxNullPalette;
-  m_font = wxNullFont;
-  m_backgroundBrush = wxNullBrush;
-  m_selectedBitmap = wxNullBitmap;
+        ::SetBkMode(hdc, TRANSPARENT);
+        ::SetTextColor(hdc, m_colFgOld);
+        ::SetBkColor(hdc, m_colBgOld);
+    }
 }
 
 }
 
-void wxDC::SetClippingRegion(long cx, long cy, long cw, long ch)
-{
-  m_clipping = TRUE;
-  m_clipX1 = (int)cx;
-  m_clipY1 = (int)cy;
-  m_clipX2 = (int)(cx + cw);
-  m_clipY2 = (int)(cy + ch);
+// ---------------------------------------------------------------------------
+// wxDC
+// ---------------------------------------------------------------------------
 
 
-  BeginDrawing();
+// Default constructor
+wxDC::wxDC()
+{
+    m_canvas = NULL;
 
 
-  DoClipping((WXHDC) m_hDC);
+    m_oldBitmap = 0;
+    m_oldPen = 0;
+    m_oldBrush = 0;
+    m_oldFont = 0;
+#if wxUSE_PALETTE
+    m_oldPalette = 0;
+#endif // wxUSE_PALETTE
 
 
-  EndDrawing();
+    m_bOwnsDC = FALSE;
+    m_hDC = 0;
 }
 
 }
 
-void wxDC::DoClipping(WXHDC dc)
+wxDC::~wxDC()
 {
 {
-  if (m_clipping && dc)
-  {
-    IntersectClipRect((HDC) dc, XLOG2DEV(m_clipX1), YLOG2DEV(m_clipY1),
-                          XLOG2DEV(m_clipX2), YLOG2DEV(m_clipY2));
-#if 0
-    int x_off = 0;
-    int y_off = 0;
-    if (m_canvas)
+    if ( m_hDC != 0 )
     {
     {
-      m_canvas->CalcScrolledPosition(0, 0, &x_off, &y_off);
+        SelectOldObjects(m_hDC);
+
+        // if we own the HDC, we delete it, otherwise we just release it
+
+        if ( m_bOwnsDC )
+        {
+            ::DeleteDC(GetHdc());
+        }
+        else // we don't own our HDC
+        {
+            if (m_canvas)
+            {
+                ::ReleaseDC(GetHwndOf(m_canvas), GetHdc());
+            }
+            else
+            {
+                // Must have been a wxScreenDC
+                ::ReleaseDC((HWND) NULL, GetHdc());
+            }
+        }
     }
     }
-//    HRGN rgn = CreateRectRgn(XLOG2DEV(m_clipX1 + x_off), YLOG2DEV(m_clipY1 + y_off),
-//                          XLOG2DEV(m_clipX2 + x_off), YLOG2DEV(m_clipY2 + y_off));
-
-//    SelectClipRgn(dc, rgn);
-//    DeleteObject(rgn);
-    IntersectClipRect((HDC) dc, XLOG2DEV(m_clipX1 + x_off), YLOG2DEV(m_clipY1 + y_off),
-                          XLOG2DEV(m_clipX2 + x_off), YLOG2DEV(m_clipY2 + y_off));
-#endif
-  }
 }
 
 }
 
-void wxDC::DestroyClippingRegion(void)
+// This will select current objects out of the DC,
+// which is what you have to do before deleting the
+// DC.
+void wxDC::SelectOldObjects(WXHDC dc)
 {
 {
-  BeginDrawing();
-
-  if (m_clipping && m_hDC)
-  {
-//        SelectClipRgn(dc, NULL);
-    HRGN rgn = CreateRectRgn(0, 0, 32000, 32000);
-#if DEBUG > 1
-    wxDebugMsg("wxDC::DestroyClippingRegion: Selecting HRGN %X\n", rgn);
-#endif
-    SelectClipRgn((HDC) m_hDC, rgn);
-#if DEBUG > 1
-    wxDebugMsg("wxDC::DestroyClippingRegion: Deleting HRGN %X\n", rgn);
+    if (dc)
+    {
+        if (m_oldBitmap)
+        {
+            ::SelectObject((HDC) dc, (HBITMAP) m_oldBitmap);
+#ifdef __WXDEBUG__
+            if (m_selectedBitmap.Ok())
+            {
+                m_selectedBitmap.SetSelectedInto(NULL);
+            }
 #endif
 #endif
-    DeleteObject(rgn);
-   }
-   m_clipping = FALSE;
+        }
+        m_oldBitmap = 0;
+        if (m_oldPen)
+        {
+            ::SelectObject((HDC) dc, (HPEN) m_oldPen);
+        }
+        m_oldPen = 0;
+        if (m_oldBrush)
+        {
+            ::SelectObject((HDC) dc, (HBRUSH) m_oldBrush);
+        }
+        m_oldBrush = 0;
+        if (m_oldFont)
+        {
+            ::SelectObject((HDC) dc, (HFONT) m_oldFont);
+        }
+        m_oldFont = 0;
+
+#if wxUSE_PALETTE
+        if (m_oldPalette)
+        {
+            ::SelectPalette((HDC) dc, (HPALETTE) m_oldPalette, FALSE);
+        }
+        m_oldPalette = 0;
+#endif // wxUSE_PALETTE
+    }
 
 
-   EndDrawing();
+    m_brush = wxNullBrush;
+    m_pen = wxNullPen;
+#if wxUSE_PALETTE
+    m_palette = wxNullPalette;
+#endif // wxUSE_PALETTE
+    m_font = wxNullFont;
+    m_backgroundBrush = wxNullBrush;
+    m_selectedBitmap = wxNullBitmap;
 }
 
 }
 
-bool wxDC::CanDrawBitmap(void) const
+// ---------------------------------------------------------------------------
+// clipping
+// ---------------------------------------------------------------------------
+
+void wxDC::UpdateClipBox()
 {
 {
-  return TRUE;
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
+
+    RECT rect;
+    ::GetClipBox(GetHdc(), &rect);
+
+    m_clipX1 = (wxCoord) XDEV2LOG(rect.left);
+    m_clipY1 = (wxCoord) YDEV2LOG(rect.top);
+    m_clipX2 = (wxCoord) XDEV2LOG(rect.right);
+    m_clipY2 = (wxCoord) YDEV2LOG(rect.bottom);
 }
 
 }
 
-bool wxDC::CanGetTextExtent(void) const
+// common part of DoSetClippingRegion() and DoSetClippingRegionAsRegion()
+void wxDC::SetClippingHrgn(WXHRGN hrgn)
 {
 {
-  // What sort of display is it?
-  int technology = ::GetDeviceCaps((HDC) m_hDC, TECHNOLOGY);
+    wxCHECK_RET( hrgn, wxT("invalid clipping region") );
 
 
-  bool ok;
+#ifdef __WXMICROWIN__
+    if (!GetHdc()) return;
+#endif // __WXMICROWIN__
 
 
-  if (technology != DT_RASDISPLAY && technology != DT_RASPRINTER)
-    ok = FALSE;
-  else ok = TRUE;
+    // note that we combine the new clipping region with the existing one: this
+    // is compatible with what the other ports do and is the documented
+    // behaviour now (starting with 2.3.3)
+#if defined(__WIN16__) || defined(__WXWINCE__)
+    RECT rectClip;
+    if ( !::GetClipBox(GetHdc(), &rectClip) )
+        return;
 
 
-  return ok;
-}
+    HRGN hrgnDest = ::CreateRectRgn(0, 0, 0, 0);
+    HRGN hrgnClipOld = ::CreateRectRgn(rectClip.left, rectClip.top,
+                                       rectClip.right, rectClip.bottom);
 
 
-void wxDC::SetPalette(const wxPalette& palette)
-{
-  BeginDrawing();
+    if ( ::CombineRgn(hrgnDest, hrgnClipOld, (HRGN)hrgn, RGN_AND) != ERROR )
+    {
+        ::SelectClipRgn(GetHdc(), hrgnDest);
+    }
 
 
-  m_palette = m_palette;
+    ::DeleteObject(hrgnClipOld);
+    ::DeleteObject(hrgnDest);
+#else // Win32
+    if ( ::ExtSelectClipRgn(GetHdc(), (HRGN)hrgn, RGN_AND) == ERROR )
+    {
+        wxLogLastError(_T("ExtSelectClipRgn"));
 
 
-  if (!m_palette.Ok())
-  {
-    // Setting a NULL colourmap is a way of restoring
-    // the original colourmap
-    if (m_oldPalette)
+        return;
+    }
+#endif // Win16/32
+
+    m_clipping = TRUE;
+
+    UpdateClipBox();
+}
+
+void wxDC::DoSetClippingRegion(wxCoord x, wxCoord y, wxCoord w, wxCoord h)
+{
+    // the region coords are always the device ones, so do the translation
+    // manually
+    //
+    // FIXME: possible +/-1 error here, to check!
+    HRGN hrgn = ::CreateRectRgn(LogicalToDeviceX(x),
+                                LogicalToDeviceY(y),
+                                LogicalToDeviceX(x + w),
+                                LogicalToDeviceY(y + h));
+    if ( !hrgn )
     {
     {
-      ::SelectPalette((HDC) m_hDC, (HPALETTE) m_oldPalette, TRUE);
-#if DEBUG > 1
-      wxDebugMsg("wxDC::SetPalette: set old palette %X\n", m_oldPalette);
-#endif
-      m_oldPalette = 0;
+        wxLogLastError(_T("CreateRectRgn"));
     }
     }
+    else
+    {
+        SetClippingHrgn((WXHRGN)hrgn);
 
 
-       return;
-  }
-    
-  if (m_palette.Ok() && m_palette.GetHPALETTE())
-  {
-    HPALETTE oldPal = ::SelectPalette((HDC) m_hDC, (HPALETTE) m_palette.GetHPALETTE(), TRUE);
-    if (!m_oldPalette)
-      m_oldPalette = (WXHPALETTE) oldPal;
+        ::DeleteObject(hrgn);
+    }
+}
 
 
-#if DEBUG > 1
-    wxDebugMsg("wxDC::SetPalette %X: selected palette %X\n", this, m_palette.GetHPALETTE());
-    if (oldPal)
-      wxDebugMsg("wxDC::SetPalette: oldPal was palette %X\n", oldPal);
-    if (m_oldPalette)
-      wxDebugMsg("wxDC::SetPalette: m_oldPalette is palette %X\n", m_oldPalette);
+void wxDC::DoSetClippingRegionAsRegion(const wxRegion& region)
+{
+    SetClippingHrgn(region.GetHRGN());
+}
+
+void wxDC::DestroyClippingRegion()
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
 #endif
 #endif
-    ::RealizePalette((HDC) m_hDC);
-  }
 
 
-  EndDrawing();
+    if (m_clipping && m_hDC)
+    {
+        // TODO: this should restore the previous clipping region,
+        //       so that OnPaint processing works correctly, and the update
+        //       clipping region doesn't get destroyed after the first
+        //       DestroyClippingRegion.
+        HRGN rgn = CreateRectRgn(0, 0, 32000, 32000);
+        ::SelectClipRgn(GetHdc(), rgn);
+        ::DeleteObject(rgn);
+    }
+
+    m_clipping = FALSE;
 }
 
 }
 
-void wxDC::Clear(void)
+// ---------------------------------------------------------------------------
+// query capabilities
+// ---------------------------------------------------------------------------
+
+bool wxDC::CanDrawBitmap() const
 {
 {
-  BeginDrawing();
+    return TRUE;
+}
 
 
-  RECT rect;
-  if (m_canvas)
-    GetClientRect((HWND) m_canvas->GetHWND(), &rect);
-  else if (m_selectedBitmap.Ok())
-  {
-    rect.left = 0; rect.top = 0;
-    rect.right = m_selectedBitmap.GetWidth();
-    rect.bottom = m_selectedBitmap.GetHeight();
-  }
-  (void) ::SetMapMode((HDC) m_hDC, MM_TEXT);
+bool wxDC::CanGetTextExtent() const
+{
+#ifdef __WXMICROWIN__
+    // TODO Extend MicroWindows' GetDeviceCaps function
+    return TRUE;
+#else
+    // What sort of display is it?
+    int technology = ::GetDeviceCaps(GetHdc(), TECHNOLOGY);
 
 
-  DWORD colour = GetBkColor((HDC) m_hDC);
-  HBRUSH brush = CreateSolidBrush(colour);
-  FillRect((HDC) m_hDC, &rect, brush);
-  DeleteObject(brush);
+    return (technology == DT_RASDISPLAY) || (technology == DT_RASPRINTER);
+#endif
+}
 
 
-  ::SetMapMode((HDC) m_hDC, MM_ANISOTROPIC);
-  ::SetViewportExtEx((HDC) m_hDC, VIEWPORT_EXTENT, VIEWPORT_EXTENT, NULL);
-  ::SetWindowExtEx((HDC) m_hDC, m_windowExtX, m_windowExtY, NULL);
-  ::SetViewportOrgEx((HDC) m_hDC, (int)m_deviceOriginX, (int)m_deviceOriginY, NULL);
-  ::SetWindowOrgEx((HDC) m_hDC, (int)m_logicalOriginX, (int)m_logicalOriginY, NULL);
+int wxDC::GetDepth() const
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return 16;
+#endif
 
 
-  EndDrawing();
+    return (int)::GetDeviceCaps(GetHdc(), BITSPIXEL);
 }
 
 }
 
-void wxDC::FloodFill(long x, long y, wxColour *col, int style)
+// ---------------------------------------------------------------------------
+// drawing
+// ---------------------------------------------------------------------------
+
+void wxDC::Clear()
 {
 {
-//  int xx = (int)x;
-//  int yy = (int)y;
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  if (m_brush.Ok() && m_autoSetting)
-    SetBrush(m_brush);
+    RECT rect;
+    if ( m_canvas )
+    {
+        GetClientRect((HWND) m_canvas->GetHWND(), &rect);
+    }
+    else
+    {
+        // No, I think we should simply ignore this if printing on e.g.
+        // a printer DC.
+        // wxCHECK_RET( m_selectedBitmap.Ok(), wxT("this DC can't be cleared") );
+        if (!m_selectedBitmap.Ok())
+            return;
+
+        rect.left = 0; rect.top = 0;
+        rect.right = m_selectedBitmap.GetWidth();
+        rect.bottom = m_selectedBitmap.GetHeight();
+    }
 
 
-//  if (m_canvas)
-//    m_canvas->CalcScrolledPosition((int)x, (int)y, &xx, &yy);
+#ifndef __WXWINCE__
+    (void) ::SetMapMode(GetHdc(), MM_TEXT);
+#endif
 
 
-  BeginDrawing();
+    DWORD colour = ::GetBkColor(GetHdc());
+    HBRUSH brush = ::CreateSolidBrush(colour);
+    ::FillRect(GetHdc(), &rect, brush);
+    ::DeleteObject(brush);
 
 
-  (void)ExtFloodFill((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y),
-                        col->GetPixel(),
-                        style==wxFLOOD_SURFACE?
-                          FLOODFILLSURFACE:FLOODFILLBORDER
-                        );
+    int width = DeviceToLogicalXRel(VIEWPORT_EXTENT)*m_signX,
+        height = DeviceToLogicalYRel(VIEWPORT_EXTENT)*m_signY;
 
 
-  EndDrawing();
+#ifndef __WXWINCE__
+    ::SetMapMode(GetHdc(), MM_ANISOTROPIC);
 
 
-  CalcBoundingBox(x, y);
+    ::SetViewportExtEx(GetHdc(), VIEWPORT_EXTENT, VIEWPORT_EXTENT, NULL);
+    ::SetWindowExtEx(GetHdc(), width, height, NULL);
+    ::SetViewportOrgEx(GetHdc(), (int)m_deviceOriginX, (int)m_deviceOriginY, NULL);
+    ::SetWindowOrgEx(GetHdc(), (int)m_logicalOriginX, (int)m_logicalOriginY, NULL);
+#endif
 }
 
 }
 
-bool wxDC::GetPixel(long x, long y, wxColour *col) const
+bool wxDC::DoFloodFill(wxCoord x, wxCoord y, const wxColour& col, int style)
 {
 {
-  // added by steve 29.12.94 (copied from DrawPoint)
-  // returns TRUE for pixels in the color of the current pen
-  // and FALSE for all other pixels colors
-  // if col is non-NULL return the color of the pixel
-/*
-  int xx1 = (int)x;
-  int yy1 = (int)y;
-  if (m_canvas)
-    m_canvas->CalcScrolledPosition((int)x, (int)y, &xx1, &yy1);
-*/
-
-  // get the color of the pixel
-  COLORREF pixelcolor = ::GetPixel((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y));
-  // get the color of the pen
-  COLORREF pencolor = 0x00ffffff;
-  if (m_pen.Ok())
-  {
-    pencolor = m_pen.GetColour().GetPixel() ;
-  }
-  
-  // return the color of the pixel
-  if(col)
-    col->Set(GetRValue(pixelcolor),GetGValue(pixelcolor),GetBValue(pixelcolor));
-  
-  // check, if color of the pixels is the same as the color
-  // of the current pen
-  return(pixelcolor==pencolor);
-}
-
-void wxDC::CrossHair(long x, long y)
-{
-      if (m_pen.Ok() && m_autoSetting)
-        SetPen(m_pen);
-
-      // We suppose that our screen is 2000x2000 max.
-      long x1 = x-2000;
-      long y1 = y-2000;
-      long x2 = x+2000;
-      long y2 = y+2000;
-/*
-      long xx1 = x1 ;
-      long yy1 = y1 ;
-      long xx2 = x2 ;
-      long yy2 = y2 ;
-      long xx  = x ;
-      long yy  = y ;
+#ifdef __WXWINCE__
+    return FALSE;
+#else
+
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return FALSE;
+#endif
+
+    bool success = (0 != ::ExtFloodFill(GetHdc(), XLOG2DEV(x), YLOG2DEV(y),
+                         col.GetPixel(),
+                         style == wxFLOOD_SURFACE ? FLOODFILLSURFACE
+                                                  : FLOODFILLBORDER) ) ;
+    if (!success)
+    {
+        // quoting from the MSDN docs:
+        //
+        //      Following are some of the reasons this function might fail:
+        //
+        //      * The filling could not be completed.
+        //      * The specified point has the boundary color specified by the
+        //        crColor parameter (if FLOODFILLBORDER was requested).
+        //      * The specified point does not have the color specified by
+        //        crColor (if FLOODFILLSURFACE was requested)
+        //      * The point is outside the clipping region that is, it is not
+        //        visible on the device.
+        //
+        wxLogLastError(wxT("ExtFloodFill"));
+    }
 
 
-      if (m_canvas)
-      {
-        m_canvas->CalcScrolledPosition(x1, y1, &xx1, &yy1);
-        m_canvas->CalcScrolledPosition(x2, y2, &xx2, &yy2);
-        m_canvas->CalcScrolledPosition(x, y, &xx, &yy);
-      }
-*/
+    CalcBoundingBox(x, y);
 
 
-      BeginDrawing();
+    return success;
+#endif
+}
 
 
-      (void)MoveToEx((HDC) m_hDC, XLOG2DEV(x1), YLOG2DEV(y), NULL);
-      (void)LineTo((HDC) m_hDC, XLOG2DEV(x2), YLOG2DEV(y));
+bool wxDC::DoGetPixel(wxCoord x, wxCoord y, wxColour *col) const
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return FALSE;
+#endif
 
 
-      (void)MoveToEx((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y1), NULL);
-      (void)LineTo((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y2));
+    wxCHECK_MSG( col, FALSE, _T("NULL colour parameter in wxDC::GetPixel") );
 
 
-      EndDrawing();
+    // get the color of the pixel
+    COLORREF pixelcolor = ::GetPixel(GetHdc(), XLOG2DEV(x), YLOG2DEV(y));
 
 
-      CalcBoundingBox(x1, y1);
-      CalcBoundingBox(x2, y2);
+    wxRGBToColour(*col, pixelcolor);
+
+    return TRUE;
 }
 
 }
 
-void wxDC::DrawLine(long x1, long y1, long x2, long y2)
+void wxDC::DoCrossHair(wxCoord x, wxCoord y)
 {
 {
-// BUGBUG - is this necessary? YES YES YES YEs Yes yes ye....
-  if (m_pen.Ok() && m_autoSetting)
-    SetPen(m_pen);
-/*
-  int xx1 = (int)x1;
-  int yy1 = (int)y1;
-  int xx2 = (int)x2;
-  int yy2 = (int)y2;
-  if (m_canvas)
-  {
-    m_canvas->CalcScrolledPosition((int)x1, (int)y1, &xx1, &yy1);
-    m_canvas->CalcScrolledPosition((int)x2, (int)y2, &xx2, &yy2);
-  }
-*/
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  BeginDrawing();
+    wxCoord x1 = x-VIEWPORT_EXTENT;
+    wxCoord y1 = y-VIEWPORT_EXTENT;
+    wxCoord x2 = x+VIEWPORT_EXTENT;
+    wxCoord y2 = y+VIEWPORT_EXTENT;
 
 
-  (void)MoveToEx((HDC) m_hDC, XLOG2DEV(x1), YLOG2DEV(y1), NULL);
-  (void)LineTo((HDC) m_hDC, XLOG2DEV(x2), YLOG2DEV(y2));
+    wxDrawLine(GetHdc(), XLOG2DEV(x1), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y));
+    wxDrawLine(GetHdc(), XLOG2DEV(x), YLOG2DEV(y1), XLOG2DEV(x), YLOG2DEV(y2));
 
 
-  /* MATTHEW: [6] New normalization */
-#if WX_STANDARD_GRAPHICS
-  (void)LineTo((HDC) m_hDC, XLOG2DEV(x2) + 1, YLOG2DEV(y2));
+    CalcBoundingBox(x1, y1);
+    CalcBoundingBox(x2, y2);
+}
+
+void wxDC::DoDrawLine(wxCoord x1, wxCoord y1, wxCoord x2, wxCoord y2)
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
 #endif
 
 #endif
 
-  EndDrawing();
+    wxDrawLine(GetHdc(), XLOG2DEV(x1), YLOG2DEV(y1), XLOG2DEV(x2), YLOG2DEV(y2));
 
 
-  CalcBoundingBox(x1, y1);
-  CalcBoundingBox(x2, y2);
+    CalcBoundingBox(x1, y1);
+    CalcBoundingBox(x2, y2);
 }
 
 }
 
-void wxDC::DrawArc(long x1,long y1,long x2,long y2,double xc,double yc)
+// Draws an arc of a circle, centred on (xc, yc), with starting point (x1, y1)
+// and ending at (x2, y2)
+void wxDC::DoDrawArc(wxCoord x1, wxCoord y1,
+                     wxCoord x2, wxCoord y2,
+                     wxCoord xc, wxCoord yc)
 {
 {
-/*
-  int xx1 = (int)x1;
-  int yy1 = (int)y1;
-  int xx2 = (int)x2;
-  int yy2 = (int)y2;
-  int xxc = (int)xc ;
-  int yyc = (int)yc;
-*/
-
-  double dx = xc-x1 ;
-  double dy = yc-y1 ;
-  double radius = (double)sqrt(dx*dx+dy*dy) ;;
-  if (x1==x2 && x2==y2)
-  {
-    DrawEllipse(xc,yc,(double)(radius*2.0),(double)(radius*2)) ;
-    return ;
-  }
-
-// BUGBUG - is this necessary?
-  if (m_pen.Ok() && m_autoSetting)
-    SetPen(m_pen) ;
+#ifdef __WXWINCE__
+    // Slower emulation since WinCE doesn't support Pie and Arc
+    double r = sqrt( (x1-xc)*(x1-xc) + (y1-yc)*(y1-yc) );
+    double sa = acos((x1-xc)/r)/M_PI*180; // between 0 and 180
+    if( y1>yc ) sa = -sa; // below center
+    double ea = atan2(yc-y2, x2-xc)/M_PI*180;
+    DoDrawEllipticArcRot( xc-r, yc-r, 2*r, 2*r, sa, ea );
+#else
 
 
-/*
-  if (m_canvas)
-  {
-    m_canvas->CalcScrolledPosition((int)x1, (int)y1, &xx1, &yy1);
-    m_canvas->CalcScrolledPosition((int)x2, (int)y2, &xx2, &yy2);
-    m_canvas->CalcScrolledPosition((int)xc, (int)yc, &xxc, &yyc);
-  }
-*/
-
-  BeginDrawing();
-
-  long xx1 = XLOG2DEV(x1) ;
-  long yy1 = YLOG2DEV(y1) ;
-  long xx2 = XLOG2DEV(x2) ;
-  long yy2 = YLOG2DEV(y2) ;
-  long xxc = XLOG2DEV(xc) ;
-  long yyc = YLOG2DEV(yc) ;
-  long ray = (long) sqrt(double((xxc-xx1)*(xxc-xx1)+(yyc-yy1)*(yyc-yy1))) ;
-
-  (void)MoveToEx((HDC) m_hDC, (int) xx1, (int) yy1, NULL);
-  long xxx1 = (long) (xxc-ray);
-  long yyy1 = (long) (yyc-ray);
-  long xxx2 = (long) (xxc+ray);
-  long yyy2 = (long) (yyc+ray);
-  if (m_brush.Ok() && m_brush.GetStyle() !=wxTRANSPARENT)
-  {
-// BUGBUG - is this necessary?
-    if (m_brush.GetStyle()!=wxTRANSPARENT&&m_autoSetting)
-      SetBrush(m_brush) ;
-    Pie((HDC) m_hDC,xxx1,yyy1,xxx2,yyy2,
-        xx1,yy1,xx2,yy2) ;
-  }
-  else
-    Arc((HDC) m_hDC,xxx1,yyy1,xxx2,yyy2,
-        xx1,yy1,xx2,yy2) ;
-
-  EndDrawing();
-
-  CalcBoundingBox((xc-radius), (yc-radius));
-  CalcBoundingBox((xc+radius), (yc+radius));
-}
-
-void wxDC::DrawEllipticArc(long WXUNUSED(x),long WXUNUSED(y),long WXUNUSED(w),long WXUNUSED(h),double WXUNUSED(sa),double WXUNUSED(ea))
-{
-  // Not implemented
-}
-
-void wxDC::DrawPoint(long x, long y)
-{
-// BUGBUG - is this necessary?
-  if (m_pen.Ok() && m_autoSetting)
-    SetPen(m_pen) ;
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-/*
-  int xx1 = (int)x;
-  int yy1 = (int)y;
-  if (m_canvas)
-    m_canvas->CalcScrolledPosition((int)x, (int)y, &xx1, &yy1);
-*/
+    wxColourChanger cc(*this); // needed for wxSTIPPLE_MASK_OPAQUE handling
 
 
-  BeginDrawing();
+    double dx = xc - x1;
+    double dy = yc - y1;
+    double radius = (double)sqrt(dx*dx+dy*dy);
+    wxCoord r = (wxCoord)radius;
 
 
-  COLORREF color = 0x00ffffff;
-  if (m_pen.Ok())
-  {
-//    m_pen.RealizeResource();
-    color = m_pen.GetColour().GetPixel() ;
-  }
+    // treat the special case of full circle separately
+    if ( x1 == x2 && y1 == y2 )
+    {
+        DrawEllipse(xc - r, yc - r, 2*r, 2*r);
+        return;
+    }
 
 
-/*
-    color = RGB(m_pen->GetColour().Red(),
-                m_pen->GetColour().Green(),
-                m_pen->GetColour().Blue());
-*/
+    wxCoord xx1 = XLOG2DEV(x1);
+    wxCoord yy1 = YLOG2DEV(y1);
+    wxCoord xx2 = XLOG2DEV(x2);
+    wxCoord yy2 = YLOG2DEV(y2);
+    wxCoord xxc = XLOG2DEV(xc);
+    wxCoord yyc = YLOG2DEV(yc);
+    wxCoord ray = (wxCoord) sqrt(double((xxc-xx1)*(xxc-xx1)+(yyc-yy1)*(yyc-yy1)));
 
 
-  SetPixel((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y), color);
+    wxCoord xxx1 = (wxCoord) (xxc-ray);
+    wxCoord yyy1 = (wxCoord) (yyc-ray);
+    wxCoord xxx2 = (wxCoord) (xxc+ray);
+    wxCoord yyy2 = (wxCoord) (yyc+ray);
 
 
-  EndDrawing();
+    if ( m_brush.Ok() && m_brush.GetStyle() != wxTRANSPARENT )
+    {
+        // Have to add 1 to bottom-right corner of rectangle
+        // to make semi-circles look right (crooked line otherwise).
+        // Unfortunately this is not a reliable method, depends
+        // on the size of shape.
+        // TODO: figure out why this happens!
+        Pie(GetHdc(),xxx1,yyy1,xxx2+1,yyy2+1, xx1,yy1,xx2,yy2);
+    }
+    else
+    {
+        Arc(GetHdc(),xxx1,yyy1,xxx2,yyy2, xx1,yy1,xx2,yy2);
+    }
 
 
-  CalcBoundingBox(x, y);
+    CalcBoundingBox(xc - r, yc - r);
+    CalcBoundingBox(xc + r, yc + r);
+#endif
 }
 
 }
 
-void wxDC::DrawPolygon(int n, wxPoint points[], long xoffset, long yoffset,int fillStyle)
+void wxDC::DoDrawCheckMark(wxCoord x1, wxCoord y1,
+                           wxCoord width, wxCoord height)
 {
 {
-// BUGBUG - is this necessary?
-  if (m_pen.Ok() && m_autoSetting)
-    SetPen(m_pen) ;
-/*
-  int xoffset1 = 0;
-  int yoffset1 = 0;
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  if (m_canvas)
-    m_canvas->CalcScrolledPosition(0, 0, &xoffset1, &yoffset1);
+    wxCoord x2 = x1 + width,
+            y2 = y1 + height;
 
 
-  xoffset1 += (int)xoffset; yoffset1 += (int)yoffset;
-*/
+#if defined(__WIN32__) && !defined(__SYMANTEC__) && !defined(__WXMICROWIN__)
+    RECT rect;
+    rect.left   = x1;
+    rect.top    = y1;
+    rect.right  = x2;
+    rect.bottom = y2;
 
 
-  BeginDrawing();
+#ifdef __WXWINCE__
+    DrawFrameControl(GetHdc(), &rect, DFC_BUTTON, DFCS_BUTTONCHECK);
+#else
+    DrawFrameControl(GetHdc(), &rect, DFC_MENU, DFCS_MENUCHECK);
+#endif
+#else // Win16
+    // In WIN16, draw a cross
+    HPEN blackPen = ::CreatePen(PS_SOLID, 1, RGB(0, 0, 0));
+    HPEN whiteBrush = (HPEN)::GetStockObject(WHITE_BRUSH);
+    HPEN hPenOld = (HPEN)::SelectObject(GetHdc(), blackPen);
+    HPEN hBrushOld = (HPEN)::SelectObject(GetHdc(), whiteBrush);
+    ::SetROP2(GetHdc(), R2_COPYPEN);
+    Rectangle(GetHdc(), x1, y1, x2, y2);
+    MoveToEx(GetHdc(), x1, y1, NULL);
+    LineTo(GetHdc(), x2, y2);
+    MoveToEx(GetHdc(), x2, y1, NULL);
+    LineTo(GetHdc(), x1, y2);
+    ::SelectObject(GetHdc(), hPenOld);
+    ::SelectObject(GetHdc(), hBrushOld);
+    ::DeleteObject(blackPen);
+#endif // Win32/16
+
+    CalcBoundingBox(x1, y1);
+    CalcBoundingBox(x2, y2);
+}
+
+void wxDC::DoDrawPoint(wxCoord x, wxCoord y)
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  POINT *cpoints = new POINT[n];
-  int i;
-  for (i = 0; i < n; i++)
-  {
-    cpoints[i].x = (int)(XLOG2DEV(points[i].x));
-    cpoints[i].y = (int)(YLOG2DEV(points[i].y));
+    COLORREF color = 0x00ffffff;
+    if (m_pen.Ok())
+    {
+        color = m_pen.GetColour().GetPixel();
+    }
 
 
-    CalcBoundingBox(points[i].x, points[i].y);
-  }
+    SetPixel(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), color);
 
 
-  int prev = SetPolyFillMode((HDC) m_hDC,fillStyle==wxODDEVEN_RULE?ALTERNATE:WINDING) ;
-  (void)Polygon((HDC) m_hDC, cpoints, n);
-  SetPolyFillMode((HDC) m_hDC,prev) ;
+    CalcBoundingBox(x, y);
+}
 
 
-  EndDrawing();
+void wxDC::DoDrawPolygon(int n, wxPoint points[], wxCoord xoffset, wxCoord yoffset,int fillStyle)
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
+
+    wxColourChanger cc(*this); // needed for wxSTIPPLE_MASK_OPAQUE handling
 
 
-  delete[] cpoints;
+    // Do things less efficiently if we have offsets
+    if (xoffset != 0 || yoffset != 0)
+    {
+        POINT *cpoints = new POINT[n];
+        int i;
+        for (i = 0; i < n; i++)
+        {
+            cpoints[i].x = (int)(points[i].x + xoffset);
+            cpoints[i].y = (int)(points[i].y + yoffset);
+
+            CalcBoundingBox(cpoints[i].x, cpoints[i].y);
+        }
+#ifndef __WXWINCE__
+        int prev = SetPolyFillMode(GetHdc(),fillStyle==wxODDEVEN_RULE?ALTERNATE:WINDING);
+#endif
+        (void)Polygon(GetHdc(), cpoints, n);
+#ifndef __WXWINCE__
+        SetPolyFillMode(GetHdc(),prev);
+#endif
+        delete[] cpoints;
+    }
+    else
+    {
+        int i;
+        for (i = 0; i < n; i++)
+            CalcBoundingBox(points[i].x, points[i].y);
+
+#ifndef __WXWINCE__
+        int prev = SetPolyFillMode(GetHdc(),fillStyle==wxODDEVEN_RULE?ALTERNATE:WINDING);
+#endif
+        (void)Polygon(GetHdc(), (POINT*) points, n);
+#ifndef __WXWINCE__
+        SetPolyFillMode(GetHdc(),prev);
+#endif
+    }
 }
 
 }
 
-void wxDC::DrawLines(int n, wxPoint points[], long xoffset, long yoffset)
+void wxDC::DoDrawLines(int n, wxPoint points[], wxCoord xoffset, wxCoord yoffset)
 {
 {
-// BUGBUG - is this necessary?
-  if (m_pen.Ok() && m_autoSetting)
-    SetPen(m_pen) ;
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-/*
-  int xoffset1 = 0;
-  int yoffset1 = 0;
+    // Do things less efficiently if we have offsets
+    if (xoffset != 0 || yoffset != 0)
+    {
+        POINT *cpoints = new POINT[n];
+        int i;
+        for (i = 0; i < n; i++)
+        {
+            cpoints[i].x = (int)(points[i].x + xoffset);
+            cpoints[i].y = (int)(points[i].y + yoffset);
+
+            CalcBoundingBox(cpoints[i].x, cpoints[i].y);
+        }
+        (void)Polyline(GetHdc(), cpoints, n);
+        delete[] cpoints;
+    }
+    else
+    {
+        int i;
+        for (i = 0; i < n; i++)
+            CalcBoundingBox(points[i].x, points[i].y);
 
 
-  if (m_canvas)
-  {
-    m_canvas->CalcScrolledPosition(0, 0, &xoffset1, &yoffset1);
-  }
-  xoffset1 += (int)xoffset; yoffset1 += (int)yoffset;
-*/
+        (void)Polyline(GetHdc(), (POINT*) points, n);
+    }
+}
 
 
-  BeginDrawing();
+void wxDC::DoDrawRectangle(wxCoord x, wxCoord y, wxCoord width, wxCoord height)
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  POINT *cpoints = new POINT[n];
-  int i;
-  for (i = 0; i < n; i++)
-  {
-    cpoints[i].x = (int)(XLOG2DEV(points[i].x));
-    cpoints[i].y = (int)(YLOG2DEV(points[i].y));
+    wxColourChanger cc(*this); // needed for wxSTIPPLE_MASK_OPAQUE handling
 
 
-    CalcBoundingBox(points[i].x, points[i].y);
-  }
+    wxCoord x2 = x + width;
+    wxCoord y2 = y + height;
 
 
- (void)Polyline((HDC) m_hDC, cpoints, n);
+    if ((m_logicalFunction == wxCOPY) && (m_pen.GetStyle() == wxTRANSPARENT))
+    {
+        RECT rect;
+        rect.left = XLOG2DEV(x);
+        rect.top = YLOG2DEV(y);
+        rect.right = XLOG2DEV(x2);
+        rect.bottom = YLOG2DEV(y2);
+        (void)FillRect(GetHdc(), &rect, (HBRUSH)m_brush.GetResourceHandle() );
+    }
+    else
+    {
+        // Windows draws the filled rectangles without outline (i.e. drawn with a
+        // transparent pen) one pixel smaller in both directions and we want them
+        // to have the same size regardless of which pen is used - adjust
+
+        // I wonder if this shouldn´t be done after the LOG2DEV() conversions. RR.
+        if ( m_pen.GetStyle() == wxTRANSPARENT )
+        {
+            x2++;
+            y2++;
+        }
+
+        (void)Rectangle(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2));
+    }
 
 
-  EndDrawing();
 
 
-  delete[] cpoints;
+    CalcBoundingBox(x, y);
+    CalcBoundingBox(x2, y2);
 }
 
 }
 
-void wxDC::DrawRectangle(long x, long y, long width, long height)
+void wxDC::DoDrawRoundedRectangle(wxCoord x, wxCoord y, wxCoord width, wxCoord height, double radius)
 {
 {
-// BUGBUG - is this necessary?
-  if (m_pen.Ok() && m_autoSetting)
-    SetPen(m_pen) ;
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-/*
-  int x1 = (int)x;
-  int y1 = (int)y;
-  int x2 = (int)(x+width);
-  int y2 = (int)(y+height);
+    wxColourChanger cc(*this); // needed for wxSTIPPLE_MASK_OPAQUE handling
 
 
-  if (m_canvas)
-  {
-    m_canvas->CalcScrolledPosition((int)x, (int)y, &x1, &y1);
-    m_canvas->CalcScrolledPosition((int)(x+width), (int)(y+height), &x2, &y2);
-  }
-*/
-  long x2 = x + width;
-  long y2 = y + height;
+    // Now, a negative radius value is interpreted to mean
+    // 'the proportion of the smallest X or Y dimension'
 
 
-  BeginDrawing();
+    if (radius < 0.0)
+    {
+        double smallest = 0.0;
+        if (width < height)
+            smallest = width;
+        else
+            smallest = height;
+        radius = (- radius * smallest);
+    }
 
 
-/* MATTHEW: [6] new normalization */
-#if WX_STANDARD_GRAPHICS
-  bool do_brush, do_pen;
+    wxCoord x2 = (x+width);
+    wxCoord y2 = (y+height);
 
 
-  do_brush = m_brush.Ok() && m_brush.GetStyle() != wxTRANSPARENT;
-  do_pen = m_pen.Ok() && m_pen.GetStyle() != wxTRANSPARENT;
+    // Windows draws the filled rectangles without outline (i.e. drawn with a
+    // transparent pen) one pixel smaller in both directions and we want them
+    // to have the same size regardless of which pen is used - adjust
+    if ( m_pen.GetStyle() == wxTRANSPARENT )
+    {
+        x2++;
+        y2++;
+    }
 
 
-  if (do_brush) {
-        HPEN orig_pen = NULL;
+    (void)RoundRect(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2),
+        YLOG2DEV(y2), (int) (2*XLOG2DEV(radius)), (int)( 2*YLOG2DEV(radius)));
 
 
-        if (do_pen || !m_pen.Ok())
-               orig_pen = ::SelectObject((HDC) m_hDC, ::GetStockObject(NULL_PEN));
+    CalcBoundingBox(x, y);
+    CalcBoundingBox(x2, y2);
+}
+
+void wxDC::DoDrawEllipse(wxCoord x, wxCoord y, wxCoord width, wxCoord height)
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-        (void)Rectangle((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y),
-                 XLOG2DEV(x2) + 1, YLOG2DEV(y2) + 1);
+    wxColourChanger cc(*this); // needed for wxSTIPPLE_MASK_OPAQUE handling
 
 
-        if (do_pen || !m_pen.Ok())
-               ::SelectObject((HDC) m_hDC , orig_pen);
-  }
-  if (do_pen) {
-        HBRUSH orig_brush = NULL;
+    wxCoord x2 = (x+width);
+    wxCoord y2 = (y+height);
 
 
-        if (do_brush || !m_brush.Ok())
-               orig_brush = ::SelectObject((HDC) m_hDC, ::GetStockObject(NULL_BRUSH));
+    (void)Ellipse(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2));
 
 
-        (void)Rectangle((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y),
-                 XLOG2DEV(x2), YLOG2DEV(y2));
+    CalcBoundingBox(x, y);
+    CalcBoundingBox(x2, y2);
+}
 
 
-        if (do_brush || !m_brush.Ok())
-               ::SelectObject((HDC) m_hDC, orig_brush);
-  }
+// Chris Breeze 20/5/98: first implementation of DrawEllipticArc on Windows
+void wxDC::DoDrawEllipticArc(wxCoord x,wxCoord y,wxCoord w,wxCoord h,double sa,double ea)
+{
+#ifdef __WXWINCE__
+    DoDrawEllipticArcRot( x, y, w, h, sa, ea );
 #else
 #else
-  (void)Rectangle((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2));
+
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
 #endif
 
 #endif
 
-  CalcBoundingBox(x, y);
-  CalcBoundingBox(x2, y2);
+    wxColourChanger cc(*this); // needed for wxSTIPPLE_MASK_OPAQUE handling
 
 
-  EndDrawing();
-}
+    wxCoord x2 = x + w;
+    wxCoord y2 = y + h;
 
 
-void wxDC::DrawRoundedRectangle(long x, long y, long width, long height, double radius)
-{
-// BUGBUG - is this necessary?
-  if (m_pen.Ok() && m_autoSetting)
-    SetPen(m_pen) ;
+    int rx1 = XLOG2DEV(x+w/2);
+    int ry1 = YLOG2DEV(y+h/2);
+    int rx2 = rx1;
+    int ry2 = ry1;
 
 
-  // Now, a negative radius value is interpreted to mean
-  // 'the proportion of the smallest X or Y dimension'
+    sa = DegToRad(sa);
+    ea = DegToRad(ea);
 
 
-  if (radius < 0.0)
-  {
-    double smallest = 0.0;
-    if (width < height)
-      smallest = width;
+    rx1 += (int)(100.0 * abs(w) * cos(sa));
+    ry1 -= (int)(100.0 * abs(h) * m_signY * sin(sa));
+    rx2 += (int)(100.0 * abs(w) * cos(ea));
+    ry2 -= (int)(100.0 * abs(h) * m_signY * sin(ea));
+
+    // draw pie with NULL_PEN first and then outline otherwise a line is
+    // drawn from the start and end points to the centre
+    HPEN hpenOld = (HPEN) ::SelectObject(GetHdc(), (HPEN) ::GetStockObject(NULL_PEN));
+    if (m_signY > 0)
+    {
+        (void)Pie(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2)+1, YLOG2DEV(y2)+1,
+                  rx1, ry1, rx2, ry2);
+    }
     else
     else
-      smallest = height;
-    radius = (- radius * smallest);
-  }
+    {
+        (void)Pie(GetHdc(), XLOG2DEV(x), YLOG2DEV(y)-1, XLOG2DEV(x2)+1, YLOG2DEV(y2),
+                  rx1, ry1-1, rx2, ry2-1);
+    }
 
 
-/*
-  int x1 = (int)x;
-  int y1 = (int)y;
+    ::SelectObject(GetHdc(), hpenOld);
 
 
-  if (m_canvas)
-  {
-    m_canvas->CalcScrolledPosition((int)x, (int)y, &x1, &y1);
-    m_canvas->CalcScrolledPosition((int)(x+width), (int)(y+height), &x2, &y2);
-  }
-*/
+    (void)Arc(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2),
+              rx1, ry1, rx2, ry2);
 
 
-  long x2 = (x+width);
-  long y2 = (y+height);
+    CalcBoundingBox(x, y);
+    CalcBoundingBox(x2, y2);
+#endif
+}
 
 
-  BeginDrawing();
+void wxDC::DoDrawIcon(const wxIcon& icon, wxCoord x, wxCoord y)
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  (void)RoundRect((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2),
-                      YLOG2DEV(y2), 2*XLOG2DEV(radius), 2*YLOG2DEV(radius));
+    wxCHECK_RET( icon.Ok(), wxT("invalid icon in DrawIcon") );
 
 
-  CalcBoundingBox(x, y);
-  CalcBoundingBox(x2, y2);
+#ifdef __WIN32__
+    ::DrawIconEx(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), GetHiconOf(icon), icon.GetWidth(), icon.GetHeight(), 0, NULL, DI_NORMAL);
+#else
+    ::DrawIcon(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), GetHiconOf(icon));
+#endif
 
 
-  EndDrawing();
+    CalcBoundingBox(x, y);
+    CalcBoundingBox(x + icon.GetWidth(), y + icon.GetHeight());
 }
 
 }
 
-void wxDC::DrawEllipse(long x, long y, long width, long height)
+void wxDC::DoDrawBitmap( const wxBitmap &bmp, wxCoord x, wxCoord y, bool useMask )
 {
 {
-// BUGBUG - is this necessary?
-  if (m_pen.Ok() && m_autoSetting)
-    SetPen(m_pen) ;
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-/*
-  int x1 = (int)x;
-  int y1 = (int)y;
+    wxCHECK_RET( bmp.Ok(), _T("invalid bitmap in wxDC::DrawBitmap") );
 
 
-  if (m_canvas)
-  {
-    m_canvas->CalcScrolledPosition((int)x, (int)y, &x1, &y1);
-    m_canvas->CalcScrolledPosition((int)(x+width), (int)(y+height), &x2, &y2);
-  }
-*/
+    int width = bmp.GetWidth(),
+        height = bmp.GetHeight();
 
 
-  long x2 = (x+width);
-  long y2 = (y+height);
+    HBITMAP hbmpMask = 0;
 
 
-  BeginDrawing();
+#if wxUSE_PALETTE
+    HPALETTE oldPal = 0;
+#endif // wxUSE_PALETTE
 
 
-  (void)Ellipse((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2));
+    if ( bmp.HasAlpha() )
+    {
+        MemoryHDC hdcMem;
+        SelectInHDC select(hdcMem, GetHbitmapOf(bmp));
 
 
-  EndDrawing();
+        if ( AlphaBlt(GetHdc(), x, y, width, height, hdcMem, bmp) )
+            return;
+    }
 
 
-  CalcBoundingBox(x, y);
-  CalcBoundingBox(x2, y2);
+    if ( useMask )
+    {
+        wxMask *mask = bmp.GetMask();
+        if ( mask )
+            hbmpMask = (HBITMAP)mask->GetMaskBitmap();
+
+        if ( !hbmpMask )
+        {
+            // don't give assert here because this would break existing
+            // programs - just silently ignore useMask parameter
+            useMask = FALSE;
+        }
+    }
+    if ( useMask )
+    {
+#ifdef __WIN32__
+        // use MaskBlt() with ROP which doesn't do anything to dst in the mask
+        // points
+        // On some systems, MaskBlt succeeds yet is much much slower
+        // than the wxWindows fall-back implementation. So we need
+        // to be able to switch this on and off at runtime.
+        bool ok = FALSE;
+#if wxUSE_SYSTEM_OPTIONS
+        if (wxSystemOptions::GetOptionInt(wxT("no-maskblt")) == 0)
+#endif
+        {
+            HDC cdc = GetHdc();
+            HDC hdcMem = ::CreateCompatibleDC(GetHdc());
+            HGDIOBJ hOldBitmap = ::SelectObject(hdcMem, GetHbitmapOf(bmp));
+#if wxUSE_PALETTE
+            wxPalette *pal = bmp.GetPalette();
+            if ( pal && ::GetDeviceCaps(cdc,BITSPIXEL) <= 8 )
+            {
+                oldPal = ::SelectPalette(hdcMem, GetHpaletteOf(*pal), FALSE);
+                ::RealizePalette(hdcMem);
+            }
+#endif // wxUSE_PALETTE
+
+            ok = ::MaskBlt(cdc, x, y, width, height,
+                            hdcMem, 0, 0,
+                            hbmpMask, 0, 0,
+                            MAKEROP4(SRCCOPY, DSTCOPY)) != 0;
+
+#if wxUSE_PALETTE
+            if (oldPal)
+                ::SelectPalette(hdcMem, oldPal, FALSE);
+#endif // wxUSE_PALETTE
+
+            ::SelectObject(hdcMem, hOldBitmap);
+            ::DeleteDC(hdcMem);
+        }
+
+        if ( !ok )
+#endif // Win32
+        {
+            // Rather than reproduce wxDC::Blit, let's do it at the wxWin API
+            // level
+            wxMemoryDC memDC;
+            memDC.SelectObject(bmp);
+
+            Blit(x, y, width, height, &memDC, 0, 0, wxCOPY, useMask);
+
+            memDC.SelectObject(wxNullBitmap);
+        }
+    }
+    else // no mask, just use BitBlt()
+    {
+        HDC cdc = GetHdc();
+        HDC memdc = ::CreateCompatibleDC( cdc );
+        HBITMAP hbitmap = (HBITMAP) bmp.GetHBITMAP( );
+
+        wxASSERT_MSG( hbitmap, wxT("bitmap is ok but HBITMAP is NULL?") );
+
+        COLORREF old_textground = ::GetTextColor(GetHdc());
+        COLORREF old_background = ::GetBkColor(GetHdc());
+        if (m_textForegroundColour.Ok())
+        {
+            ::SetTextColor(GetHdc(), m_textForegroundColour.GetPixel() );
+        }
+        if (m_textBackgroundColour.Ok())
+        {
+            ::SetBkColor(GetHdc(), m_textBackgroundColour.GetPixel() );
+        }
+
+#if wxUSE_PALETTE
+        wxPalette *pal = bmp.GetPalette();
+        if ( pal && ::GetDeviceCaps(cdc,BITSPIXEL) <= 8 )
+        {
+            oldPal = ::SelectPalette(memdc, GetHpaletteOf(*pal), FALSE);
+            ::RealizePalette(memdc);
+        }
+#endif // wxUSE_PALETTE
+
+        HGDIOBJ hOldBitmap = ::SelectObject( memdc, hbitmap );
+        ::BitBlt( cdc, x, y, width, height, memdc, 0, 0, SRCCOPY);
+
+#if wxUSE_PALETTE
+        if (oldPal)
+            ::SelectPalette(memdc, oldPal, FALSE);
+#endif // wxUSE_PALETTE
+
+        ::SelectObject( memdc, hOldBitmap );
+        ::DeleteDC( memdc );
+
+        ::SetTextColor(GetHdc(), old_textground);
+        ::SetBkColor(GetHdc(), old_background);
+    }
 }
 
 }
 
-void wxDC::DrawIcon(const wxIcon& icon, long x, long y)
+void wxDC::DoDrawText(const wxString& text, wxCoord x, wxCoord y)
 {
 {
-/*
-  int x1 = (int)x;
-  int y1 = (int)y;
-
-  if (m_canvas)
-    m_canvas->CalcScrolledPosition(int)x, (int)y, &x1, &y1);
-*/
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  BeginDrawing();
+    DrawAnyText(text, x, y);
 
 
-  ::DrawIcon((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y), (HICON) icon.GetHICON());
-  CalcBoundingBox(x, y);
-  CalcBoundingBox(x+icon.GetWidth(), y+icon.GetHeight());
+    // update the bounding box
+    CalcBoundingBox(x, y);
 
 
-  EndDrawing();
+    wxCoord w, h;
+    GetTextExtent(text, &w, &h);
+    CalcBoundingBox(x + w, y + h);
 }
 
 }
 
-void wxDC::SetFont(const wxFont& the_font)
+void wxDC::DrawAnyText(const wxString& text, wxCoord x, wxCoord y)
 {
 {
-  // Release the current font from servitude (decrements the usage count)
-//  if (m_font.Ok())
-//    m_font.ReleaseResource();
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  BeginDrawing();
+    // prepare for drawing the text
+    if ( m_textForegroundColour.Ok() )
+        SetTextColor(GetHdc(), m_textForegroundColour.GetPixel());
 
 
-  m_font = the_font;
+    DWORD old_background = 0;
+    if ( m_textBackgroundColour.Ok() )
+    {
+        old_background = SetBkColor(GetHdc(), m_textBackgroundColour.GetPixel() );
+    }
 
 
-  if (!the_font.Ok())
-  {
-    if (m_oldFont)
-      ::SelectObject((HDC) m_hDC, (HFONT) m_oldFont);
-    m_oldFont = 0 ;
-  }
+    SetBkMode(GetHdc(), m_backgroundMode == wxTRANSPARENT ? TRANSPARENT
+                                                          : OPAQUE);
 
 
-  if (m_font.Ok() && m_font.GetResourceHandle())
-  {
-#if DEBUG > 1
-    wxDebugMsg("wxDC::SetFont: Selecting HFONT %X\n", m_font.GetResourceHandle());
+#ifdef __WXWINCE__
+    if ( ::ExtTextOut(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), 0, NULL,
+                   text.c_str(), text.length(), NULL) == 0 )
+    {
+        wxLogLastError(wxT("TextOut"));
+    }
+#else
+    if ( ::TextOut(GetHdc(), XLOG2DEV(x), YLOG2DEV(y),
+                   text.c_str(), text.length()) == 0 )
+    {
+        wxLogLastError(wxT("TextOut"));
+    }
 #endif
 #endif
-    HFONT f = (HFONT) ::SelectObject((HDC) m_hDC, (HFONT) m_font.GetResourceHandle());
-    if (!m_oldFont)
-      m_oldFont = (WXHFONT) f;
-  }
-  EndDrawing();
-}
 
 
-void wxDC::SetPen(const wxPen& pen)
-{
-  BeginDrawing();
-
-//  if (m_pen.Ok())
-//    m_pen.ReleaseResource();
+    // restore the old parameters (text foreground colour may be left because
+    // it never is set to anything else, but background should remain
+    // transparent even if we just drew an opaque string)
+    if ( m_textBackgroundColour.Ok() )
+        (void)SetBkColor(GetHdc(), old_background);
 
 
-  m_pen = pen;
+    SetBkMode(GetHdc(), TRANSPARENT);
+}
 
 
-  if (!m_pen.Ok())
-  {
-    if (m_oldPen)
-      ::SelectObject((HDC) m_hDC, (HPEN) m_oldPen);
-    m_oldPen = 0 ;
-  }
+void wxDC::DoDrawRotatedText(const wxString& text,
+                             wxCoord x, wxCoord y,
+                             double angle)
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  if (m_pen.Ok())
-  {
-//    m_pen.UseResource();
-//    m_pen.RealizeResource();
-    if (m_pen.GetResourceHandle())
+    // we test that we have some font because otherwise we should still use the
+    // "else" part below to avoid that DrawRotatedText(angle = 180) and
+    // DrawRotatedText(angle = 0) use different fonts (we can't use the default
+    // font for drawing rotated fonts unfortunately)
+    if ( (angle == 0.0) && m_font.Ok() )
     {
     {
-      HPEN p = (HPEN) ::SelectObject((HDC) m_hDC, (HPEN)m_pen.GetResourceHandle()) ;
-      if (!m_oldPen)
-        m_oldPen = (WXHPEN) p;
+        DoDrawText(text, x, y);
     }
     }
-  }
-
-  EndDrawing();
+#ifndef __WXMICROWIN__
+    else
+    {
+        // NB: don't take DEFAULT_GUI_FONT (a.k.a. wxSYS_DEFAULT_GUI_FONT)
+        //     because it's not TrueType and so can't have non zero
+        //     orientation/escapement under Win9x
+        wxFont font = m_font.Ok() ? m_font : *wxSWISS_FONT;
+        HFONT hfont = (HFONT)font.GetResourceHandle();
+        LOGFONT lf;
+        if ( ::GetObject(hfont, sizeof(lf), &lf) == 0 )
+        {
+            wxLogLastError(wxT("GetObject(hfont)"));
+        }
+
+        // GDI wants the angle in tenth of degree
+        long angle10 = (long)(angle * 10);
+        lf.lfEscapement = angle10;
+        lf. lfOrientation = angle10;
+
+        hfont = ::CreateFontIndirect(&lf);
+        if ( !hfont )
+        {
+            wxLogLastError(wxT("CreateFont"));
+        }
+        else
+        {
+            HFONT hfontOld = (HFONT)::SelectObject(GetHdc(), hfont);
+
+            DrawAnyText(text, x, y);
+
+            (void)::SelectObject(GetHdc(), hfontOld);
+            (void)::DeleteObject(hfont);
+        }
+
+        // call the bounding box by adding all four vertices of the rectangle
+        // containing the text to it (simpler and probably not slower than
+        // determining which of them is really topmost/leftmost/...)
+        wxCoord w, h;
+        GetTextExtent(text, &w, &h);
+
+        double rad = DegToRad(angle);
+
+        // "upper left" and "upper right"
+        CalcBoundingBox(x, y);
+        CalcBoundingBox(x + wxCoord(w*cos(rad)), y - wxCoord(h*sin(rad)));
+
+        // "bottom left" and "bottom right"
+        x += (wxCoord)(h*sin(rad));
+        y += (wxCoord)(h*cos(rad));
+        CalcBoundingBox(x, y);
+        CalcBoundingBox(x + wxCoord(h*sin(rad)), y + wxCoord(h*cos(rad)));
+    }
+#endif
 }
 
 }
 
-void wxDC::SetBrush(const wxBrush& brush)
-{
-  BeginDrawing();
-
-//  if (m_brush.Ok())
-//    m_brush.ReleaseResource();
+// ---------------------------------------------------------------------------
+// set GDI objects
+// ---------------------------------------------------------------------------
 
 
-  m_brush = brush;
+#if wxUSE_PALETTE
 
 
-  if (!m_brush.Ok())
-  {
-    if (m_oldBrush)
-      ::SelectObject((HDC) m_hDC, (HBRUSH) m_oldBrush);
-    m_oldBrush = 0 ;
-  }
+void wxDC::DoSelectPalette(bool realize)
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  if (m_brush.Ok())
-  {
-//    m_brush.UseResource();
-//    m_brush.RealizeResource();
+    // Set the old object temporarily, in case the assignment deletes an object
+    // that's not yet selected out.
+    if (m_oldPalette)
+    {
+        ::SelectPalette(GetHdc(), (HPALETTE) m_oldPalette, FALSE);
+        m_oldPalette = 0;
+    }
 
 
-    if (m_brush.GetResourceHandle())
+    if ( m_palette.Ok() )
     {
     {
-      HBRUSH b = 0;
-      b = ::SelectObject((HDC) m_hDC, (HBRUSH)m_brush.GetResourceHandle()) ;
-      if (!m_oldBrush)
-        m_oldBrush = (WXHBRUSH) b;
+        HPALETTE oldPal = ::SelectPalette(GetHdc(),
+                                          GetHpaletteOf(m_palette),
+                                          FALSE);
+        if (!m_oldPalette)
+            m_oldPalette = (WXHPALETTE) oldPal;
+
+        if (realize)
+            ::RealizePalette(GetHdc());
     }
     }
-  }
-  EndDrawing();
 }
 
 }
 
-void wxDC::DrawText(const wxString& text, long x, long y, bool use16bit)
+void wxDC::SetPalette(const wxPalette& palette)
 {
 {
-/*
-  int xx1 = (int)x;
-  int yy1 = (int)y;
+    if ( palette.Ok() )
+    {
+        m_palette = palette;
+        DoSelectPalette(TRUE);
+    }
+}
 
 
-  if (m_canvas)
-    m_canvas->CalcScrolledPosition((int)x, (int)y, &xx1, &yy1);
-*/
+void wxDC::InitializePalette()
+{
+    if ( wxDisplayDepth() <= 8 )
+    {
+        // look for any window or parent that has a custom palette. If any has
+        // one then we need to use it in drawing operations
+        wxWindow *win = m_canvas->GetAncestorWithCustomPalette();
+
+        m_hasCustomPalette = win && win->HasCustomPalette();
+        if ( m_hasCustomPalette )
+        {
+            m_palette = win->GetPalette();
+
+            // turn on MSW translation for this palette
+            DoSelectPalette();
+        }
+    }
+}
 
 
-  BeginDrawing();
+#endif // wxUSE_PALETTE
 
 
-  if (m_font.Ok() && m_font.GetResourceHandle())
-  {
-#if DEBUG > 1
-    wxDebugMsg("wxDC::DrawText: Selecting HFONT %X\n", m_font.GetResourceHandle());
+void wxDC::SetFont(const wxFont& the_font)
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
 #endif
 #endif
-    HFONT f = ::SelectObject((HDC) m_hDC, (HFONT) m_font.GetResourceHandle());
-    if (!m_oldFont)
-      m_oldFont = (WXHFONT) f;
-  }
 
 
-  if (m_textForegroundColour.Ok())
-    SetTextColor((HDC) m_hDC, m_textForegroundColour.GetPixel() ) ;
+    // Set the old object temporarily, in case the assignment deletes an object
+    // that's not yet selected out.
+    if (m_oldFont)
+    {
+        ::SelectObject(GetHdc(), (HFONT) m_oldFont);
+        m_oldFont = 0;
+    }
 
 
-  DWORD old_background;
-  if (m_textBackgroundColour.Ok())
-  {
-    old_background = SetBkColor((HDC) m_hDC, m_textBackgroundColour.GetPixel() ) ;
-  }
+    m_font = the_font;
 
 
-  if (m_backgroundMode == wxTRANSPARENT)
-    SetBkMode((HDC) m_hDC, TRANSPARENT);
-  else
-    SetBkMode((HDC) m_hDC, OPAQUE);
+    if (!the_font.Ok())
+    {
+        if (m_oldFont)
+            ::SelectObject(GetHdc(), (HFONT) m_oldFont);
+        m_oldFont = 0;
+    }
 
 
-  (void)TextOut((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y), (char *) (const char *)text, strlen((const char *)text));
+    if (m_font.Ok() && m_font.GetResourceHandle())
+    {
+        HFONT f = (HFONT) ::SelectObject(GetHdc(), (HFONT) m_font.GetResourceHandle());
+        if (f == (HFONT) NULL)
+        {
+            wxLogDebug(wxT("::SelectObject failed in wxDC::SetFont."));
+        }
+        if (!m_oldFont)
+            m_oldFont = (WXHFONT) f;
+    }
+}
 
 
-  if (m_textBackgroundColour.Ok())
-    (void)SetBkColor((HDC) m_hDC, old_background);
+void wxDC::SetPen(const wxPen& pen)
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  CalcBoundingBox(x, y);
+    // Set the old object temporarily, in case the assignment deletes an object
+    // that's not yet selected out.
+    if (m_oldPen)
+    {
+        ::SelectObject(GetHdc(), (HPEN) m_oldPen);
+        m_oldPen = 0;
+    }
 
 
-  long w, h;
-  GetTextExtent(text, &w, &h);
-  CalcBoundingBox((x + w), (y + h));
+    m_pen = pen;
 
 
-  EndDrawing();
+    if (!m_pen.Ok())
+    {
+        if (m_oldPen)
+            ::SelectObject(GetHdc(), (HPEN) m_oldPen);
+        m_oldPen = 0;
+    }
+
+    if (m_pen.Ok())
+    {
+        if (m_pen.GetResourceHandle())
+        {
+            HPEN p = (HPEN) ::SelectObject(GetHdc(), (HPEN)m_pen.GetResourceHandle());
+            if (!m_oldPen)
+                m_oldPen = (WXHPEN) p;
+        }
+    }
 }
 
 }
 
-void wxDC::SetBackground(const wxBrush& brush)
+void wxDC::SetBrush(const wxBrush& brush)
 {
 {
-//  if (m_backgroundBrush.Ok())
-//    m_backgroundBrush.ReleaseResource();
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  m_backgroundBrush = brush;
+    // Set the old object temporarily, in case the assignment deletes an object
+    // that's not yet selected out.
+    if (m_oldBrush)
+    {
+        ::SelectObject(GetHdc(), (HBRUSH) m_oldBrush);
+        m_oldBrush = 0;
+    }
 
 
-  if (!m_backgroundBrush.Ok())
-    return;
+    m_brush = brush;
 
 
-//  m_backgroundBrush.UseResource();
-//  m_backgroundBrush.RealizeResource() ;
+    if (!m_brush.Ok())
+    {
+        if (m_oldBrush)
+            ::SelectObject(GetHdc(), (HBRUSH) m_oldBrush);
+        m_oldBrush = 0;
+    }
 
 
-  if (m_canvas)
-  {
-    bool customColours = TRUE;
-    // If we haven't specified wxUSER_COLOURS, don't allow the panel/dialog box to
-    // change background colours from the control-panel specified colours.
-    if (m_canvas->IsKindOf(CLASSINFO(wxWindow)) && ((m_canvas->GetWindowStyleFlag() & wxUSER_COLOURS) != wxUSER_COLOURS))
-      customColours = FALSE;
-      
-    if (customColours)
+    if (m_brush.Ok())
     {
     {
-//      HBRUSH br = (m_backgroundBrush.GetStyle()==wxTRANSPARENT) ?
-//                              GetStockObject(NULL_BRUSH) : (HBRUSH) m_backgroundBrush.GetResourceHandle();
-      if (m_backgroundBrush.GetStyle()==wxTRANSPARENT)
-      {
-        m_canvas->m_backgroundTransparent = TRUE;
-      }
-      else
-      {
-        m_canvas->SetBackgroundColour(m_backgroundBrush.GetColour());
-        m_canvas->m_backgroundTransparent = FALSE;
-      }
+        // to make sure the brush is alligned with the logical coordinates
+        wxBitmap *stipple = m_brush.GetStipple();
+        if ( stipple && stipple->Ok() )
+        {
+#ifdef __WIN32__
+            ::SetBrushOrgEx(GetHdc(),
+                            m_deviceOriginX % stipple->GetWidth(),
+                            m_deviceOriginY % stipple->GetHeight(),
+                            NULL);  // don't need previous brush origin
+#else
+            ::SetBrushOrg(GetHdc(),
+                            m_deviceOriginX % stipple->GetWidth(),
+                            m_deviceOriginY % stipple->GetHeight());
+#endif
+        }
+
+        if ( m_brush.GetResourceHandle() )
+        {
+            HBRUSH b = 0;
+            b = (HBRUSH) ::SelectObject(GetHdc(), (HBRUSH)m_brush.GetResourceHandle());
+            if (!m_oldBrush)
+                m_oldBrush = (WXHBRUSH) b;
+        }
     }
     }
-  }
-  BeginDrawing();
+}
+
+void wxDC::SetBackground(const wxBrush& brush)
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  COLORREF new_color = m_backgroundBrush.GetColour().GetPixel() ;
-  {
-    (void)SetBkColor((HDC) m_hDC, new_color);
-  }
+    m_backgroundBrush = brush;
 
 
-  EndDrawing();
+    if ( m_backgroundBrush.Ok() )
+    {
+        (void)SetBkColor(GetHdc(), m_backgroundBrush.GetColour().GetPixel());
+    }
 }
 
 void wxDC::SetBackgroundMode(int mode)
 {
 }
 
 void wxDC::SetBackgroundMode(int mode)
 {
-  m_backgroundMode = mode;
-
-  BeginDrawing();
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  if (m_backgroundMode == wxTRANSPARENT)
-    ::SetBkMode((HDC) m_hDC, TRANSPARENT);
-  else
-    ::SetBkMode((HDC) m_hDC, OPAQUE);
+    m_backgroundMode = mode;
 
 
-  EndDrawing();
+    // SetBackgroundColour now only refers to text background
+    // and m_backgroundMode is used there
 }
 
 void wxDC::SetLogicalFunction(int function)
 {
 }
 
 void wxDC::SetLogicalFunction(int function)
 {
-  m_logicalFunction = function;
-
-  BeginDrawing();
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  SetRop((WXHDC) m_hDC);
+    m_logicalFunction = function;
 
 
-  EndDrawing();
+    SetRop(m_hDC);
 }
 
 void wxDC::SetRop(WXHDC dc)
 {
 }
 
 void wxDC::SetRop(WXHDC dc)
 {
-  if (!dc || m_logicalFunction < 0)
-    return;
-
-  int c_rop;
-  // These may be wrong
-  switch (m_logicalFunction)
-  {
-//    case wxXOR: c_rop = R2_XORPEN; break;
-    case wxXOR: c_rop = R2_NOTXORPEN; break;
-    case wxINVERT: c_rop = R2_NOT; break;
-    case wxOR_REVERSE: c_rop = R2_MERGEPENNOT; break;
-    case wxAND_REVERSE: c_rop = R2_MASKPENNOT; break;
-    case wxCLEAR: c_rop = R2_WHITE; break;
-    case wxSET: c_rop = R2_BLACK; break;
-    case wxSRC_INVERT: c_rop = R2_NOTCOPYPEN; break;
-    case wxOR_INVERT: c_rop = R2_MERGENOTPEN; break;
-    case wxAND: c_rop = R2_MASKPEN; break;
-    case wxOR: c_rop = R2_MERGEPEN; break;
-    case wxAND_INVERT: c_rop = R2_MASKNOTPEN; break;
-    case wxEQUIV:
-    case wxNAND:
-    case wxCOPY:
-    default:
-      c_rop = R2_COPYPEN; break;
-  }
-  SetROP2((HDC) dc, c_rop);
-}
-
-bool wxDC::StartDoc(const wxString& message)
-{
-  if (!this->IsKindOf(CLASSINFO(wxPrinterDC)))
-    return TRUE;
-    
-  bool flag = FALSE;
-
-  DOCINFO docinfo;
-  docinfo.cbSize = sizeof(DOCINFO);
-  docinfo.lpszDocName = (const char *)message;
-  docinfo.lpszOutput = (const char *)m_filename;
-#if defined(__WIN95__)
-  docinfo.lpszDatatype = NULL;
-  docinfo.fwType = 0;
-#endif
+    if ( !dc || m_logicalFunction < 0 )
+        return;
 
 
-  if (m_hDC) flag = (SP_ERROR !=
-#ifndef __WIN32__
-     ::StartDoc((HDC) m_hDC, &docinfo));
-#else
-#ifdef UNICODE
-     ::StartDocW((HDC) m_hDC, &docinfo));
-#else
-     ::StartDocA((HDC) m_hDC, &docinfo));
-#endif
-#endif
+    int rop;
 
 
-  else flag = FALSE;
+    switch (m_logicalFunction)
+    {
+        case wxCLEAR:        rop = R2_BLACK;         break;
+        case wxXOR:          rop = R2_XORPEN;        break;
+        case wxINVERT:       rop = R2_NOT;           break;
+        case wxOR_REVERSE:   rop = R2_MERGEPENNOT;   break;
+        case wxAND_REVERSE:  rop = R2_MASKPENNOT;    break;
+        case wxCOPY:         rop = R2_COPYPEN;       break;
+        case wxAND:          rop = R2_MASKPEN;       break;
+        case wxAND_INVERT:   rop = R2_MASKNOTPEN;    break;
+        case wxNO_OP:        rop = R2_NOP;           break;
+        case wxNOR:          rop = R2_NOTMERGEPEN;   break;
+        case wxEQUIV:        rop = R2_NOTXORPEN;     break;
+        case wxSRC_INVERT:   rop = R2_NOTCOPYPEN;    break;
+        case wxOR_INVERT:    rop = R2_MERGENOTPEN;   break;
+        case wxNAND:         rop = R2_NOTMASKPEN;    break;
+        case wxOR:           rop = R2_MERGEPEN;      break;
+        case wxSET:          rop = R2_WHITE;         break;
+
+        default:
+           wxFAIL_MSG( wxT("unsupported logical function") );
+           return;
+    }
 
 
-  return flag;
+    SetROP2(GetHdc(), rop);
 }
 
 }
 
-void wxDC::EndDoc(void)
+bool wxDC::StartDoc(const wxString& WXUNUSED(message))
 {
 {
-  if (!this->IsKindOf(CLASSINFO(wxPrinterDC)))
-    return;
-  if (m_hDC) ::EndDoc((HDC) m_hDC);
+    // We might be previewing, so return TRUE to let it continue.
+    return TRUE;
 }
 
 }
 
-void wxDC::StartPage(void)
+void wxDC::EndDoc()
 {
 {
-  if (!this->IsKindOf(CLASSINFO(wxPrinterDC)))
-    return;
-  if (m_hDC)
-    ::StartPage((HDC) m_hDC);
 }
 
 }
 
-void wxDC::EndPage(void)
+void wxDC::StartPage()
 {
 {
-  if (!this->IsKindOf(CLASSINFO(wxPrinterDC)))
-    return;
-  if (m_hDC)
-    ::EndPage((HDC) m_hDC);
 }
 
 }
 
-long wxDC::GetCharHeight(void) const
+void wxDC::EndPage()
 {
 {
-  TEXTMETRIC lpTextMetric;
-
-  GetTextMetrics((HDC) m_hDC, &lpTextMetric);
-
-  return YDEV2LOGREL(lpTextMetric.tmHeight);
 }
 
 }
 
-long wxDC::GetCharWidth(void) const
+// ---------------------------------------------------------------------------
+// text metrics
+// ---------------------------------------------------------------------------
+
+wxCoord wxDC::GetCharHeight() const
 {
 {
-  TEXTMETRIC lpTextMetric;
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return 0;
+#endif
 
 
-  GetTextMetrics((HDC) m_hDC, &lpTextMetric);
+    TEXTMETRIC lpTextMetric;
 
 
-  return XDEV2LOGREL(lpTextMetric.tmAveCharWidth);
+    GetTextMetrics(GetHdc(), &lpTextMetric);
+
+    return lpTextMetric.tmHeight;
 }
 
 }
 
-void wxDC::GetTextExtent(const wxString& string, long *x, long *y,
-                         long *descent, long *externalLeading, wxFont *theFont, bool use16bit) const
+wxCoord wxDC::GetCharWidth() const
 {
 {
-  wxFont *fontToUse = (wxFont*) theFont;
-  if (!fontToUse)
-    fontToUse = (wxFont*) &m_font;
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return 0;
+#endif
 
 
-  SIZE sizeRect;
-  TEXTMETRIC tm;
+    TEXTMETRIC lpTextMetric;
 
 
-  GetTextExtentPoint((HDC) m_hDC, (char *)(const char *) string, strlen((char *)(const char *) string), &sizeRect);
-  GetTextMetrics((HDC) m_hDC, &tm);
+    GetTextMetrics(GetHdc(), &lpTextMetric);
 
 
-  *x = XDEV2LOGREL(sizeRect.cx);
-  *y = YDEV2LOGREL(sizeRect.cy);
-  if (descent) *descent = tm.tmDescent;
-  if (externalLeading) *externalLeading = tm.tmExternalLeading;
+    return lpTextMetric.tmAveCharWidth;
 }
 
 }
 
-void wxDC::SetMapMode(int mode)
+void wxDC::DoGetTextExtent(const wxString& string, wxCoord *x, wxCoord *y,
+                           wxCoord *descent, wxCoord *externalLeading,
+                           wxFont *font) const
 {
 {
-  m_mappingMode = mode;
+#ifdef __WXMICROWIN__
+    if (!GetHDC())
+    {
+        if (x) *x = 0;
+        if (y) *y = 0;
+        if (descent) *descent = 0;
+        if (externalLeading) *externalLeading = 0;
+        return;
+    }
+#endif // __WXMICROWIN__
 
 
-  int pixel_width = 0;
-  int pixel_height = 0;
-  int mm_width = 0;
-  int mm_height = 0;
+    HFONT hfontOld;
+    if ( font )
+    {
+        wxASSERT_MSG( font->Ok(), _T("invalid font in wxDC::GetTextExtent") );
 
 
-  BeginDrawing();
+        hfontOld = (HFONT)::SelectObject(GetHdc(), GetHfontOf(*font));
+    }
+    else // don't change the font
+    {
+        hfontOld = 0;
+    }
 
 
-  pixel_width = GetDeviceCaps((HDC) m_hDC, HORZRES);
-  pixel_height = GetDeviceCaps((HDC) m_hDC, VERTRES);
-  mm_width = GetDeviceCaps((HDC) m_hDC, HORZSIZE);
-  mm_height = GetDeviceCaps((HDC) m_hDC, VERTSIZE);
+    SIZE sizeRect;
+    TEXTMETRIC tm;
 
 
-  if ((pixel_width == 0) || (pixel_height == 0) || (mm_width == 0) || (mm_height == 0))
-  {
-//    if (!m_hDC && m_canvas)
-//      m_canvas->ReleaseHDC() ;
-    return;
-  }
+    GetTextExtentPoint(GetHdc(), string, string.length(), &sizeRect);
+    GetTextMetrics(GetHdc(), &tm);
 
 
-  double mm2pixelsX = pixel_width/mm_width;
-  double mm2pixelsY = pixel_height/mm_height;
+    if (x)
+        *x = sizeRect.cx;
+    if (y)
+        *y = sizeRect.cy;
+    if (descent)
+        *descent = tm.tmDescent;
+    if (externalLeading)
+        *externalLeading = tm.tmExternalLeading;
 
 
-  switch (mode)
-  {
-    case MM_TWIPS:
+    if ( hfontOld )
     {
     {
-      m_logicalScaleX = (twips2mm * mm2pixelsX);
-      m_logicalScaleY = (twips2mm * mm2pixelsY);
-      break;
+        ::SelectObject(GetHdc(), hfontOld);
     }
     }
-    case MM_POINTS:
-    {
-      m_logicalScaleX = (pt2mm * mm2pixelsX);
-      m_logicalScaleY = (pt2mm * mm2pixelsY);
-      break;
-    }
-    case MM_METRIC:
-    {
-      m_logicalScaleX = mm2pixelsX;
-      m_logicalScaleY = mm2pixelsY;
-      break;
-    }
-    case MM_LOMETRIC:
+}
+
+void wxDC::SetMapMode(int mode)
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
+
+    m_mappingMode = mode;
+
+    if ( mode == wxMM_TEXT )
     {
     {
-      m_logicalScaleX = (mm2pixelsX/10.0);
-      m_logicalScaleY = (mm2pixelsY/10.0);
-      break;
+        m_logicalScaleX =
+        m_logicalScaleY = 1.0;
     }
     }
-    default:
-    case MM_TEXT:
+    else // need to do some calculations
     {
     {
-      m_logicalScaleX = 1.0;
-      m_logicalScaleY = 1.0;
-      break;
+        int pixel_width = ::GetDeviceCaps(GetHdc(), HORZRES),
+            pixel_height = ::GetDeviceCaps(GetHdc(), VERTRES),
+            mm_width = ::GetDeviceCaps(GetHdc(), HORZSIZE),
+            mm_height = ::GetDeviceCaps(GetHdc(), VERTSIZE);
+
+        if ( (mm_width == 0) || (mm_height == 0) )
+        {
+            // we can't calculate mm2pixels[XY] then!
+            return;
+        }
+
+        double mm2pixelsX = (double)pixel_width / mm_width,
+               mm2pixelsY = (double)pixel_height / mm_height;
+
+        switch (mode)
+        {
+            case wxMM_TWIPS:
+                m_logicalScaleX = twips2mm * mm2pixelsX;
+                m_logicalScaleY = twips2mm * mm2pixelsY;
+                break;
+
+            case wxMM_POINTS:
+                m_logicalScaleX = pt2mm * mm2pixelsX;
+                m_logicalScaleY = pt2mm * mm2pixelsY;
+                break;
+
+            case wxMM_METRIC:
+                m_logicalScaleX = mm2pixelsX;
+                m_logicalScaleY = mm2pixelsY;
+                break;
+
+            case wxMM_LOMETRIC:
+                m_logicalScaleX = mm2pixelsX / 10.0;
+                m_logicalScaleY = mm2pixelsY / 10.0;
+                break;
+
+            default:
+                wxFAIL_MSG( _T("unknown mapping mode in SetMapMode") );
+        }
     }
     }
-  }
 
 
-  if (::GetMapMode((HDC) m_hDC) != MM_ANISOTROPIC)
-    ::SetMapMode((HDC) m_hDC, MM_ANISOTROPIC);
+    // VZ: it seems very wasteful to always use MM_ANISOTROPIC when in 99% of
+    //     cases we could do with MM_TEXT and in the remaining 0.9% with
+    //     MM_ISOTROPIC (TODO!)
+#ifndef __WXWINCE__
+    ::SetMapMode(GetHdc(), MM_ANISOTROPIC);
 
 
-  SetViewportExtEx((HDC) m_hDC, VIEWPORT_EXTENT, VIEWPORT_EXTENT, NULL);
-  m_windowExtX = (int)MS_XDEV2LOGREL(VIEWPORT_EXTENT);
-  m_windowExtY = (int)MS_YDEV2LOGREL(VIEWPORT_EXTENT);
-  ::SetWindowExtEx((HDC) m_hDC, m_windowExtX, m_windowExtY, NULL);
-  ::SetViewportOrgEx((HDC) m_hDC, (int)m_deviceOriginX, (int)m_deviceOriginY, NULL);
-  ::SetWindowOrgEx((HDC) m_hDC, (int)m_logicalOriginX, (int)m_logicalOriginY, NULL);
+    int width = DeviceToLogicalXRel(VIEWPORT_EXTENT)*m_signX,
+        height = DeviceToLogicalYRel(VIEWPORT_EXTENT)*m_signY;
 
 
-  EndDrawing();
+    ::SetViewportExtEx(GetHdc(), VIEWPORT_EXTENT, VIEWPORT_EXTENT, NULL);
+    ::SetWindowExtEx(GetHdc(), width, height, NULL);
+
+    ::SetViewportOrgEx(GetHdc(), m_deviceOriginX, m_deviceOriginY, NULL);
+    ::SetWindowOrgEx(GetHdc(), m_logicalOriginX, m_logicalOriginY, NULL);
+#endif
 }
 
 void wxDC::SetUserScale(double x, double y)
 {
 }
 
 void wxDC::SetUserScale(double x, double y)
 {
-  m_userScaleX = x;
-  m_userScaleY = y;
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  SetMapMode(m_mappingMode);
-}
+#ifndef __WXWINCE__
+    if ( x == m_userScaleX && y == m_userScaleY )
+        return;
 
 
-void wxDC::SetSystemScale(double x, double y)
-{
-  m_systemScaleX = x;
-  m_systemScaleY = y;
+    m_userScaleX = x;
+    m_userScaleY = y;
 
 
-  SetMapMode(m_mappingMode);
+    SetMapMode(m_mappingMode);
+#endif
 }
 
 }
 
-void wxDC::SetLogicalOrigin(long x, long y)
+void wxDC::SetAxisOrientation(bool xLeftRight, bool yBottomUp)
 {
 {
-  m_logicalOriginX = x;
-  m_logicalOriginY = y;
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  BeginDrawing();
+#ifndef __WXWINCE__
+    int signX = xLeftRight ? 1 : -1,
+        signY = yBottomUp ? -1 : 1;
 
 
-  ::SetWindowOrgEx((HDC) m_hDC, (int)m_logicalOriginX, (int)m_logicalOriginY, NULL);
+    if ( signX != m_signX || signY != m_signY )
+    {
+        m_signX = signX;
+        m_signY = signY;
 
 
-  EndDrawing();
+        SetMapMode(m_mappingMode);
+    }
+#endif
 }
 
 }
 
-void wxDC::SetDeviceOrigin(long x, long y)
+void wxDC::SetSystemScale(double x, double y)
 {
 {
-  m_deviceOriginX = x;
-  m_deviceOriginY = y;
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-  BeginDrawing();
+#ifndef __WXWINCE__
+    if ( x == m_scaleX && y == m_scaleY )
+        return;
 
 
-  ::SetViewportOrgEx((HDC) m_hDC, (int)m_deviceOriginX, (int)m_deviceOriginY, NULL);
+    m_scaleX = x;
+    m_scaleY = y;
 
 
-  EndDrawing();
+    SetMapMode(m_mappingMode);
+#endif
 }
 
 }
 
-long wxDC::DeviceToLogicalX(long x) const
+void wxDC::SetLogicalOrigin(wxCoord x, wxCoord y)
 {
 {
-       return (long) (((x) - m_deviceOriginX)/(m_logicalScaleX*m_userScaleX*m_systemScaleX) - m_logicalOriginX) ;
-}
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-long wxDC::DeviceToLogicalXRel(long x) const
-{
-       return (long) ((x)/(m_logicalScaleX*m_userScaleX*m_systemScaleX)) ;
-}
+#ifndef __WXWINCE__
+    if ( x == m_logicalOriginX && y == m_logicalOriginY )
+        return;
 
 
-long wxDC::DeviceToLogicalY(long y) const
-{
-       return (long) (((y) - m_deviceOriginY)/(m_logicalScaleY*m_userScaleY*m_systemScaleY) - m_logicalOriginY) ;
-}
+    m_logicalOriginX = x;
+    m_logicalOriginY = y;
 
 
-long wxDC::DeviceToLogicalYRel(long y) const
-{
-       return (long) ((y)/(m_logicalScaleY*m_userScaleY*m_systemScaleY)) ;
+    ::SetWindowOrgEx(GetHdc(), (int)m_logicalOriginX, (int)m_logicalOriginY, NULL);
+#endif
 }
 
 }
 
-long wxDC::LogicalToDeviceX(long x) const
+void wxDC::SetDeviceOrigin(wxCoord x, wxCoord y)
 {
 {
-       return (long) (floor((x) - m_logicalOriginX)*m_logicalScaleX*m_userScaleX*m_systemScaleX + m_deviceOriginX) ;
-}
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-long wxDC::LogicalToDeviceXRel(long x) const
-{
-       return (long) (floor(x)*m_logicalScaleX*m_userScaleX*m_systemScaleX) ;
-}
+#ifndef __WXWINCE__
+    if ( x == m_deviceOriginX && y == m_deviceOriginY )
+        return;
 
 
-long wxDC::LogicalToDeviceY(long y) const
-{
-       return (long) (floor((y) - m_logicalOriginY)*m_logicalScaleY*m_userScaleY*m_systemScaleY + m_deviceOriginY);
-}
+    m_deviceOriginX = x;
+    m_deviceOriginY = y;
 
 
-long wxDC::LogicalToDeviceYRel(long y) const
-{
-       return (long) (floor(y)*m_logicalScaleY*m_userScaleY*m_systemScaleY) ;
+    ::SetViewportOrgEx(GetHdc(), (int)m_deviceOriginX, (int)m_deviceOriginY, NULL);
+#endif
 }
 
 }
 
-// This group of functions may not do any conversion
-// if m_scaleGDI is TRUE, since the HDC does the
-// conversion automatically.
+// ---------------------------------------------------------------------------
+// coordinates transformations
+// ---------------------------------------------------------------------------
 
 
-long wxDC::ImplDeviceToLogicalX(long x) const
+wxCoord wxDCBase::DeviceToLogicalX(wxCoord x) const
 {
 {
-//     return (m_scaleGDI ?  x :  DeviceToLogicalX(x));
-       return x;
+    return DeviceToLogicalXRel(x - m_deviceOriginX)*m_signX + m_logicalOriginX;
 }
 
 }
 
-long wxDC::ImplDeviceToLogicalY(long y) const
+wxCoord wxDCBase::DeviceToLogicalXRel(wxCoord x) const
 {
 {
-//     return (m_scaleGDI ?  y :  DeviceToLogicalY(y));
-       return y;
+    // axis orientation is not taken into account for conversion of a distance
+    return (wxCoord)(x / (m_logicalScaleX*m_userScaleX*m_scaleX));
 }
 
 }
 
-long wxDC::ImplDeviceToLogicalXRel(long x) const
+wxCoord wxDCBase::DeviceToLogicalY(wxCoord y) const
 {
 {
-//     return (m_scaleGDI ?  x :  DeviceToLogicalXRel(x));
-       return x;
+    return DeviceToLogicalYRel(y - m_deviceOriginY)*m_signY + m_logicalOriginY;
 }
 
 }
 
-long wxDC::ImplDeviceToLogicalYRel(long y) const
+wxCoord wxDCBase::DeviceToLogicalYRel(wxCoord y) const
 {
 {
-//     return (m_scaleGDI ?  y :  DeviceToLogicalYRel(y));
-       return y;
+    // axis orientation is not taken into account for conversion of a distance
+    return (wxCoord)( y / (m_logicalScaleY*m_userScaleY*m_scaleY));
 }
 
 }
 
-long wxDC::ImplLogicalToDeviceX(long x) const
+wxCoord wxDCBase::LogicalToDeviceX(wxCoord x) const
 {
 {
-//     return (m_scaleGDI ?  (floor(double(x))) :  LogicalToDeviceX(x));
-       return x;
+    return LogicalToDeviceXRel(x - m_logicalOriginX)*m_signX + m_deviceOriginX;
 }
 
 }
 
-long wxDC::ImplLogicalToDeviceY(long y) const
+wxCoord wxDCBase::LogicalToDeviceXRel(wxCoord x) const
 {
 {
-//     return (m_scaleGDI ?  (floor(double(y))) :  LogicalToDeviceY(y));
-       return y;
+    // axis orientation is not taken into account for conversion of a distance
+    return (wxCoord) (x*m_logicalScaleX*m_userScaleX*m_scaleX);
 }
 
 }
 
-long wxDC::ImplLogicalToDeviceXRel(long x) const
+wxCoord wxDCBase::LogicalToDeviceY(wxCoord y) const
 {
 {
-//     return (m_scaleGDI ?  (floor(double(x))) :  LogicalToDeviceXRel(x));
-       return x;
+    return LogicalToDeviceYRel(y - m_logicalOriginY)*m_signY + m_deviceOriginY;
 }
 
 }
 
-long wxDC::ImplLogicalToDeviceYRel(long y) const
+wxCoord wxDCBase::LogicalToDeviceYRel(wxCoord y) const
 {
 {
-//     return (m_scaleGDI ?  (floor(double(y))) :  LogicalToDeviceYRel(y));
-       return y;
+    // axis orientation is not taken into account for conversion of a distance
+    return (wxCoord) (y*m_logicalScaleY*m_userScaleY*m_scaleY);
 }
 
 }
 
-bool wxDC::Blit(long xdest, long ydest, long width, long height,
-                wxDC *source, long xsrc, long ysrc, int rop, bool useMask)
+// ---------------------------------------------------------------------------
+// bit blit
+// ---------------------------------------------------------------------------
+
+bool wxDC::DoBlit(wxCoord xdest, wxCoord ydest,
+                  wxCoord width, wxCoord height,
+                  wxDC *source, wxCoord xsrc, wxCoord ysrc,
+                  int rop, bool useMask,
+                  wxCoord xsrcMask, wxCoord ysrcMask)
 {
 {
-  BeginDrawing();
-  source->BeginDrawing();
+    wxCHECK_MSG( source, FALSE, _T("wxDC::Blit(): NULL wxDC pointer") );
 
 
-  long xdest1 = xdest;
-  long ydest1 = ydest;
-  long xsrc1 = xsrc;
-  long ysrc1 = ysrc;
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return FALSE;
+#endif
 
 
-  DWORD dwRop = rop == wxCOPY ? SRCCOPY :
-                rop == wxCLEAR ? WHITENESS :
-                rop == wxSET ? BLACKNESS :
-                rop == wxINVERT ? DSTINVERT :
-                rop == wxAND ? MERGECOPY :
-                rop == wxOR ? MERGEPAINT :
-                rop == wxSRC_INVERT ? NOTSRCCOPY :
-                rop == wxXOR ? SRCINVERT :
-                rop == wxOR_REVERSE ? MERGEPAINT :
-                rop == wxAND_REVERSE ? SRCERASE :
-                rop == wxSRC_OR ? SRCPAINT :
-                rop == wxSRC_AND ? SRCAND :
-                SRCCOPY;
+    const wxBitmap& bmpSrc = source->m_selectedBitmap;
+    if ( bmpSrc.Ok() && bmpSrc.HasAlpha() )
+    {
+        if ( AlphaBlt(GetHdc(), xdest, ydest, width, height,
+                      GetHdcOf(*source), bmpSrc) )
+            return TRUE;
+    }
 
 
-  bool success;
-  if (useMask && source->m_selectedBitmap.Ok() && source->m_selectedBitmap.GetMask())
-  {
+    wxMask *mask = NULL;
+    if ( useMask )
+    {
+        mask = bmpSrc.GetMask();
+
+        if ( !(bmpSrc.Ok() && mask && mask->GetMaskBitmap()) )
+        {
+            // don't give assert here because this would break existing
+            // programs - just silently ignore useMask parameter
+            useMask = FALSE;
+        }
+    }
 
 
-#if 0 // __WIN32__
-       // Not implemented under Win95 (or maybe a specific device?)
-    if (MaskBlt((HDC) m_hDC, xdest1, ydest1, (int)width, (int)height,
-            (HDC) source->m_hDC, xsrc1, ysrc1, (HBITMAP) source->m_selectedBitmap.GetMask()->GetMaskBitmap(),
-            0, 0, 0xAACC0020))
+    if (xsrcMask == -1 && ysrcMask == -1)
     {
     {
-        // Success
+        xsrcMask = xsrc; ysrcMask = ysrc;
     }
     }
-    else
+
+    COLORREF old_textground = ::GetTextColor(GetHdc());
+    COLORREF old_background = ::GetBkColor(GetHdc());
+    if (m_textForegroundColour.Ok())
+    {
+        ::SetTextColor(GetHdc(), m_textForegroundColour.GetPixel() );
+    }
+    if (m_textBackgroundColour.Ok())
+    {
+        ::SetBkColor(GetHdc(), m_textBackgroundColour.GetPixel() );
+    }
+
+    DWORD dwRop = SRCCOPY;
+    switch (rop)
+    {
+        case wxXOR:          dwRop = SRCINVERT;        break;
+        case wxINVERT:       dwRop = DSTINVERT;        break;
+        case wxOR_REVERSE:   dwRop = 0x00DD0228;       break;
+        case wxAND_REVERSE:  dwRop = SRCERASE;         break;
+        case wxCLEAR:        dwRop = BLACKNESS;        break;
+        case wxSET:          dwRop = WHITENESS;        break;
+        case wxOR_INVERT:    dwRop = MERGEPAINT;       break;
+        case wxAND:          dwRop = SRCAND;           break;
+        case wxOR:           dwRop = SRCPAINT;         break;
+        case wxEQUIV:        dwRop = 0x00990066;       break;
+        case wxNAND:         dwRop = 0x007700E6;       break;
+        case wxAND_INVERT:   dwRop = 0x00220326;       break;
+        case wxCOPY:         dwRop = SRCCOPY;          break;
+        case wxNO_OP:        dwRop = DSTCOPY;          break;
+        case wxSRC_INVERT:   dwRop = NOTSRCCOPY;       break;
+        case wxNOR:          dwRop = NOTSRCCOPY;       break;
+        default:
+           wxFAIL_MSG( wxT("unsupported logical function") );
+           return FALSE;
+    }
+
+    bool success = FALSE;
+
+    if (useMask)
+    {
+#ifdef __WIN32__
+        // we want the part of the image corresponding to the mask to be
+        // transparent, so use "DSTCOPY" ROP for the mask points (the usual
+        // meaning of fg and bg is inverted which corresponds to wxWin notion
+        // of the mask which is also contrary to the Windows one)
+
+        // On some systems, MaskBlt succeeds yet is much much slower
+        // than the wxWindows fall-back implementation. So we need
+        // to be able to switch this on and off at runtime.
+#if wxUSE_SYSTEM_OPTIONS
+        if (wxSystemOptions::GetOptionInt(wxT("no-maskblt")) == 0)
 #endif
 #endif
+        {
+           success = ::MaskBlt
+                       (
+                            GetHdc(),
+                            xdest, ydest, width, height,
+                            GetHdcOf(*source),
+                            xsrc, ysrc,
+                            (HBITMAP)mask->GetMaskBitmap(),
+                            xsrcMask, ysrcMask,
+                            MAKEROP4(dwRop, DSTCOPY)
+                        ) != 0;
+        }
+
+        if ( !success )
+#endif // Win32
+        {
+            // Blit bitmap with mask
+            HDC dc_mask ;
+            HDC  dc_buffer ;
+            HBITMAP buffer_bmap ;
+
+#if wxUSE_DC_CACHEING
+            // create a temp buffer bitmap and DCs to access it and the mask
+            wxDCCacheEntry* dcCacheEntry1 = FindDCInCache(NULL, source->GetHDC());
+            dc_mask = (HDC) dcCacheEntry1->m_dc;
+
+            wxDCCacheEntry* dcCacheEntry2 = FindDCInCache(dcCacheEntry1, GetHDC());
+            dc_buffer = (HDC) dcCacheEntry2->m_dc;
+
+            wxDCCacheEntry* bitmapCacheEntry = FindBitmapInCache(GetHDC(),
+                width, height);
+
+            buffer_bmap = (HBITMAP) bitmapCacheEntry->m_bitmap;
+#else // !wxUSE_DC_CACHEING
+            // create a temp buffer bitmap and DCs to access it and the mask
+            dc_mask = ::CreateCompatibleDC(GetHdcOf(*source));
+            dc_buffer = ::CreateCompatibleDC(GetHdc());
+            buffer_bmap = ::CreateCompatibleBitmap(GetHdc(), width, height);
+#endif // wxUSE_DC_CACHEING/!wxUSE_DC_CACHEING
+            HGDIOBJ hOldMaskBitmap = ::SelectObject(dc_mask, (HBITMAP) mask->GetMaskBitmap());
+            HGDIOBJ hOldBufferBitmap = ::SelectObject(dc_buffer, buffer_bmap);
+
+            // copy dest to buffer
+            if ( !::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
+                           GetHdc(), xdest, ydest, SRCCOPY) )
+            {
+                wxLogLastError(wxT("BitBlt"));
+            }
+
+            // copy src to buffer using selected raster op
+            if ( !::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
+                           GetHdcOf(*source), xsrc, ysrc, dwRop) )
+            {
+                wxLogLastError(wxT("BitBlt"));
+            }
+
+            // set masked area in buffer to BLACK (pixel value 0)
+            COLORREF prevBkCol = ::SetBkColor(GetHdc(), RGB(255, 255, 255));
+            COLORREF prevCol = ::SetTextColor(GetHdc(), RGB(0, 0, 0));
+            if ( !::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
+                           dc_mask, xsrcMask, ysrcMask, SRCAND) )
+            {
+                wxLogLastError(wxT("BitBlt"));
+            }
+
+            // set unmasked area in dest to BLACK
+            ::SetBkColor(GetHdc(), RGB(0, 0, 0));
+            ::SetTextColor(GetHdc(), RGB(255, 255, 255));
+            if ( !::BitBlt(GetHdc(), xdest, ydest, (int)width, (int)height,
+                           dc_mask, xsrcMask, ysrcMask, SRCAND) )
+            {
+                wxLogLastError(wxT("BitBlt"));
+            }
+            ::SetBkColor(GetHdc(), prevBkCol);   // restore colours to original values
+            ::SetTextColor(GetHdc(), prevCol);
+
+            // OR buffer to dest
+            success = ::BitBlt(GetHdc(), xdest, ydest,
+                               (int)width, (int)height,
+                               dc_buffer, 0, 0, SRCPAINT) != 0;
+            if ( !success )
+            {
+                wxLogLastError(wxT("BitBlt"));
+            }
+
+            // tidy up temporary DCs and bitmap
+            ::SelectObject(dc_mask, hOldMaskBitmap);
+            ::SelectObject(dc_buffer, hOldBufferBitmap);
+
+#if !wxUSE_DC_CACHEING
+            {
+                ::DeleteDC(dc_mask);
+                ::DeleteDC(dc_buffer);
+                ::DeleteObject(buffer_bmap);
+            }
+#endif
+        }
+    }
+    else // no mask, just BitBlt() it
     {
     {
-        // Old code
-#if 0
-           HDC dc_mask = CreateCompatibleDC((HDC) source->m_hDC);
-           ::SelectObject(dc_mask, (HBITMAP) source->m_selectedBitmap.GetMask()->GetMaskBitmap());
-        success = (BitBlt((HDC) m_hDC, xdest1, ydest1, (int)width, (int)height,
-                                        dc_mask, xsrc1, ysrc1, 0x00220326 /* NOTSRCAND */) != 0);
-        success = (BitBlt((HDC) m_hDC, xdest1, ydest1, (int)width, (int)height,
-                                        (HDC) source->m_hDC, xsrc1, ysrc1, SRCPAINT) != 0);
-           ::SelectObject(dc_mask, 0);
-           ::DeleteDC(dc_mask);
+        // if we already have a DIB, draw it using StretchDIBits(), otherwise
+        // use StretchBlt() if available and finally fall back to BitBlt()
+
+        // FIXME: use appropriate WinCE functions
+#ifndef __WXWINCE__
+        const int caps = ::GetDeviceCaps(GetHdc(), RASTERCAPS);
+        if ( bmpSrc.Ok() && (caps & RC_STRETCHDIB) )
+        {
+            DIBSECTION ds;
+            wxZeroMemory(ds);
+
+            if ( ::GetObject(GetHbitmapOf(bmpSrc),
+                             sizeof(ds),
+                             &ds) == sizeof(ds) )
+            {
+                StretchBltModeChanger changeMode(GetHdc(), COLORONCOLOR);
+
+                if ( ::StretchDIBits(GetHdc(),
+                                     xdest, ydest,
+                                     width, height,
+                                     0, 0,
+                                     width, height,
+                                     ds.dsBm.bmBits,
+                                     (LPBITMAPINFO)&ds.dsBmih,
+                                     DIB_RGB_COLORS,
+                                     SRCCOPY
+                                     ) == (int)GDI_ERROR )
+                {
+                    wxLogLastError(wxT("StretchDIBits"));
+                }
+                else
+                {
+                    success = TRUE;
+                }
+            }
+        }
+
+        if ( !success && (caps & RC_STRETCHBLT) )
+#endif
+        // __WXWINCE__
+        {
+#ifndef __WXWINCE__
+            StretchBltModeChanger changeMode(GetHdc(), COLORONCOLOR);
 #endif
 #endif
-        // New code from Chris Breeze, 8/5/98
 
 
-               // create a temp buffer bitmap and DCs to access it and the mask
-               HDC dc_mask = ::CreateCompatibleDC((HDC) source->m_hDC);
-               HDC dc_buffer = ::CreateCompatibleDC((HDC) m_hDC);
-               HBITMAP buffer_bmap = ::CreateCompatibleBitmap((HDC) m_hDC, width, height);
-           ::SelectObject(dc_mask, (HBITMAP) source->m_selectedBitmap.GetMask()->GetMaskBitmap());
-           ::SelectObject(dc_buffer, buffer_bmap);
+            if ( !::StretchBlt
+                    (
+                        GetHdc(),
+                        xdest, ydest, width, height,
+                        GetHdcOf(*source),
+                        xsrc, ysrc, width, height,
+                        dwRop
+                    ) )
+            {
+                wxLogLastError(_T("StretchBlt"));
+            }
+            else
+            {
+                success = TRUE;
+            }
+        }
+
+        if ( !success )
+        {
+            if ( !::BitBlt
+                    (
+                        GetHdc(),
+                        xdest, ydest,
+                        (int)width, (int)height,
+                        GetHdcOf(*source),
+                        xsrc, ysrc,
+                        dwRop
+                    ) )
+            {
+                wxLogLastError(_T("BitBlt"));
+            }
+            else
+            {
+                success = TRUE;
+            }
+        }
+    }
 
 
-        // copy dest to buffer
-               ::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
-                       (HDC) m_hDC, xdest1, ydest1, SRCCOPY);
+    ::SetTextColor(GetHdc(), old_textground);
+    ::SetBkColor(GetHdc(), old_background);
 
 
-               // copy src to buffer using selected raster op
-               ::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
-                       (HDC) source->m_hDC, xsrc1, ysrc1, dwRop);
+    return success;
+}
 
 
-               // set masked area in buffer to BLACK (pixel value 0)
-               COLORREF prevBkCol = ::SetBkColor((HDC) m_hDC, RGB(255, 255, 255));
-               COLORREF prevCol = ::SetTextColor((HDC) m_hDC, RGB(0, 0, 0));
-        ::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
-                       dc_mask, xsrc1, ysrc1, SRCAND);
+void wxDC::DoGetSize(int *w, int *h) const
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
 
 
-               // set unmasked area in dest to BLACK
-               ::SetBkColor((HDC) m_hDC, RGB(0, 0, 0));
-               ::SetTextColor((HDC) m_hDC, RGB(255, 255, 255));
-               ::BitBlt((HDC) m_hDC, xdest1, ydest1, (int)width, (int)height,
-                       dc_mask, xsrc1, ysrc1, SRCAND);
-               ::SetBkColor((HDC) m_hDC, prevBkCol);   // restore colours to original values
-               ::SetTextColor((HDC) m_hDC, prevCol);
+    if ( w ) *w = ::GetDeviceCaps(GetHdc(), HORZRES);
+    if ( h ) *h = ::GetDeviceCaps(GetHdc(), VERTRES);
+}
+
+void wxDC::DoGetSizeMM(int *w, int *h) const
+{
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
+
+    // if we implement it in terms of DoGetSize() instead of directly using the
+    // results returned by GetDeviceCaps(HORZ/VERTSIZE) as was done before, it
+    // will also work for wxWindowDC and wxClientDC even though their size is
+    // not the same as the total size of the screen
+    int wPixels, hPixels;
+    DoGetSize(&wPixels, &hPixels);
+
+    if ( w )
+    {
+        int wTotal = ::GetDeviceCaps(GetHdc(), HORZRES);
 
 
-        // OR buffer to dest
-               success = (::BitBlt((HDC) m_hDC, xdest1, ydest1, (int)width, (int)height,
-                       dc_buffer, 0, 0, SRCPAINT) != 0);
+        wxCHECK_RET( wTotal, _T("0 width device?") );
 
 
-               // tidy up temporary DCs and bitmap
-               ::SelectObject(dc_mask, 0);
-           ::DeleteDC(dc_mask);
-               ::SelectObject(dc_buffer, 0);
-           ::DeleteDC(dc_buffer);
-               ::DeleteObject(buffer_bmap);
+        *w = (wPixels * ::GetDeviceCaps(GetHdc(), HORZSIZE)) / wTotal;
     }
     }
-  }
-  else
-  {
-      success = (BitBlt((HDC) m_hDC, xdest1, ydest1, (int)width, (int)height, (HDC) source->m_hDC,
-                            xsrc1, ysrc1, dwRop) != 0);
-  }
-  source->EndDrawing();
-  EndDrawing();
 
 
-  return success;
+    if ( h )
+    {
+        int hTotal = ::GetDeviceCaps(GetHdc(), VERTRES);
+
+        wxCHECK_RET( hTotal, _T("0 height device?") );
+
+        *h = (hPixels * ::GetDeviceCaps(GetHdc(), VERTSIZE)) / hTotal;
+    }
 }
 
 }
 
-void wxDC::GetSize(int* width, int* height) const
+wxSize wxDC::GetPPI() const
 {
 {
-  long w=::GetDeviceCaps((HDC) m_hDC,HORZRES);
-  long h=::GetDeviceCaps((HDC) m_hDC,VERTRES);
-  *width = w;
-  *height = h;
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return wxSize();
+#endif
+
+    int x = ::GetDeviceCaps(GetHdc(), LOGPIXELSX);
+    int y = ::GetDeviceCaps(GetHdc(), LOGPIXELSY);
+
+    return wxSize(x, y);
 }
 
 }
 
-void wxDC::GetSizeMM(long *width, long *height) const
+// For use by wxWindows only, unless custom units are required.
+void wxDC::SetLogicalScale(double x, double y)
 {
 {
-  long w=::GetDeviceCaps((HDC) m_hDC,HORZSIZE);
-  long h=::GetDeviceCaps((HDC) m_hDC,VERTSIZE);
-  *width = w;
-  *height = h;
+#ifdef __WXMICROWIN__
+    if (!GetHDC()) return;
+#endif
+
+    m_logicalScaleX = x;
+    m_logicalScaleY = y;
 }
 
 }
 
+// ----------------------------------------------------------------------------
+// DC caching
+// ----------------------------------------------------------------------------
+
+#if wxUSE_DC_CACHEING
+
 /*
 /*
-#if USE_SPLINES
-# if USE_XFIG_SPLINE_CODE
-#  include "../common/xfspline.inc"
-# else
-#  include "../common/wxspline.inc"
-# endif
-#endif // USE_SPLINES
-*/
+ * This implementation is a bit ugly and uses the old-fashioned wxList class, so I will
+ * improve it in due course, either using arrays, or simply storing pointers to one
+ * entry for the bitmap, and two for the DCs. -- JACS
+ */
 
 
-#if USE_SPLINES
-#include "xfspline.inc"
-#endif // USE_SPLINES
+wxList wxDC::sm_bitmapCache;
+wxList wxDC::sm_dcCache;
 
 
-void wxDC::DrawPolygon(wxList *list, long xoffset, long yoffset,int fillStyle)
+wxDCCacheEntry::wxDCCacheEntry(WXHBITMAP hBitmap, int w, int h, int depth)
 {
 {
-  int n = list->Number();
-  wxPoint *points = new wxPoint[n];
+    m_bitmap = hBitmap;
+    m_dc = 0;
+    m_width = w;
+    m_height = h;
+    m_depth = depth;
+}
 
 
-  int i = 0;
-  for(wxNode *node = list->First(); node; node = node->Next()) {
-    wxPoint *point = (wxPoint *)node->Data();
-    points[i].x = point->x;
-    points[i++].y = point->y;
-  }
-  DrawPolygon(n, points, xoffset, yoffset,fillStyle);
-  delete[] points;
+wxDCCacheEntry::wxDCCacheEntry(WXHDC hDC, int depth)
+{
+    m_bitmap = 0;
+    m_dc = hDC;
+    m_width = 0;
+    m_height = 0;
+    m_depth = depth;
 }
 
 }
 
-void wxDC::DrawLines(wxList *list, long xoffset, long yoffset)
+wxDCCacheEntry::~wxDCCacheEntry()
 {
 {
-  int n = list->Number();
-  wxPoint *points = new wxPoint[n];
+    if (m_bitmap)
+        ::DeleteObject((HBITMAP) m_bitmap);
+    if (m_dc)
+        ::DeleteDC((HDC) m_dc);
+}
 
 
-  int i = 0;
-  for(wxNode *node = list->First(); node; node = node->Next()) {
-    wxPoint *point = (wxPoint *)node->Data();
-    points[i].x = point->x;
-    points[i++].y = point->y;
-  }
-  DrawLines(n, points, xoffset, yoffset);
-  delete []points;
+wxDCCacheEntry* wxDC::FindBitmapInCache(WXHDC dc, int w, int h)
+{
+    int depth = ::GetDeviceCaps((HDC) dc, PLANES) * ::GetDeviceCaps((HDC) dc, BITSPIXEL);
+    wxList::compatibility_iterator node = sm_bitmapCache.GetFirst();
+    while (node)
+    {
+        wxDCCacheEntry* entry = (wxDCCacheEntry*) node->GetData();
+
+        if (entry->m_depth == depth)
+        {
+            if (entry->m_width < w || entry->m_height < h)
+            {
+                ::DeleteObject((HBITMAP) entry->m_bitmap);
+                entry->m_bitmap = (WXHBITMAP) ::CreateCompatibleBitmap((HDC) dc, w, h);
+                if ( !entry->m_bitmap)
+                {
+                    wxLogLastError(wxT("CreateCompatibleBitmap"));
+                }
+                entry->m_width = w; entry->m_height = h;
+                return entry;
+            }
+            return entry;
+        }
+
+        node = node->GetNext();
+    }
+    WXHBITMAP hBitmap = (WXHBITMAP) ::CreateCompatibleBitmap((HDC) dc, w, h);
+    if ( !hBitmap)
+    {
+        wxLogLastError(wxT("CreateCompatibleBitmap"));
+    }
+    wxDCCacheEntry* entry = new wxDCCacheEntry(hBitmap, w, h, depth);
+    AddToBitmapCache(entry);
+    return entry;
 }
 
 }
 
-void wxDC::SetTextForeground(const wxColour& colour)
+wxDCCacheEntry* wxDC::FindDCInCache(wxDCCacheEntry* notThis, WXHDC dc)
 {
 {
-    m_textForegroundColour = colour;
+    int depth = ::GetDeviceCaps((HDC) dc, PLANES) * ::GetDeviceCaps((HDC) dc, BITSPIXEL);
+    wxList::compatibility_iterator node = sm_dcCache.GetFirst();
+    while (node)
+    {
+        wxDCCacheEntry* entry = (wxDCCacheEntry*) node->GetData();
+
+        // Don't return the same one as we already have
+        if (!notThis || (notThis != entry))
+        {
+            if (entry->m_depth == depth)
+            {
+                return entry;
+            }
+        }
+
+        node = node->GetNext();
+    }
+    WXHDC hDC = (WXHDC) ::CreateCompatibleDC((HDC) dc);
+    if ( !hDC)
+    {
+        wxLogLastError(wxT("CreateCompatibleDC"));
+    }
+    wxDCCacheEntry* entry = new wxDCCacheEntry(hDC, depth);
+    AddToDCCache(entry);
+    return entry;
 }
 
 }
 
-void wxDC::SetTextBackground(const wxColour& colour)
+void wxDC::AddToBitmapCache(wxDCCacheEntry* entry)
 {
 {
-    m_textBackgroundColour = colour;
+    sm_bitmapCache.Append(entry);
 }
 
 }
 
-#if USE_SPLINES
-// Make a 3-point spline
-void wxDC::DrawSpline(long x1, long y1, long x2, long y2, long x3, long y3)
+void wxDC::AddToDCCache(wxDCCacheEntry* entry)
 {
 {
-  wxList *point_list = new wxList;
+    sm_dcCache.Append(entry);
+}
 
 
-  wxPoint *point1 = new wxPoint;
-  point1->x = x1; point1->y = y1;
-  point_list->Append((wxObject*)point1);
+void wxDC::ClearCache()
+{
+    WX_CLEAR_LIST(wxList, sm_dcCache);
+    WX_CLEAR_LIST(wxList, sm_bitmapCache);
+}
 
 
-  wxPoint *point2 = new wxPoint;
-  point2->x = x2; point2->y = y2;
-  point_list->Append((wxObject*)point2);
+// Clean up cache at app exit
+class wxDCModule : public wxModule
+{
+public:
+    virtual bool OnInit() { return TRUE; }
+    virtual void OnExit() { wxDC::ClearCache(); }
 
 
-  wxPoint *point3 = new wxPoint;
-  point3->x = x3; point3->y = y3;
-  point_list->Append((wxObject*)point3);
+private:
+    DECLARE_DYNAMIC_CLASS(wxDCModule)
+};
 
 
-  DrawSpline(point_list);
+IMPLEMENT_DYNAMIC_CLASS(wxDCModule, wxModule)
 
 
-  for(wxNode *node = point_list->First(); node; node = node->Next()) {
-    wxPoint *p = (wxPoint *)node->Data();
-    delete p;
-  }
-  delete point_list;
-/*
-  wxSpline spline(point_list);
+#endif // wxUSE_DC_CACHEING
 
 
-  wx_draw_open_spline(this, &spline);
-  spline.DeletePoints();
- */
-}
-#endif
+// ----------------------------------------------------------------------------
+// alpha channel support
+// ----------------------------------------------------------------------------
 
 
-// For use by wxWindows only, unless custom units are required.
-void wxDC::SetLogicalScale(double x, double y)
+static bool AlphaBlt(HDC hdcDst,
+                     int x, int y, int width, int height,
+                     HDC hdcSrc,
+                     const wxBitmap& bmp)
 {
 {
-  m_logicalScaleX = x;
-  m_logicalScaleY = y;
-}
+    wxASSERT_MSG( bmp.Ok() && bmp.HasAlpha(), _T("AlphaBlt(): invalid bitmap") );
+    wxASSERT_MSG( hdcDst && hdcSrc, _T("AlphaBlt(): invalid HDC") );
 
 
-void wxDC::CalcBoundingBox(long x, long y)
-{
-  if (x < m_minX) m_minX = x;
-  if (y < m_minY) m_minY = y;
-  if (x > m_maxX) m_maxX = x;
-  if (y > m_maxY) m_maxY = y;
-}
+    // do we have AlphaBlend() and company in the headers?
+#if defined(AC_SRC_OVER) && wxUSE_DYNLIB_CLASS
+    // yes, now try to see if we have it during run-time
+    typedef BOOL (WINAPI *AlphaBlend_t)(HDC,int,int,int,int,
+                                        HDC,int,int,int,int,
+                                        BLENDFUNCTION);
 
 
-void wxDC::GetClippingBox(long *x,long *y,long *w,long *h) const
-{
-  if (m_clipping)
-  {
-    *x = m_clipX1 ;
-    *y = m_clipY1 ;
-    *w = (m_clipX2 - m_clipX1) ;
-    *h = (m_clipY2 - m_clipY1) ;
-  }
-  else
-   *x = *y = *w = *h = 0 ;
+    // bitmaps can be drawn only from GUI thread so there is no need to
+    // protect this static variable from multiple threads
+    static bool s_triedToLoad = FALSE;
+    static AlphaBlend_t pfnAlphaBlend = NULL;
+    if ( !s_triedToLoad )
+    {
+        s_triedToLoad = TRUE;
+
+        // don't give errors about the DLL being unavailable, we're
+        // prepared to handle this
+        wxLogNull nolog;
+
+        wxDynamicLibrary dll(_T("msimg32.dll"));
+        if ( dll.IsLoaded() )
+        {
+            pfnAlphaBlend = (AlphaBlend_t)dll.GetSymbol(_T("AlphaBlend"));
+            if ( pfnAlphaBlend )
+            {
+                // we must keep the DLL loaded if we want to be able to
+                // call AlphaBlend() so just never unload it at all, not a
+                // big deal
+                dll.Detach();
+            }
+        }
+    }
+
+    if ( pfnAlphaBlend )
+    {
+        BLENDFUNCTION bf;
+        bf.BlendOp = AC_SRC_OVER;
+        bf.BlendFlags = 0;
+        bf.SourceConstantAlpha = 0xff;
+        bf.AlphaFormat = AC_SRC_ALPHA;
+
+        if ( pfnAlphaBlend(hdcDst, x, y, width, height,
+                           hdcSrc, 0, 0, width, height,
+                           bf) )
+        {
+            // skip wxAlphaBlend() call below
+            return TRUE;
+        }
+
+        wxLogLastError(_T("AlphaBlend"));
+    }
+#endif // defined(AC_SRC_OVER)
+
+    // AlphaBlend() unavailable of failed: use our own (probably much slower)
+    // implementation
+#ifdef wxHAVE_RAW_BITMAP
+    wxAlphaBlend(hdcDst, x, y, width, height, bmp);
+
+    return TRUE;
+#else // !wxHAVE_RAW_BITMAP
+    // no wxAlphaBlend() neither, fall back to using simple BitBlt() (we lose
+    // alpha but at least something will be shown like this)
+    return FALSE;
+#endif // wxHAVE_RAW_BITMAP
 }
 
 }
 
-#if WXWIN_COMPATIBILITY
-void wxDC::GetTextExtent(const wxString& string, float *x, float *y,
-                     float *descent, float *externalLeading,
-                     wxFont *theFont, bool use16bit) const
+
+// wxAlphaBlend: our fallback if ::AlphaBlend() is unavailable
+#ifdef wxHAVE_RAW_BITMAP
+
+static void
+wxAlphaBlend(HDC hdcDst, int xDst, int yDst, int w, int h, const wxBitmap& bmpSrc)
 {
 {
-    long x1, y1, descent1, externalLeading1;
-       GetTextExtent(string, & x1, & y1, & descent1, & externalLeading1, theFont, use16bit);
-       *x = x1; *y = y1;
-    if (descent)
-        *descent = descent1;
-    if (externalLeading)
-        *externalLeading = externalLeading1;
+    // get the destination DC pixels
+    wxBitmap bmpDst(w, h, 32 /* force creating RGBA DIB */);
+    MemoryHDC hdcMem;
+    SelectInHDC select(hdcMem, GetHbitmapOf(bmpDst));
+
+    if ( !::BitBlt(hdcMem, 0, 0, w, h, hdcDst, 0, 0, SRCCOPY) )
+    {
+        wxLogLastError(_T("BitBlt"));
+    }
+
+    // combine them with the source bitmap using alpha
+    wxAlphaPixelData dataDst(bmpDst),
+                     dataSrc((wxBitmap &)bmpSrc);
+
+    wxCHECK_RET( dataDst && dataSrc,
+                    _T("failed to get raw data in wxAlphaBlend") );
+
+    wxAlphaPixelData::Iterator pDst(dataDst),
+                               pSrc(dataSrc);
+
+    for ( int y = 0; y < h; y++ )
+    {
+        wxAlphaPixelData::Iterator pDstRowStart = pDst,
+                                   pSrcRowStart = pSrc;
+
+        for ( int x = 0; x < w; x++ )
+        {
+            // note that source bitmap uses premultiplied alpha (as required by
+            // the real AlphaBlend)
+            const unsigned beta = 255 - pSrc.Alpha();
+
+            pDst.Red() = pSrc.Red() + (beta * pDst.Red() + 127) / 255;
+            pDst.Blue() = pSrc.Blue() + (beta * pDst.Blue() + 127) / 255;
+            pDst.Green() = pSrc.Green() + (beta * pDst.Green() + 127) / 255;
+
+            ++pDst;
+            ++pSrc;
+        }
+
+        pDst = pDstRowStart;
+        pSrc = pSrcRowStart;
+        pDst.OffsetY(dataDst, 1);
+        pSrc.OffsetY(dataSrc, 1);
+    }
+
+    // and finally blit them back to the destination DC
+    if ( !::BitBlt(hdcDst, xDst, yDst, w, h, hdcMem, 0, 0, SRCCOPY) )
+    {
+        wxLogLastError(_T("BitBlt"));
+    }
 }
 }
-#endif
 
 
+#endif // #ifdef wxHAVE_RAW_BITMAP
wxWidgets (Impactor)