]> git.saurik.com Git - wxWidgets.git/blob - src/msw/dc.cpp
Inital fill in background, removed tabs, -1->wxID_ANY, TRUE->true, FALSE->false
[wxWidgets.git] / src / msw / dc.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: dc.cpp
3 // Purpose: wxDC class
4 // Author: Julian Smart
5 // Modified by:
6 // Created: 01/02/97
7 // RCS-ID: $Id$
8 // Copyright: (c) Julian Smart
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 // ===========================================================================
13 // declarations
14 // ===========================================================================
15
16 // ---------------------------------------------------------------------------
17 // headers
18 // ---------------------------------------------------------------------------
19
20 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
21 #pragma implementation "dc.h"
22 #endif
23
24 // For compilers that support precompilation, includes "wx.h".
25 #include "wx/wxprec.h"
26
27 #ifdef __BORLANDC__
28 #pragma hdrstop
29 #endif
30
31 #ifndef WX_PRECOMP
32 #include "wx/window.h"
33 #include "wx/dc.h"
34 #include "wx/utils.h"
35 #include "wx/dialog.h"
36 #include "wx/app.h"
37 #include "wx/bitmap.h"
38 #include "wx/dcmemory.h"
39 #include "wx/log.h"
40 #include "wx/icon.h"
41 #endif
42
43 #include "wx/msw/private.h" // needs to be before #include <commdlg.h>
44 #include "wx/msw/missing.h" // needs to be before #include <commdlg.h>
45
46 #include "wx/sysopt.h"
47 #include "wx/dcprint.h"
48 #include "wx/module.h"
49 #include "wx/dynload.h"
50
51 #ifdef wxHAVE_RAW_BITMAP
52 #include "wx/rawbmp.h"
53 #endif
54
55 #include <string.h>
56 #include <math.h>
57
58 #if wxUSE_COMMON_DIALOGS && !defined(__WXMICROWIN__)
59 #include <commdlg.h>
60 #endif
61
62 #ifndef __WIN32__
63 #include <print.h>
64 #endif
65
66 #ifndef AC_SRC_ALPHA
67 #define AC_SRC_ALPHA 1
68 #endif
69
70 /* Quaternary raster codes */
71 #ifndef MAKEROP4
72 #define MAKEROP4(fore,back) (DWORD)((((back) << 8) & 0xFF000000) | (fore))
73 #endif
74
75 // apparently with MicroWindows it is possible that HDC is 0 so we have to
76 // check for this ourselves
77 #ifdef __WXMICROWIN__
78 #define WXMICROWIN_CHECK_HDC if ( !GetHDC() ) return;
79 #define WXMICROWIN_CHECK_HDC_RET(x) if ( !GetHDC() ) return x;
80 #else
81 #define WXMICROWIN_CHECK_HDC
82 #define WXMICROWIN_CHECK_HDC_RET(x)
83 #endif
84
85 IMPLEMENT_ABSTRACT_CLASS(wxDC, wxDCBase)
86
87 // ---------------------------------------------------------------------------
88 // constants
89 // ---------------------------------------------------------------------------
90
91 static const int VIEWPORT_EXTENT = 1000;
92
93 static const int MM_POINTS = 9;
94 static const int MM_METRIC = 10;
95
96 // usually this is defined in math.h
97 #ifndef M_PI
98 static const double M_PI = 3.14159265358979323846;
99 #endif // M_PI
100
101 // ROPs which don't have standard names (see "Ternary Raster Operations" in the
102 // MSDN docs for how this and other numbers in wxDC::Blit() are obtained)
103 #define DSTCOPY 0x00AA0029 // a.k.a. NOP operation
104
105 // ----------------------------------------------------------------------------
106 // macros for logical <-> device coords conversion
107 // ----------------------------------------------------------------------------
108
109 /*
110 We currently let Windows do all the translations itself so these macros are
111 not really needed (any more) but keep them to enhance readability of the
112 code by allowing to see where are the logical and where are the device
113 coordinates used.
114 */
115
116 #ifdef __WXWINCE__
117 #define XLOG2DEV(x) ((x-m_logicalOriginX)*m_signX+m_deviceOriginX)
118 #define YLOG2DEV(y) ((y-m_logicalOriginY)*m_signY+m_deviceOriginY)
119 #define XDEV2LOG(x) ((x-m_deviceOriginX)*m_signX+m_logicalOriginX)
120 #define YDEV2LOG(y) ((y-m_deviceOriginY)*m_signY+m_logicalOriginY)
121 #else
122 #define XLOG2DEV(x) (x)
123 #define YLOG2DEV(y) (y)
124 #define XDEV2LOG(x) (x)
125 #define YDEV2LOG(y) (y)
126 #endif
127
128 // ---------------------------------------------------------------------------
129 // private functions
130 // ---------------------------------------------------------------------------
131
132 // convert degrees to radians
133 static inline double DegToRad(double deg) { return (deg * M_PI) / 180.0; }
134
135 // call AlphaBlend() to blit contents of hdcSrc to hdcDst using alpha
136 //
137 // NB: bmpSrc is the bitmap selected in hdcSrc, it is not really needed
138 // to pass it to this function but as we already have it at the point
139 // of call anyhow we do
140 //
141 // return true if we could draw the bitmap in one way or the other, false
142 // otherwise
143 static bool AlphaBlt(HDC hdcDst,
144 int x, int y, int w, int h,
145 HDC hdcSrc,
146 const wxBitmap& bmpSrc);
147
148 #ifdef wxHAVE_RAW_BITMAP
149 // our (limited) AlphaBlend() replacement
150 static void
151 wxAlphaBlend(HDC hdcDst, int x, int y, int w, int h, const wxBitmap& bmp);
152 #endif
153
154 // ----------------------------------------------------------------------------
155 // private classes
156 // ----------------------------------------------------------------------------
157
158 // instead of duplicating the same code which sets and then restores text
159 // colours in each wxDC method working with wxSTIPPLE_MASK_OPAQUE brushes,
160 // encapsulate this in a small helper class
161
162 // wxColourChanger: changes the text colours in the ctor if required and
163 // restores them in the dtor
164 class wxColourChanger
165 {
166 public:
167 wxColourChanger(wxDC& dc);
168 ~wxColourChanger();
169
170 private:
171 wxDC& m_dc;
172
173 COLORREF m_colFgOld, m_colBgOld;
174
175 bool m_changed;
176
177 DECLARE_NO_COPY_CLASS(wxColourChanger)
178 };
179
180 // this class saves the old stretch blit mode during its life time
181 class StretchBltModeChanger
182 {
183 public:
184 StretchBltModeChanger(HDC hdc, int mode)
185 : m_hdc(hdc)
186 {
187 #ifndef __WXWINCE__
188 m_modeOld = ::SetStretchBltMode(m_hdc, mode);
189 if ( !m_modeOld )
190 wxLogLastError(_T("SetStretchBltMode"));
191 #endif
192 }
193
194 ~StretchBltModeChanger()
195 {
196 #ifndef __WXWINCE__
197 if ( !::SetStretchBltMode(m_hdc, m_modeOld) )
198 wxLogLastError(_T("SetStretchBltMode"));
199 #endif
200 }
201
202 private:
203 const HDC m_hdc;
204
205 int m_modeOld;
206
207 DECLARE_NO_COPY_CLASS(StretchBltModeChanger)
208 };
209
210 // ===========================================================================
211 // implementation
212 // ===========================================================================
213
214 // ----------------------------------------------------------------------------
215 // wxColourChanger
216 // ----------------------------------------------------------------------------
217
218 wxColourChanger::wxColourChanger(wxDC& dc) : m_dc(dc)
219 {
220 const wxBrush& brush = dc.GetBrush();
221 if ( brush.Ok() && brush.GetStyle() == wxSTIPPLE_MASK_OPAQUE )
222 {
223 HDC hdc = GetHdcOf(dc);
224 m_colFgOld = ::GetTextColor(hdc);
225 m_colBgOld = ::GetBkColor(hdc);
226
227 // note that Windows convention is opposite to wxWidgets one, this is
228 // why text colour becomes the background one and vice versa
229 const wxColour& colFg = dc.GetTextForeground();
230 if ( colFg.Ok() )
231 {
232 ::SetBkColor(hdc, colFg.GetPixel());
233 }
234
235 const wxColour& colBg = dc.GetTextBackground();
236 if ( colBg.Ok() )
237 {
238 ::SetTextColor(hdc, colBg.GetPixel());
239 }
240
241 SetBkMode(hdc,
242 dc.GetBackgroundMode() == wxTRANSPARENT ? TRANSPARENT
243 : OPAQUE);
244
245 // flag which telsl us to undo changes in the dtor
246 m_changed = true;
247 }
248 else
249 {
250 // nothing done, nothing to undo
251 m_changed = false;
252 }
253 }
254
255 wxColourChanger::~wxColourChanger()
256 {
257 if ( m_changed )
258 {
259 // restore the colours we changed
260 HDC hdc = GetHdcOf(m_dc);
261
262 ::SetBkMode(hdc, TRANSPARENT);
263 ::SetTextColor(hdc, m_colFgOld);
264 ::SetBkColor(hdc, m_colBgOld);
265 }
266 }
267
268 // ---------------------------------------------------------------------------
269 // wxDC
270 // ---------------------------------------------------------------------------
271
272 // Default constructor
273 wxDC::wxDC()
274 {
275 m_canvas = NULL;
276
277 m_oldBitmap = 0;
278 m_oldPen = 0;
279 m_oldBrush = 0;
280 m_oldFont = 0;
281 #if wxUSE_PALETTE
282 m_oldPalette = 0;
283 #endif // wxUSE_PALETTE
284
285 m_bOwnsDC = false;
286 m_hDC = 0;
287 }
288
289 wxDC::~wxDC()
290 {
291 if ( m_hDC != 0 )
292 {
293 SelectOldObjects(m_hDC);
294
295 // if we own the HDC, we delete it, otherwise we just release it
296
297 if ( m_bOwnsDC )
298 {
299 ::DeleteDC(GetHdc());
300 }
301 else // we don't own our HDC
302 {
303 if (m_canvas)
304 {
305 ::ReleaseDC(GetHwndOf(m_canvas), GetHdc());
306 }
307 else
308 {
309 // Must have been a wxScreenDC
310 ::ReleaseDC((HWND) NULL, GetHdc());
311 }
312 }
313 }
314 }
315
316 // This will select current objects out of the DC,
317 // which is what you have to do before deleting the
318 // DC.
319 void wxDC::SelectOldObjects(WXHDC dc)
320 {
321 if (dc)
322 {
323 if (m_oldBitmap)
324 {
325 ::SelectObject((HDC) dc, (HBITMAP) m_oldBitmap);
326 #ifdef __WXDEBUG__
327 if (m_selectedBitmap.Ok())
328 {
329 m_selectedBitmap.SetSelectedInto(NULL);
330 }
331 #endif
332 }
333 m_oldBitmap = 0;
334 if (m_oldPen)
335 {
336 ::SelectObject((HDC) dc, (HPEN) m_oldPen);
337 }
338 m_oldPen = 0;
339 if (m_oldBrush)
340 {
341 ::SelectObject((HDC) dc, (HBRUSH) m_oldBrush);
342 }
343 m_oldBrush = 0;
344 if (m_oldFont)
345 {
346 ::SelectObject((HDC) dc, (HFONT) m_oldFont);
347 }
348 m_oldFont = 0;
349
350 #if wxUSE_PALETTE
351 if (m_oldPalette)
352 {
353 ::SelectPalette((HDC) dc, (HPALETTE) m_oldPalette, FALSE);
354 }
355 m_oldPalette = 0;
356 #endif // wxUSE_PALETTE
357 }
358
359 m_brush = wxNullBrush;
360 m_pen = wxNullPen;
361 #if wxUSE_PALETTE
362 m_palette = wxNullPalette;
363 #endif // wxUSE_PALETTE
364 m_font = wxNullFont;
365 m_backgroundBrush = wxNullBrush;
366 m_selectedBitmap = wxNullBitmap;
367 }
368
369 // ---------------------------------------------------------------------------
370 // clipping
371 // ---------------------------------------------------------------------------
372
373 void wxDC::UpdateClipBox()
374 {
375 WXMICROWIN_CHECK_HDC
376
377 RECT rect;
378 ::GetClipBox(GetHdc(), &rect);
379
380 m_clipX1 = (wxCoord) XDEV2LOG(rect.left);
381 m_clipY1 = (wxCoord) YDEV2LOG(rect.top);
382 m_clipX2 = (wxCoord) XDEV2LOG(rect.right);
383 m_clipY2 = (wxCoord) YDEV2LOG(rect.bottom);
384 }
385
386 void
387 wxDC::DoGetClippingBox(wxCoord *x, wxCoord *y, wxCoord *w, wxCoord *h) const
388 {
389 // check if we should try to retrieve the clipping region possibly not set
390 // by our SetClippingRegion() but preset by Windows:this can only happen
391 // when we're associated with an existing HDC usign SetHDC(), see there
392 if ( m_clipping && !m_clipX1 && !m_clipX2 )
393 {
394 wxDC *self = wxConstCast(this, wxDC);
395 self->UpdateClipBox();
396
397 if ( !m_clipX1 && !m_clipX2 )
398 self->m_clipping = false;
399 }
400
401 wxDCBase::DoGetClippingBox(x, y, w, h);
402 }
403
404 // common part of DoSetClippingRegion() and DoSetClippingRegionAsRegion()
405 void wxDC::SetClippingHrgn(WXHRGN hrgn)
406 {
407 wxCHECK_RET( hrgn, wxT("invalid clipping region") );
408
409 WXMICROWIN_CHECK_HDC
410
411 // note that we combine the new clipping region with the existing one: this
412 // is compatible with what the other ports do and is the documented
413 // behaviour now (starting with 2.3.3)
414 #if defined(__WXWINCE__)
415 RECT rectClip;
416 if ( !::GetClipBox(GetHdc(), &rectClip) )
417 return;
418
419 HRGN hrgnDest = ::CreateRectRgn(0, 0, 0, 0);
420 HRGN hrgnClipOld = ::CreateRectRgn(rectClip.left, rectClip.top,
421 rectClip.right, rectClip.bottom);
422
423 if ( ::CombineRgn(hrgnDest, hrgnClipOld, (HRGN)hrgn, RGN_AND) != ERROR )
424 {
425 ::SelectClipRgn(GetHdc(), hrgnDest);
426 }
427
428 ::DeleteObject(hrgnClipOld);
429 ::DeleteObject(hrgnDest);
430 #else // !WinCE
431 if ( ::ExtSelectClipRgn(GetHdc(), (HRGN)hrgn, RGN_AND) == ERROR )
432 {
433 wxLogLastError(_T("ExtSelectClipRgn"));
434
435 return;
436 }
437 #endif // WinCE/!WinCE
438
439 m_clipping = true;
440
441 UpdateClipBox();
442 }
443
444 void wxDC::DoSetClippingRegion(wxCoord x, wxCoord y, wxCoord w, wxCoord h)
445 {
446 // the region coords are always the device ones, so do the translation
447 // manually
448 //
449 // FIXME: possible +/-1 error here, to check!
450 HRGN hrgn = ::CreateRectRgn(LogicalToDeviceX(x),
451 LogicalToDeviceY(y),
452 LogicalToDeviceX(x + w),
453 LogicalToDeviceY(y + h));
454 if ( !hrgn )
455 {
456 wxLogLastError(_T("CreateRectRgn"));
457 }
458 else
459 {
460 SetClippingHrgn((WXHRGN)hrgn);
461
462 ::DeleteObject(hrgn);
463 }
464 }
465
466 void wxDC::DoSetClippingRegionAsRegion(const wxRegion& region)
467 {
468 SetClippingHrgn(region.GetHRGN());
469 }
470
471 void wxDC::DestroyClippingRegion()
472 {
473 WXMICROWIN_CHECK_HDC
474
475 if (m_clipping && m_hDC)
476 {
477 // TODO: this should restore the previous clipping region,
478 // so that OnPaint processing works correctly, and the update
479 // clipping region doesn't get destroyed after the first
480 // DestroyClippingRegion.
481 HRGN rgn = CreateRectRgn(0, 0, 32000, 32000);
482 ::SelectClipRgn(GetHdc(), rgn);
483 ::DeleteObject(rgn);
484 }
485
486 wxDCBase::DestroyClippingRegion();
487 }
488
489 // ---------------------------------------------------------------------------
490 // query capabilities
491 // ---------------------------------------------------------------------------
492
493 bool wxDC::CanDrawBitmap() const
494 {
495 return true;
496 }
497
498 bool wxDC::CanGetTextExtent() const
499 {
500 #ifdef __WXMICROWIN__
501 // TODO Extend MicroWindows' GetDeviceCaps function
502 return true;
503 #else
504 // What sort of display is it?
505 int technology = ::GetDeviceCaps(GetHdc(), TECHNOLOGY);
506
507 return (technology == DT_RASDISPLAY) || (technology == DT_RASPRINTER);
508 #endif
509 }
510
511 int wxDC::GetDepth() const
512 {
513 WXMICROWIN_CHECK_HDC_RET(16)
514
515 return (int)::GetDeviceCaps(GetHdc(), BITSPIXEL);
516 }
517
518 // ---------------------------------------------------------------------------
519 // drawing
520 // ---------------------------------------------------------------------------
521
522 void wxDC::Clear()
523 {
524 WXMICROWIN_CHECK_HDC
525
526 RECT rect;
527 if ( m_canvas )
528 {
529 GetClientRect((HWND) m_canvas->GetHWND(), &rect);
530 }
531 else
532 {
533 // No, I think we should simply ignore this if printing on e.g.
534 // a printer DC.
535 // wxCHECK_RET( m_selectedBitmap.Ok(), wxT("this DC can't be cleared") );
536 if (!m_selectedBitmap.Ok())
537 return;
538
539 rect.left = 0; rect.top = 0;
540 rect.right = m_selectedBitmap.GetWidth();
541 rect.bottom = m_selectedBitmap.GetHeight();
542 }
543
544 #ifndef __WXWINCE__
545 (void) ::SetMapMode(GetHdc(), MM_TEXT);
546 #endif
547
548 DWORD colour = ::GetBkColor(GetHdc());
549 HBRUSH brush = ::CreateSolidBrush(colour);
550 ::FillRect(GetHdc(), &rect, brush);
551 ::DeleteObject(brush);
552
553 int width = DeviceToLogicalXRel(VIEWPORT_EXTENT)*m_signX,
554 height = DeviceToLogicalYRel(VIEWPORT_EXTENT)*m_signY;
555
556 #ifndef __WXWINCE__
557 ::SetMapMode(GetHdc(), MM_ANISOTROPIC);
558
559 ::SetViewportExtEx(GetHdc(), VIEWPORT_EXTENT, VIEWPORT_EXTENT, NULL);
560 ::SetWindowExtEx(GetHdc(), width, height, NULL);
561 ::SetViewportOrgEx(GetHdc(), (int)m_deviceOriginX, (int)m_deviceOriginY, NULL);
562 ::SetWindowOrgEx(GetHdc(), (int)m_logicalOriginX, (int)m_logicalOriginY, NULL);
563 #endif
564 }
565
566 bool wxDC::DoFloodFill(wxCoord x, wxCoord y, const wxColour& col, int style)
567 {
568 #ifdef __WXWINCE__
569 return false;
570 #else
571
572 WXMICROWIN_CHECK_HDC_RET(false)
573
574 bool success = (0 != ::ExtFloodFill(GetHdc(), XLOG2DEV(x), YLOG2DEV(y),
575 col.GetPixel(),
576 style == wxFLOOD_SURFACE ? FLOODFILLSURFACE
577 : FLOODFILLBORDER) ) ;
578 if (!success)
579 {
580 // quoting from the MSDN docs:
581 //
582 // Following are some of the reasons this function might fail:
583 //
584 // * The filling could not be completed.
585 // * The specified point has the boundary color specified by the
586 // crColor parameter (if FLOODFILLBORDER was requested).
587 // * The specified point does not have the color specified by
588 // crColor (if FLOODFILLSURFACE was requested)
589 // * The point is outside the clipping region that is, it is not
590 // visible on the device.
591 //
592 wxLogLastError(wxT("ExtFloodFill"));
593 }
594
595 CalcBoundingBox(x, y);
596
597 return success;
598 #endif
599 }
600
601 bool wxDC::DoGetPixel(wxCoord x, wxCoord y, wxColour *col) const
602 {
603 WXMICROWIN_CHECK_HDC_RET(false)
604
605 wxCHECK_MSG( col, false, _T("NULL colour parameter in wxDC::GetPixel") );
606
607 // get the color of the pixel
608 COLORREF pixelcolor = ::GetPixel(GetHdc(), XLOG2DEV(x), YLOG2DEV(y));
609
610 wxRGBToColour(*col, pixelcolor);
611
612 return true;
613 }
614
615 void wxDC::DoCrossHair(wxCoord x, wxCoord y)
616 {
617 WXMICROWIN_CHECK_HDC
618
619 wxCoord x1 = x-VIEWPORT_EXTENT;
620 wxCoord y1 = y-VIEWPORT_EXTENT;
621 wxCoord x2 = x+VIEWPORT_EXTENT;
622 wxCoord y2 = y+VIEWPORT_EXTENT;
623
624 wxDrawLine(GetHdc(), XLOG2DEV(x1), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y));
625 wxDrawLine(GetHdc(), XLOG2DEV(x), YLOG2DEV(y1), XLOG2DEV(x), YLOG2DEV(y2));
626
627 CalcBoundingBox(x1, y1);
628 CalcBoundingBox(x2, y2);
629 }
630
631 void wxDC::DoDrawLine(wxCoord x1, wxCoord y1, wxCoord x2, wxCoord y2)
632 {
633 WXMICROWIN_CHECK_HDC
634
635 wxDrawLine(GetHdc(), XLOG2DEV(x1), YLOG2DEV(y1), XLOG2DEV(x2), YLOG2DEV(y2));
636
637 CalcBoundingBox(x1, y1);
638 CalcBoundingBox(x2, y2);
639 }
640
641 // Draws an arc of a circle, centred on (xc, yc), with starting point (x1, y1)
642 // and ending at (x2, y2)
643 void wxDC::DoDrawArc(wxCoord x1, wxCoord y1,
644 wxCoord x2, wxCoord y2,
645 wxCoord xc, wxCoord yc)
646 {
647 #ifdef __WXWINCE__
648 // Slower emulation since WinCE doesn't support Pie and Arc
649 double r = sqrt( (x1-xc)*(x1-xc) + (y1-yc)*(y1-yc) );
650 double sa = acos((x1-xc)/r)/M_PI*180; // between 0 and 180
651 if( y1>yc ) sa = -sa; // below center
652 double ea = atan2(yc-y2, x2-xc)/M_PI*180;
653 DoDrawEllipticArcRot( xc-r, yc-r, 2*r, 2*r, sa, ea );
654 #else
655
656 WXMICROWIN_CHECK_HDC
657
658 wxColourChanger cc(*this); // needed for wxSTIPPLE_MASK_OPAQUE handling
659
660 double dx = xc - x1;
661 double dy = yc - y1;
662 double radius = (double)sqrt(dx*dx+dy*dy);
663 wxCoord r = (wxCoord)radius;
664
665 // treat the special case of full circle separately
666 if ( x1 == x2 && y1 == y2 )
667 {
668 DrawEllipse(xc - r, yc - r, 2*r, 2*r);
669 return;
670 }
671
672 wxCoord xx1 = XLOG2DEV(x1);
673 wxCoord yy1 = YLOG2DEV(y1);
674 wxCoord xx2 = XLOG2DEV(x2);
675 wxCoord yy2 = YLOG2DEV(y2);
676 wxCoord xxc = XLOG2DEV(xc);
677 wxCoord yyc = YLOG2DEV(yc);
678 wxCoord ray = (wxCoord) sqrt(double((xxc-xx1)*(xxc-xx1)+(yyc-yy1)*(yyc-yy1)));
679
680 wxCoord xxx1 = (wxCoord) (xxc-ray);
681 wxCoord yyy1 = (wxCoord) (yyc-ray);
682 wxCoord xxx2 = (wxCoord) (xxc+ray);
683 wxCoord yyy2 = (wxCoord) (yyc+ray);
684
685 if ( m_brush.Ok() && m_brush.GetStyle() != wxTRANSPARENT )
686 {
687 // Have to add 1 to bottom-right corner of rectangle
688 // to make semi-circles look right (crooked line otherwise).
689 // Unfortunately this is not a reliable method, depends
690 // on the size of shape.
691 // TODO: figure out why this happens!
692 Pie(GetHdc(),xxx1,yyy1,xxx2+1,yyy2+1, xx1,yy1,xx2,yy2);
693 }
694 else
695 {
696 Arc(GetHdc(),xxx1,yyy1,xxx2,yyy2, xx1,yy1,xx2,yy2);
697 }
698
699 CalcBoundingBox(xc - r, yc - r);
700 CalcBoundingBox(xc + r, yc + r);
701 #endif
702 }
703
704 void wxDC::DoDrawCheckMark(wxCoord x1, wxCoord y1,
705 wxCoord width, wxCoord height)
706 {
707 WXMICROWIN_CHECK_HDC
708
709 wxCoord x2 = x1 + width,
710 y2 = y1 + height;
711
712 #if defined(__WIN32__) && !defined(__SYMANTEC__) && !defined(__WXMICROWIN__)
713 RECT rect;
714 rect.left = x1;
715 rect.top = y1;
716 rect.right = x2;
717 rect.bottom = y2;
718
719 #ifdef __WXWINCE__
720 DrawFrameControl(GetHdc(), &rect, DFC_BUTTON, DFCS_BUTTONCHECK);
721 #else
722 DrawFrameControl(GetHdc(), &rect, DFC_MENU, DFCS_MENUCHECK);
723 #endif
724 #else // Symantec-MicroWin
725 // draw a cross
726 HPEN blackPen = ::CreatePen(PS_SOLID, 1, RGB(0, 0, 0));
727 HPEN whiteBrush = (HPEN)::GetStockObject(WHITE_BRUSH);
728 HPEN hPenOld = (HPEN)::SelectObject(GetHdc(), blackPen);
729 HPEN hBrushOld = (HPEN)::SelectObject(GetHdc(), whiteBrush);
730 ::SetROP2(GetHdc(), R2_COPYPEN);
731 Rectangle(GetHdc(), x1, y1, x2, y2);
732 MoveToEx(GetHdc(), x1, y1, NULL);
733 LineTo(GetHdc(), x2, y2);
734 MoveToEx(GetHdc(), x2, y1, NULL);
735 LineTo(GetHdc(), x1, y2);
736 ::SelectObject(GetHdc(), hPenOld);
737 ::SelectObject(GetHdc(), hBrushOld);
738 ::DeleteObject(blackPen);
739 #endif // Win32/Symantec-MicroWin
740
741 CalcBoundingBox(x1, y1);
742 CalcBoundingBox(x2, y2);
743 }
744
745 void wxDC::DoDrawPoint(wxCoord x, wxCoord y)
746 {
747 WXMICROWIN_CHECK_HDC
748
749 COLORREF color = 0x00ffffff;
750 if (m_pen.Ok())
751 {
752 color = m_pen.GetColour().GetPixel();
753 }
754
755 SetPixel(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), color);
756
757 CalcBoundingBox(x, y);
758 }
759
760 void wxDC::DoDrawPolygon(int n, wxPoint points[], wxCoord xoffset, wxCoord yoffset,int fillStyle)
761 {
762 WXMICROWIN_CHECK_HDC
763
764 wxColourChanger cc(*this); // needed for wxSTIPPLE_MASK_OPAQUE handling
765
766 // Do things less efficiently if we have offsets
767 if (xoffset != 0 || yoffset != 0)
768 {
769 POINT *cpoints = new POINT[n];
770 int i;
771 for (i = 0; i < n; i++)
772 {
773 cpoints[i].x = (int)(points[i].x + xoffset);
774 cpoints[i].y = (int)(points[i].y + yoffset);
775
776 CalcBoundingBox(cpoints[i].x, cpoints[i].y);
777 }
778 #ifndef __WXWINCE__
779 int prev = SetPolyFillMode(GetHdc(),fillStyle==wxODDEVEN_RULE?ALTERNATE:WINDING);
780 #endif
781 (void)Polygon(GetHdc(), cpoints, n);
782 #ifndef __WXWINCE__
783 SetPolyFillMode(GetHdc(),prev);
784 #endif
785 delete[] cpoints;
786 }
787 else
788 {
789 int i;
790 for (i = 0; i < n; i++)
791 CalcBoundingBox(points[i].x, points[i].y);
792
793 #ifndef __WXWINCE__
794 int prev = SetPolyFillMode(GetHdc(),fillStyle==wxODDEVEN_RULE?ALTERNATE:WINDING);
795 #endif
796 (void)Polygon(GetHdc(), (POINT*) points, n);
797 #ifndef __WXWINCE__
798 SetPolyFillMode(GetHdc(),prev);
799 #endif
800 }
801 }
802
803 void
804 wxDC::DoDrawPolyPolygon(int n,
805 int count[],
806 wxPoint points[],
807 wxCoord xoffset,
808 wxCoord yoffset,
809 int fillStyle)
810 {
811 #ifdef __WXWINCE__
812 wxDCBase::DoDrawPolyPolygon(n, count, points, xoffset, yoffset, fillStyle);
813 #else
814 WXMICROWIN_CHECK_HDC
815
816 wxColourChanger cc(*this); // needed for wxSTIPPLE_MASK_OPAQUE handling
817 int i, cnt;
818 for (i = cnt = 0; i < n; i++)
819 cnt += count[i];
820
821 // Do things less efficiently if we have offsets
822 if (xoffset != 0 || yoffset != 0)
823 {
824 POINT *cpoints = new POINT[cnt];
825 for (i = 0; i < cnt; i++)
826 {
827 cpoints[i].x = (int)(points[i].x + xoffset);
828 cpoints[i].y = (int)(points[i].y + yoffset);
829
830 CalcBoundingBox(cpoints[i].x, cpoints[i].y);
831 }
832 #ifndef __WXWINCE__
833 int prev = SetPolyFillMode(GetHdc(),fillStyle==wxODDEVEN_RULE?ALTERNATE:WINDING);
834 #endif
835 (void)PolyPolygon(GetHdc(), cpoints, count, n);
836 #ifndef __WXWINCE__
837 SetPolyFillMode(GetHdc(),prev);
838 #endif
839 delete[] cpoints;
840 }
841 else
842 {
843 for (i = 0; i < cnt; i++)
844 CalcBoundingBox(points[i].x, points[i].y);
845
846 #ifndef __WXWINCE__
847 int prev = SetPolyFillMode(GetHdc(),fillStyle==wxODDEVEN_RULE?ALTERNATE:WINDING);
848 #endif
849 (void)PolyPolygon(GetHdc(), (POINT*) points, count, n);
850 #ifndef __WXWINCE__
851 SetPolyFillMode(GetHdc(),prev);
852 #endif
853 }
854 #endif
855 // __WXWINCE__
856 }
857
858 void wxDC::DoDrawLines(int n, wxPoint points[], wxCoord xoffset, wxCoord yoffset)
859 {
860 WXMICROWIN_CHECK_HDC
861
862 // Do things less efficiently if we have offsets
863 if (xoffset != 0 || yoffset != 0)
864 {
865 POINT *cpoints = new POINT[n];
866 int i;
867 for (i = 0; i < n; i++)
868 {
869 cpoints[i].x = (int)(points[i].x + xoffset);
870 cpoints[i].y = (int)(points[i].y + yoffset);
871
872 CalcBoundingBox(cpoints[i].x, cpoints[i].y);
873 }
874 (void)Polyline(GetHdc(), cpoints, n);
875 delete[] cpoints;
876 }
877 else
878 {
879 int i;
880 for (i = 0; i < n; i++)
881 CalcBoundingBox(points[i].x, points[i].y);
882
883 (void)Polyline(GetHdc(), (POINT*) points, n);
884 }
885 }
886
887 void wxDC::DoDrawRectangle(wxCoord x, wxCoord y, wxCoord width, wxCoord height)
888 {
889 WXMICROWIN_CHECK_HDC
890
891 wxColourChanger cc(*this); // needed for wxSTIPPLE_MASK_OPAQUE handling
892
893 wxCoord x2 = x + width;
894 wxCoord y2 = y + height;
895
896 if ((m_logicalFunction == wxCOPY) && (m_pen.GetStyle() == wxTRANSPARENT))
897 {
898 RECT rect;
899 rect.left = XLOG2DEV(x);
900 rect.top = YLOG2DEV(y);
901 rect.right = XLOG2DEV(x2);
902 rect.bottom = YLOG2DEV(y2);
903 (void)FillRect(GetHdc(), &rect, (HBRUSH)m_brush.GetResourceHandle() );
904 }
905 else
906 {
907 // Windows draws the filled rectangles without outline (i.e. drawn with a
908 // transparent pen) one pixel smaller in both directions and we want them
909 // to have the same size regardless of which pen is used - adjust
910
911 // I wonder if this shouldn´t be done after the LOG2DEV() conversions. RR.
912 if ( m_pen.GetStyle() == wxTRANSPARENT )
913 {
914 x2++;
915 y2++;
916 }
917
918 (void)Rectangle(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2));
919 }
920
921
922 CalcBoundingBox(x, y);
923 CalcBoundingBox(x2, y2);
924 }
925
926 void wxDC::DoDrawRoundedRectangle(wxCoord x, wxCoord y, wxCoord width, wxCoord height, double radius)
927 {
928 WXMICROWIN_CHECK_HDC
929
930 wxColourChanger cc(*this); // needed for wxSTIPPLE_MASK_OPAQUE handling
931
932 // Now, a negative radius value is interpreted to mean
933 // 'the proportion of the smallest X or Y dimension'
934
935 if (radius < 0.0)
936 {
937 double smallest = (width < height) ? width : height;
938 radius = (- radius * smallest);
939 }
940
941 wxCoord x2 = (x+width);
942 wxCoord y2 = (y+height);
943
944 // Windows draws the filled rectangles without outline (i.e. drawn with a
945 // transparent pen) one pixel smaller in both directions and we want them
946 // to have the same size regardless of which pen is used - adjust
947 if ( m_pen.GetStyle() == wxTRANSPARENT )
948 {
949 x2++;
950 y2++;
951 }
952
953 (void)RoundRect(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2),
954 YLOG2DEV(y2), (int) (2*XLOG2DEV(radius)), (int)( 2*YLOG2DEV(radius)));
955
956 CalcBoundingBox(x, y);
957 CalcBoundingBox(x2, y2);
958 }
959
960 void wxDC::DoDrawEllipse(wxCoord x, wxCoord y, wxCoord width, wxCoord height)
961 {
962 WXMICROWIN_CHECK_HDC
963
964 wxColourChanger cc(*this); // needed for wxSTIPPLE_MASK_OPAQUE handling
965
966 wxCoord x2 = (x+width);
967 wxCoord y2 = (y+height);
968
969 (void)Ellipse(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2));
970
971 CalcBoundingBox(x, y);
972 CalcBoundingBox(x2, y2);
973 }
974
975 // Chris Breeze 20/5/98: first implementation of DrawEllipticArc on Windows
976 void wxDC::DoDrawEllipticArc(wxCoord x,wxCoord y,wxCoord w,wxCoord h,double sa,double ea)
977 {
978 #ifdef __WXWINCE__
979 DoDrawEllipticArcRot( x, y, w, h, sa, ea );
980 #else
981
982 WXMICROWIN_CHECK_HDC
983
984 wxColourChanger cc(*this); // needed for wxSTIPPLE_MASK_OPAQUE handling
985
986 wxCoord x2 = x + w;
987 wxCoord y2 = y + h;
988
989 int rx1 = XLOG2DEV(x+w/2);
990 int ry1 = YLOG2DEV(y+h/2);
991 int rx2 = rx1;
992 int ry2 = ry1;
993
994 sa = DegToRad(sa);
995 ea = DegToRad(ea);
996
997 rx1 += (int)(100.0 * abs(w) * cos(sa));
998 ry1 -= (int)(100.0 * abs(h) * m_signY * sin(sa));
999 rx2 += (int)(100.0 * abs(w) * cos(ea));
1000 ry2 -= (int)(100.0 * abs(h) * m_signY * sin(ea));
1001
1002 // draw pie with NULL_PEN first and then outline otherwise a line is
1003 // drawn from the start and end points to the centre
1004 HPEN hpenOld = (HPEN) ::SelectObject(GetHdc(), (HPEN) ::GetStockObject(NULL_PEN));
1005 if (m_signY > 0)
1006 {
1007 (void)Pie(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2)+1, YLOG2DEV(y2)+1,
1008 rx1, ry1, rx2, ry2);
1009 }
1010 else
1011 {
1012 (void)Pie(GetHdc(), XLOG2DEV(x), YLOG2DEV(y)-1, XLOG2DEV(x2)+1, YLOG2DEV(y2),
1013 rx1, ry1-1, rx2, ry2-1);
1014 }
1015
1016 ::SelectObject(GetHdc(), hpenOld);
1017
1018 (void)Arc(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2),
1019 rx1, ry1, rx2, ry2);
1020
1021 CalcBoundingBox(x, y);
1022 CalcBoundingBox(x2, y2);
1023 #endif
1024 }
1025
1026 void wxDC::DoDrawIcon(const wxIcon& icon, wxCoord x, wxCoord y)
1027 {
1028 WXMICROWIN_CHECK_HDC
1029
1030 wxCHECK_RET( icon.Ok(), wxT("invalid icon in DrawIcon") );
1031
1032 #ifdef __WIN32__
1033 ::DrawIconEx(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), GetHiconOf(icon), icon.GetWidth(), icon.GetHeight(), 0, NULL, DI_NORMAL);
1034 #else
1035 ::DrawIcon(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), GetHiconOf(icon));
1036 #endif
1037
1038 CalcBoundingBox(x, y);
1039 CalcBoundingBox(x + icon.GetWidth(), y + icon.GetHeight());
1040 }
1041
1042 void wxDC::DoDrawBitmap( const wxBitmap &bmp, wxCoord x, wxCoord y, bool useMask )
1043 {
1044 WXMICROWIN_CHECK_HDC
1045
1046 wxCHECK_RET( bmp.Ok(), _T("invalid bitmap in wxDC::DrawBitmap") );
1047
1048 int width = bmp.GetWidth(),
1049 height = bmp.GetHeight();
1050
1051 HBITMAP hbmpMask = 0;
1052
1053 #if wxUSE_PALETTE
1054 HPALETTE oldPal = 0;
1055 #endif // wxUSE_PALETTE
1056
1057 if ( bmp.HasAlpha() )
1058 {
1059 MemoryHDC hdcMem;
1060 SelectInHDC select(hdcMem, GetHbitmapOf(bmp));
1061
1062 if ( AlphaBlt(GetHdc(), x, y, width, height, hdcMem, bmp) )
1063 return;
1064 }
1065
1066 if ( useMask )
1067 {
1068 wxMask *mask = bmp.GetMask();
1069 if ( mask )
1070 hbmpMask = (HBITMAP)mask->GetMaskBitmap();
1071
1072 if ( !hbmpMask )
1073 {
1074 // don't give assert here because this would break existing
1075 // programs - just silently ignore useMask parameter
1076 useMask = false;
1077 }
1078 }
1079 if ( useMask )
1080 {
1081 #ifdef __WIN32__
1082 // use MaskBlt() with ROP which doesn't do anything to dst in the mask
1083 // points
1084 // On some systems, MaskBlt succeeds yet is much much slower
1085 // than the wxWidgets fall-back implementation. So we need
1086 // to be able to switch this on and off at runtime.
1087 bool ok = false;
1088 #if wxUSE_SYSTEM_OPTIONS
1089 if (wxSystemOptions::GetOptionInt(wxT("no-maskblt")) == 0)
1090 #endif
1091 {
1092 HDC cdc = GetHdc();
1093 HDC hdcMem = ::CreateCompatibleDC(GetHdc());
1094 HGDIOBJ hOldBitmap = ::SelectObject(hdcMem, GetHbitmapOf(bmp));
1095 #if wxUSE_PALETTE
1096 wxPalette *pal = bmp.GetPalette();
1097 if ( pal && ::GetDeviceCaps(cdc,BITSPIXEL) <= 8 )
1098 {
1099 oldPal = ::SelectPalette(hdcMem, GetHpaletteOf(*pal), FALSE);
1100 ::RealizePalette(hdcMem);
1101 }
1102 #endif // wxUSE_PALETTE
1103
1104 ok = ::MaskBlt(cdc, x, y, width, height,
1105 hdcMem, 0, 0,
1106 hbmpMask, 0, 0,
1107 MAKEROP4(SRCCOPY, DSTCOPY)) != 0;
1108
1109 #if wxUSE_PALETTE
1110 if (oldPal)
1111 ::SelectPalette(hdcMem, oldPal, FALSE);
1112 #endif // wxUSE_PALETTE
1113
1114 ::SelectObject(hdcMem, hOldBitmap);
1115 ::DeleteDC(hdcMem);
1116 }
1117
1118 if ( !ok )
1119 #endif // Win32
1120 {
1121 // Rather than reproduce wxDC::Blit, let's do it at the wxWin API
1122 // level
1123 wxMemoryDC memDC;
1124 memDC.SelectObject(bmp);
1125
1126 Blit(x, y, width, height, &memDC, 0, 0, wxCOPY, useMask);
1127
1128 memDC.SelectObject(wxNullBitmap);
1129 }
1130 }
1131 else // no mask, just use BitBlt()
1132 {
1133 HDC cdc = GetHdc();
1134 HDC memdc = ::CreateCompatibleDC( cdc );
1135 HBITMAP hbitmap = (HBITMAP) bmp.GetHBITMAP( );
1136
1137 wxASSERT_MSG( hbitmap, wxT("bitmap is ok but HBITMAP is NULL?") );
1138
1139 COLORREF old_textground = ::GetTextColor(GetHdc());
1140 COLORREF old_background = ::GetBkColor(GetHdc());
1141 if (m_textForegroundColour.Ok())
1142 {
1143 ::SetTextColor(GetHdc(), m_textForegroundColour.GetPixel() );
1144 }
1145 if (m_textBackgroundColour.Ok())
1146 {
1147 ::SetBkColor(GetHdc(), m_textBackgroundColour.GetPixel() );
1148 }
1149
1150 #if wxUSE_PALETTE
1151 wxPalette *pal = bmp.GetPalette();
1152 if ( pal && ::GetDeviceCaps(cdc,BITSPIXEL) <= 8 )
1153 {
1154 oldPal = ::SelectPalette(memdc, GetHpaletteOf(*pal), FALSE);
1155 ::RealizePalette(memdc);
1156 }
1157 #endif // wxUSE_PALETTE
1158
1159 HGDIOBJ hOldBitmap = ::SelectObject( memdc, hbitmap );
1160 ::BitBlt( cdc, x, y, width, height, memdc, 0, 0, SRCCOPY);
1161
1162 #if wxUSE_PALETTE
1163 if (oldPal)
1164 ::SelectPalette(memdc, oldPal, FALSE);
1165 #endif // wxUSE_PALETTE
1166
1167 ::SelectObject( memdc, hOldBitmap );
1168 ::DeleteDC( memdc );
1169
1170 ::SetTextColor(GetHdc(), old_textground);
1171 ::SetBkColor(GetHdc(), old_background);
1172 }
1173 }
1174
1175 void wxDC::DoDrawText(const wxString& text, wxCoord x, wxCoord y)
1176 {
1177 WXMICROWIN_CHECK_HDC
1178
1179 DrawAnyText(text, x, y);
1180
1181 // update the bounding box
1182 CalcBoundingBox(x, y);
1183
1184 wxCoord w, h;
1185 GetTextExtent(text, &w, &h);
1186 CalcBoundingBox(x + w, y + h);
1187 }
1188
1189 void wxDC::DrawAnyText(const wxString& text, wxCoord x, wxCoord y)
1190 {
1191 WXMICROWIN_CHECK_HDC
1192
1193 // prepare for drawing the text
1194 if ( m_textForegroundColour.Ok() )
1195 SetTextColor(GetHdc(), m_textForegroundColour.GetPixel());
1196
1197 DWORD old_background = 0;
1198 if ( m_textBackgroundColour.Ok() )
1199 {
1200 old_background = SetBkColor(GetHdc(), m_textBackgroundColour.GetPixel() );
1201 }
1202
1203 SetBkMode(GetHdc(), m_backgroundMode == wxTRANSPARENT ? TRANSPARENT
1204 : OPAQUE);
1205
1206 #ifdef __WXWINCE__
1207 if ( ::ExtTextOut(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), 0, NULL,
1208 text.c_str(), text.length(), NULL) == 0 )
1209 {
1210 wxLogLastError(wxT("TextOut"));
1211 }
1212 #else
1213 if ( ::TextOut(GetHdc(), XLOG2DEV(x), YLOG2DEV(y),
1214 text.c_str(), text.length()) == 0 )
1215 {
1216 wxLogLastError(wxT("TextOut"));
1217 }
1218 #endif
1219
1220 // restore the old parameters (text foreground colour may be left because
1221 // it never is set to anything else, but background should remain
1222 // transparent even if we just drew an opaque string)
1223 if ( m_textBackgroundColour.Ok() )
1224 (void)SetBkColor(GetHdc(), old_background);
1225
1226 SetBkMode(GetHdc(), TRANSPARENT);
1227 }
1228
1229 void wxDC::DoDrawRotatedText(const wxString& text,
1230 wxCoord x, wxCoord y,
1231 double angle)
1232 {
1233 WXMICROWIN_CHECK_HDC
1234
1235 // we test that we have some font because otherwise we should still use the
1236 // "else" part below to avoid that DrawRotatedText(angle = 180) and
1237 // DrawRotatedText(angle = 0) use different fonts (we can't use the default
1238 // font for drawing rotated fonts unfortunately)
1239 if ( (angle == 0.0) && m_font.Ok() )
1240 {
1241 DoDrawText(text, x, y);
1242 }
1243 #ifndef __WXMICROWIN__
1244 else
1245 {
1246 // NB: don't take DEFAULT_GUI_FONT (a.k.a. wxSYS_DEFAULT_GUI_FONT)
1247 // because it's not TrueType and so can't have non zero
1248 // orientation/escapement under Win9x
1249 wxFont font = m_font.Ok() ? m_font : *wxSWISS_FONT;
1250 HFONT hfont = (HFONT)font.GetResourceHandle();
1251 LOGFONT lf;
1252 if ( ::GetObject(hfont, sizeof(lf), &lf) == 0 )
1253 {
1254 wxLogLastError(wxT("GetObject(hfont)"));
1255 }
1256
1257 // GDI wants the angle in tenth of degree
1258 long angle10 = (long)(angle * 10);
1259 lf.lfEscapement = angle10;
1260 lf. lfOrientation = angle10;
1261
1262 hfont = ::CreateFontIndirect(&lf);
1263 if ( !hfont )
1264 {
1265 wxLogLastError(wxT("CreateFont"));
1266 }
1267 else
1268 {
1269 HFONT hfontOld = (HFONT)::SelectObject(GetHdc(), hfont);
1270
1271 DrawAnyText(text, x, y);
1272
1273 (void)::SelectObject(GetHdc(), hfontOld);
1274 (void)::DeleteObject(hfont);
1275 }
1276
1277 // call the bounding box by adding all four vertices of the rectangle
1278 // containing the text to it (simpler and probably not slower than
1279 // determining which of them is really topmost/leftmost/...)
1280 wxCoord w, h;
1281 GetTextExtent(text, &w, &h);
1282
1283 double rad = DegToRad(angle);
1284
1285 // "upper left" and "upper right"
1286 CalcBoundingBox(x, y);
1287 CalcBoundingBox(x + wxCoord(w*cos(rad)), y - wxCoord(h*sin(rad)));
1288
1289 // "bottom left" and "bottom right"
1290 x += (wxCoord)(h*sin(rad));
1291 y += (wxCoord)(h*cos(rad));
1292 CalcBoundingBox(x, y);
1293 CalcBoundingBox(x + wxCoord(h*sin(rad)), y + wxCoord(h*cos(rad)));
1294 }
1295 #endif
1296 }
1297
1298 // ---------------------------------------------------------------------------
1299 // set GDI objects
1300 // ---------------------------------------------------------------------------
1301
1302 #if wxUSE_PALETTE
1303
1304 void wxDC::DoSelectPalette(bool realize)
1305 {
1306 WXMICROWIN_CHECK_HDC
1307
1308 // Set the old object temporarily, in case the assignment deletes an object
1309 // that's not yet selected out.
1310 if (m_oldPalette)
1311 {
1312 ::SelectPalette(GetHdc(), (HPALETTE) m_oldPalette, FALSE);
1313 m_oldPalette = 0;
1314 }
1315
1316 if ( m_palette.Ok() )
1317 {
1318 HPALETTE oldPal = ::SelectPalette(GetHdc(),
1319 GetHpaletteOf(m_palette),
1320 false);
1321 if (!m_oldPalette)
1322 m_oldPalette = (WXHPALETTE) oldPal;
1323
1324 if (realize)
1325 ::RealizePalette(GetHdc());
1326 }
1327 }
1328
1329 void wxDC::SetPalette(const wxPalette& palette)
1330 {
1331 if ( palette.Ok() )
1332 {
1333 m_palette = palette;
1334 DoSelectPalette(true);
1335 }
1336 }
1337
1338 void wxDC::InitializePalette()
1339 {
1340 if ( wxDisplayDepth() <= 8 )
1341 {
1342 // look for any window or parent that has a custom palette. If any has
1343 // one then we need to use it in drawing operations
1344 wxWindow *win = m_canvas->GetAncestorWithCustomPalette();
1345
1346 m_hasCustomPalette = win && win->HasCustomPalette();
1347 if ( m_hasCustomPalette )
1348 {
1349 m_palette = win->GetPalette();
1350
1351 // turn on MSW translation for this palette
1352 DoSelectPalette();
1353 }
1354 }
1355 }
1356
1357 #endif // wxUSE_PALETTE
1358
1359 // SetFont/Pen/Brush() really ask to be implemented as a single template
1360 // function... but doing it is not worth breaking OpenWatcom build <sigh>
1361
1362 void wxDC::SetFont(const wxFont& font)
1363 {
1364 WXMICROWIN_CHECK_HDC
1365
1366 if ( font == m_font )
1367 return;
1368
1369 if ( font.Ok() )
1370 {
1371 HGDIOBJ hfont = ::SelectObject(GetHdc(), GetHfontOf(font));
1372 if ( hfont == HGDI_ERROR )
1373 {
1374 wxLogLastError(_T("SelectObject(font)"));
1375 }
1376 else // selected ok
1377 {
1378 if ( !m_oldFont )
1379 m_oldFont = (WXHPEN)hfont;
1380
1381 m_font = font;
1382 }
1383 }
1384 else // invalid font, reset the current font
1385 {
1386 if ( m_oldFont )
1387 {
1388 if ( ::SelectObject(GetHdc(), (HPEN) m_oldFont) == HGDI_ERROR )
1389 {
1390 wxLogLastError(_T("SelectObject(old font)"));
1391 }
1392
1393 m_oldFont = 0;
1394 }
1395
1396 m_font = wxNullFont;
1397 }
1398 }
1399
1400 void wxDC::SetPen(const wxPen& pen)
1401 {
1402 WXMICROWIN_CHECK_HDC
1403
1404 if ( pen == m_pen )
1405 return;
1406
1407 if ( pen.Ok() )
1408 {
1409 HGDIOBJ hpen = ::SelectObject(GetHdc(), GetHpenOf(pen));
1410 if ( hpen == HGDI_ERROR )
1411 {
1412 wxLogLastError(_T("SelectObject(pen)"));
1413 }
1414 else // selected ok
1415 {
1416 if ( !m_oldPen )
1417 m_oldPen = (WXHPEN)hpen;
1418
1419 m_pen = pen;
1420 }
1421 }
1422 else // invalid pen, reset the current pen
1423 {
1424 if ( m_oldPen )
1425 {
1426 if ( ::SelectObject(GetHdc(), (HPEN) m_oldPen) == HGDI_ERROR )
1427 {
1428 wxLogLastError(_T("SelectObject(old pen)"));
1429 }
1430
1431 m_oldPen = 0;
1432 }
1433
1434 m_pen = wxNullPen;
1435 }
1436 }
1437
1438 void wxDC::SetBrush(const wxBrush& brush)
1439 {
1440 WXMICROWIN_CHECK_HDC
1441
1442 if ( brush == m_brush )
1443 return;
1444
1445 if ( brush.Ok() )
1446 {
1447 // we must make sure the brush is aligned with the logical coordinates
1448 // before selecting it
1449 wxBitmap *stipple = brush.GetStipple();
1450 if ( stipple && stipple->Ok() )
1451 {
1452 if ( !::SetBrushOrgEx
1453 (
1454 GetHdc(),
1455 m_deviceOriginX % stipple->GetWidth(),
1456 m_deviceOriginY % stipple->GetHeight(),
1457 NULL // [out] previous brush origin
1458 ) )
1459 {
1460 wxLogLastError(_T("SetBrushOrgEx()"));
1461 }
1462 }
1463
1464 HGDIOBJ hbrush = ::SelectObject(GetHdc(), GetHbrushOf(brush));
1465 if ( hbrush == HGDI_ERROR )
1466 {
1467 wxLogLastError(_T("SelectObject(brush)"));
1468 }
1469 else // selected ok
1470 {
1471 if ( !m_oldBrush )
1472 m_oldBrush = (WXHPEN)hbrush;
1473
1474 m_brush = brush;
1475 }
1476 }
1477 else // invalid brush, reset the current brush
1478 {
1479 if ( m_oldBrush )
1480 {
1481 if ( ::SelectObject(GetHdc(), (HPEN) m_oldBrush) == HGDI_ERROR )
1482 {
1483 wxLogLastError(_T("SelectObject(old brush)"));
1484 }
1485
1486 m_oldBrush = 0;
1487 }
1488
1489 m_brush = wxNullBrush;
1490 }
1491 }
1492
1493 void wxDC::SetBackground(const wxBrush& brush)
1494 {
1495 WXMICROWIN_CHECK_HDC
1496
1497 m_backgroundBrush = brush;
1498
1499 if ( m_backgroundBrush.Ok() )
1500 {
1501 (void)SetBkColor(GetHdc(), m_backgroundBrush.GetColour().GetPixel());
1502 }
1503 }
1504
1505 void wxDC::SetBackgroundMode(int mode)
1506 {
1507 WXMICROWIN_CHECK_HDC
1508
1509 m_backgroundMode = mode;
1510
1511 // SetBackgroundColour now only refers to text background
1512 // and m_backgroundMode is used there
1513 }
1514
1515 void wxDC::SetLogicalFunction(int function)
1516 {
1517 WXMICROWIN_CHECK_HDC
1518
1519 m_logicalFunction = function;
1520
1521 SetRop(m_hDC);
1522 }
1523
1524 void wxDC::SetRop(WXHDC dc)
1525 {
1526 if ( !dc || m_logicalFunction < 0 )
1527 return;
1528
1529 int rop;
1530
1531 switch (m_logicalFunction)
1532 {
1533 case wxCLEAR: rop = R2_BLACK; break;
1534 case wxXOR: rop = R2_XORPEN; break;
1535 case wxINVERT: rop = R2_NOT; break;
1536 case wxOR_REVERSE: rop = R2_MERGEPENNOT; break;
1537 case wxAND_REVERSE: rop = R2_MASKPENNOT; break;
1538 case wxCOPY: rop = R2_COPYPEN; break;
1539 case wxAND: rop = R2_MASKPEN; break;
1540 case wxAND_INVERT: rop = R2_MASKNOTPEN; break;
1541 case wxNO_OP: rop = R2_NOP; break;
1542 case wxNOR: rop = R2_NOTMERGEPEN; break;
1543 case wxEQUIV: rop = R2_NOTXORPEN; break;
1544 case wxSRC_INVERT: rop = R2_NOTCOPYPEN; break;
1545 case wxOR_INVERT: rop = R2_MERGENOTPEN; break;
1546 case wxNAND: rop = R2_NOTMASKPEN; break;
1547 case wxOR: rop = R2_MERGEPEN; break;
1548 case wxSET: rop = R2_WHITE; break;
1549
1550 default:
1551 wxFAIL_MSG( wxT("unsupported logical function") );
1552 return;
1553 }
1554
1555 SetROP2(GetHdc(), rop);
1556 }
1557
1558 bool wxDC::StartDoc(const wxString& WXUNUSED(message))
1559 {
1560 // We might be previewing, so return true to let it continue.
1561 return true;
1562 }
1563
1564 void wxDC::EndDoc()
1565 {
1566 }
1567
1568 void wxDC::StartPage()
1569 {
1570 }
1571
1572 void wxDC::EndPage()
1573 {
1574 }
1575
1576 // ---------------------------------------------------------------------------
1577 // text metrics
1578 // ---------------------------------------------------------------------------
1579
1580 wxCoord wxDC::GetCharHeight() const
1581 {
1582 WXMICROWIN_CHECK_HDC_RET(0)
1583
1584 TEXTMETRIC lpTextMetric;
1585
1586 GetTextMetrics(GetHdc(), &lpTextMetric);
1587
1588 return lpTextMetric.tmHeight;
1589 }
1590
1591 wxCoord wxDC::GetCharWidth() const
1592 {
1593 WXMICROWIN_CHECK_HDC_RET(0)
1594
1595 TEXTMETRIC lpTextMetric;
1596
1597 GetTextMetrics(GetHdc(), &lpTextMetric);
1598
1599 return lpTextMetric.tmAveCharWidth;
1600 }
1601
1602 void wxDC::DoGetTextExtent(const wxString& string, wxCoord *x, wxCoord *y,
1603 wxCoord *descent, wxCoord *externalLeading,
1604 wxFont *font) const
1605 {
1606 #ifdef __WXMICROWIN__
1607 if (!GetHDC())
1608 {
1609 if (x) *x = 0;
1610 if (y) *y = 0;
1611 if (descent) *descent = 0;
1612 if (externalLeading) *externalLeading = 0;
1613 return;
1614 }
1615 #endif // __WXMICROWIN__
1616
1617 HFONT hfontOld;
1618 if ( font )
1619 {
1620 wxASSERT_MSG( font->Ok(), _T("invalid font in wxDC::GetTextExtent") );
1621
1622 hfontOld = (HFONT)::SelectObject(GetHdc(), GetHfontOf(*font));
1623 }
1624 else // don't change the font
1625 {
1626 hfontOld = 0;
1627 }
1628
1629 SIZE sizeRect;
1630 TEXTMETRIC tm;
1631
1632 GetTextExtentPoint(GetHdc(), string, string.length(), &sizeRect);
1633 GetTextMetrics(GetHdc(), &tm);
1634
1635 if (x)
1636 *x = sizeRect.cx;
1637 if (y)
1638 *y = sizeRect.cy;
1639 if (descent)
1640 *descent = tm.tmDescent;
1641 if (externalLeading)
1642 *externalLeading = tm.tmExternalLeading;
1643
1644 if ( hfontOld )
1645 {
1646 ::SelectObject(GetHdc(), hfontOld);
1647 }
1648 }
1649
1650
1651 // Each element of the array will be the width of the string up to and
1652 // including the coresoponding character in text.
1653
1654 bool wxDC::DoGetPartialTextExtents(const wxString& text, wxArrayInt& widths) const
1655 {
1656 static int maxLenText = -1;
1657 static int maxWidth = -1;
1658 int fit = 0;
1659 SIZE sz = {0,0};
1660 int stlen = text.Length();
1661
1662 if (maxLenText == -1)
1663 {
1664 // Win9x and WinNT+ have different limits
1665 int version = wxGetOsVersion();
1666 maxLenText = version == wxWINDOWS_NT ? 65535 : 8192;
1667 maxWidth = version == wxWINDOWS_NT ? INT_MAX : 32767;
1668 }
1669
1670 widths.Empty();
1671 widths.Add(0, stlen); // fill the array with zeros
1672
1673 if (!::GetTextExtentExPoint(GetHdc(),
1674 text.c_str(), // string to check
1675 wxMin(stlen, maxLenText),
1676 maxWidth,
1677 &fit, // [out] count of chars
1678 // that will fit
1679 &widths[0], // array to fill
1680 &sz))
1681 {
1682 // API failed
1683 wxLogLastError(wxT("GetTextExtentExPoint"));
1684 return false;
1685 }
1686
1687 return true;
1688 }
1689
1690
1691
1692
1693 void wxDC::SetMapMode(int mode)
1694 {
1695 WXMICROWIN_CHECK_HDC
1696
1697 m_mappingMode = mode;
1698
1699 if ( mode == wxMM_TEXT )
1700 {
1701 m_logicalScaleX =
1702 m_logicalScaleY = 1.0;
1703 }
1704 else // need to do some calculations
1705 {
1706 int pixel_width = ::GetDeviceCaps(GetHdc(), HORZRES),
1707 pixel_height = ::GetDeviceCaps(GetHdc(), VERTRES),
1708 mm_width = ::GetDeviceCaps(GetHdc(), HORZSIZE),
1709 mm_height = ::GetDeviceCaps(GetHdc(), VERTSIZE);
1710
1711 if ( (mm_width == 0) || (mm_height == 0) )
1712 {
1713 // we can't calculate mm2pixels[XY] then!
1714 return;
1715 }
1716
1717 double mm2pixelsX = (double)pixel_width / mm_width,
1718 mm2pixelsY = (double)pixel_height / mm_height;
1719
1720 switch (mode)
1721 {
1722 case wxMM_TWIPS:
1723 m_logicalScaleX = twips2mm * mm2pixelsX;
1724 m_logicalScaleY = twips2mm * mm2pixelsY;
1725 break;
1726
1727 case wxMM_POINTS:
1728 m_logicalScaleX = pt2mm * mm2pixelsX;
1729 m_logicalScaleY = pt2mm * mm2pixelsY;
1730 break;
1731
1732 case wxMM_METRIC:
1733 m_logicalScaleX = mm2pixelsX;
1734 m_logicalScaleY = mm2pixelsY;
1735 break;
1736
1737 case wxMM_LOMETRIC:
1738 m_logicalScaleX = mm2pixelsX / 10.0;
1739 m_logicalScaleY = mm2pixelsY / 10.0;
1740 break;
1741
1742 default:
1743 wxFAIL_MSG( _T("unknown mapping mode in SetMapMode") );
1744 }
1745 }
1746
1747 // VZ: it seems very wasteful to always use MM_ANISOTROPIC when in 99% of
1748 // cases we could do with MM_TEXT and in the remaining 0.9% with
1749 // MM_ISOTROPIC (TODO!)
1750 #ifndef __WXWINCE__
1751 ::SetMapMode(GetHdc(), MM_ANISOTROPIC);
1752
1753 int width = DeviceToLogicalXRel(VIEWPORT_EXTENT)*m_signX,
1754 height = DeviceToLogicalYRel(VIEWPORT_EXTENT)*m_signY;
1755
1756 ::SetViewportExtEx(GetHdc(), VIEWPORT_EXTENT, VIEWPORT_EXTENT, NULL);
1757 ::SetWindowExtEx(GetHdc(), width, height, NULL);
1758
1759 ::SetViewportOrgEx(GetHdc(), m_deviceOriginX, m_deviceOriginY, NULL);
1760 ::SetWindowOrgEx(GetHdc(), m_logicalOriginX, m_logicalOriginY, NULL);
1761 #endif
1762 }
1763
1764 void wxDC::SetUserScale(double x, double y)
1765 {
1766 WXMICROWIN_CHECK_HDC
1767
1768 #ifndef __WXWINCE__
1769 if ( x == m_userScaleX && y == m_userScaleY )
1770 return;
1771
1772 m_userScaleX = x;
1773 m_userScaleY = y;
1774
1775 SetMapMode(m_mappingMode);
1776 #endif
1777 }
1778
1779 void wxDC::SetAxisOrientation(bool xLeftRight, bool yBottomUp)
1780 {
1781 WXMICROWIN_CHECK_HDC
1782
1783 #ifndef __WXWINCE__
1784 int signX = xLeftRight ? 1 : -1,
1785 signY = yBottomUp ? -1 : 1;
1786
1787 if ( signX != m_signX || signY != m_signY )
1788 {
1789 m_signX = signX;
1790 m_signY = signY;
1791
1792 SetMapMode(m_mappingMode);
1793 }
1794 #endif
1795 }
1796
1797 void wxDC::SetSystemScale(double x, double y)
1798 {
1799 WXMICROWIN_CHECK_HDC
1800
1801 if ( x == m_scaleX && y == m_scaleY )
1802 return;
1803
1804 m_scaleX = x;
1805 m_scaleY = y;
1806
1807 #ifndef __WXWINCE__
1808 SetMapMode(m_mappingMode);
1809 #endif
1810 }
1811
1812 void wxDC::SetLogicalOrigin(wxCoord x, wxCoord y)
1813 {
1814 WXMICROWIN_CHECK_HDC
1815
1816 if ( x == m_logicalOriginX && y == m_logicalOriginY )
1817 return;
1818
1819 m_logicalOriginX = x;
1820 m_logicalOriginY = y;
1821
1822 #ifndef __WXWINCE__
1823 ::SetWindowOrgEx(GetHdc(), (int)m_logicalOriginX, (int)m_logicalOriginY, NULL);
1824 #endif
1825 }
1826
1827 void wxDC::SetDeviceOrigin(wxCoord x, wxCoord y)
1828 {
1829 WXMICROWIN_CHECK_HDC
1830
1831 if ( x == m_deviceOriginX && y == m_deviceOriginY )
1832 return;
1833
1834 m_deviceOriginX = x;
1835 m_deviceOriginY = y;
1836
1837 #ifndef __WXWINCE__
1838 ::SetViewportOrgEx(GetHdc(), (int)m_deviceOriginX, (int)m_deviceOriginY, NULL);
1839 #endif
1840 }
1841
1842 // ---------------------------------------------------------------------------
1843 // coordinates transformations
1844 // ---------------------------------------------------------------------------
1845
1846 wxCoord wxDCBase::DeviceToLogicalX(wxCoord x) const
1847 {
1848 return DeviceToLogicalXRel(x - m_deviceOriginX)*m_signX + m_logicalOriginX;
1849 }
1850
1851 wxCoord wxDCBase::DeviceToLogicalXRel(wxCoord x) const
1852 {
1853 // axis orientation is not taken into account for conversion of a distance
1854 return (wxCoord)(x / (m_logicalScaleX*m_userScaleX*m_scaleX));
1855 }
1856
1857 wxCoord wxDCBase::DeviceToLogicalY(wxCoord y) const
1858 {
1859 return DeviceToLogicalYRel(y - m_deviceOriginY)*m_signY + m_logicalOriginY;
1860 }
1861
1862 wxCoord wxDCBase::DeviceToLogicalYRel(wxCoord y) const
1863 {
1864 // axis orientation is not taken into account for conversion of a distance
1865 return (wxCoord)( y / (m_logicalScaleY*m_userScaleY*m_scaleY));
1866 }
1867
1868 wxCoord wxDCBase::LogicalToDeviceX(wxCoord x) const
1869 {
1870 return LogicalToDeviceXRel(x - m_logicalOriginX)*m_signX + m_deviceOriginX;
1871 }
1872
1873 wxCoord wxDCBase::LogicalToDeviceXRel(wxCoord x) const
1874 {
1875 // axis orientation is not taken into account for conversion of a distance
1876 return (wxCoord) (x*m_logicalScaleX*m_userScaleX*m_scaleX);
1877 }
1878
1879 wxCoord wxDCBase::LogicalToDeviceY(wxCoord y) const
1880 {
1881 return LogicalToDeviceYRel(y - m_logicalOriginY)*m_signY + m_deviceOriginY;
1882 }
1883
1884 wxCoord wxDCBase::LogicalToDeviceYRel(wxCoord y) const
1885 {
1886 // axis orientation is not taken into account for conversion of a distance
1887 return (wxCoord) (y*m_logicalScaleY*m_userScaleY*m_scaleY);
1888 }
1889
1890 // ---------------------------------------------------------------------------
1891 // bit blit
1892 // ---------------------------------------------------------------------------
1893
1894 bool wxDC::DoBlit(wxCoord xdest, wxCoord ydest,
1895 wxCoord width, wxCoord height,
1896 wxDC *source, wxCoord xsrc, wxCoord ysrc,
1897 int rop, bool useMask,
1898 wxCoord xsrcMask, wxCoord ysrcMask)
1899 {
1900 wxCHECK_MSG( source, false, _T("wxDC::Blit(): NULL wxDC pointer") );
1901
1902 WXMICROWIN_CHECK_HDC_RET(false)
1903
1904 const wxBitmap& bmpSrc = source->m_selectedBitmap;
1905 if ( bmpSrc.Ok() && bmpSrc.HasAlpha() )
1906 {
1907 if ( AlphaBlt(GetHdc(), xdest, ydest, width, height,
1908 GetHdcOf(*source), bmpSrc) )
1909 return true;
1910 }
1911
1912 wxMask *mask = NULL;
1913 if ( useMask )
1914 {
1915 mask = bmpSrc.GetMask();
1916
1917 if ( !(bmpSrc.Ok() && mask && mask->GetMaskBitmap()) )
1918 {
1919 // don't give assert here because this would break existing
1920 // programs - just silently ignore useMask parameter
1921 useMask = false;
1922 }
1923 }
1924
1925 if (xsrcMask == -1 && ysrcMask == -1)
1926 {
1927 xsrcMask = xsrc; ysrcMask = ysrc;
1928 }
1929
1930 COLORREF old_textground = ::GetTextColor(GetHdc());
1931 COLORREF old_background = ::GetBkColor(GetHdc());
1932 if (m_textForegroundColour.Ok())
1933 {
1934 ::SetTextColor(GetHdc(), m_textForegroundColour.GetPixel() );
1935 }
1936 if (m_textBackgroundColour.Ok())
1937 {
1938 ::SetBkColor(GetHdc(), m_textBackgroundColour.GetPixel() );
1939 }
1940
1941 DWORD dwRop;
1942 switch (rop)
1943 {
1944 case wxXOR: dwRop = SRCINVERT; break;
1945 case wxINVERT: dwRop = DSTINVERT; break;
1946 case wxOR_REVERSE: dwRop = 0x00DD0228; break;
1947 case wxAND_REVERSE: dwRop = SRCERASE; break;
1948 case wxCLEAR: dwRop = BLACKNESS; break;
1949 case wxSET: dwRop = WHITENESS; break;
1950 case wxOR_INVERT: dwRop = MERGEPAINT; break;
1951 case wxAND: dwRop = SRCAND; break;
1952 case wxOR: dwRop = SRCPAINT; break;
1953 case wxEQUIV: dwRop = 0x00990066; break;
1954 case wxNAND: dwRop = 0x007700E6; break;
1955 case wxAND_INVERT: dwRop = 0x00220326; break;
1956 case wxCOPY: dwRop = SRCCOPY; break;
1957 case wxNO_OP: dwRop = DSTCOPY; break;
1958 case wxSRC_INVERT: dwRop = NOTSRCCOPY; break;
1959 case wxNOR: dwRop = NOTSRCCOPY; break;
1960 default:
1961 wxFAIL_MSG( wxT("unsupported logical function") );
1962 return false;
1963 }
1964
1965 bool success = false;
1966
1967 if (useMask)
1968 {
1969 #ifdef __WIN32__
1970 // we want the part of the image corresponding to the mask to be
1971 // transparent, so use "DSTCOPY" ROP for the mask points (the usual
1972 // meaning of fg and bg is inverted which corresponds to wxWin notion
1973 // of the mask which is also contrary to the Windows one)
1974
1975 // On some systems, MaskBlt succeeds yet is much much slower
1976 // than the wxWidgets fall-back implementation. So we need
1977 // to be able to switch this on and off at runtime.
1978 #if wxUSE_SYSTEM_OPTIONS
1979 if (wxSystemOptions::GetOptionInt(wxT("no-maskblt")) == 0)
1980 #endif
1981 {
1982 success = ::MaskBlt
1983 (
1984 GetHdc(),
1985 xdest, ydest, width, height,
1986 GetHdcOf(*source),
1987 xsrc, ysrc,
1988 (HBITMAP)mask->GetMaskBitmap(),
1989 xsrcMask, ysrcMask,
1990 MAKEROP4(dwRop, DSTCOPY)
1991 ) != 0;
1992 }
1993
1994 if ( !success )
1995 #endif // Win32
1996 {
1997 // Blit bitmap with mask
1998 HDC dc_mask ;
1999 HDC dc_buffer ;
2000 HBITMAP buffer_bmap ;
2001
2002 #if wxUSE_DC_CACHEING
2003 // create a temp buffer bitmap and DCs to access it and the mask
2004 wxDCCacheEntry* dcCacheEntry1 = FindDCInCache(NULL, source->GetHDC());
2005 dc_mask = (HDC) dcCacheEntry1->m_dc;
2006
2007 wxDCCacheEntry* dcCacheEntry2 = FindDCInCache(dcCacheEntry1, GetHDC());
2008 dc_buffer = (HDC) dcCacheEntry2->m_dc;
2009
2010 wxDCCacheEntry* bitmapCacheEntry = FindBitmapInCache(GetHDC(),
2011 width, height);
2012
2013 buffer_bmap = (HBITMAP) bitmapCacheEntry->m_bitmap;
2014 #else // !wxUSE_DC_CACHEING
2015 // create a temp buffer bitmap and DCs to access it and the mask
2016 dc_mask = ::CreateCompatibleDC(GetHdcOf(*source));
2017 dc_buffer = ::CreateCompatibleDC(GetHdc());
2018 buffer_bmap = ::CreateCompatibleBitmap(GetHdc(), width, height);
2019 #endif // wxUSE_DC_CACHEING/!wxUSE_DC_CACHEING
2020 HGDIOBJ hOldMaskBitmap = ::SelectObject(dc_mask, (HBITMAP) mask->GetMaskBitmap());
2021 HGDIOBJ hOldBufferBitmap = ::SelectObject(dc_buffer, buffer_bmap);
2022
2023 // copy dest to buffer
2024 if ( !::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
2025 GetHdc(), xdest, ydest, SRCCOPY) )
2026 {
2027 wxLogLastError(wxT("BitBlt"));
2028 }
2029
2030 // copy src to buffer using selected raster op
2031 if ( !::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
2032 GetHdcOf(*source), xsrc, ysrc, dwRop) )
2033 {
2034 wxLogLastError(wxT("BitBlt"));
2035 }
2036
2037 // set masked area in buffer to BLACK (pixel value 0)
2038 COLORREF prevBkCol = ::SetBkColor(GetHdc(), RGB(255, 255, 255));
2039 COLORREF prevCol = ::SetTextColor(GetHdc(), RGB(0, 0, 0));
2040 if ( !::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
2041 dc_mask, xsrcMask, ysrcMask, SRCAND) )
2042 {
2043 wxLogLastError(wxT("BitBlt"));
2044 }
2045
2046 // set unmasked area in dest to BLACK
2047 ::SetBkColor(GetHdc(), RGB(0, 0, 0));
2048 ::SetTextColor(GetHdc(), RGB(255, 255, 255));
2049 if ( !::BitBlt(GetHdc(), xdest, ydest, (int)width, (int)height,
2050 dc_mask, xsrcMask, ysrcMask, SRCAND) )
2051 {
2052 wxLogLastError(wxT("BitBlt"));
2053 }
2054 ::SetBkColor(GetHdc(), prevBkCol); // restore colours to original values
2055 ::SetTextColor(GetHdc(), prevCol);
2056
2057 // OR buffer to dest
2058 success = ::BitBlt(GetHdc(), xdest, ydest,
2059 (int)width, (int)height,
2060 dc_buffer, 0, 0, SRCPAINT) != 0;
2061 if ( !success )
2062 {
2063 wxLogLastError(wxT("BitBlt"));
2064 }
2065
2066 // tidy up temporary DCs and bitmap
2067 ::SelectObject(dc_mask, hOldMaskBitmap);
2068 ::SelectObject(dc_buffer, hOldBufferBitmap);
2069
2070 #if !wxUSE_DC_CACHEING
2071 {
2072 ::DeleteDC(dc_mask);
2073 ::DeleteDC(dc_buffer);
2074 ::DeleteObject(buffer_bmap);
2075 }
2076 #endif
2077 }
2078 }
2079 else // no mask, just BitBlt() it
2080 {
2081 // if we already have a DIB, draw it using StretchDIBits(), otherwise
2082 // use StretchBlt() if available and finally fall back to BitBlt()
2083
2084 // FIXME: use appropriate WinCE functions
2085 #ifndef __WXWINCE__
2086 const int caps = ::GetDeviceCaps(GetHdc(), RASTERCAPS);
2087 if ( bmpSrc.Ok() && (caps & RC_STRETCHDIB) )
2088 {
2089 DIBSECTION ds;
2090 wxZeroMemory(ds);
2091
2092 if ( ::GetObject(GetHbitmapOf(bmpSrc),
2093 sizeof(ds),
2094 &ds) == sizeof(ds) )
2095 {
2096 StretchBltModeChanger changeMode(GetHdc(), COLORONCOLOR);
2097
2098 // Figure out what co-ordinate system we're supposed to specify
2099 // ysrc in.
2100 const LONG hDIB = ds.dsBmih.biHeight;
2101 if ( hDIB > 0 )
2102 {
2103 // reflect ysrc
2104 ysrc = hDIB - (ysrc + height);
2105 }
2106
2107 if ( ::StretchDIBits(GetHdc(),
2108 xdest, ydest,
2109 width, height,
2110 xsrc, ysrc,
2111 width, height,
2112 ds.dsBm.bmBits,
2113 (LPBITMAPINFO)&ds.dsBmih,
2114 DIB_RGB_COLORS,
2115 SRCCOPY
2116 ) == (int)GDI_ERROR )
2117 {
2118 // On Win9x this API fails most (all?) of the time, so
2119 // logging it becomes quite distracting. Since it falls
2120 // back to the code below this is not really serious, so
2121 // don't log it.
2122 //wxLogLastError(wxT("StretchDIBits"));
2123 }
2124 else
2125 {
2126 success = true;
2127 }
2128 }
2129 }
2130
2131 if ( !success && (caps & RC_STRETCHBLT) )
2132 #endif
2133 // __WXWINCE__
2134 {
2135 #ifndef __WXWINCE__
2136 StretchBltModeChanger changeMode(GetHdc(), COLORONCOLOR);
2137 #endif
2138
2139 if ( !::StretchBlt
2140 (
2141 GetHdc(),
2142 xdest, ydest, width, height,
2143 GetHdcOf(*source),
2144 xsrc, ysrc, width, height,
2145 dwRop
2146 ) )
2147 {
2148 wxLogLastError(_T("StretchBlt"));
2149 }
2150 else
2151 {
2152 success = true;
2153 }
2154 }
2155
2156 if ( !success )
2157 {
2158 if ( !::BitBlt
2159 (
2160 GetHdc(),
2161 xdest, ydest,
2162 (int)width, (int)height,
2163 GetHdcOf(*source),
2164 xsrc, ysrc,
2165 dwRop
2166 ) )
2167 {
2168 wxLogLastError(_T("BitBlt"));
2169 }
2170 else
2171 {
2172 success = true;
2173 }
2174 }
2175 }
2176
2177 ::SetTextColor(GetHdc(), old_textground);
2178 ::SetBkColor(GetHdc(), old_background);
2179
2180 return success;
2181 }
2182
2183 void wxDC::DoGetSize(int *w, int *h) const
2184 {
2185 WXMICROWIN_CHECK_HDC
2186
2187 if ( w ) *w = ::GetDeviceCaps(GetHdc(), HORZRES);
2188 if ( h ) *h = ::GetDeviceCaps(GetHdc(), VERTRES);
2189 }
2190
2191 void wxDC::DoGetSizeMM(int *w, int *h) const
2192 {
2193 WXMICROWIN_CHECK_HDC
2194
2195 // if we implement it in terms of DoGetSize() instead of directly using the
2196 // results returned by GetDeviceCaps(HORZ/VERTSIZE) as was done before, it
2197 // will also work for wxWindowDC and wxClientDC even though their size is
2198 // not the same as the total size of the screen
2199 int wPixels, hPixels;
2200 DoGetSize(&wPixels, &hPixels);
2201
2202 if ( w )
2203 {
2204 int wTotal = ::GetDeviceCaps(GetHdc(), HORZRES);
2205
2206 wxCHECK_RET( wTotal, _T("0 width device?") );
2207
2208 *w = (wPixels * ::GetDeviceCaps(GetHdc(), HORZSIZE)) / wTotal;
2209 }
2210
2211 if ( h )
2212 {
2213 int hTotal = ::GetDeviceCaps(GetHdc(), VERTRES);
2214
2215 wxCHECK_RET( hTotal, _T("0 height device?") );
2216
2217 *h = (hPixels * ::GetDeviceCaps(GetHdc(), VERTSIZE)) / hTotal;
2218 }
2219 }
2220
2221 wxSize wxDC::GetPPI() const
2222 {
2223 WXMICROWIN_CHECK_HDC_RET(wxSize())
2224
2225 int x = ::GetDeviceCaps(GetHdc(), LOGPIXELSX);
2226 int y = ::GetDeviceCaps(GetHdc(), LOGPIXELSY);
2227
2228 return wxSize(x, y);
2229 }
2230
2231 // For use by wxWidgets only, unless custom units are required.
2232 void wxDC::SetLogicalScale(double x, double y)
2233 {
2234 WXMICROWIN_CHECK_HDC
2235
2236 m_logicalScaleX = x;
2237 m_logicalScaleY = y;
2238 }
2239
2240 // ----------------------------------------------------------------------------
2241 // DC caching
2242 // ----------------------------------------------------------------------------
2243
2244 #if wxUSE_DC_CACHEING
2245
2246 /*
2247 * This implementation is a bit ugly and uses the old-fashioned wxList class, so I will
2248 * improve it in due course, either using arrays, or simply storing pointers to one
2249 * entry for the bitmap, and two for the DCs. -- JACS
2250 */
2251
2252 wxList wxDC::sm_bitmapCache;
2253 wxList wxDC::sm_dcCache;
2254
2255 wxDCCacheEntry::wxDCCacheEntry(WXHBITMAP hBitmap, int w, int h, int depth)
2256 {
2257 m_bitmap = hBitmap;
2258 m_dc = 0;
2259 m_width = w;
2260 m_height = h;
2261 m_depth = depth;
2262 }
2263
2264 wxDCCacheEntry::wxDCCacheEntry(WXHDC hDC, int depth)
2265 {
2266 m_bitmap = 0;
2267 m_dc = hDC;
2268 m_width = 0;
2269 m_height = 0;
2270 m_depth = depth;
2271 }
2272
2273 wxDCCacheEntry::~wxDCCacheEntry()
2274 {
2275 if (m_bitmap)
2276 ::DeleteObject((HBITMAP) m_bitmap);
2277 if (m_dc)
2278 ::DeleteDC((HDC) m_dc);
2279 }
2280
2281 wxDCCacheEntry* wxDC::FindBitmapInCache(WXHDC dc, int w, int h)
2282 {
2283 int depth = ::GetDeviceCaps((HDC) dc, PLANES) * ::GetDeviceCaps((HDC) dc, BITSPIXEL);
2284 wxList::compatibility_iterator node = sm_bitmapCache.GetFirst();
2285 while (node)
2286 {
2287 wxDCCacheEntry* entry = (wxDCCacheEntry*) node->GetData();
2288
2289 if (entry->m_depth == depth)
2290 {
2291 if (entry->m_width < w || entry->m_height < h)
2292 {
2293 ::DeleteObject((HBITMAP) entry->m_bitmap);
2294 entry->m_bitmap = (WXHBITMAP) ::CreateCompatibleBitmap((HDC) dc, w, h);
2295 if ( !entry->m_bitmap)
2296 {
2297 wxLogLastError(wxT("CreateCompatibleBitmap"));
2298 }
2299 entry->m_width = w; entry->m_height = h;
2300 return entry;
2301 }
2302 return entry;
2303 }
2304
2305 node = node->GetNext();
2306 }
2307 WXHBITMAP hBitmap = (WXHBITMAP) ::CreateCompatibleBitmap((HDC) dc, w, h);
2308 if ( !hBitmap)
2309 {
2310 wxLogLastError(wxT("CreateCompatibleBitmap"));
2311 }
2312 wxDCCacheEntry* entry = new wxDCCacheEntry(hBitmap, w, h, depth);
2313 AddToBitmapCache(entry);
2314 return entry;
2315 }
2316
2317 wxDCCacheEntry* wxDC::FindDCInCache(wxDCCacheEntry* notThis, WXHDC dc)
2318 {
2319 int depth = ::GetDeviceCaps((HDC) dc, PLANES) * ::GetDeviceCaps((HDC) dc, BITSPIXEL);
2320 wxList::compatibility_iterator node = sm_dcCache.GetFirst();
2321 while (node)
2322 {
2323 wxDCCacheEntry* entry = (wxDCCacheEntry*) node->GetData();
2324
2325 // Don't return the same one as we already have
2326 if (!notThis || (notThis != entry))
2327 {
2328 if (entry->m_depth == depth)
2329 {
2330 return entry;
2331 }
2332 }
2333
2334 node = node->GetNext();
2335 }
2336 WXHDC hDC = (WXHDC) ::CreateCompatibleDC((HDC) dc);
2337 if ( !hDC)
2338 {
2339 wxLogLastError(wxT("CreateCompatibleDC"));
2340 }
2341 wxDCCacheEntry* entry = new wxDCCacheEntry(hDC, depth);
2342 AddToDCCache(entry);
2343 return entry;
2344 }
2345
2346 void wxDC::AddToBitmapCache(wxDCCacheEntry* entry)
2347 {
2348 sm_bitmapCache.Append(entry);
2349 }
2350
2351 void wxDC::AddToDCCache(wxDCCacheEntry* entry)
2352 {
2353 sm_dcCache.Append(entry);
2354 }
2355
2356 void wxDC::ClearCache()
2357 {
2358 WX_CLEAR_LIST(wxList, sm_dcCache);
2359 WX_CLEAR_LIST(wxList, sm_bitmapCache);
2360 }
2361
2362 // Clean up cache at app exit
2363 class wxDCModule : public wxModule
2364 {
2365 public:
2366 virtual bool OnInit() { return true; }
2367 virtual void OnExit() { wxDC::ClearCache(); }
2368
2369 private:
2370 DECLARE_DYNAMIC_CLASS(wxDCModule)
2371 };
2372
2373 IMPLEMENT_DYNAMIC_CLASS(wxDCModule, wxModule)
2374
2375 #endif // wxUSE_DC_CACHEING
2376
2377 // ----------------------------------------------------------------------------
2378 // alpha channel support
2379 // ----------------------------------------------------------------------------
2380
2381 static bool AlphaBlt(HDC hdcDst,
2382 int x, int y, int width, int height,
2383 HDC hdcSrc,
2384 const wxBitmap& bmp)
2385 {
2386 wxASSERT_MSG( bmp.Ok() && bmp.HasAlpha(), _T("AlphaBlt(): invalid bitmap") );
2387 wxASSERT_MSG( hdcDst && hdcSrc, _T("AlphaBlt(): invalid HDC") );
2388
2389 // do we have AlphaBlend() and company in the headers?
2390 #if defined(AC_SRC_OVER) && wxUSE_DYNLIB_CLASS
2391 // yes, now try to see if we have it during run-time
2392 typedef BOOL (WINAPI *AlphaBlend_t)(HDC,int,int,int,int,
2393 HDC,int,int,int,int,
2394 BLENDFUNCTION);
2395
2396 // bitmaps can be drawn only from GUI thread so there is no need to
2397 // protect this static variable from multiple threads
2398 static bool s_triedToLoad = false;
2399 static AlphaBlend_t pfnAlphaBlend = NULL;
2400 if ( !s_triedToLoad )
2401 {
2402 s_triedToLoad = true;
2403
2404 // don't give errors about the DLL being unavailable, we're
2405 // prepared to handle this
2406 wxLogNull nolog;
2407
2408 wxDynamicLibrary dll(_T("msimg32.dll"));
2409 if ( dll.IsLoaded() )
2410 {
2411 pfnAlphaBlend = (AlphaBlend_t)dll.GetSymbol(_T("AlphaBlend"));
2412 if ( pfnAlphaBlend )
2413 {
2414 // we must keep the DLL loaded if we want to be able to
2415 // call AlphaBlend() so just never unload it at all, not a
2416 // big deal
2417 dll.Detach();
2418 }
2419 }
2420 }
2421
2422 if ( pfnAlphaBlend )
2423 {
2424 BLENDFUNCTION bf;
2425 bf.BlendOp = AC_SRC_OVER;
2426 bf.BlendFlags = 0;
2427 bf.SourceConstantAlpha = 0xff;
2428 bf.AlphaFormat = AC_SRC_ALPHA;
2429
2430 if ( pfnAlphaBlend(hdcDst, x, y, width, height,
2431 hdcSrc, 0, 0, width, height,
2432 bf) )
2433 {
2434 // skip wxAlphaBlend() call below
2435 return true;
2436 }
2437
2438 wxLogLastError(_T("AlphaBlend"));
2439 }
2440 #endif // defined(AC_SRC_OVER)
2441
2442 // AlphaBlend() unavailable of failed: use our own (probably much slower)
2443 // implementation
2444 #ifdef wxHAVE_RAW_BITMAP
2445 wxAlphaBlend(hdcDst, x, y, width, height, bmp);
2446
2447 return true;
2448 #else // !wxHAVE_RAW_BITMAP
2449 // no wxAlphaBlend() neither, fall back to using simple BitBlt() (we lose
2450 // alpha but at least something will be shown like this)
2451 return false;
2452 #endif // wxHAVE_RAW_BITMAP
2453 }
2454
2455
2456 // wxAlphaBlend: our fallback if ::AlphaBlend() is unavailable
2457 #ifdef wxHAVE_RAW_BITMAP
2458
2459 static void
2460 wxAlphaBlend(HDC hdcDst, int xDst, int yDst, int w, int h, const wxBitmap& bmpSrc)
2461 {
2462 // get the destination DC pixels
2463 wxBitmap bmpDst(w, h, 32 /* force creating RGBA DIB */);
2464 MemoryHDC hdcMem;
2465 SelectInHDC select(hdcMem, GetHbitmapOf(bmpDst));
2466
2467 if ( !::BitBlt(hdcMem, 0, 0, w, h, hdcDst, 0, 0, SRCCOPY) )
2468 {
2469 wxLogLastError(_T("BitBlt"));
2470 }
2471
2472 // combine them with the source bitmap using alpha
2473 wxAlphaPixelData dataDst(bmpDst),
2474 dataSrc((wxBitmap &)bmpSrc);
2475
2476 wxCHECK_RET( dataDst && dataSrc,
2477 _T("failed to get raw data in wxAlphaBlend") );
2478
2479 wxAlphaPixelData::Iterator pDst(dataDst),
2480 pSrc(dataSrc);
2481
2482 for ( int y = 0; y < h; y++ )
2483 {
2484 wxAlphaPixelData::Iterator pDstRowStart = pDst,
2485 pSrcRowStart = pSrc;
2486
2487 for ( int x = 0; x < w; x++ )
2488 {
2489 // note that source bitmap uses premultiplied alpha (as required by
2490 // the real AlphaBlend)
2491 const unsigned beta = 255 - pSrc.Alpha();
2492
2493 pDst.Red() = pSrc.Red() + (beta * pDst.Red() + 127) / 255;
2494 pDst.Blue() = pSrc.Blue() + (beta * pDst.Blue() + 127) / 255;
2495 pDst.Green() = pSrc.Green() + (beta * pDst.Green() + 127) / 255;
2496
2497 ++pDst;
2498 ++pSrc;
2499 }
2500
2501 pDst = pDstRowStart;
2502 pSrc = pSrcRowStart;
2503 pDst.OffsetY(dataDst, 1);
2504 pSrc.OffsetY(dataSrc, 1);
2505 }
2506
2507 // and finally blit them back to the destination DC
2508 if ( !::BitBlt(hdcDst, xDst, yDst, w, h, hdcMem, 0, 0, SRCCOPY) )
2509 {
2510 wxLogLastError(_T("BitBlt"));
2511 }
2512 }
2513
2514 #endif // #ifdef wxHAVE_RAW_BITMAP