]> git.saurik.com Git - wxWidgets.git/blob - src/msw/dc.cpp
Fixed Vadims fix.
[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 and Markus Holzem
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 // ===========================================================================
13 // declarations
14 // ===========================================================================
15
16 // ---------------------------------------------------------------------------
17 // headers
18 // ---------------------------------------------------------------------------
19
20 #ifdef __GNUG__
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/dcprint.h"
44
45 #include <string.h>
46 #include <math.h>
47
48 #include "wx/msw/private.h" // needs to be before #include <commdlg.h>
49
50 #if wxUSE_COMMON_DIALOGS
51 #if wxUSE_NORLANDER_HEADERS
52 #include <windows.h>
53 #endif
54 #include <commdlg.h>
55 #endif
56
57 #ifndef __WIN32__
58 #include <print.h>
59 #endif
60
61 IMPLEMENT_ABSTRACT_CLASS(wxDC, wxObject)
62
63 // ---------------------------------------------------------------------------
64 // constants
65 // ---------------------------------------------------------------------------
66
67 static const int VIEWPORT_EXTENT = 1000;
68
69 static const int MM_POINTS = 9;
70 static const int MM_METRIC = 10;
71
72 // usually this is defined in math.h
73 #ifndef M_PI
74 static const double M_PI = 3.14159265358979323846;
75 #endif // M_PI
76
77 // ---------------------------------------------------------------------------
78 // private functions
79 // ---------------------------------------------------------------------------
80
81 // convert degrees to radians
82 static inline double DegToRad(double deg) { return (deg * M_PI) / 180.0; }
83
84 // ===========================================================================
85 // implementation
86 // ===========================================================================
87
88 // ---------------------------------------------------------------------------
89 // wxDC
90 // ---------------------------------------------------------------------------
91
92 // Default constructor
93 wxDC::wxDC()
94 {
95 m_canvas = NULL;
96
97 m_oldBitmap = 0;
98 m_oldPen = 0;
99 m_oldBrush = 0;
100 m_oldFont = 0;
101 m_oldPalette = 0;
102
103 m_bOwnsDC = FALSE;
104 m_hDC = 0;
105
106 m_windowExtX = VIEWPORT_EXTENT;
107 m_windowExtY = VIEWPORT_EXTENT;
108
109 m_hDCCount = 0;
110 }
111
112
113 wxDC::~wxDC()
114 {
115 if ( m_hDC != 0 ) {
116 SelectOldObjects(m_hDC);
117 if ( m_bOwnsDC ) {
118 if ( m_canvas == NULL )
119 ::DeleteDC(GetHdc());
120 else
121 ::ReleaseDC((HWND)m_canvas->GetHWND(), GetHdc());
122 }
123 }
124
125 }
126
127 // This will select current objects out of the DC,
128 // which is what you have to do before deleting the
129 // DC.
130 void wxDC::SelectOldObjects(WXHDC dc)
131 {
132 if (dc)
133 {
134 if (m_oldBitmap)
135 {
136 ::SelectObject((HDC) dc, (HBITMAP) m_oldBitmap);
137 if (m_selectedBitmap.Ok())
138 {
139 m_selectedBitmap.SetSelectedInto(NULL);
140 }
141 }
142 m_oldBitmap = 0;
143 if (m_oldPen)
144 {
145 ::SelectObject((HDC) dc, (HPEN) m_oldPen);
146 }
147 m_oldPen = 0;
148 if (m_oldBrush)
149 {
150 ::SelectObject((HDC) dc, (HBRUSH) m_oldBrush);
151 }
152 m_oldBrush = 0;
153 if (m_oldFont)
154 {
155 ::SelectObject((HDC) dc, (HFONT) m_oldFont);
156 }
157 m_oldFont = 0;
158 if (m_oldPalette)
159 {
160 ::SelectPalette((HDC) dc, (HPALETTE) m_oldPalette, TRUE);
161 }
162 m_oldPalette = 0;
163 }
164
165 m_brush = wxNullBrush;
166 m_pen = wxNullPen;
167 m_palette = wxNullPalette;
168 m_font = wxNullFont;
169 m_backgroundBrush = wxNullBrush;
170 m_selectedBitmap = wxNullBitmap;
171 }
172
173 // ---------------------------------------------------------------------------
174 // clipping
175 // ---------------------------------------------------------------------------
176
177 void wxDC::DoSetClippingRegion(wxCoord cx, wxCoord cy, wxCoord cw, wxCoord ch)
178 {
179 m_clipping = TRUE;
180 m_clipX1 = (int)cx;
181 m_clipY1 = (int)cy;
182 m_clipX2 = (int)(cx + cw);
183 m_clipY2 = (int)(cy + ch);
184
185 DoClipping((WXHDC) m_hDC);
186 }
187
188 void wxDC::DoSetClippingRegionAsRegion(const wxRegion& region)
189 {
190 wxCHECK_RET( region.GetHRGN(), wxT("invalid clipping region") );
191
192 wxRect box = region.GetBox();
193
194 m_clipping = TRUE;
195 m_clipX1 = box.x;
196 m_clipY1 = box.y;
197 m_clipX2 = box.x + box.width;
198 m_clipY2 = box.y + box.height;
199
200 #ifdef __WIN16__
201 SelectClipRgn(GetHdc(), (HRGN) region.GetHRGN());
202 #else
203 ExtSelectClipRgn(GetHdc(), (HRGN) region.GetHRGN(), RGN_AND);
204 #endif
205 }
206
207 void wxDC::DoClipping(WXHDC dc)
208 {
209 if (m_clipping && dc)
210 {
211 IntersectClipRect((HDC) dc, XLOG2DEV(m_clipX1), YLOG2DEV(m_clipY1),
212 XLOG2DEV(m_clipX2), YLOG2DEV(m_clipY2));
213 }
214 }
215
216 void wxDC::DestroyClippingRegion()
217 {
218 if (m_clipping && m_hDC)
219 {
220 // TODO: this should restore the previous clipping region,
221 // so that OnPaint processing works correctly, and the update clipping region
222 // doesn't get destroyed after the first DestroyClippingRegion.
223 HRGN rgn = CreateRectRgn(0, 0, 32000, 32000);
224 SelectClipRgn(GetHdc(), rgn);
225 DeleteObject(rgn);
226 }
227 m_clipping = FALSE;
228 }
229
230 // ---------------------------------------------------------------------------
231 // query capabilities
232 // ---------------------------------------------------------------------------
233
234 bool wxDC::CanDrawBitmap() const
235 {
236 return TRUE;
237 }
238
239 bool wxDC::CanGetTextExtent() const
240 {
241 // What sort of display is it?
242 int technology = ::GetDeviceCaps(GetHdc(), TECHNOLOGY);
243
244 return (technology == DT_RASDISPLAY) || (technology == DT_RASPRINTER);
245 }
246
247 int wxDC::GetDepth() const
248 {
249 return (int)::GetDeviceCaps(GetHdc(), BITSPIXEL);
250 }
251
252 // ---------------------------------------------------------------------------
253 // drawing
254 // ---------------------------------------------------------------------------
255
256 void wxDC::Clear()
257 {
258 RECT rect;
259 if ( m_canvas )
260 {
261 GetClientRect((HWND) m_canvas->GetHWND(), &rect);
262 }
263 else
264 {
265 // No, I think we should simply ignore this if printing on e.g.
266 // a printer DC.
267 // wxCHECK_RET( m_selectedBitmap.Ok(), wxT("this DC can't be cleared") );
268 if (!m_selectedBitmap.Ok())
269 return;
270
271 rect.left = 0; rect.top = 0;
272 rect.right = m_selectedBitmap.GetWidth();
273 rect.bottom = m_selectedBitmap.GetHeight();
274 }
275
276 (void) ::SetMapMode(GetHdc(), MM_TEXT);
277
278 DWORD colour = GetBkColor(GetHdc());
279 HBRUSH brush = CreateSolidBrush(colour);
280 FillRect(GetHdc(), &rect, brush);
281 DeleteObject(brush);
282
283 ::SetMapMode(GetHdc(), MM_ANISOTROPIC);
284 ::SetViewportExtEx(GetHdc(), VIEWPORT_EXTENT, VIEWPORT_EXTENT, NULL);
285 ::SetWindowExtEx(GetHdc(), m_windowExtX, m_windowExtY, NULL);
286 ::SetViewportOrgEx(GetHdc(), (int)m_deviceOriginX, (int)m_deviceOriginY, NULL);
287 ::SetWindowOrgEx(GetHdc(), (int)m_logicalOriginX, (int)m_logicalOriginY, NULL);
288 }
289
290 void wxDC::DoFloodFill(wxCoord x, wxCoord y, const wxColour& col, int style)
291 {
292 if ( !::ExtFloodFill(GetHdc(), XLOG2DEV(x), YLOG2DEV(y),
293 col.GetPixel(),
294 style == wxFLOOD_SURFACE ? FLOODFILLSURFACE
295 : FLOODFILLBORDER) )
296 {
297 // quoting from the MSDN docs:
298 //
299 // Following are some of the reasons this function might fail:
300 //
301 // * The filling could not be completed.
302 // * The specified point has the boundary color specified by the
303 // crColor parameter (if FLOODFILLBORDER was requested).
304 // * The specified point does not have the color specified by
305 // crColor (if FLOODFILLSURFACE was requested)
306 // * The point is outside the clipping region that is, it is not
307 // visible on the device.
308 //
309 wxLogLastError("ExtFloodFill");
310 }
311
312 CalcBoundingBox(x, y);
313 }
314
315 bool wxDC::DoGetPixel(wxCoord x, wxCoord y, wxColour *col) const
316 {
317 // get the color of the pixel
318 COLORREF pixelcolor = ::GetPixel(GetHdc(), XLOG2DEV(x), YLOG2DEV(y));
319
320 // get the color of the pen
321 COLORREF pencolor = 0x00ffffff;
322 if (m_pen.Ok())
323 {
324 pencolor = m_pen.GetColour().GetPixel();
325 }
326
327 // return the color of the pixel
328 if( col )
329 {
330 col->Set(GetRValue(pixelcolor),
331 GetGValue(pixelcolor),
332 GetBValue(pixelcolor));
333 }
334
335 // check, if color of the pixels is the same as the color of the current
336 // pen and return TRUE if it is, FALSE otherwise
337 return pixelcolor == pencolor;
338 }
339
340 void wxDC::DoCrossHair(wxCoord x, wxCoord y)
341 {
342 wxCoord x1 = x-VIEWPORT_EXTENT;
343 wxCoord y1 = y-VIEWPORT_EXTENT;
344 wxCoord x2 = x+VIEWPORT_EXTENT;
345 wxCoord y2 = y+VIEWPORT_EXTENT;
346
347 (void)MoveToEx(GetHdc(), XLOG2DEV(x1), YLOG2DEV(y), NULL);
348 (void)LineTo(GetHdc(), XLOG2DEV(x2), YLOG2DEV(y));
349
350 (void)MoveToEx(GetHdc(), XLOG2DEV(x), YLOG2DEV(y1), NULL);
351 (void)LineTo(GetHdc(), XLOG2DEV(x), YLOG2DEV(y2));
352
353 CalcBoundingBox(x1, y1);
354 CalcBoundingBox(x2, y2);
355 }
356
357 void wxDC::DoDrawLine(wxCoord x1, wxCoord y1, wxCoord x2, wxCoord y2)
358 {
359 (void)MoveToEx(GetHdc(), XLOG2DEV(x1), YLOG2DEV(y1), NULL);
360 (void)LineTo(GetHdc(), XLOG2DEV(x2), YLOG2DEV(y2));
361
362 /* MATTHEW: [6] New normalization */
363 #if WX_STANDARD_GRAPHICS
364 (void)LineTo(GetHdc(), XLOG2DEV(x2) + 1, YLOG2DEV(y2));
365 #endif
366
367 CalcBoundingBox(x1, y1);
368 CalcBoundingBox(x2, y2);
369 }
370
371 void wxDC::DoDrawArc(wxCoord x1,wxCoord y1,wxCoord x2,wxCoord y2, wxCoord xc, wxCoord yc)
372 {
373 double dx = xc-x1;
374 double dy = yc-y1;
375 double radius = (double)sqrt(dx*dx+dy*dy) ;;
376 if (x1==x2 && x2==y2)
377 {
378 DrawEllipse(xc,yc,(wxCoord)(radius*2.0),(wxCoord)(radius*2.0));
379 return;
380 }
381
382 wxCoord xx1 = XLOG2DEV(x1);
383 wxCoord yy1 = YLOG2DEV(y1);
384 wxCoord xx2 = XLOG2DEV(x2);
385 wxCoord yy2 = YLOG2DEV(y2);
386 wxCoord xxc = XLOG2DEV(xc);
387 wxCoord yyc = YLOG2DEV(yc);
388 wxCoord ray = (wxCoord) sqrt(double((xxc-xx1)*(xxc-xx1)+(yyc-yy1)*(yyc-yy1)));
389
390 (void)MoveToEx(GetHdc(), (int) xx1, (int) yy1, NULL);
391 wxCoord xxx1 = (wxCoord) (xxc-ray);
392 wxCoord yyy1 = (wxCoord) (yyc-ray);
393 wxCoord xxx2 = (wxCoord) (xxc+ray);
394 wxCoord yyy2 = (wxCoord) (yyc+ray);
395 if (m_brush.Ok() && m_brush.GetStyle() !=wxTRANSPARENT)
396 {
397 // Have to add 1 to bottom-right corner of rectangle
398 // to make semi-circles look right (crooked line otherwise).
399 // Unfortunately this is not a reliable method, depends
400 // on the size of shape.
401 // TODO: figure out why this happens!
402 Pie(GetHdc(),xxx1,yyy1,xxx2+1,yyy2+1,
403 xx1,yy1,xx2,yy2);
404 }
405 else
406 Arc(GetHdc(),xxx1,yyy1,xxx2,yyy2,
407 xx1,yy1,xx2,yy2);
408
409 CalcBoundingBox((wxCoord)(xc-radius), (wxCoord)(yc-radius));
410 CalcBoundingBox((wxCoord)(xc+radius), (wxCoord)(yc+radius));
411 }
412
413 void wxDC::DoDrawPoint(wxCoord x, wxCoord y)
414 {
415 COLORREF color = 0x00ffffff;
416 if (m_pen.Ok())
417 {
418 color = m_pen.GetColour().GetPixel();
419 }
420
421 SetPixel(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), color);
422
423 CalcBoundingBox(x, y);
424 }
425
426 void wxDC::DoDrawPolygon(int n, wxPoint points[], wxCoord xoffset, wxCoord yoffset,int fillStyle)
427 {
428 COLORREF old_textground = ::GetTextColor(GetHdc());
429 COLORREF old_background = ::GetBkColor(GetHdc());
430 if (m_brush.GetStyle() == wxSTIPPLE_MASK_OPAQUE)
431 {
432
433 if (m_textForegroundColour.Ok())
434 { //just the oposite from what is expected see help on pattern brush
435 // 1 in mask becomes bk color
436 ::SetBkColor(GetHdc(), m_textForegroundColour.GetPixel() );
437 }
438 if (m_textBackgroundColour.Ok())
439 { //just the oposite from what is expected
440 // 0 in mask becomes text color
441 ::SetTextColor(GetHdc(), m_textBackgroundColour.GetPixel() );
442 }
443
444 if (m_backgroundMode == wxTRANSPARENT)
445 SetBkMode(GetHdc(), TRANSPARENT);
446 else
447 SetBkMode(GetHdc(), OPAQUE);
448 }
449
450 // Do things less efficiently if we have offsets
451 if (xoffset != 0 || yoffset != 0)
452 {
453 POINT *cpoints = new POINT[n];
454 int i;
455 for (i = 0; i < n; i++)
456 {
457 cpoints[i].x = (int)(points[i].x + xoffset);
458 cpoints[i].y = (int)(points[i].y + yoffset);
459
460 CalcBoundingBox(cpoints[i].x, cpoints[i].y);
461 }
462 int prev = SetPolyFillMode(GetHdc(),fillStyle==wxODDEVEN_RULE?ALTERNATE:WINDING);
463 (void)Polygon(GetHdc(), cpoints, n);
464 SetPolyFillMode(GetHdc(),prev);
465 delete[] cpoints;
466 }
467 else
468 {
469 int i;
470 for (i = 0; i < n; i++)
471 CalcBoundingBox(points[i].x, points[i].y);
472
473 int prev = SetPolyFillMode(GetHdc(),fillStyle==wxODDEVEN_RULE?ALTERNATE:WINDING);
474 (void)Polygon(GetHdc(), (POINT*) points, n);
475 SetPolyFillMode(GetHdc(),prev);
476 }
477
478 if (m_brush.GetStyle() == wxSTIPPLE_MASK_OPAQUE)
479 {
480 ::SetBkMode(GetHdc(), TRANSPARENT);
481 ::SetTextColor(GetHdc(), old_textground);
482 ::SetBkColor(GetHdc(), old_background);
483 }
484 }
485
486 void wxDC::DoDrawLines(int n, wxPoint points[], wxCoord xoffset, wxCoord yoffset)
487 {
488 // Do things less efficiently if we have offsets
489 if (xoffset != 0 || yoffset != 0)
490 {
491 POINT *cpoints = new POINT[n];
492 int i;
493 for (i = 0; i < n; i++)
494 {
495 cpoints[i].x = (int)(points[i].x + xoffset);
496 cpoints[i].y = (int)(points[i].y + yoffset);
497
498 CalcBoundingBox(cpoints[i].x, cpoints[i].y);
499 }
500 (void)Polyline(GetHdc(), cpoints, n);
501 delete[] cpoints;
502 }
503 else
504 {
505 int i;
506 for (i = 0; i < n; i++)
507 CalcBoundingBox(points[i].x, points[i].y);
508
509 (void)Polyline(GetHdc(), (POINT*) points, n);
510 }
511 }
512
513 void wxDC::DoDrawRectangle(wxCoord x, wxCoord y, wxCoord width, wxCoord height)
514 {
515 COLORREF colFgOld = 0,
516 colBgOld = 0;
517
518 if ( m_brush.GetStyle() == wxSTIPPLE_MASK_OPAQUE )
519 {
520 colFgOld = ::GetTextColor(GetHdc());
521 colBgOld = ::GetBkColor(GetHdc());
522
523 if ( m_textForegroundColour.Ok() )
524 {
525 // just the oposite from what is expected see help on pattern brush
526 // 1 in mask becomes bk color
527 ::SetBkColor(GetHdc(), m_textForegroundColour.GetPixel());
528 }
529
530 if ( m_textBackgroundColour.Ok() )
531 {
532 // 0 in mask becomes text color
533 ::SetTextColor(GetHdc(), m_textBackgroundColour.GetPixel());
534 }
535
536 // VZ: IMHO this does strictly nothing here
537 SetBkMode(GetHdc(), m_backgroundMode == wxTRANSPARENT ? TRANSPARENT
538 : OPAQUE);
539 }
540
541 wxCoord x2 = x + width;
542 wxCoord y2 = y + height;
543
544 // Windows draws the filled rectangles without outline (i.e. drawn with a
545 // transparent pen) one pixel smaller in both directions and we want them
546 // to have the same size regardless of which pen is used - adjust
547 if ( m_pen.GetStyle() == wxTRANSPARENT )
548 {
549 x2++;
550 y2++;
551 }
552
553 (void)Rectangle(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2));
554
555 CalcBoundingBox(x, y);
556 CalcBoundingBox(x2, y2);
557
558 if ( m_brush.GetStyle() == wxSTIPPLE_MASK_OPAQUE )
559 {
560 // restore the colours we changed
561 ::SetBkMode(GetHdc(), TRANSPARENT);
562 ::SetTextColor(GetHdc(), colFgOld);
563 ::SetBkColor(GetHdc(), colBgOld);
564 }
565 }
566
567 void wxDC::DoDrawRoundedRectangle(wxCoord x, wxCoord y, wxCoord width, wxCoord height, double radius)
568 {
569 // Now, a negative radius value is interpreted to mean
570 // 'the proportion of the smallest X or Y dimension'
571
572 if (radius < 0.0)
573 {
574 double smallest = 0.0;
575 if (width < height)
576 smallest = width;
577 else
578 smallest = height;
579 radius = (- radius * smallest);
580 }
581
582 wxCoord x2 = (x+width);
583 wxCoord y2 = (y+height);
584
585 (void)RoundRect(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2),
586 YLOG2DEV(y2), (int) (2*XLOG2DEV(radius)), (int)( 2*YLOG2DEV(radius)));
587
588 CalcBoundingBox(x, y);
589 CalcBoundingBox(x2, y2);
590 }
591
592 void wxDC::DoDrawEllipse(wxCoord x, wxCoord y, wxCoord width, wxCoord height)
593 {
594 wxCoord x2 = (x+width);
595 wxCoord y2 = (y+height);
596
597 (void)Ellipse(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2));
598
599 CalcBoundingBox(x, y);
600 CalcBoundingBox(x2, y2);
601 }
602
603 // Chris Breeze 20/5/98: first implementation of DrawEllipticArc on Windows
604 void wxDC::DoDrawEllipticArc(wxCoord x,wxCoord y,wxCoord w,wxCoord h,double sa,double ea)
605 {
606 wxCoord x2 = (x+w);
607 wxCoord y2 = (y+h);
608
609 int rx1 = XLOG2DEV(x+w/2);
610 int ry1 = YLOG2DEV(y+h/2);
611 int rx2 = rx1;
612 int ry2 = ry1;
613
614 sa = DegToRad(sa);
615 ea = DegToRad(ea);
616
617 rx1 += (int)(100.0 * abs(w) * cos(sa));
618 ry1 -= (int)(100.0 * abs(h) * m_signY * sin(sa));
619 rx2 += (int)(100.0 * abs(w) * cos(ea));
620 ry2 -= (int)(100.0 * abs(h) * m_signY * sin(ea));
621
622 // draw pie with NULL_PEN first and then outline otherwise a line is
623 // drawn from the start and end points to the centre
624 HPEN orig_pen = (HPEN) ::SelectObject(GetHdc(), (HPEN) ::GetStockObject(NULL_PEN));
625 if (m_signY > 0)
626 {
627 (void)Pie(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2)+1, YLOG2DEV(y2)+1,
628 rx1, ry1, rx2, ry2);
629 }
630 else
631 {
632 (void)Pie(GetHdc(), XLOG2DEV(x), YLOG2DEV(y)-1, XLOG2DEV(x2)+1, YLOG2DEV(y2),
633 rx1, ry1-1, rx2, ry2-1);
634 }
635 ::SelectObject(GetHdc(), orig_pen);
636 (void)Arc(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2),
637 rx1, ry1, rx2, ry2);
638
639 CalcBoundingBox(x, y);
640 CalcBoundingBox(x2, y2);
641 }
642
643 void wxDC::DoDrawIcon(const wxIcon& icon, wxCoord x, wxCoord y)
644 {
645 wxCHECK_RET( icon.Ok(), wxT("invalid icon in DrawIcon") );
646
647 ::DrawIcon(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), GetHiconOf(icon));
648
649 CalcBoundingBox(x, y);
650 CalcBoundingBox(x + icon.GetWidth(), y + icon.GetHeight());
651 }
652
653 void wxDC::DoDrawBitmap( const wxBitmap &bmp, wxCoord x, wxCoord y, bool useMask )
654 {
655 wxCHECK_RET( bmp.Ok(), _T("invalid bitmap in wxDC::DrawBitmap") );
656
657 int width = bmp.GetWidth(),
658 height = bmp.GetHeight();
659
660 HBITMAP hbmpMask = 0;
661
662 if ( useMask )
663 {
664 wxMask *mask = bmp.GetMask();
665 if ( mask )
666 hbmpMask = (HBITMAP)mask->GetMaskBitmap();
667
668 if ( !hbmpMask )
669 {
670 // don't give assert here because this would break existing
671 // programs - just silently ignore useMask parameter
672 useMask = FALSE;
673 }
674 }
675
676 if ( useMask )
677 {
678 #ifdef __WIN32__
679 HDC hdcMem = ::CreateCompatibleDC(GetHdc());
680 ::SelectObject(hdcMem, GetHbitmapOf(bmp));
681
682 // this will only work if the transparent part of our bitmap is black
683 // because it is combined with the destination rectangle using OR, so
684 // it won't be really transparent otherwise - I don't know what to do
685 // about it, may be use MAKEROP4(SRCCOPY, DSTINVERT) twice? Or create a
686 // copy of the bitmap with the transparent part replaced with black
687 // pixels?
688
689 // GRG: now this works regardless of what the source bitmap
690 // contains in the area which is to be transparent.
691 //
692 bool ok = ::MaskBlt(GetHdc(), x, y, width, height,
693 hdcMem, 0, 0,
694 hbmpMask, 0, 0,
695 MAKEROP4(SRCCOPY, 0x00AA0029)) != 0;
696 ::DeleteDC(hdcMem);
697
698 if ( !ok )
699 #endif // Win32
700 {
701 // VZ: this is incorrect, Blit() doesn't (and can't) draw
702 // transparently, but it's still better than nothing at all
703 // GRG: Blit() *should* draw transparently when there is a mask
704
705 // Rather than reproduce wxDC::Blit, let's do it at the wxWin API level
706 wxMemoryDC memDC;
707 memDC.SelectObject(bmp);
708
709 Blit(x, y, width, height, &memDC, 0, 0, wxCOPY, useMask);
710
711 memDC.SelectObject(wxNullBitmap);
712 }
713 }
714 else // no mask, just use BitBlt()
715 {
716 HDC cdc = GetHdc();
717 HDC memdc = ::CreateCompatibleDC( cdc );
718 HBITMAP hbitmap = (HBITMAP) bmp.GetHBITMAP( );
719
720 wxASSERT_MSG( hbitmap, wxT("bitmap is ok but HBITMAP is NULL?") );
721
722 COLORREF old_textground = ::GetTextColor(GetHdc());
723 COLORREF old_background = ::GetBkColor(GetHdc());
724 if (m_textForegroundColour.Ok())
725 {
726 ::SetTextColor(GetHdc(), m_textForegroundColour.GetPixel() );
727 }
728 if (m_textBackgroundColour.Ok())
729 {
730 ::SetBkColor(GetHdc(), m_textBackgroundColour.GetPixel() );
731 }
732
733 ::SelectObject( memdc, hbitmap );
734 ::BitBlt( cdc, x, y, width, height, memdc, 0, 0, SRCCOPY);
735 ::DeleteDC( memdc );
736
737 ::SetTextColor(GetHdc(), old_textground);
738 ::SetBkColor(GetHdc(), old_background);
739 }
740 }
741
742 void wxDC::DoDrawText(const wxString& text, wxCoord x, wxCoord y)
743 {
744 DrawAnyText(text, x, y);
745
746 // update the bounding box
747 CalcBoundingBox(x, y);
748
749 wxCoord w, h;
750 GetTextExtent(text, &w, &h);
751 CalcBoundingBox(x + w, y + h);
752 }
753
754 void wxDC::DrawAnyText(const wxString& text, wxCoord x, wxCoord y)
755 {
756 // prepare for drawing the text
757 if ( m_textForegroundColour.Ok() )
758 SetTextColor(GetHdc(), m_textForegroundColour.GetPixel());
759
760 DWORD old_background = 0;
761 if ( m_textBackgroundColour.Ok() )
762 {
763 old_background = SetBkColor(GetHdc(), m_textBackgroundColour.GetPixel() );
764 }
765
766 SetBkMode(GetHdc(), m_backgroundMode == wxTRANSPARENT ? TRANSPARENT
767 : OPAQUE);
768
769 if ( ::TextOut(GetHdc(), XLOG2DEV(x), YLOG2DEV(y),
770 text.c_str(), text.length()) == 0 )
771 {
772 wxLogLastError("TextOut");
773 }
774
775 // restore the old parameters (text foreground colour may be left because
776 // it never is set to anything else, but background should remain
777 // transparent even if we just drew an opaque string)
778 if ( m_textBackgroundColour.Ok() )
779 (void)SetBkColor(GetHdc(), old_background);
780
781 SetBkMode(GetHdc(), TRANSPARENT);
782 }
783
784 void wxDC::DoDrawRotatedText(const wxString& text,
785 wxCoord x, wxCoord y,
786 double angle)
787 {
788 // we test that we have some font because otherwise we should still use the
789 // "else" part below to avoid that DrawRotatedText(angle = 180) and
790 // DrawRotatedText(angle = 0) use different fonts (we can't use the default
791 // font for drawing rotated fonts unfortunately)
792 if ( (angle == 0.0) && m_font.Ok() )
793 {
794 DoDrawText(text, x, y);
795 }
796 else
797 {
798 // NB: don't take DEFAULT_GUI_FONT because it's not TrueType and so
799 // can't have non zero orientation/escapement
800 wxFont font = m_font.Ok() ? m_font : *wxNORMAL_FONT;
801 HFONT hfont = (HFONT)font.GetResourceHandle();
802 LOGFONT lf;
803 if ( ::GetObject(hfont, sizeof(lf), &lf) == 0 )
804 {
805 wxLogLastError("GetObject(hfont)");
806 }
807
808 // GDI wants the angle in tenth of degree
809 long angle10 = (long)(angle * 10);
810 lf.lfEscapement = angle10;
811 lf. lfOrientation = angle10;
812
813 hfont = ::CreateFontIndirect(&lf);
814 if ( !hfont )
815 {
816 wxLogLastError("CreateFont");
817 }
818 else
819 {
820 HFONT hfontOld = (HFONT)::SelectObject(GetHdc(), hfont);
821
822 DrawAnyText(text, x, y);
823
824 (void)::SelectObject(GetHdc(), hfontOld);
825 (void)::DeleteObject(hfont);
826 }
827
828 // call the bounding box by adding all four vertices of the rectangle
829 // containing the text to it (simpler and probably not slower than
830 // determining which of them is really topmost/leftmost/...)
831 wxCoord w, h;
832 GetTextExtent(text, &w, &h);
833
834 double rad = DegToRad(angle);
835
836 // "upper left" and "upper right"
837 CalcBoundingBox(x, y);
838 CalcBoundingBox(x + w*cos(rad), y - h*sin(rad));
839
840 // "bottom left" and "bottom right"
841 x += (wxCoord)(h*sin(rad));
842 y += (wxCoord)(h*cos(rad));
843 CalcBoundingBox(x, y);
844 CalcBoundingBox(x + h*sin(rad), y + h*cos(rad));
845 }
846 }
847
848 // ---------------------------------------------------------------------------
849 // set GDI objects
850 // ---------------------------------------------------------------------------
851
852 void wxDC::SetPalette(const wxPalette& palette)
853 {
854 // Set the old object temporarily, in case the assignment deletes an object
855 // that's not yet selected out.
856 if (m_oldPalette)
857 {
858 ::SelectPalette(GetHdc(), (HPALETTE) m_oldPalette, TRUE);
859 m_oldPalette = 0;
860 }
861
862 m_palette = palette;
863
864 if (!m_palette.Ok())
865 {
866 // Setting a NULL colourmap is a way of restoring
867 // the original colourmap
868 if (m_oldPalette)
869 {
870 ::SelectPalette(GetHdc(), (HPALETTE) m_oldPalette, TRUE);
871 m_oldPalette = 0;
872 }
873
874 return;
875 }
876
877 if (m_palette.Ok() && m_palette.GetHPALETTE())
878 {
879 HPALETTE oldPal = ::SelectPalette(GetHdc(), (HPALETTE) m_palette.GetHPALETTE(), TRUE);
880 if (!m_oldPalette)
881 m_oldPalette = (WXHPALETTE) oldPal;
882
883 ::RealizePalette(GetHdc());
884 }
885 }
886
887 void wxDC::SetFont(const wxFont& the_font)
888 {
889 // Set the old object temporarily, in case the assignment deletes an object
890 // that's not yet selected out.
891 if (m_oldFont)
892 {
893 ::SelectObject(GetHdc(), (HFONT) m_oldFont);
894 m_oldFont = 0;
895 }
896
897 m_font = the_font;
898
899 if (!the_font.Ok())
900 {
901 if (m_oldFont)
902 ::SelectObject(GetHdc(), (HFONT) m_oldFont);
903 m_oldFont = 0;
904 }
905
906 if (m_font.Ok() && m_font.GetResourceHandle())
907 {
908 HFONT f = (HFONT) ::SelectObject(GetHdc(), (HFONT) m_font.GetResourceHandle());
909 if (f == (HFONT) NULL)
910 {
911 wxLogDebug(wxT("::SelectObject failed in wxDC::SetFont."));
912 }
913 if (!m_oldFont)
914 m_oldFont = (WXHFONT) f;
915 }
916 }
917
918 void wxDC::SetPen(const wxPen& pen)
919 {
920 // Set the old object temporarily, in case the assignment deletes an object
921 // that's not yet selected out.
922 if (m_oldPen)
923 {
924 ::SelectObject(GetHdc(), (HPEN) m_oldPen);
925 m_oldPen = 0;
926 }
927
928 m_pen = pen;
929
930 if (!m_pen.Ok())
931 {
932 if (m_oldPen)
933 ::SelectObject(GetHdc(), (HPEN) m_oldPen);
934 m_oldPen = 0;
935 }
936
937 if (m_pen.Ok())
938 {
939 if (m_pen.GetResourceHandle())
940 {
941 HPEN p = (HPEN) ::SelectObject(GetHdc(), (HPEN)m_pen.GetResourceHandle());
942 if (!m_oldPen)
943 m_oldPen = (WXHPEN) p;
944 }
945 }
946 }
947
948 void wxDC::SetBrush(const wxBrush& brush)
949 {
950 // Set the old object temporarily, in case the assignment deletes an object
951 // that's not yet selected out.
952 if (m_oldBrush)
953 {
954 ::SelectObject(GetHdc(), (HBRUSH) m_oldBrush);
955 m_oldBrush = 0;
956 }
957
958 m_brush = brush;
959
960 if (!m_brush.Ok())
961 {
962 if (m_oldBrush)
963 ::SelectObject(GetHdc(), (HBRUSH) m_oldBrush);
964 m_oldBrush = 0;
965 }
966
967 if (m_brush.Ok())
968 {
969 if (m_brush.GetResourceHandle())
970 {
971 HBRUSH b = 0;
972 b = (HBRUSH) ::SelectObject(GetHdc(), (HBRUSH)m_brush.GetResourceHandle());
973 if (!m_oldBrush)
974 m_oldBrush = (WXHBRUSH) b;
975 }
976 }
977 }
978
979 void wxDC::SetBackground(const wxBrush& brush)
980 {
981 m_backgroundBrush = brush;
982
983 if (!m_backgroundBrush.Ok())
984 return;
985
986 if (m_canvas)
987 {
988 bool customColours = TRUE;
989 // If we haven't specified wxUSER_COLOURS, don't allow the panel/dialog box to
990 // change background colours from the control-panel specified colours.
991 if (m_canvas->IsKindOf(CLASSINFO(wxWindow)) && ((m_canvas->GetWindowStyleFlag() & wxUSER_COLOURS) != wxUSER_COLOURS))
992 customColours = FALSE;
993
994 if (customColours)
995 {
996 if (m_backgroundBrush.GetStyle()==wxTRANSPARENT)
997 {
998 m_canvas->SetTransparent(TRUE);
999 }
1000 else
1001 {
1002 // New behaviour, 10/2/99: setting the background brush of a DC
1003 // doesn't affect the window background colour. However,
1004 // I'm leaving in the transparency setting because it's needed by
1005 // various controls (e.g. wxStaticText) to determine whether to draw
1006 // transparently or not. TODO: maybe this should be a new function
1007 // wxWindow::SetTransparency(). Should that apply to the child itself, or the
1008 // parent?
1009 // m_canvas->SetBackgroundColour(m_backgroundBrush.GetColour());
1010 m_canvas->SetTransparent(FALSE);
1011 }
1012 }
1013 }
1014 COLORREF new_color = m_backgroundBrush.GetColour().GetPixel();
1015 {
1016 (void)SetBkColor(GetHdc(), new_color);
1017 }
1018 }
1019
1020 void wxDC::SetBackgroundMode(int mode)
1021 {
1022 m_backgroundMode = mode;
1023
1024 // SetBackgroundColour now only refers to text background
1025 // and m_backgroundMode is used there
1026
1027 /*
1028 if (m_backgroundMode == wxTRANSPARENT)
1029 ::SetBkMode(GetHdc(), TRANSPARENT);
1030 else
1031 ::SetBkMode(GetHdc(), OPAQUE);
1032 */
1033 }
1034
1035 void wxDC::SetLogicalFunction(int function)
1036 {
1037 m_logicalFunction = function;
1038
1039 SetRop(m_hDC);
1040 }
1041
1042 void wxDC::SetRop(WXHDC dc)
1043 {
1044 if ( !dc || m_logicalFunction < 0 )
1045 return;
1046
1047 int rop;
1048
1049 switch (m_logicalFunction)
1050 {
1051 case wxXOR: rop = R2_XORPEN; break;
1052 case wxINVERT: rop = R2_NOT; break;
1053 case wxOR_REVERSE: rop = R2_MERGEPENNOT; break;
1054 case wxAND_REVERSE: rop = R2_MASKPENNOT; break;
1055 case wxCLEAR: rop = R2_WHITE; break;
1056 case wxSET: rop = R2_BLACK; break;
1057 case wxOR_INVERT: rop = R2_MERGENOTPEN; break;
1058 case wxAND: rop = R2_MASKPEN; break;
1059 case wxOR: rop = R2_MERGEPEN; break;
1060 case wxEQUIV: rop = R2_NOTXORPEN; break;
1061 case wxNAND: rop = R2_NOTMASKPEN; break;
1062 case wxAND_INVERT: rop = R2_MASKNOTPEN; break;
1063 case wxCOPY: rop = R2_COPYPEN; break;
1064 case wxNO_OP: rop = R2_NOP; break;
1065 case wxSRC_INVERT: rop = R2_NOTCOPYPEN; break;
1066 case wxNOR: rop = R2_NOTMERGEPEN; break;
1067 default:
1068 wxFAIL_MSG( wxT("unsupported logical function") );
1069 return;
1070 }
1071
1072 SetROP2(GetHdc(), rop);
1073 }
1074
1075 bool wxDC::StartDoc(const wxString& message)
1076 {
1077 // We might be previewing, so return TRUE to let it continue.
1078 return TRUE;
1079 }
1080
1081 void wxDC::EndDoc()
1082 {
1083 }
1084
1085 void wxDC::StartPage()
1086 {
1087 }
1088
1089 void wxDC::EndPage()
1090 {
1091 }
1092
1093 // ---------------------------------------------------------------------------
1094 // text metrics
1095 // ---------------------------------------------------------------------------
1096
1097 wxCoord wxDC::GetCharHeight() const
1098 {
1099 TEXTMETRIC lpTextMetric;
1100
1101 GetTextMetrics(GetHdc(), &lpTextMetric);
1102
1103 return YDEV2LOGREL(lpTextMetric.tmHeight);
1104 }
1105
1106 wxCoord wxDC::GetCharWidth() const
1107 {
1108 TEXTMETRIC lpTextMetric;
1109
1110 GetTextMetrics(GetHdc(), &lpTextMetric);
1111
1112 return XDEV2LOGREL(lpTextMetric.tmAveCharWidth);
1113 }
1114
1115 void wxDC::DoGetTextExtent(const wxString& string, wxCoord *x, wxCoord *y,
1116 wxCoord *descent, wxCoord *externalLeading,
1117 wxFont *theFont) const
1118 {
1119 wxFont *fontToUse = (wxFont*) theFont;
1120 if (!fontToUse)
1121 fontToUse = (wxFont*) &m_font;
1122
1123 SIZE sizeRect;
1124 TEXTMETRIC tm;
1125
1126 GetTextExtentPoint(GetHdc(), WXSTRINGCAST string, wxStrlen(WXSTRINGCAST string), &sizeRect);
1127 GetTextMetrics(GetHdc(), &tm);
1128
1129 if (x) *x = XDEV2LOGREL(sizeRect.cx);
1130 if (y) *y = YDEV2LOGREL(sizeRect.cy);
1131 if (descent) *descent = tm.tmDescent;
1132 if (externalLeading) *externalLeading = tm.tmExternalLeading;
1133 }
1134
1135 void wxDC::SetMapMode(int mode)
1136 {
1137 m_mappingMode = mode;
1138
1139 int pixel_width = 0;
1140 int pixel_height = 0;
1141 int mm_width = 0;
1142 int mm_height = 0;
1143
1144 pixel_width = GetDeviceCaps(GetHdc(), HORZRES);
1145 pixel_height = GetDeviceCaps(GetHdc(), VERTRES);
1146 mm_width = GetDeviceCaps(GetHdc(), HORZSIZE);
1147 mm_height = GetDeviceCaps(GetHdc(), VERTSIZE);
1148
1149 if ((pixel_width == 0) || (pixel_height == 0) || (mm_width == 0) || (mm_height == 0))
1150 {
1151 return;
1152 }
1153
1154 double mm2pixelsX = pixel_width/mm_width;
1155 double mm2pixelsY = pixel_height/mm_height;
1156
1157 switch (mode)
1158 {
1159 case wxMM_TWIPS:
1160 {
1161 m_logicalScaleX = (twips2mm * mm2pixelsX);
1162 m_logicalScaleY = (twips2mm * mm2pixelsY);
1163 break;
1164 }
1165 case wxMM_POINTS:
1166 {
1167 m_logicalScaleX = (pt2mm * mm2pixelsX);
1168 m_logicalScaleY = (pt2mm * mm2pixelsY);
1169 break;
1170 }
1171 case wxMM_METRIC:
1172 {
1173 m_logicalScaleX = mm2pixelsX;
1174 m_logicalScaleY = mm2pixelsY;
1175 break;
1176 }
1177 case wxMM_LOMETRIC:
1178 {
1179 m_logicalScaleX = (mm2pixelsX/10.0);
1180 m_logicalScaleY = (mm2pixelsY/10.0);
1181 break;
1182 }
1183 default:
1184 case wxMM_TEXT:
1185 {
1186 m_logicalScaleX = 1.0;
1187 m_logicalScaleY = 1.0;
1188 break;
1189 }
1190 }
1191
1192 if (::GetMapMode(GetHdc()) != MM_ANISOTROPIC)
1193 ::SetMapMode(GetHdc(), MM_ANISOTROPIC);
1194
1195 SetViewportExtEx(GetHdc(), VIEWPORT_EXTENT, VIEWPORT_EXTENT, NULL);
1196 m_windowExtX = (int)MS_XDEV2LOGREL(VIEWPORT_EXTENT);
1197 m_windowExtY = (int)MS_YDEV2LOGREL(VIEWPORT_EXTENT);
1198 ::SetWindowExtEx(GetHdc(), m_windowExtX, m_windowExtY, NULL);
1199 ::SetViewportOrgEx(GetHdc(), (int)m_deviceOriginX, (int)m_deviceOriginY, NULL);
1200 ::SetWindowOrgEx(GetHdc(), (int)m_logicalOriginX, (int)m_logicalOriginY, NULL);
1201 }
1202
1203 void wxDC::SetUserScale(double x, double y)
1204 {
1205 m_userScaleX = x;
1206 m_userScaleY = y;
1207
1208 SetMapMode(m_mappingMode);
1209 }
1210
1211 void wxDC::SetAxisOrientation(bool xLeftRight, bool yBottomUp)
1212 {
1213 m_signX = xLeftRight ? 1 : -1;
1214 m_signY = yBottomUp ? -1 : 1;
1215
1216 SetMapMode(m_mappingMode);
1217 }
1218
1219 void wxDC::SetSystemScale(double x, double y)
1220 {
1221 m_scaleX = x;
1222 m_scaleY = y;
1223
1224 SetMapMode(m_mappingMode);
1225 }
1226
1227 void wxDC::SetLogicalOrigin(wxCoord x, wxCoord y)
1228 {
1229 m_logicalOriginX = x;
1230 m_logicalOriginY = y;
1231
1232 ::SetWindowOrgEx(GetHdc(), (int)m_logicalOriginX, (int)m_logicalOriginY, NULL);
1233 }
1234
1235 void wxDC::SetDeviceOrigin(wxCoord x, wxCoord y)
1236 {
1237 m_deviceOriginX = x;
1238 m_deviceOriginY = y;
1239
1240 ::SetViewportOrgEx(GetHdc(), (int)m_deviceOriginX, (int)m_deviceOriginY, NULL);
1241 }
1242
1243 // ---------------------------------------------------------------------------
1244 // coordinates transformations
1245 // ---------------------------------------------------------------------------
1246
1247 wxCoord wxDCBase::DeviceToLogicalX(wxCoord x) const
1248 {
1249 return (wxCoord) (((x) - m_deviceOriginX)/(m_logicalScaleX*m_userScaleX*m_signX*m_scaleX) - m_logicalOriginX);
1250 }
1251
1252 wxCoord wxDCBase::DeviceToLogicalXRel(wxCoord x) const
1253 {
1254 return (wxCoord) ((x)/(m_logicalScaleX*m_userScaleX*m_signX*m_scaleX));
1255 }
1256
1257 wxCoord wxDCBase::DeviceToLogicalY(wxCoord y) const
1258 {
1259 return (wxCoord) (((y) - m_deviceOriginY)/(m_logicalScaleY*m_userScaleY*m_signY*m_scaleY) - m_logicalOriginY);
1260 }
1261
1262 wxCoord wxDCBase::DeviceToLogicalYRel(wxCoord y) const
1263 {
1264 return (wxCoord) ((y)/(m_logicalScaleY*m_userScaleY*m_signY*m_scaleY));
1265 }
1266
1267 wxCoord wxDCBase::LogicalToDeviceX(wxCoord x) const
1268 {
1269 return (wxCoord) ((x - m_logicalOriginX)*m_logicalScaleX*m_userScaleX*m_signX*m_scaleX + m_deviceOriginX);
1270 }
1271
1272 wxCoord wxDCBase::LogicalToDeviceXRel(wxCoord x) const
1273 {
1274 return (wxCoord) (x*m_logicalScaleX*m_userScaleX*m_signX*m_scaleX);
1275 }
1276
1277 wxCoord wxDCBase::LogicalToDeviceY(wxCoord y) const
1278 {
1279 return (wxCoord) ((y - m_logicalOriginY)*m_logicalScaleY*m_userScaleY*m_signY*m_scaleY + m_deviceOriginY);
1280 }
1281
1282 wxCoord wxDCBase::LogicalToDeviceYRel(wxCoord y) const
1283 {
1284 return (wxCoord) (y*m_logicalScaleY*m_userScaleY*m_signY*m_scaleY);
1285 }
1286
1287 // ---------------------------------------------------------------------------
1288 // bit blit
1289 // ---------------------------------------------------------------------------
1290
1291 bool wxDC::DoBlit(wxCoord xdest, wxCoord ydest,
1292 wxCoord width, wxCoord height,
1293 wxDC *source, wxCoord xsrc, wxCoord ysrc,
1294 int rop, bool useMask)
1295 {
1296 wxMask *mask = NULL;
1297 if ( useMask )
1298 {
1299 const wxBitmap& bmp = source->m_selectedBitmap;
1300 mask = bmp.GetMask();
1301
1302 if ( !(bmp.Ok() && mask && mask->GetMaskBitmap()) )
1303 {
1304 // don't give assert here because this would break existing
1305 // programs - just silently ignore useMask parameter
1306 useMask = FALSE;
1307 }
1308 }
1309
1310 COLORREF old_textground = ::GetTextColor(GetHdc());
1311 COLORREF old_background = ::GetBkColor(GetHdc());
1312 if (m_textForegroundColour.Ok())
1313 {
1314 ::SetTextColor(GetHdc(), m_textForegroundColour.GetPixel() );
1315 }
1316 if (m_textBackgroundColour.Ok())
1317 {
1318 ::SetBkColor(GetHdc(), m_textBackgroundColour.GetPixel() );
1319 }
1320
1321 DWORD dwRop = SRCCOPY;
1322 switch (rop)
1323 {
1324 case wxXOR: dwRop = SRCINVERT; break;
1325 case wxINVERT: dwRop = DSTINVERT; break;
1326 case wxOR_REVERSE: dwRop = 0x00DD0228; break;
1327 case wxAND_REVERSE: dwRop = SRCERASE; break;
1328 case wxCLEAR: dwRop = BLACKNESS; break;
1329 case wxSET: dwRop = WHITENESS; break;
1330 case wxOR_INVERT: dwRop = MERGEPAINT; break;
1331 case wxAND: dwRop = SRCAND; break;
1332 case wxOR: dwRop = SRCPAINT; break;
1333 case wxEQUIV: dwRop = 0x00990066; break;
1334 case wxNAND: dwRop = 0x007700E6; break;
1335 case wxAND_INVERT: dwRop = 0x00220326; break;
1336 case wxCOPY: dwRop = SRCCOPY; break;
1337 case wxNO_OP: dwRop = 0x00AA0029; break;
1338 case wxSRC_INVERT: dwRop = NOTSRCCOPY; break;
1339 case wxNOR: dwRop = NOTSRCCOPY; break;
1340 default:
1341 wxFAIL_MSG( wxT("unsupported logical function") );
1342 return FALSE;
1343 }
1344
1345 bool success;
1346
1347 if (useMask)
1348 {
1349 #ifdef __WIN32__
1350 // prepare the mask bitmap
1351 HBITMAP hbmpMask = wxInvertMask((HBITMAP)mask->GetMaskBitmap());
1352
1353 // select the correct brush: the current one by default, background one
1354 // if none
1355 HBRUSH hbrNew;
1356 if ( m_brush.Ok() )
1357 {
1358 hbrNew = (HBRUSH)m_brush.GetResourceHandle();
1359 }
1360 else if ( m_backgroundBrush.Ok() )
1361 {
1362 hbrNew = (HBRUSH)m_backgroundBrush.GetResourceHandle();
1363 }
1364 else
1365 {
1366 hbrNew = 0;
1367 }
1368
1369 HGDIOBJ hbrOld = hbrNew ? ::SelectObject(GetHdc(), hbrNew) : 0;
1370
1371 // we want the part of the image corresponding to the mask to be
1372 // transparent, i.e. do PATCOPY there and apply dwRop elsewhere
1373
1374 // GRG: PATCOPY is not transparent, as can be seen when blitting
1375 // over a pattern: the 'transparent' area would be filled
1376 // with the selected colour. We should use NOP instead, or
1377 // do MaskBlt + BitBlt.
1378 //
1379 success = ::MaskBlt(GetHdc(), xdest, ydest, width, height,
1380 GetHdcOf(*source), xsrc, ysrc,
1381 hbmpMask, 0, 0,
1382 MAKEROP4(0x00AA0029, dwRop)) != 0;
1383
1384 if ( hbrNew )
1385 {
1386 (void)::SelectObject(GetHdc(), hbrOld);
1387 }
1388
1389 ::DeleteObject(hbmpMask);
1390
1391 if ( !success )
1392 #endif // Win32
1393 {
1394 // Blit bitmap with mask
1395
1396 // create a temp buffer bitmap and DCs to access it and the mask
1397 HDC dc_mask = ::CreateCompatibleDC(GetHdcOf(*source));
1398 HDC dc_buffer = ::CreateCompatibleDC(GetHdc());
1399 HBITMAP buffer_bmap = ::CreateCompatibleBitmap(GetHdc(), width, height);
1400 ::SelectObject(dc_mask, (HBITMAP) mask->GetMaskBitmap());
1401 ::SelectObject(dc_buffer, buffer_bmap);
1402
1403 // copy dest to buffer
1404 if ( !::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
1405 GetHdc(), xdest, ydest, SRCCOPY) )
1406 {
1407 wxLogLastError("BitBlt");
1408 }
1409
1410 // copy src to buffer using selected raster op
1411 if ( !::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
1412 GetHdcOf(*source), xsrc, ysrc, dwRop) )
1413 {
1414 wxLogLastError("BitBlt");
1415 }
1416
1417 // set masked area in buffer to BLACK (pixel value 0)
1418 COLORREF prevBkCol = ::SetBkColor(GetHdc(), RGB(255, 255, 255));
1419 COLORREF prevCol = ::SetTextColor(GetHdc(), RGB(0, 0, 0));
1420 if ( !::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
1421 dc_mask, xsrc, ysrc, SRCAND) )
1422 {
1423 wxLogLastError("BitBlt");
1424 }
1425
1426 // set unmasked area in dest to BLACK
1427 ::SetBkColor(GetHdc(), RGB(0, 0, 0));
1428 ::SetTextColor(GetHdc(), RGB(255, 255, 255));
1429 if ( !::BitBlt(GetHdc(), xdest, ydest, (int)width, (int)height,
1430 dc_mask, xsrc, ysrc, SRCAND) )
1431 {
1432 wxLogLastError("BitBlt");
1433 }
1434 ::SetBkColor(GetHdc(), prevBkCol); // restore colours to original values
1435 ::SetTextColor(GetHdc(), prevCol);
1436
1437 // OR buffer to dest
1438 success = ::BitBlt(GetHdc(), xdest, ydest,
1439 (int)width, (int)height,
1440 dc_buffer, 0, 0, SRCPAINT) != 0;
1441 if ( !success )
1442 {
1443 wxLogLastError("BitBlt");
1444 }
1445
1446 // tidy up temporary DCs and bitmap
1447 ::SelectObject(dc_mask, 0);
1448 ::DeleteDC(dc_mask);
1449 ::SelectObject(dc_buffer, 0);
1450 ::DeleteDC(dc_buffer);
1451 ::DeleteObject(buffer_bmap);
1452 }
1453 }
1454 else // no mask, just BitBlt() it
1455 {
1456 success = ::BitBlt(GetHdc(), xdest, ydest,
1457 (int)width, (int)height,
1458 GetHdcOf(*source), xsrc, ysrc, dwRop) != 0;
1459 if ( !success )
1460 {
1461 wxLogLastError("BitBlt");
1462 }
1463 }
1464 ::SetTextColor(GetHdc(), old_textground);
1465 ::SetBkColor(GetHdc(), old_background);
1466
1467 return success;
1468 }
1469
1470 void wxDC::DoGetSize(int *w, int *h) const
1471 {
1472 if ( w ) *w = ::GetDeviceCaps(GetHdc(), HORZRES);
1473 if ( h ) *h = ::GetDeviceCaps(GetHdc(), VERTRES);
1474 }
1475
1476 void wxDC::DoGetSizeMM(int *w, int *h) const
1477 {
1478 if ( w ) *w = ::GetDeviceCaps(GetHdc(), HORZSIZE);
1479 if ( h ) *h = ::GetDeviceCaps(GetHdc(), VERTSIZE);
1480 }
1481
1482 wxSize wxDC::GetPPI() const
1483 {
1484 int x = ::GetDeviceCaps(GetHdc(), LOGPIXELSX);
1485 int y = ::GetDeviceCaps(GetHdc(), LOGPIXELSY);
1486
1487 return wxSize(x, y);
1488 }
1489
1490 // For use by wxWindows only, unless custom units are required.
1491 void wxDC::SetLogicalScale(double x, double y)
1492 {
1493 m_logicalScaleX = x;
1494 m_logicalScaleY = y;
1495 }
1496
1497 #if WXWIN_COMPATIBILITY
1498 void wxDC::DoGetTextExtent(const wxString& string, float *x, float *y,
1499 float *descent, float *externalLeading,
1500 wxFont *theFont, bool use16bit) const
1501 {
1502 wxCoord x1, y1, descent1, externalLeading1;
1503 GetTextExtent(string, & x1, & y1, & descent1, & externalLeading1, theFont, use16bit);
1504 *x = x1; *y = y1;
1505 if (descent)
1506 *descent = descent1;
1507 if (externalLeading)
1508 *externalLeading = externalLeading1;
1509 }
1510 #endif
1511
1512 // ---------------------------------------------------------------------------
1513 // spline drawing code
1514 // ---------------------------------------------------------------------------
1515
1516 #if wxUSE_SPLINES
1517
1518 class wxSpline: public wxObject
1519 {
1520 public:
1521 int type;
1522 wxList *points;
1523
1524 wxSpline(wxList *list);
1525 void DeletePoints();
1526
1527 // Doesn't delete points
1528 ~wxSpline();
1529 };
1530
1531 void wx_draw_open_spline(wxDC *dc, wxSpline *spline);
1532
1533 void wx_quadratic_spline(double a1, double b1, double a2, double b2,
1534 double a3, double b3, double a4, double b4);
1535 void wx_clear_stack();
1536 int wx_spline_pop(double *x1, double *y1, double *x2, double *y2, double *x3,
1537 double *y3, double *x4, double *y4);
1538 void wx_spline_push(double x1, double y1, double x2, double y2, double x3, double y3,
1539 double x4, double y4);
1540 static bool wx_spline_add_point(double x, double y);
1541 static void wx_spline_draw_point_array(wxDC *dc);
1542 wxSpline *wx_make_spline(int x1, int y1, int x2, int y2, int x3, int y3);
1543
1544 void wxDC::DoDrawSpline(wxList *list)
1545 {
1546 wxSpline spline(list);
1547
1548 wx_draw_open_spline(this, &spline);
1549 }
1550
1551 wxList wx_spline_point_list;
1552
1553 void wx_draw_open_spline(wxDC *dc, wxSpline *spline)
1554 {
1555 wxPoint *p;
1556 double cx1, cy1, cx2, cy2, cx3, cy3, cx4, cy4;
1557 double x1, y1, x2, y2;
1558
1559 wxNode *node = spline->points->First();
1560 p = (wxPoint *)node->Data();
1561
1562 x1 = p->x;
1563 y1 = p->y;
1564
1565 node = node->Next();
1566 p = (wxPoint *)node->Data();
1567
1568 x2 = p->x;
1569 y2 = p->y;
1570 cx1 = (double)((x1 + x2) / 2);
1571 cy1 = (double)((y1 + y2) / 2);
1572 cx2 = (double)((cx1 + x2) / 2);
1573 cy2 = (double)((cy1 + y2) / 2);
1574
1575 wx_spline_add_point(x1, y1);
1576
1577 while ((node = node->Next()) != NULL)
1578 {
1579 p = (wxPoint *)node->Data();
1580 x1 = x2;
1581 y1 = y2;
1582 x2 = p->x;
1583 y2 = p->y;
1584 cx4 = (double)(x1 + x2) / 2;
1585 cy4 = (double)(y1 + y2) / 2;
1586 cx3 = (double)(x1 + cx4) / 2;
1587 cy3 = (double)(y1 + cy4) / 2;
1588
1589 wx_quadratic_spline(cx1, cy1, cx2, cy2, cx3, cy3, cx4, cy4);
1590
1591 cx1 = cx4;
1592 cy1 = cy4;
1593 cx2 = (double)(cx1 + x2) / 2;
1594 cy2 = (double)(cy1 + y2) / 2;
1595 }
1596
1597 wx_spline_add_point((double)wx_round(cx1), (double)wx_round(cy1));
1598 wx_spline_add_point(x2, y2);
1599
1600 wx_spline_draw_point_array(dc);
1601
1602 }
1603
1604 /********************* CURVES FOR SPLINES *****************************
1605
1606 The following spline drawing routine is from
1607
1608 "An Algorithm for High-Speed Curve Generation"
1609 by George Merrill Chaikin,
1610 Computer Graphics and Image Processing, 3, Academic Press,
1611 1974, 346-349.
1612
1613 and
1614
1615 "On Chaikin's Algorithm" by R. F. Riesenfeld,
1616 Computer Graphics and Image Processing, 4, Academic Press,
1617 1975, 304-310.
1618
1619 ***********************************************************************/
1620
1621 #define half(z1, z2) ((z1+z2)/2.0)
1622 #define THRESHOLD 5
1623
1624 /* iterative version */
1625
1626 void wx_quadratic_spline(double a1, double b1, double a2, double b2, double a3, double b3, double a4,
1627 double b4)
1628 {
1629 register double xmid, ymid;
1630 double x1, y1, x2, y2, x3, y3, x4, y4;
1631
1632 wx_clear_stack();
1633 wx_spline_push(a1, b1, a2, b2, a3, b3, a4, b4);
1634
1635 while (wx_spline_pop(&x1, &y1, &x2, &y2, &x3, &y3, &x4, &y4)) {
1636 xmid = (double)half(x2, x3);
1637 ymid = (double)half(y2, y3);
1638 if (fabs(x1 - xmid) < THRESHOLD && fabs(y1 - ymid) < THRESHOLD &&
1639 fabs(xmid - x4) < THRESHOLD && fabs(ymid - y4) < THRESHOLD) {
1640 wx_spline_add_point((double)wx_round(x1), (double)wx_round(y1));
1641 wx_spline_add_point((double)wx_round(xmid), (double)wx_round(ymid));
1642 } else {
1643 wx_spline_push(xmid, ymid, (double)half(xmid, x3), (double)half(ymid, y3),
1644 (double)half(x3, x4), (double)half(y3, y4), x4, y4);
1645 wx_spline_push(x1, y1, (double)half(x1, x2), (double)half(y1, y2),
1646 (double)half(x2, xmid), (double)half(y2, ymid), xmid, ymid);
1647 }
1648 }
1649 }
1650
1651
1652 /* utilities used by spline drawing routines */
1653
1654
1655 typedef struct wx_spline_stack_struct {
1656 double x1, y1, x2, y2, x3, y3, x4, y4;
1657 }
1658 Stack;
1659
1660 #define SPLINE_STACK_DEPTH 20
1661 static Stack wx_spline_stack[SPLINE_STACK_DEPTH];
1662 static Stack *wx_stack_top;
1663 static int wx_stack_count;
1664
1665 void wx_clear_stack()
1666 {
1667 wx_stack_top = wx_spline_stack;
1668 wx_stack_count = 0;
1669 }
1670
1671 void wx_spline_push(double x1, double y1, double x2, double y2, double x3, double y3, double x4, double y4)
1672 {
1673 wx_stack_top->x1 = x1;
1674 wx_stack_top->y1 = y1;
1675 wx_stack_top->x2 = x2;
1676 wx_stack_top->y2 = y2;
1677 wx_stack_top->x3 = x3;
1678 wx_stack_top->y3 = y3;
1679 wx_stack_top->x4 = x4;
1680 wx_stack_top->y4 = y4;
1681 wx_stack_top++;
1682 wx_stack_count++;
1683 }
1684
1685 int wx_spline_pop(double *x1, double *y1, double *x2, double *y2,
1686 double *x3, double *y3, double *x4, double *y4)
1687 {
1688 if (wx_stack_count == 0)
1689 return (0);
1690 wx_stack_top--;
1691 wx_stack_count--;
1692 *x1 = wx_stack_top->x1;
1693 *y1 = wx_stack_top->y1;
1694 *x2 = wx_stack_top->x2;
1695 *y2 = wx_stack_top->y2;
1696 *x3 = wx_stack_top->x3;
1697 *y3 = wx_stack_top->y3;
1698 *x4 = wx_stack_top->x4;
1699 *y4 = wx_stack_top->y4;
1700 return (1);
1701 }
1702
1703 static bool wx_spline_add_point(double x, double y)
1704 {
1705 wxPoint *point = new wxPoint;
1706 point->x = (int) x;
1707 point->y = (int) y;
1708 wx_spline_point_list.Append((wxObject*)point);
1709 return TRUE;
1710 }
1711
1712 static void wx_spline_draw_point_array(wxDC *dc)
1713 {
1714 dc->DrawLines(&wx_spline_point_list, 0, 0);
1715 wxNode *node = wx_spline_point_list.First();
1716 while (node)
1717 {
1718 wxPoint *point = (wxPoint *)node->Data();
1719 delete point;
1720 delete node;
1721 node = wx_spline_point_list.First();
1722 }
1723 }
1724
1725 wxSpline::wxSpline(wxList *list)
1726 {
1727 points = list;
1728 }
1729
1730 wxSpline::~wxSpline()
1731 {
1732 }
1733
1734 void wxSpline::DeletePoints()
1735 {
1736 for(wxNode *node = points->First(); node; node = points->First())
1737 {
1738 wxPoint *point = (wxPoint *)node->Data();
1739 delete point;
1740 delete node;
1741 }
1742 delete points;
1743 }
1744
1745
1746 #endif // wxUSE_SPLINES
1747