]> git.saurik.com Git - wxWidgets.git/blame - src/msw/dc.cpp
Removed child frame CreateStatusBar from MDI sample; renamed config.h to confbase.h;
[wxWidgets.git] / src / msw / dc.cpp
CommitLineData
2bda0e17
KB
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#ifdef __GNUG__
13#pragma implementation "dc.h"
14#endif
15
16// For compilers that support precompilation, includes "wx.h".
17#include "wx/wxprec.h"
18
19#ifdef __BORLANDC__
20#pragma hdrstop
21#endif
22
23#ifndef WX_PRECOMP
24#include "wx/frame.h"
25#include "wx/dc.h"
26#include "wx/utils.h"
27#include "wx/dialog.h"
28#include "wx/app.h"
29#endif
30
31#include "wx/dcprint.h"
32#include "wx/msw/private.h"
33
34#include <string.h>
35#include <math.h>
36#include <fstream.h>
37
38#if USE_COMMON_DIALOGS
39#include <commdlg.h>
40#endif
41
42#ifndef __WIN32__
43#include <print.h>
44#endif
45
46#ifdef DrawText
47#undef DrawText
48#endif
49
50#ifdef GetCharWidth
51#undef GetCharWidth
52#endif
53
54#ifdef StartDoc
55#undef StartDoc
56#endif
57
58#if !USE_SHARED_LIBRARY
59IMPLEMENT_ABSTRACT_CLASS(wxDC, wxObject)
60#endif
61
62// Declarations local to this file
63
64#define YSCALE(y) (yorigin - (y))
65
66// #define wx_round(a) (int)((a)+.5)
67
68// Default constructor
69wxDC::wxDC(void)
70{
2bda0e17
KB
71 m_minX = 0; m_minY = 0; m_maxX = 0; m_maxY = 0;
72 m_clipping = FALSE;
2bda0e17
KB
73
74 m_filename = "";
2bda0e17 75 m_canvas = NULL;
2bda0e17
KB
76 m_oldBitmap = 0;
77 m_oldPen = 0;
78 m_oldBrush = 0;
79 m_oldFont = 0;
80 m_oldPalette = 0;
81 m_minX = 0; m_minY = 0; m_maxX = 0; m_maxY = 0;
2bda0e17
KB
82 m_logicalOriginX = 0;
83 m_logicalOriginY = 0;
84 m_deviceOriginX = 0;
85 m_deviceOriginY = 0;
86 m_logicalScaleX = 1.0;
87 m_logicalScaleY = 1.0;
88 m_userScaleX = 1.0;
89 m_userScaleY = 1.0;
6f65e337
JS
90 m_signX = 1;
91 m_signY = 1;
2bda0e17
KB
92 m_systemScaleX = 1.0;
93 m_systemScaleY = 1.0;
94 m_mappingMode = MM_TEXT;
2bda0e17
KB
95 m_bOwnsDC = FALSE;
96 m_hDC = 0;
97 m_clipping = FALSE;
98 m_ok = TRUE;
99 m_windowExtX = VIEWPORT_EXTENT;
100 m_windowExtY = VIEWPORT_EXTENT;
101 m_logicalFunction = -1;
102
103 m_backgroundBrush = *wxWHITE_BRUSH;
2bda0e17
KB
104
105 m_textForegroundColour = *wxBLACK;
106 m_textBackgroundColour = *wxWHITE;
107
108 m_colour = wxColourDisplay();
109
110 m_hDCCount = 0;
111}
112
113
114wxDC::~wxDC(void)
115{
116 if ( m_hDC != 0 ) {
117 SelectOldObjects(m_hDC);
118 if ( m_bOwnsDC ) {
119 if ( m_canvas == NULL )
120 ::DeleteDC((HDC)m_hDC);
121 else
122 ::ReleaseDC((HWND)m_canvas->GetHWND(), (HDC)m_hDC);
123 }
124 }
125
2bda0e17
KB
126}
127
128// This will select current objects out of the DC,
129// which is what you have to do before deleting the
130// DC.
131void wxDC::SelectOldObjects(WXHDC dc)
132{
b2aef89b 133#if WXDEBUG > 1
2bda0e17
KB
134 wxDebugMsg("wxDC::SelectOldObjects %X\n", this);
135#endif
136 if (dc)
137 {
138 if (m_oldBitmap)
139 {
b2aef89b 140#if WXDEBUG > 1
2bda0e17
KB
141 wxDebugMsg("wxDC::SelectOldObjects: Selecting old HBITMAP %X\n", m_oldBitmap);
142#endif
143 ::SelectObject((HDC) dc, (HBITMAP) m_oldBitmap);
144 if (m_selectedBitmap.Ok())
145 {
146 m_selectedBitmap.SetSelectedInto(NULL);
147 }
148 }
149 m_oldBitmap = 0 ;
150 if (m_oldPen)
151 {
b2aef89b 152#if WXDEBUG > 1
2bda0e17
KB
153 wxDebugMsg("wxDC::SelectOldObjects: Selecting old HPEN %X\n", m_oldPen);
154#endif
155 ::SelectObject((HDC) dc, (HPEN) m_oldPen);
156 }
157 m_oldPen = 0 ;
158 if (m_oldBrush)
159 {
b2aef89b 160#if WXDEBUG > 1
2bda0e17
KB
161 wxDebugMsg("wxDC::SelectOldObjects: Selecting old HBRUSH %X\n", m_oldBrush);
162#endif
163 ::SelectObject((HDC) dc, (HBRUSH) m_oldBrush);
164 }
165 m_oldBrush = 0 ;
166 if (m_oldFont)
167 {
b2aef89b 168#if WXDEBUG > 1
2bda0e17
KB
169 wxDebugMsg("wxDC::SelectOldObjects: Selecting old HFONT %X\n", m_oldFont);
170#endif
171 ::SelectObject((HDC) dc, (HFONT) m_oldFont);
172 }
173 m_oldFont = 0 ;
174 if (m_oldPalette)
175 {
b2aef89b 176#if WXDEBUG > 1
2bda0e17
KB
177 wxDebugMsg("wxDC::SelectOldObjects: Selecting old HPALETTE %X\n", m_oldPalette);
178#endif
179 ::SelectPalette((HDC) dc, (HPALETTE) m_oldPalette, TRUE);
180 }
b2aef89b 181#if WXDEBUG > 1
2bda0e17
KB
182 wxDebugMsg("wxDC::SelectOldObjects: Done.\n");
183#endif
184 m_oldPalette = 0 ;
185 }
2bda0e17
KB
186
187 m_brush = wxNullBrush ;
188 m_pen = wxNullPen;
189 m_palette = wxNullPalette;
190 m_font = wxNullFont;
191 m_backgroundBrush = wxNullBrush;
192 m_selectedBitmap = wxNullBitmap;
193}
194
195void wxDC::SetClippingRegion(long cx, long cy, long cw, long ch)
196{
197 m_clipping = TRUE;
198 m_clipX1 = (int)cx;
199 m_clipY1 = (int)cy;
200 m_clipX2 = (int)(cx + cw);
201 m_clipY2 = (int)(cy + ch);
202
2bda0e17 203 DoClipping((WXHDC) m_hDC);
2bda0e17
KB
204}
205
206void wxDC::DoClipping(WXHDC dc)
207{
208 if (m_clipping && dc)
209 {
210 IntersectClipRect((HDC) dc, XLOG2DEV(m_clipX1), YLOG2DEV(m_clipY1),
211 XLOG2DEV(m_clipX2), YLOG2DEV(m_clipY2));
2bda0e17
KB
212 }
213}
214
215void wxDC::DestroyClippingRegion(void)
216{
2bda0e17
KB
217 if (m_clipping && m_hDC)
218 {
2bda0e17 219 HRGN rgn = CreateRectRgn(0, 0, 32000, 32000);
b2aef89b 220#if WXDEBUG > 1
2bda0e17
KB
221 wxDebugMsg("wxDC::DestroyClippingRegion: Selecting HRGN %X\n", rgn);
222#endif
223 SelectClipRgn((HDC) m_hDC, rgn);
b2aef89b 224#if WXDEBUG > 1
2bda0e17
KB
225 wxDebugMsg("wxDC::DestroyClippingRegion: Deleting HRGN %X\n", rgn);
226#endif
227 DeleteObject(rgn);
228 }
229 m_clipping = FALSE;
2bda0e17
KB
230}
231
232bool wxDC::CanDrawBitmap(void) const
233{
234 return TRUE;
235}
236
237bool wxDC::CanGetTextExtent(void) const
238{
239 // What sort of display is it?
240 int technology = ::GetDeviceCaps((HDC) m_hDC, TECHNOLOGY);
241
242 bool ok;
243
244 if (technology != DT_RASDISPLAY && technology != DT_RASPRINTER)
245 ok = FALSE;
246 else ok = TRUE;
247
248 return ok;
249}
250
251void wxDC::SetPalette(const wxPalette& palette)
252{
dabeb021
JS
253 // Set the old object temporarily, in case the assignment deletes an object
254 // that's not yet selected out.
255 if (m_oldPalette)
256 {
257 ::SelectPalette((HDC) m_hDC, (HPALETTE) m_oldPalette, TRUE);
258 m_oldPalette = 0;
259 }
2bda0e17
KB
260
261 m_palette = m_palette;
262
263 if (!m_palette.Ok())
264 {
265 // Setting a NULL colourmap is a way of restoring
266 // the original colourmap
267 if (m_oldPalette)
268 {
269 ::SelectPalette((HDC) m_hDC, (HPALETTE) m_oldPalette, TRUE);
b2aef89b 270#if WXDEBUG > 1
2bda0e17
KB
271 wxDebugMsg("wxDC::SetPalette: set old palette %X\n", m_oldPalette);
272#endif
273 m_oldPalette = 0;
274 }
275
276 return;
277 }
278
279 if (m_palette.Ok() && m_palette.GetHPALETTE())
280 {
281 HPALETTE oldPal = ::SelectPalette((HDC) m_hDC, (HPALETTE) m_palette.GetHPALETTE(), TRUE);
282 if (!m_oldPalette)
283 m_oldPalette = (WXHPALETTE) oldPal;
284
b2aef89b 285#if WXDEBUG > 1
2bda0e17
KB
286 wxDebugMsg("wxDC::SetPalette %X: selected palette %X\n", this, m_palette.GetHPALETTE());
287 if (oldPal)
288 wxDebugMsg("wxDC::SetPalette: oldPal was palette %X\n", oldPal);
289 if (m_oldPalette)
290 wxDebugMsg("wxDC::SetPalette: m_oldPalette is palette %X\n", m_oldPalette);
291#endif
292 ::RealizePalette((HDC) m_hDC);
293 }
2bda0e17
KB
294}
295
296void wxDC::Clear(void)
297{
2bda0e17
KB
298 RECT rect;
299 if (m_canvas)
300 GetClientRect((HWND) m_canvas->GetHWND(), &rect);
301 else if (m_selectedBitmap.Ok())
302 {
303 rect.left = 0; rect.top = 0;
304 rect.right = m_selectedBitmap.GetWidth();
305 rect.bottom = m_selectedBitmap.GetHeight();
306 }
307 (void) ::SetMapMode((HDC) m_hDC, MM_TEXT);
308
309 DWORD colour = GetBkColor((HDC) m_hDC);
310 HBRUSH brush = CreateSolidBrush(colour);
311 FillRect((HDC) m_hDC, &rect, brush);
312 DeleteObject(brush);
313
314 ::SetMapMode((HDC) m_hDC, MM_ANISOTROPIC);
315 ::SetViewportExtEx((HDC) m_hDC, VIEWPORT_EXTENT, VIEWPORT_EXTENT, NULL);
316 ::SetWindowExtEx((HDC) m_hDC, m_windowExtX, m_windowExtY, NULL);
317 ::SetViewportOrgEx((HDC) m_hDC, (int)m_deviceOriginX, (int)m_deviceOriginY, NULL);
318 ::SetWindowOrgEx((HDC) m_hDC, (int)m_logicalOriginX, (int)m_logicalOriginY, NULL);
2bda0e17
KB
319}
320
6a6c0a8b 321void wxDC::FloodFill(long x, long y, const wxColour& col, int style)
2bda0e17 322{
2bda0e17 323 (void)ExtFloodFill((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y),
6a6c0a8b 324 col.GetPixel(),
2bda0e17
KB
325 style==wxFLOOD_SURFACE?
326 FLOODFILLSURFACE:FLOODFILLBORDER
327 );
328
2bda0e17
KB
329 CalcBoundingBox(x, y);
330}
331
332bool wxDC::GetPixel(long x, long y, wxColour *col) const
333{
334 // added by steve 29.12.94 (copied from DrawPoint)
335 // returns TRUE for pixels in the color of the current pen
336 // and FALSE for all other pixels colors
337 // if col is non-NULL return the color of the pixel
2bda0e17
KB
338
339 // get the color of the pixel
340 COLORREF pixelcolor = ::GetPixel((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y));
341 // get the color of the pen
342 COLORREF pencolor = 0x00ffffff;
343 if (m_pen.Ok())
344 {
345 pencolor = m_pen.GetColour().GetPixel() ;
346 }
347
348 // return the color of the pixel
349 if(col)
350 col->Set(GetRValue(pixelcolor),GetGValue(pixelcolor),GetBValue(pixelcolor));
351
352 // check, if color of the pixels is the same as the color
353 // of the current pen
354 return(pixelcolor==pencolor);
355}
356
357void wxDC::CrossHair(long x, long y)
358{
2bda0e17
KB
359 // We suppose that our screen is 2000x2000 max.
360 long x1 = x-2000;
361 long y1 = y-2000;
362 long x2 = x+2000;
363 long y2 = y+2000;
2bda0e17 364
2bda0e17
KB
365 (void)MoveToEx((HDC) m_hDC, XLOG2DEV(x1), YLOG2DEV(y), NULL);
366 (void)LineTo((HDC) m_hDC, XLOG2DEV(x2), YLOG2DEV(y));
367
368 (void)MoveToEx((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y1), NULL);
369 (void)LineTo((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y2));
370
2bda0e17
KB
371 CalcBoundingBox(x1, y1);
372 CalcBoundingBox(x2, y2);
373}
374
375void wxDC::DrawLine(long x1, long y1, long x2, long y2)
376{
2bda0e17
KB
377 (void)MoveToEx((HDC) m_hDC, XLOG2DEV(x1), YLOG2DEV(y1), NULL);
378 (void)LineTo((HDC) m_hDC, XLOG2DEV(x2), YLOG2DEV(y2));
379
380 /* MATTHEW: [6] New normalization */
381#if WX_STANDARD_GRAPHICS
382 (void)LineTo((HDC) m_hDC, XLOG2DEV(x2) + 1, YLOG2DEV(y2));
383#endif
384
2bda0e17
KB
385 CalcBoundingBox(x1, y1);
386 CalcBoundingBox(x2, y2);
387}
388
34138703 389void wxDC::DrawArc(long x1,long y1,long x2,long y2, long xc, long yc)
2bda0e17 390{
2bda0e17
KB
391 double dx = xc-x1 ;
392 double dy = yc-y1 ;
393 double radius = (double)sqrt(dx*dx+dy*dy) ;;
394 if (x1==x2 && x2==y2)
395 {
396 DrawEllipse(xc,yc,(double)(radius*2.0),(double)(radius*2)) ;
397 return ;
398 }
399
2bda0e17
KB
400 long xx1 = XLOG2DEV(x1) ;
401 long yy1 = YLOG2DEV(y1) ;
402 long xx2 = XLOG2DEV(x2) ;
403 long yy2 = YLOG2DEV(y2) ;
404 long xxc = XLOG2DEV(xc) ;
405 long yyc = YLOG2DEV(yc) ;
406 long ray = (long) sqrt(double((xxc-xx1)*(xxc-xx1)+(yyc-yy1)*(yyc-yy1))) ;
407
408 (void)MoveToEx((HDC) m_hDC, (int) xx1, (int) yy1, NULL);
409 long xxx1 = (long) (xxc-ray);
410 long yyy1 = (long) (yyc-ray);
411 long xxx2 = (long) (xxc+ray);
412 long yyy2 = (long) (yyc+ray);
413 if (m_brush.Ok() && m_brush.GetStyle() !=wxTRANSPARENT)
414 {
4c444f19
JS
415 // Have to add 1 to bottom-right corner of rectangle
416 // to make semi-circles look right (crooked line otherwise).
417 // Unfortunately this is not a reliable method, depends
418 // on the size of shape.
419 // TODO: figure out why this happens!
420 Pie((HDC) m_hDC,xxx1,yyy1,xxx2+1,yyy2+1,
2bda0e17
KB
421 xx1,yy1,xx2,yy2) ;
422 }
423 else
424 Arc((HDC) m_hDC,xxx1,yyy1,xxx2,yyy2,
425 xx1,yy1,xx2,yy2) ;
426
2bda0e17
KB
427 CalcBoundingBox((xc-radius), (yc-radius));
428 CalcBoundingBox((xc+radius), (yc+radius));
429}
430
2bda0e17
KB
431void wxDC::DrawPoint(long x, long y)
432{
2bda0e17
KB
433 COLORREF color = 0x00ffffff;
434 if (m_pen.Ok())
435 {
2bda0e17
KB
436 color = m_pen.GetColour().GetPixel() ;
437 }
438
2bda0e17
KB
439 SetPixel((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y), color);
440
2bda0e17
KB
441 CalcBoundingBox(x, y);
442}
443
444void wxDC::DrawPolygon(int n, wxPoint points[], long xoffset, long yoffset,int fillStyle)
445{
6a6c0a8b
JS
446 // Do things less efficiently if we have offsets
447 if (xoffset != 0 || yoffset != 0)
2bda0e17 448 {
6a6c0a8b
JS
449 POINT *cpoints = new POINT[n];
450 int i;
451 for (i = 0; i < n; i++)
452 {
453 cpoints[i].x = (int)(points[i].x + xoffset);
454 cpoints[i].y = (int)(points[i].y + yoffset);
2bda0e17 455
6a6c0a8b
JS
456 CalcBoundingBox(cpoints[i].x, cpoints[i].y);
457 }
458 int prev = SetPolyFillMode((HDC) m_hDC,fillStyle==wxODDEVEN_RULE?ALTERNATE:WINDING) ;
459 (void)Polygon((HDC) m_hDC, cpoints, n);
460 SetPolyFillMode((HDC) m_hDC,prev) ;
461 delete[] cpoints;
2bda0e17 462 }
6a6c0a8b
JS
463 else
464 {
465 int i;
466 for (i = 0; i < n; i++)
467 CalcBoundingBox(points[i].x, points[i].y);
2bda0e17 468
6a6c0a8b
JS
469 int prev = SetPolyFillMode((HDC) m_hDC,fillStyle==wxODDEVEN_RULE?ALTERNATE:WINDING) ;
470 (void)Polygon((HDC) m_hDC, (POINT*) points, n);
471 SetPolyFillMode((HDC) m_hDC,prev) ;
472 }
2bda0e17
KB
473}
474
475void wxDC::DrawLines(int n, wxPoint points[], long xoffset, long yoffset)
476{
6a6c0a8b
JS
477 // Do things less efficiently if we have offsets
478 if (xoffset != 0 || yoffset != 0)
2bda0e17 479 {
6a6c0a8b
JS
480 POINT *cpoints = new POINT[n];
481 int i;
482 for (i = 0; i < n; i++)
483 {
484 cpoints[i].x = (int)(points[i].x + xoffset);
485 cpoints[i].y = (int)(points[i].y + yoffset);
2bda0e17 486
6a6c0a8b
JS
487 CalcBoundingBox(cpoints[i].x, cpoints[i].y);
488 }
489 (void)Polyline((HDC) m_hDC, cpoints, n);
490 delete[] cpoints;
2bda0e17 491 }
6a6c0a8b
JS
492 else
493 {
494 int i;
495 for (i = 0; i < n; i++)
496 CalcBoundingBox(points[i].x, points[i].y);
2bda0e17 497
6a6c0a8b
JS
498 (void)Polyline((HDC) m_hDC, (POINT*) points, n);
499 }
2bda0e17
KB
500}
501
502void wxDC::DrawRectangle(long x, long y, long width, long height)
503{
2bda0e17
KB
504 long x2 = x + width;
505 long y2 = y + height;
506
2bda0e17
KB
507/* MATTHEW: [6] new normalization */
508#if WX_STANDARD_GRAPHICS
509 bool do_brush, do_pen;
510
511 do_brush = m_brush.Ok() && m_brush.GetStyle() != wxTRANSPARENT;
512 do_pen = m_pen.Ok() && m_pen.GetStyle() != wxTRANSPARENT;
513
514 if (do_brush) {
515 HPEN orig_pen = NULL;
516
517 if (do_pen || !m_pen.Ok())
8b9518ee 518 orig_pen = (HPEN) ::SelectObject((HDC) m_hDC, (HPEN) ::GetStockObject(NULL_PEN));
2bda0e17
KB
519
520 (void)Rectangle((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y),
521 XLOG2DEV(x2) + 1, YLOG2DEV(y2) + 1);
522
523 if (do_pen || !m_pen.Ok())
524 ::SelectObject((HDC) m_hDC , orig_pen);
525 }
526 if (do_pen) {
527 HBRUSH orig_brush = NULL;
528
529 if (do_brush || !m_brush.Ok())
8b9518ee 530 orig_brush = (HBRUSH) ::SelectObject((HDC) m_hDC, (HBRUSH) ::GetStockObject(NULL_BRUSH));
2bda0e17
KB
531
532 (void)Rectangle((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y),
533 XLOG2DEV(x2), YLOG2DEV(y2));
534
535 if (do_brush || !m_brush.Ok())
536 ::SelectObject((HDC) m_hDC, orig_brush);
537 }
538#else
539 (void)Rectangle((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2));
540#endif
541
542 CalcBoundingBox(x, y);
543 CalcBoundingBox(x2, y2);
2bda0e17
KB
544}
545
546void wxDC::DrawRoundedRectangle(long x, long y, long width, long height, double radius)
547{
2bda0e17
KB
548 // Now, a negative radius value is interpreted to mean
549 // 'the proportion of the smallest X or Y dimension'
550
551 if (radius < 0.0)
552 {
553 double smallest = 0.0;
554 if (width < height)
555 smallest = width;
556 else
557 smallest = height;
558 radius = (- radius * smallest);
559 }
560
2bda0e17
KB
561 long x2 = (x+width);
562 long y2 = (y+height);
563
2bda0e17
KB
564 (void)RoundRect((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2),
565 YLOG2DEV(y2), 2*XLOG2DEV(radius), 2*YLOG2DEV(radius));
566
567 CalcBoundingBox(x, y);
568 CalcBoundingBox(x2, y2);
2bda0e17
KB
569}
570
571void wxDC::DrawEllipse(long x, long y, long width, long height)
572{
2bda0e17
KB
573 long x2 = (x+width);
574 long y2 = (y+height);
575
2bda0e17
KB
576 (void)Ellipse((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2));
577
2bda0e17
KB
578 CalcBoundingBox(x, y);
579 CalcBoundingBox(x2, y2);
580}
581
6f65e337
JS
582// Chris Breeze 20/5/98: first implementation of DrawEllipticArc on Windows
583void wxDC::DrawEllipticArc(long x,long y,long w,long h,double sa,double ea)
584{
6f65e337
JS
585 long x2 = (x+w);
586 long y2 = (y+h);
587
6f65e337
JS
588 const double deg2rad = 3.14159265359 / 180.0;
589 int rx1 = XLOG2DEV(x+w/2);
590 int ry1 = YLOG2DEV(y+h/2);
591 int rx2 = rx1;
592 int ry2 = ry1;
593 rx1 += (int)(100.0 * abs(w) * cos(sa * deg2rad));
594 ry1 -= (int)(100.0 * abs(h) * m_signY * sin(sa * deg2rad));
595 rx2 += (int)(100.0 * abs(w) * cos(ea * deg2rad));
596 ry2 -= (int)(100.0 * abs(h) * m_signY * sin(ea * deg2rad));
597
598 // draw pie with NULL_PEN first and then outline otherwise a line is
599 // drawn from the start and end points to the centre
8b9518ee 600 HPEN orig_pen = (HPEN) ::SelectObject((HDC) m_hDC, (HPEN) ::GetStockObject(NULL_PEN));
6f65e337
JS
601 if (m_signY > 0)
602 {
603 (void)Pie((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2)+1, YLOG2DEV(y2)+1,
604 rx1, ry1, rx2, ry2);
605 }
606 else
607 {
608 (void)Pie((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y)-1, XLOG2DEV(x2)+1, YLOG2DEV(y2),
609 rx1, ry1-1, rx2, ry2-1);
610 }
611 ::SelectObject((HDC) m_hDC, orig_pen);
612 (void)Arc((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2),
613 rx1, ry1, rx2, ry2);
614
6f65e337
JS
615 CalcBoundingBox(x, y);
616 CalcBoundingBox(x2, y2);
617}
618
2bda0e17
KB
619void wxDC::DrawIcon(const wxIcon& icon, long x, long y)
620{
2bda0e17
KB
621 ::DrawIcon((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y), (HICON) icon.GetHICON());
622 CalcBoundingBox(x, y);
623 CalcBoundingBox(x+icon.GetWidth(), y+icon.GetHeight());
2bda0e17
KB
624}
625
626void wxDC::SetFont(const wxFont& the_font)
627{
dabeb021
JS
628 // Set the old object temporarily, in case the assignment deletes an object
629 // that's not yet selected out.
630 if (m_oldFont)
631 {
632 ::SelectObject((HDC) m_hDC, (HFONT) m_oldFont);
633 m_oldFont = 0;
634 }
2bda0e17
KB
635
636 m_font = the_font;
637
638 if (!the_font.Ok())
639 {
640 if (m_oldFont)
641 ::SelectObject((HDC) m_hDC, (HFONT) m_oldFont);
642 m_oldFont = 0 ;
643 }
644
645 if (m_font.Ok() && m_font.GetResourceHandle())
646 {
b2aef89b 647#if WXDEBUG > 1
2bda0e17
KB
648 wxDebugMsg("wxDC::SetFont: Selecting HFONT %X\n", m_font.GetResourceHandle());
649#endif
650 HFONT f = (HFONT) ::SelectObject((HDC) m_hDC, (HFONT) m_font.GetResourceHandle());
651 if (!m_oldFont)
652 m_oldFont = (WXHFONT) f;
653 }
2bda0e17
KB
654}
655
656void wxDC::SetPen(const wxPen& pen)
657{
dabeb021
JS
658 // Set the old object temporarily, in case the assignment deletes an object
659 // that's not yet selected out.
660 if (m_oldPen)
661 {
662 ::SelectObject((HDC) m_hDC, (HPEN) m_oldPen);
663 m_oldPen = 0;
664 }
2bda0e17
KB
665
666 m_pen = pen;
667
668 if (!m_pen.Ok())
669 {
670 if (m_oldPen)
671 ::SelectObject((HDC) m_hDC, (HPEN) m_oldPen);
672 m_oldPen = 0 ;
673 }
674
675 if (m_pen.Ok())
676 {
2bda0e17
KB
677 if (m_pen.GetResourceHandle())
678 {
679 HPEN p = (HPEN) ::SelectObject((HDC) m_hDC, (HPEN)m_pen.GetResourceHandle()) ;
680 if (!m_oldPen)
681 m_oldPen = (WXHPEN) p;
682 }
683 }
2bda0e17
KB
684}
685
686void wxDC::SetBrush(const wxBrush& brush)
687{
dabeb021
JS
688 // Set the old object temporarily, in case the assignment deletes an object
689 // that's not yet selected out.
690 if (m_oldBrush)
691 {
692 ::SelectObject((HDC) m_hDC, (HBRUSH) m_oldBrush);
693 m_oldBrush = 0;
694 }
2bda0e17
KB
695
696 m_brush = brush;
697
698 if (!m_brush.Ok())
699 {
700 if (m_oldBrush)
701 ::SelectObject((HDC) m_hDC, (HBRUSH) m_oldBrush);
702 m_oldBrush = 0 ;
703 }
704
705 if (m_brush.Ok())
706 {
2bda0e17
KB
707 if (m_brush.GetResourceHandle())
708 {
709 HBRUSH b = 0;
8b9518ee 710 b = (HBRUSH) ::SelectObject((HDC) m_hDC, (HBRUSH)m_brush.GetResourceHandle()) ;
2bda0e17
KB
711 if (!m_oldBrush)
712 m_oldBrush = (WXHBRUSH) b;
713 }
714 }
2bda0e17
KB
715}
716
717void wxDC::DrawText(const wxString& text, long x, long y, bool use16bit)
718{
2bda0e17
KB
719 if (m_font.Ok() && m_font.GetResourceHandle())
720 {
b2aef89b 721#if WXDEBUG > 1
2bda0e17
KB
722 wxDebugMsg("wxDC::DrawText: Selecting HFONT %X\n", m_font.GetResourceHandle());
723#endif
8b9518ee 724 HFONT f = (HFONT) ::SelectObject((HDC) m_hDC, (HFONT) m_font.GetResourceHandle());
2bda0e17
KB
725 if (!m_oldFont)
726 m_oldFont = (WXHFONT) f;
727 }
728
729 if (m_textForegroundColour.Ok())
730 SetTextColor((HDC) m_hDC, m_textForegroundColour.GetPixel() ) ;
731
732 DWORD old_background;
733 if (m_textBackgroundColour.Ok())
734 {
735 old_background = SetBkColor((HDC) m_hDC, m_textBackgroundColour.GetPixel() ) ;
736 }
737
738 if (m_backgroundMode == wxTRANSPARENT)
739 SetBkMode((HDC) m_hDC, TRANSPARENT);
740 else
741 SetBkMode((HDC) m_hDC, OPAQUE);
742
743 (void)TextOut((HDC) m_hDC, XLOG2DEV(x), YLOG2DEV(y), (char *) (const char *)text, strlen((const char *)text));
744
745 if (m_textBackgroundColour.Ok())
746 (void)SetBkColor((HDC) m_hDC, old_background);
747
748 CalcBoundingBox(x, y);
749
750 long w, h;
751 GetTextExtent(text, &w, &h);
752 CalcBoundingBox((x + w), (y + h));
2bda0e17
KB
753}
754
755void wxDC::SetBackground(const wxBrush& brush)
756{
2bda0e17
KB
757 m_backgroundBrush = brush;
758
759 if (!m_backgroundBrush.Ok())
760 return;
761
2bda0e17
KB
762 if (m_canvas)
763 {
764 bool customColours = TRUE;
765 // If we haven't specified wxUSER_COLOURS, don't allow the panel/dialog box to
766 // change background colours from the control-panel specified colours.
767 if (m_canvas->IsKindOf(CLASSINFO(wxWindow)) && ((m_canvas->GetWindowStyleFlag() & wxUSER_COLOURS) != wxUSER_COLOURS))
768 customColours = FALSE;
769
770 if (customColours)
771 {
2bda0e17
KB
772 if (m_backgroundBrush.GetStyle()==wxTRANSPARENT)
773 {
774 m_canvas->m_backgroundTransparent = TRUE;
775 }
776 else
777 {
778 m_canvas->SetBackgroundColour(m_backgroundBrush.GetColour());
779 m_canvas->m_backgroundTransparent = FALSE;
780 }
781 }
782 }
2bda0e17
KB
783 COLORREF new_color = m_backgroundBrush.GetColour().GetPixel() ;
784 {
785 (void)SetBkColor((HDC) m_hDC, new_color);
786 }
2bda0e17
KB
787}
788
789void wxDC::SetBackgroundMode(int mode)
790{
791 m_backgroundMode = mode;
792
2bda0e17
KB
793 if (m_backgroundMode == wxTRANSPARENT)
794 ::SetBkMode((HDC) m_hDC, TRANSPARENT);
795 else
796 ::SetBkMode((HDC) m_hDC, OPAQUE);
2bda0e17
KB
797}
798
799void wxDC::SetLogicalFunction(int function)
800{
801 m_logicalFunction = function;
802
2bda0e17 803 SetRop((WXHDC) m_hDC);
2bda0e17
KB
804}
805
806void wxDC::SetRop(WXHDC dc)
807{
808 if (!dc || m_logicalFunction < 0)
809 return;
810
811 int c_rop;
812 // These may be wrong
813 switch (m_logicalFunction)
814 {
815// case wxXOR: c_rop = R2_XORPEN; break;
816 case wxXOR: c_rop = R2_NOTXORPEN; break;
817 case wxINVERT: c_rop = R2_NOT; break;
818 case wxOR_REVERSE: c_rop = R2_MERGEPENNOT; break;
819 case wxAND_REVERSE: c_rop = R2_MASKPENNOT; break;
820 case wxCLEAR: c_rop = R2_WHITE; break;
821 case wxSET: c_rop = R2_BLACK; break;
822 case wxSRC_INVERT: c_rop = R2_NOTCOPYPEN; break;
823 case wxOR_INVERT: c_rop = R2_MERGENOTPEN; break;
824 case wxAND: c_rop = R2_MASKPEN; break;
825 case wxOR: c_rop = R2_MERGEPEN; break;
826 case wxAND_INVERT: c_rop = R2_MASKNOTPEN; break;
827 case wxEQUIV:
828 case wxNAND:
829 case wxCOPY:
830 default:
831 c_rop = R2_COPYPEN; break;
832 }
833 SetROP2((HDC) dc, c_rop);
834}
835
836bool wxDC::StartDoc(const wxString& message)
837{
838 if (!this->IsKindOf(CLASSINFO(wxPrinterDC)))
839 return TRUE;
840
841 bool flag = FALSE;
842
843 DOCINFO docinfo;
844 docinfo.cbSize = sizeof(DOCINFO);
845 docinfo.lpszDocName = (const char *)message;
846 docinfo.lpszOutput = (const char *)m_filename;
847#if defined(__WIN95__)
848 docinfo.lpszDatatype = NULL;
849 docinfo.fwType = 0;
850#endif
851
852 if (m_hDC) flag = (SP_ERROR !=
853#ifndef __WIN32__
854 ::StartDoc((HDC) m_hDC, &docinfo));
855#else
856#ifdef UNICODE
857 ::StartDocW((HDC) m_hDC, &docinfo));
858#else
859 ::StartDocA((HDC) m_hDC, &docinfo));
860#endif
861#endif
862
863 else flag = FALSE;
864
865 return flag;
866}
867
868void wxDC::EndDoc(void)
869{
870 if (!this->IsKindOf(CLASSINFO(wxPrinterDC)))
871 return;
872 if (m_hDC) ::EndDoc((HDC) m_hDC);
873}
874
875void wxDC::StartPage(void)
876{
877 if (!this->IsKindOf(CLASSINFO(wxPrinterDC)))
878 return;
879 if (m_hDC)
880 ::StartPage((HDC) m_hDC);
881}
882
883void wxDC::EndPage(void)
884{
885 if (!this->IsKindOf(CLASSINFO(wxPrinterDC)))
886 return;
887 if (m_hDC)
888 ::EndPage((HDC) m_hDC);
889}
890
891long wxDC::GetCharHeight(void) const
892{
893 TEXTMETRIC lpTextMetric;
894
895 GetTextMetrics((HDC) m_hDC, &lpTextMetric);
896
897 return YDEV2LOGREL(lpTextMetric.tmHeight);
898}
899
900long wxDC::GetCharWidth(void) const
901{
902 TEXTMETRIC lpTextMetric;
903
904 GetTextMetrics((HDC) m_hDC, &lpTextMetric);
905
906 return XDEV2LOGREL(lpTextMetric.tmAveCharWidth);
907}
908
909void wxDC::GetTextExtent(const wxString& string, long *x, long *y,
910 long *descent, long *externalLeading, wxFont *theFont, bool use16bit) const
911{
912 wxFont *fontToUse = (wxFont*) theFont;
913 if (!fontToUse)
914 fontToUse = (wxFont*) &m_font;
915
916 SIZE sizeRect;
917 TEXTMETRIC tm;
918
919 GetTextExtentPoint((HDC) m_hDC, (char *)(const char *) string, strlen((char *)(const char *) string), &sizeRect);
920 GetTextMetrics((HDC) m_hDC, &tm);
921
7d7fb17e
VZ
922 if (x) *x = XDEV2LOGREL(sizeRect.cx);
923 if (y) *y = YDEV2LOGREL(sizeRect.cy);
2bda0e17
KB
924 if (descent) *descent = tm.tmDescent;
925 if (externalLeading) *externalLeading = tm.tmExternalLeading;
926}
927
928void wxDC::SetMapMode(int mode)
929{
930 m_mappingMode = mode;
931
932 int pixel_width = 0;
933 int pixel_height = 0;
934 int mm_width = 0;
935 int mm_height = 0;
936
2bda0e17
KB
937 pixel_width = GetDeviceCaps((HDC) m_hDC, HORZRES);
938 pixel_height = GetDeviceCaps((HDC) m_hDC, VERTRES);
939 mm_width = GetDeviceCaps((HDC) m_hDC, HORZSIZE);
940 mm_height = GetDeviceCaps((HDC) m_hDC, VERTSIZE);
941
942 if ((pixel_width == 0) || (pixel_height == 0) || (mm_width == 0) || (mm_height == 0))
943 {
2bda0e17
KB
944 return;
945 }
946
947 double mm2pixelsX = pixel_width/mm_width;
948 double mm2pixelsY = pixel_height/mm_height;
949
950 switch (mode)
951 {
952 case MM_TWIPS:
953 {
954 m_logicalScaleX = (twips2mm * mm2pixelsX);
955 m_logicalScaleY = (twips2mm * mm2pixelsY);
956 break;
957 }
958 case MM_POINTS:
959 {
960 m_logicalScaleX = (pt2mm * mm2pixelsX);
961 m_logicalScaleY = (pt2mm * mm2pixelsY);
962 break;
963 }
964 case MM_METRIC:
965 {
966 m_logicalScaleX = mm2pixelsX;
967 m_logicalScaleY = mm2pixelsY;
968 break;
969 }
970 case MM_LOMETRIC:
971 {
972 m_logicalScaleX = (mm2pixelsX/10.0);
973 m_logicalScaleY = (mm2pixelsY/10.0);
974 break;
975 }
976 default:
977 case MM_TEXT:
978 {
979 m_logicalScaleX = 1.0;
980 m_logicalScaleY = 1.0;
981 break;
982 }
983 }
984
985 if (::GetMapMode((HDC) m_hDC) != MM_ANISOTROPIC)
986 ::SetMapMode((HDC) m_hDC, MM_ANISOTROPIC);
987
988 SetViewportExtEx((HDC) m_hDC, VIEWPORT_EXTENT, VIEWPORT_EXTENT, NULL);
989 m_windowExtX = (int)MS_XDEV2LOGREL(VIEWPORT_EXTENT);
990 m_windowExtY = (int)MS_YDEV2LOGREL(VIEWPORT_EXTENT);
991 ::SetWindowExtEx((HDC) m_hDC, m_windowExtX, m_windowExtY, NULL);
992 ::SetViewportOrgEx((HDC) m_hDC, (int)m_deviceOriginX, (int)m_deviceOriginY, NULL);
993 ::SetWindowOrgEx((HDC) m_hDC, (int)m_logicalOriginX, (int)m_logicalOriginY, NULL);
2bda0e17
KB
994}
995
996void wxDC::SetUserScale(double x, double y)
997{
998 m_userScaleX = x;
999 m_userScaleY = y;
1000
1001 SetMapMode(m_mappingMode);
1002}
1003
6f65e337
JS
1004void wxDC::SetAxisOrientation(bool xLeftRight, bool yBottomUp)
1005{
1006 m_signX = xLeftRight ? 1 : -1;
1007 m_signY = yBottomUp ? -1 : 1;
1008
1009 SetMapMode(m_mappingMode);
1010}
1011
2bda0e17
KB
1012void wxDC::SetSystemScale(double x, double y)
1013{
1014 m_systemScaleX = x;
1015 m_systemScaleY = y;
1016
1017 SetMapMode(m_mappingMode);
1018}
1019
1020void wxDC::SetLogicalOrigin(long x, long y)
1021{
1022 m_logicalOriginX = x;
1023 m_logicalOriginY = y;
1024
2bda0e17 1025 ::SetWindowOrgEx((HDC) m_hDC, (int)m_logicalOriginX, (int)m_logicalOriginY, NULL);
2bda0e17
KB
1026}
1027
1028void wxDC::SetDeviceOrigin(long x, long y)
1029{
1030 m_deviceOriginX = x;
1031 m_deviceOriginY = y;
1032
2bda0e17 1033 ::SetViewportOrgEx((HDC) m_hDC, (int)m_deviceOriginX, (int)m_deviceOriginY, NULL);
2bda0e17
KB
1034}
1035
1036long wxDC::DeviceToLogicalX(long x) const
1037{
6f65e337 1038 return (long) (((x) - m_deviceOriginX)/(m_logicalScaleX*m_userScaleX*m_signX*m_systemScaleX) - m_logicalOriginX) ;
2bda0e17
KB
1039}
1040
1041long wxDC::DeviceToLogicalXRel(long x) const
1042{
6f65e337 1043 return (long) ((x)/(m_logicalScaleX*m_userScaleX*m_signX*m_systemScaleX)) ;
2bda0e17
KB
1044}
1045
1046long wxDC::DeviceToLogicalY(long y) const
1047{
6f65e337 1048 return (long) (((y) - m_deviceOriginY)/(m_logicalScaleY*m_userScaleY*m_signY*m_systemScaleY) - m_logicalOriginY) ;
2bda0e17
KB
1049}
1050
1051long wxDC::DeviceToLogicalYRel(long y) const
1052{
6f65e337 1053 return (long) ((y)/(m_logicalScaleY*m_userScaleY*m_signY*m_systemScaleY)) ;
2bda0e17
KB
1054}
1055
1056long wxDC::LogicalToDeviceX(long x) const
1057{
6f65e337 1058 return (long) (floor((x) - m_logicalOriginX)*m_logicalScaleX*m_userScaleX*m_signX*m_systemScaleX + m_deviceOriginX) ;
2bda0e17
KB
1059}
1060
1061long wxDC::LogicalToDeviceXRel(long x) const
1062{
6f65e337 1063 return (long) (floor(x)*m_logicalScaleX*m_userScaleX*m_signX*m_systemScaleX) ;
2bda0e17
KB
1064}
1065
1066long wxDC::LogicalToDeviceY(long y) const
1067{
6f65e337 1068 return (long) (floor((y) - m_logicalOriginY)*m_logicalScaleY*m_userScaleY*m_signY*m_systemScaleY + m_deviceOriginY);
2bda0e17
KB
1069}
1070
1071long wxDC::LogicalToDeviceYRel(long y) const
1072{
6f65e337 1073 return (long) (floor(y)*m_logicalScaleY*m_userScaleY*m_signY*m_systemScaleY) ;
2bda0e17
KB
1074}
1075
1076// This group of functions may not do any conversion
1077// if m_scaleGDI is TRUE, since the HDC does the
1078// conversion automatically.
1079
1080long wxDC::ImplDeviceToLogicalX(long x) const
1081{
1082// return (m_scaleGDI ? x : DeviceToLogicalX(x));
1083 return x;
1084}
1085
1086long wxDC::ImplDeviceToLogicalY(long y) const
1087{
1088// return (m_scaleGDI ? y : DeviceToLogicalY(y));
1089 return y;
1090}
1091
1092long wxDC::ImplDeviceToLogicalXRel(long x) const
1093{
1094// return (m_scaleGDI ? x : DeviceToLogicalXRel(x));
1095 return x;
1096}
1097
1098long wxDC::ImplDeviceToLogicalYRel(long y) const
1099{
1100// return (m_scaleGDI ? y : DeviceToLogicalYRel(y));
1101 return y;
1102}
1103
1104long wxDC::ImplLogicalToDeviceX(long x) const
1105{
1106// return (m_scaleGDI ? (floor(double(x))) : LogicalToDeviceX(x));
1107 return x;
1108}
1109
1110long wxDC::ImplLogicalToDeviceY(long y) const
1111{
1112// return (m_scaleGDI ? (floor(double(y))) : LogicalToDeviceY(y));
1113 return y;
1114}
1115
1116long wxDC::ImplLogicalToDeviceXRel(long x) const
1117{
1118// return (m_scaleGDI ? (floor(double(x))) : LogicalToDeviceXRel(x));
1119 return x;
1120}
1121
1122long wxDC::ImplLogicalToDeviceYRel(long y) const
1123{
1124// return (m_scaleGDI ? (floor(double(y))) : LogicalToDeviceYRel(y));
1125 return y;
1126}
1127
1128bool wxDC::Blit(long xdest, long ydest, long width, long height,
1129 wxDC *source, long xsrc, long ysrc, int rop, bool useMask)
1130{
2bda0e17
KB
1131 long xdest1 = xdest;
1132 long ydest1 = ydest;
1133 long xsrc1 = xsrc;
1134 long ysrc1 = ysrc;
1135
6f65e337
JS
1136 // Chris Breeze 18/5/98: use text foreground/background colours
1137 // when blitting from 1-bit bitmaps
1138 COLORREF old_textground = ::GetTextColor((HDC)m_hDC);
1139 COLORREF old_background = ::GetBkColor((HDC)m_hDC);
1140 if (m_textForegroundColour.Ok())
1141 {
1142 ::SetTextColor((HDC) m_hDC, m_textForegroundColour.GetPixel() ) ;
1143 }
1144 if (m_textBackgroundColour.Ok())
1145 {
1146 ::SetBkColor((HDC) m_hDC, m_textBackgroundColour.GetPixel() ) ;
1147 }
1148
2bda0e17
KB
1149 DWORD dwRop = rop == wxCOPY ? SRCCOPY :
1150 rop == wxCLEAR ? WHITENESS :
1151 rop == wxSET ? BLACKNESS :
1152 rop == wxINVERT ? DSTINVERT :
1153 rop == wxAND ? MERGECOPY :
1154 rop == wxOR ? MERGEPAINT :
1155 rop == wxSRC_INVERT ? NOTSRCCOPY :
1156 rop == wxXOR ? SRCINVERT :
1157 rop == wxOR_REVERSE ? MERGEPAINT :
1158 rop == wxAND_REVERSE ? SRCERASE :
1159 rop == wxSRC_OR ? SRCPAINT :
1160 rop == wxSRC_AND ? SRCAND :
1161 SRCCOPY;
1162
1163 bool success;
1164 if (useMask && source->m_selectedBitmap.Ok() && source->m_selectedBitmap.GetMask())
1165 {
1166
1167#if 0 // __WIN32__
1168 // Not implemented under Win95 (or maybe a specific device?)
1169 if (MaskBlt((HDC) m_hDC, xdest1, ydest1, (int)width, (int)height,
1170 (HDC) source->m_hDC, xsrc1, ysrc1, (HBITMAP) source->m_selectedBitmap.GetMask()->GetMaskBitmap(),
1171 0, 0, 0xAACC0020))
1172 {
1173 // Success
1174 }
1175 else
1176#endif
1177 {
1178 // Old code
1179#if 0
1180 HDC dc_mask = CreateCompatibleDC((HDC) source->m_hDC);
1181 ::SelectObject(dc_mask, (HBITMAP) source->m_selectedBitmap.GetMask()->GetMaskBitmap());
1182 success = (BitBlt((HDC) m_hDC, xdest1, ydest1, (int)width, (int)height,
1183 dc_mask, xsrc1, ysrc1, 0x00220326 /* NOTSRCAND */) != 0);
1184 success = (BitBlt((HDC) m_hDC, xdest1, ydest1, (int)width, (int)height,
1185 (HDC) source->m_hDC, xsrc1, ysrc1, SRCPAINT) != 0);
1186 ::SelectObject(dc_mask, 0);
1187 ::DeleteDC(dc_mask);
1188#endif
400735a8
JS
1189 // New code from Chris Breeze, 15/7/98
1190 // Blit bitmap with mask
1191
1192 if (IsKindOf(CLASSINFO(wxPrinterDC)))
1193 {
1194 // If we are printing source colours are screen colours
1195 // not printer colours and so we need copy the bitmap
1196 // pixel by pixel.
1197 RECT rect;
1198 HDC dc_mask = ::CreateCompatibleDC((HDC) source->m_hDC);
1199 HDC dc_src = (HDC) source->m_hDC;
1200
1201 ::SelectObject(dc_mask, (HBITMAP) source->m_selectedBitmap.GetMask()->GetMaskBitmap());
1202 for (int x = 0; x < width; x++)
1203 {
1204 for (int y = 0; y < height; y++)
1205 {
1206 COLORREF cref = ::GetPixel(dc_mask, x, y);
1207 if (cref)
1208 {
1209 HBRUSH brush = ::CreateSolidBrush(::GetPixel(dc_src, x, y));
1210 rect.left = xdest1 + x; rect.right = rect.left + 1;
1211 rect.top = ydest1 + y; rect.bottom = rect.top + 1;
1212 ::FillRect((HDC) m_hDC, &rect, brush);
1213 ::DeleteObject(brush);
1214 }
1215 }
1216 }
1217 ::SelectObject(dc_mask, 0);
1218 ::DeleteDC(dc_mask);
1219 }
1220 else
1221 {
1222 // create a temp buffer bitmap and DCs to access it and the mask
1223 HDC dc_mask = ::CreateCompatibleDC((HDC) source->m_hDC);
1224 HDC dc_buffer = ::CreateCompatibleDC((HDC) m_hDC);
1225 HBITMAP buffer_bmap = ::CreateCompatibleBitmap((HDC) m_hDC, width, height);
1226 ::SelectObject(dc_mask, (HBITMAP) source->m_selectedBitmap.GetMask()->GetMaskBitmap());
1227 ::SelectObject(dc_buffer, buffer_bmap);
1228
1229 // copy dest to buffer
1230 ::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
1231 (HDC) m_hDC, xdest1, ydest1, SRCCOPY);
1232
1233 // copy src to buffer using selected raster op
1234 ::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
1235 (HDC) source->m_hDC, xsrc1, ysrc1, dwRop);
1236
1237 // set masked area in buffer to BLACK (pixel value 0)
1238 COLORREF prevBkCol = ::SetBkColor((HDC) m_hDC, RGB(255, 255, 255));
1239 COLORREF prevCol = ::SetTextColor((HDC) m_hDC, RGB(0, 0, 0));
1240 ::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
1241 dc_mask, xsrc1, ysrc1, SRCAND);
1242
1243 // set unmasked area in dest to BLACK
1244 ::SetBkColor((HDC) m_hDC, RGB(0, 0, 0));
1245 ::SetTextColor((HDC) m_hDC, RGB(255, 255, 255));
1246 ::BitBlt((HDC) m_hDC, xdest1, ydest1, (int)width, (int)height,
1247 dc_mask, xsrc1, ysrc1, SRCAND);
1248 ::SetBkColor((HDC) m_hDC, prevBkCol); // restore colours to original values
1249 ::SetTextColor((HDC) m_hDC, prevCol);
1250
1251 // OR buffer to dest
1252 success = (::BitBlt((HDC) m_hDC, xdest1, ydest1, (int)width, (int)height,
1253 dc_buffer, 0, 0, SRCPAINT) != 0);
1254
1255 // tidy up temporary DCs and bitmap
1256 ::SelectObject(dc_mask, 0);
1257 ::DeleteDC(dc_mask);
1258 ::SelectObject(dc_buffer, 0);
1259 ::DeleteDC(dc_buffer);
1260 ::DeleteObject(buffer_bmap);
1261 }
1262 }
2bda0e17
KB
1263 }
1264 else
1265 {
400735a8
JS
1266 if (IsKindOf(CLASSINFO(wxPrinterDC)))
1267 {
1268 // If we are printing source colours are screen colours
1269 // not printer colours and so we need copy the bitmap
1270 // pixel by pixel.
1271 HDC dc_src = (HDC) source->m_hDC;
1272 RECT rect;
1273 for (int x = 0; x < width; x++)
1274 {
1275 for (int y = 0; y < height; y++)
1276 {
1277 HBRUSH brush = ::CreateSolidBrush(::GetPixel(dc_src, x, y));
1278 rect.left = xdest1 + x; rect.right = rect.left + 1;
1279 rect.top = ydest1 + y; rect.bottom = rect.top + 1;
1280 ::FillRect((HDC) m_hDC, &rect, brush);
1281 ::DeleteObject(brush);
1282 }
1283 }
1284 }
1285 else
1286 {
2bda0e17
KB
1287 success = (BitBlt((HDC) m_hDC, xdest1, ydest1, (int)width, (int)height, (HDC) source->m_hDC,
1288 xsrc1, ysrc1, dwRop) != 0);
400735a8 1289 }
2bda0e17 1290 }
6f65e337
JS
1291 ::SetTextColor((HDC)m_hDC, old_textground);
1292 ::SetBkColor((HDC)m_hDC, old_background);
2bda0e17
KB
1293
1294 return success;
1295}
1296
1297void wxDC::GetSize(int* width, int* height) const
1298{
1299 long w=::GetDeviceCaps((HDC) m_hDC,HORZRES);
1300 long h=::GetDeviceCaps((HDC) m_hDC,VERTRES);
1301 *width = w;
1302 *height = h;
1303}
1304
1305void wxDC::GetSizeMM(long *width, long *height) const
1306{
1307 long w=::GetDeviceCaps((HDC) m_hDC,HORZSIZE);
1308 long h=::GetDeviceCaps((HDC) m_hDC,VERTSIZE);
1309 *width = w;
1310 *height = h;
1311}
1312
10b959e3
JS
1313#if USE_SPLINES
1314#include "xfspline.inc"
1315#endif // USE_SPLINES
2bda0e17
KB
1316
1317void wxDC::DrawPolygon(wxList *list, long xoffset, long yoffset,int fillStyle)
1318{
1319 int n = list->Number();
1320 wxPoint *points = new wxPoint[n];
1321
1322 int i = 0;
1323 for(wxNode *node = list->First(); node; node = node->Next()) {
1324 wxPoint *point = (wxPoint *)node->Data();
1325 points[i].x = point->x;
1326 points[i++].y = point->y;
1327 }
1328 DrawPolygon(n, points, xoffset, yoffset,fillStyle);
1329 delete[] points;
1330}
1331
1332void wxDC::DrawLines(wxList *list, long xoffset, long yoffset)
1333{
1334 int n = list->Number();
1335 wxPoint *points = new wxPoint[n];
1336
1337 int i = 0;
1338 for(wxNode *node = list->First(); node; node = node->Next()) {
1339 wxPoint *point = (wxPoint *)node->Data();
1340 points[i].x = point->x;
1341 points[i++].y = point->y;
1342 }
1343 DrawLines(n, points, xoffset, yoffset);
1344 delete []points;
1345}
1346
1347void wxDC::SetTextForeground(const wxColour& colour)
1348{
1349 m_textForegroundColour = colour;
1350}
1351
1352void wxDC::SetTextBackground(const wxColour& colour)
1353{
1354 m_textBackgroundColour = colour;
1355}
1356
1357#if USE_SPLINES
1358// Make a 3-point spline
1359void wxDC::DrawSpline(long x1, long y1, long x2, long y2, long x3, long y3)
1360{
1361 wxList *point_list = new wxList;
1362
1363 wxPoint *point1 = new wxPoint;
1364 point1->x = x1; point1->y = y1;
1365 point_list->Append((wxObject*)point1);
1366
1367 wxPoint *point2 = new wxPoint;
1368 point2->x = x2; point2->y = y2;
1369 point_list->Append((wxObject*)point2);
1370
1371 wxPoint *point3 = new wxPoint;
1372 point3->x = x3; point3->y = y3;
1373 point_list->Append((wxObject*)point3);
1374
1375 DrawSpline(point_list);
1376
1377 for(wxNode *node = point_list->First(); node; node = node->Next()) {
1378 wxPoint *p = (wxPoint *)node->Data();
1379 delete p;
1380 }
1381 delete point_list;
2bda0e17
KB
1382}
1383#endif
1384
1385// For use by wxWindows only, unless custom units are required.
1386void wxDC::SetLogicalScale(double x, double y)
1387{
1388 m_logicalScaleX = x;
1389 m_logicalScaleY = y;
1390}
1391
1392void wxDC::CalcBoundingBox(long x, long y)
1393{
1394 if (x < m_minX) m_minX = x;
1395 if (y < m_minY) m_minY = y;
1396 if (x > m_maxX) m_maxX = x;
1397 if (y > m_maxY) m_maxY = y;
1398}
1399
1400void wxDC::GetClippingBox(long *x,long *y,long *w,long *h) const
1401{
1402 if (m_clipping)
1403 {
1404 *x = m_clipX1 ;
1405 *y = m_clipY1 ;
1406 *w = (m_clipX2 - m_clipX1) ;
1407 *h = (m_clipY2 - m_clipY1) ;
1408 }
1409 else
1410 *x = *y = *w = *h = 0 ;
1411}
1412
1413#if WXWIN_COMPATIBILITY
1414void wxDC::GetTextExtent(const wxString& string, float *x, float *y,
1415 float *descent, float *externalLeading,
1416 wxFont *theFont, bool use16bit) const
1417{
1418 long x1, y1, descent1, externalLeading1;
1419 GetTextExtent(string, & x1, & y1, & descent1, & externalLeading1, theFont, use16bit);
1420 *x = x1; *y = y1;
1421 if (descent)
1422 *descent = descent1;
1423 if (externalLeading)
1424 *externalLeading = externalLeading1;
1425}
1426#endif
8b9518ee 1427