]> git.saurik.com Git - wxWidgets.git/blame - src/msw/dc.cpp
Added comments explaining my recent changes
[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
fd3f686c 9// Licence: wxWindows licence
2bda0e17
KB
10/////////////////////////////////////////////////////////////////////////////
11
a23fd0e1
VZ
12// ===========================================================================
13// declarations
14// ===========================================================================
15
16// ---------------------------------------------------------------------------
17// headers
18// ---------------------------------------------------------------------------
19
2bda0e17 20#ifdef __GNUG__
a23fd0e1 21 #pragma implementation "dc.h"
2bda0e17
KB
22#endif
23
24// For compilers that support precompilation, includes "wx.h".
25#include "wx/wxprec.h"
26
27#ifdef __BORLANDC__
a23fd0e1 28 #pragma hdrstop
2bda0e17
KB
29#endif
30
31#ifndef WX_PRECOMP
4286a5b5 32 #include "wx/window.h"
a23fd0e1
VZ
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"
0c589ad0 39 #include "wx/log.h"
4286a5b5 40 #include "wx/icon.h"
2bda0e17
KB
41#endif
42
43#include "wx/dcprint.h"
2bda0e17
KB
44
45#include <string.h>
46#include <math.h>
2bda0e17 47
a58a12e9
VZ
48#include "wx/msw/private.h" // needs to be before #include <commdlg.h>
49
47d67540 50#if wxUSE_COMMON_DIALOGS
65fd5cb0
RS
51#if wxUSE_NORLANDER_HEADERS
52 #include <windows.h>
53#endif
a23fd0e1 54 #include <commdlg.h>
2bda0e17
KB
55#endif
56
57#ifndef __WIN32__
a23fd0e1 58 #include <print.h>
2bda0e17
KB
59#endif
60
a58a12e9 61IMPLEMENT_ABSTRACT_CLASS(wxDC, wxObject)
2bda0e17 62
a23fd0e1
VZ
63// ---------------------------------------------------------------------------
64// constants
65// ---------------------------------------------------------------------------
66
42e69d6b
VZ
67static const int VIEWPORT_EXTENT = 1000;
68
69static const int MM_POINTS = 9;
70static const int MM_METRIC = 10;
a23fd0e1 71
4314ec48
VZ
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
82static inline double DegToRad(double deg) { return (deg * M_PI) / 180.0; }
83
a23fd0e1
VZ
84// ===========================================================================
85// implementation
86// ===========================================================================
87
88// ---------------------------------------------------------------------------
89// wxDC
90// ---------------------------------------------------------------------------
2bda0e17
KB
91
92// Default constructor
a23fd0e1 93wxDC::wxDC()
2bda0e17 94{
7bcb11d3 95 m_canvas = NULL;
a23fd0e1 96
7bcb11d3
JS
97 m_oldBitmap = 0;
98 m_oldPen = 0;
99 m_oldBrush = 0;
100 m_oldFont = 0;
101 m_oldPalette = 0;
a23fd0e1 102
7bcb11d3
JS
103 m_bOwnsDC = FALSE;
104 m_hDC = 0;
a23fd0e1 105
7bcb11d3
JS
106 m_windowExtX = VIEWPORT_EXTENT;
107 m_windowExtY = VIEWPORT_EXTENT;
a23fd0e1 108
7bcb11d3 109 m_hDCCount = 0;
2bda0e17
KB
110}
111
112
a23fd0e1 113wxDC::~wxDC()
2bda0e17 114{
7bcb11d3
JS
115 if ( m_hDC != 0 ) {
116 SelectOldObjects(m_hDC);
117 if ( m_bOwnsDC ) {
118 if ( m_canvas == NULL )
a23fd0e1 119 ::DeleteDC(GetHdc());
7bcb11d3 120 else
a23fd0e1 121 ::ReleaseDC((HWND)m_canvas->GetHWND(), GetHdc());
7bcb11d3 122 }
2bda0e17 123 }
a23fd0e1 124
2bda0e17
KB
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.
130void wxDC::SelectOldObjects(WXHDC dc)
131{
7bcb11d3 132 if (dc)
2bda0e17 133 {
7bcb11d3
JS
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 }
a23fd0e1 142 m_oldBitmap = 0;
7bcb11d3
JS
143 if (m_oldPen)
144 {
145 ::SelectObject((HDC) dc, (HPEN) m_oldPen);
146 }
a23fd0e1 147 m_oldPen = 0;
7bcb11d3
JS
148 if (m_oldBrush)
149 {
150 ::SelectObject((HDC) dc, (HBRUSH) m_oldBrush);
151 }
a23fd0e1 152 m_oldBrush = 0;
7bcb11d3
JS
153 if (m_oldFont)
154 {
155 ::SelectObject((HDC) dc, (HFONT) m_oldFont);
156 }
a23fd0e1 157 m_oldFont = 0;
7bcb11d3
JS
158 if (m_oldPalette)
159 {
160 ::SelectPalette((HDC) dc, (HPALETTE) m_oldPalette, TRUE);
161 }
a23fd0e1 162 m_oldPalette = 0;
2bda0e17 163 }
a23fd0e1
VZ
164
165 m_brush = wxNullBrush;
7bcb11d3
JS
166 m_pen = wxNullPen;
167 m_palette = wxNullPalette;
168 m_font = wxNullFont;
169 m_backgroundBrush = wxNullBrush;
170 m_selectedBitmap = wxNullBitmap;
2bda0e17
KB
171}
172
a23fd0e1
VZ
173// ---------------------------------------------------------------------------
174// clipping
175// ---------------------------------------------------------------------------
176
72cdf4c9 177void wxDC::DoSetClippingRegion(wxCoord cx, wxCoord cy, wxCoord cw, wxCoord ch)
2bda0e17 178{
7bcb11d3
JS
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);
a23fd0e1 184
7bcb11d3 185 DoClipping((WXHDC) m_hDC);
2bda0e17
KB
186}
187
a23fd0e1 188void wxDC::DoSetClippingRegionAsRegion(const wxRegion& region)
a724d789 189{
223d09f6 190 wxCHECK_RET( region.GetHRGN(), wxT("invalid clipping region") );
a23fd0e1 191
7bcb11d3 192 wxRect box = region.GetBox();
a23fd0e1 193
7bcb11d3
JS
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;
a23fd0e1 199
1e6d9499 200#ifdef __WIN16__
a23fd0e1 201 SelectClipRgn(GetHdc(), (HRGN) region.GetHRGN());
1e6d9499 202#else
a23fd0e1 203 ExtSelectClipRgn(GetHdc(), (HRGN) region.GetHRGN(), RGN_AND);
1e6d9499 204#endif
a724d789
JS
205}
206
2bda0e17
KB
207void wxDC::DoClipping(WXHDC dc)
208{
7bcb11d3
JS
209 if (m_clipping && dc)
210 {
211 IntersectClipRect((HDC) dc, XLOG2DEV(m_clipX1), YLOG2DEV(m_clipY1),
a23fd0e1 212 XLOG2DEV(m_clipX2), YLOG2DEV(m_clipY2));
7bcb11d3 213 }
2bda0e17
KB
214}
215
a23fd0e1 216void wxDC::DestroyClippingRegion()
2bda0e17 217{
7bcb11d3
JS
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);
a23fd0e1 224 SelectClipRgn(GetHdc(), rgn);
7bcb11d3
JS
225 DeleteObject(rgn);
226 }
227 m_clipping = FALSE;
2bda0e17
KB
228}
229
a23fd0e1
VZ
230// ---------------------------------------------------------------------------
231// query capabilities
232// ---------------------------------------------------------------------------
233
234bool wxDC::CanDrawBitmap() const
2bda0e17 235{
7bcb11d3 236 return TRUE;
2bda0e17
KB
237}
238
a23fd0e1 239bool wxDC::CanGetTextExtent() const
2bda0e17 240{
7bcb11d3 241 // What sort of display is it?
a23fd0e1
VZ
242 int technology = ::GetDeviceCaps(GetHdc(), TECHNOLOGY);
243
244 return (technology == DT_RASDISPLAY) || (technology == DT_RASPRINTER);
2bda0e17
KB
245}
246
a23fd0e1 247int wxDC::GetDepth() const
2bda0e17 248{
a23fd0e1 249 return (int)::GetDeviceCaps(GetHdc(), BITSPIXEL);
2bda0e17
KB
250}
251
a23fd0e1
VZ
252// ---------------------------------------------------------------------------
253// drawing
254// ---------------------------------------------------------------------------
255
256void wxDC::Clear()
2bda0e17 257{
7bcb11d3 258 RECT rect;
2506aab6
VZ
259 if ( m_canvas )
260 {
7bcb11d3 261 GetClientRect((HWND) m_canvas->GetHWND(), &rect);
2506aab6
VZ
262 }
263 else
7bcb11d3 264 {
eaeb6a3c
JS
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;
2506aab6 270
7bcb11d3
JS
271 rect.left = 0; rect.top = 0;
272 rect.right = m_selectedBitmap.GetWidth();
273 rect.bottom = m_selectedBitmap.GetHeight();
274 }
2506aab6 275
a23fd0e1
VZ
276 (void) ::SetMapMode(GetHdc(), MM_TEXT);
277
278 DWORD colour = GetBkColor(GetHdc());
7bcb11d3 279 HBRUSH brush = CreateSolidBrush(colour);
a23fd0e1 280 FillRect(GetHdc(), &rect, brush);
7bcb11d3 281 DeleteObject(brush);
a23fd0e1
VZ
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
72cdf4c9 290void wxDC::DoFloodFill(wxCoord x, wxCoord y, const wxColour& col, int style)
a23fd0e1 291{
0bafad0c
VZ
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 }
a23fd0e1 311
7bcb11d3 312 CalcBoundingBox(x, y);
2bda0e17
KB
313}
314
72cdf4c9 315bool wxDC::DoGetPixel(wxCoord x, wxCoord y, wxColour *col) const
2bda0e17 316{
7bcb11d3 317 // get the color of the pixel
a23fd0e1 318 COLORREF pixelcolor = ::GetPixel(GetHdc(), XLOG2DEV(x), YLOG2DEV(y));
0bafad0c 319
7bcb11d3
JS
320 // get the color of the pen
321 COLORREF pencolor = 0x00ffffff;
322 if (m_pen.Ok())
323 {
a23fd0e1 324 pencolor = m_pen.GetColour().GetPixel();
7bcb11d3 325 }
a23fd0e1 326
7bcb11d3 327 // return the color of the pixel
0bafad0c
VZ
328 if( col )
329 {
330 col->Set(GetRValue(pixelcolor),
331 GetGValue(pixelcolor),
332 GetBValue(pixelcolor));
333 }
a23fd0e1 334
0bafad0c
VZ
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;
2bda0e17
KB
338}
339
72cdf4c9 340void wxDC::DoCrossHair(wxCoord x, wxCoord y)
a23fd0e1 341{
72cdf4c9
VZ
342 wxCoord x1 = x-VIEWPORT_EXTENT;
343 wxCoord y1 = y-VIEWPORT_EXTENT;
344 wxCoord x2 = x+VIEWPORT_EXTENT;
345 wxCoord y2 = y+VIEWPORT_EXTENT;
a23fd0e1
VZ
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
7bcb11d3
JS
353 CalcBoundingBox(x1, y1);
354 CalcBoundingBox(x2, y2);
2bda0e17
KB
355}
356
72cdf4c9 357void wxDC::DoDrawLine(wxCoord x1, wxCoord y1, wxCoord x2, wxCoord y2)
2bda0e17 358{
a23fd0e1
VZ
359 (void)MoveToEx(GetHdc(), XLOG2DEV(x1), YLOG2DEV(y1), NULL);
360 (void)LineTo(GetHdc(), XLOG2DEV(x2), YLOG2DEV(y2));
361
7bcb11d3 362 /* MATTHEW: [6] New normalization */
2bda0e17 363#if WX_STANDARD_GRAPHICS
a23fd0e1 364 (void)LineTo(GetHdc(), XLOG2DEV(x2) + 1, YLOG2DEV(y2));
2bda0e17 365#endif
a23fd0e1 366
7bcb11d3
JS
367 CalcBoundingBox(x1, y1);
368 CalcBoundingBox(x2, y2);
2bda0e17
KB
369}
370
72cdf4c9 371void wxDC::DoDrawArc(wxCoord x1,wxCoord y1,wxCoord x2,wxCoord y2, wxCoord xc, wxCoord yc)
2bda0e17 372{
a23fd0e1
VZ
373 double dx = xc-x1;
374 double dy = yc-y1;
7bcb11d3
JS
375 double radius = (double)sqrt(dx*dx+dy*dy) ;;
376 if (x1==x2 && x2==y2)
377 {
72cdf4c9 378 DrawEllipse(xc,yc,(wxCoord)(radius*2.0),(wxCoord)(radius*2.0));
a23fd0e1 379 return;
7bcb11d3 380 }
a23fd0e1 381
72cdf4c9
VZ
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)));
a23fd0e1
VZ
389
390 (void)MoveToEx(GetHdc(), (int) xx1, (int) yy1, NULL);
72cdf4c9
VZ
391 wxCoord xxx1 = (wxCoord) (xxc-ray);
392 wxCoord yyy1 = (wxCoord) (yyc-ray);
393 wxCoord xxx2 = (wxCoord) (xxc+ray);
394 wxCoord yyy2 = (wxCoord) (yyc+ray);
7bcb11d3
JS
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!
a23fd0e1
VZ
402 Pie(GetHdc(),xxx1,yyy1,xxx2+1,yyy2+1,
403 xx1,yy1,xx2,yy2);
7bcb11d3
JS
404 }
405 else
a23fd0e1
VZ
406 Arc(GetHdc(),xxx1,yyy1,xxx2,yyy2,
407 xx1,yy1,xx2,yy2);
408
72cdf4c9
VZ
409 CalcBoundingBox((wxCoord)(xc-radius), (wxCoord)(yc-radius));
410 CalcBoundingBox((wxCoord)(xc+radius), (wxCoord)(yc+radius));
2bda0e17
KB
411}
412
72cdf4c9 413void wxDC::DoDrawPoint(wxCoord x, wxCoord y)
2bda0e17 414{
7bcb11d3
JS
415 COLORREF color = 0x00ffffff;
416 if (m_pen.Ok())
417 {
a23fd0e1 418 color = m_pen.GetColour().GetPixel();
7bcb11d3 419 }
a23fd0e1
VZ
420
421 SetPixel(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), color);
422
7bcb11d3 423 CalcBoundingBox(x, y);
2bda0e17
KB
424}
425
72cdf4c9 426void wxDC::DoDrawPolygon(int n, wxPoint points[], wxCoord xoffset, wxCoord yoffset,int fillStyle)
2bda0e17 427{
de2d2cdc
VZ
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
7bcb11d3
JS
450 // Do things less efficiently if we have offsets
451 if (xoffset != 0 || yoffset != 0)
6a6c0a8b 452 {
7bcb11d3
JS
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);
a23fd0e1 459
7bcb11d3
JS
460 CalcBoundingBox(cpoints[i].x, cpoints[i].y);
461 }
a23fd0e1
VZ
462 int prev = SetPolyFillMode(GetHdc(),fillStyle==wxODDEVEN_RULE?ALTERNATE:WINDING);
463 (void)Polygon(GetHdc(), cpoints, n);
464 SetPolyFillMode(GetHdc(),prev);
7bcb11d3
JS
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);
a23fd0e1
VZ
472
473 int prev = SetPolyFillMode(GetHdc(),fillStyle==wxODDEVEN_RULE?ALTERNATE:WINDING);
474 (void)Polygon(GetHdc(), (POINT*) points, n);
475 SetPolyFillMode(GetHdc(),prev);
6a6c0a8b 476 }
de2d2cdc
VZ
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 }
2bda0e17
KB
484}
485
72cdf4c9 486void wxDC::DoDrawLines(int n, wxPoint points[], wxCoord xoffset, wxCoord yoffset)
2bda0e17 487{
7bcb11d3
JS
488 // Do things less efficiently if we have offsets
489 if (xoffset != 0 || yoffset != 0)
6a6c0a8b 490 {
7bcb11d3
JS
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);
a23fd0e1 497
7bcb11d3
JS
498 CalcBoundingBox(cpoints[i].x, cpoints[i].y);
499 }
a23fd0e1 500 (void)Polyline(GetHdc(), cpoints, n);
7bcb11d3
JS
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);
a23fd0e1
VZ
508
509 (void)Polyline(GetHdc(), (POINT*) points, n);
6a6c0a8b 510 }
2bda0e17
KB
511}
512
72cdf4c9 513void wxDC::DoDrawRectangle(wxCoord x, wxCoord y, wxCoord width, wxCoord height)
2bda0e17 514{
0bafad0c
VZ
515 COLORREF colFgOld = 0,
516 colBgOld = 0;
517
518 if ( m_brush.GetStyle() == wxSTIPPLE_MASK_OPAQUE )
de2d2cdc 519 {
0bafad0c
VZ
520 colFgOld = ::GetTextColor(GetHdc());
521 colBgOld = ::GetBkColor(GetHdc());
de2d2cdc 522
0bafad0c
VZ
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 }
de2d2cdc 529
0bafad0c
VZ
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);
de2d2cdc
VZ
539 }
540
72cdf4c9
VZ
541 wxCoord x2 = x + width;
542 wxCoord y2 = y + height;
a23fd0e1 543
0bafad0c
VZ
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++;
7bcb11d3 551 }
a23fd0e1 552
a23fd0e1 553 (void)Rectangle(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2));
a23fd0e1 554
7bcb11d3
JS
555 CalcBoundingBox(x, y);
556 CalcBoundingBox(x2, y2);
de2d2cdc 557
0bafad0c 558 if ( m_brush.GetStyle() == wxSTIPPLE_MASK_OPAQUE )
de2d2cdc 559 {
0bafad0c
VZ
560 // restore the colours we changed
561 ::SetBkMode(GetHdc(), TRANSPARENT);
562 ::SetTextColor(GetHdc(), colFgOld);
563 ::SetBkColor(GetHdc(), colBgOld);
de2d2cdc 564 }
2bda0e17
KB
565}
566
72cdf4c9 567void wxDC::DoDrawRoundedRectangle(wxCoord x, wxCoord y, wxCoord width, wxCoord height, double radius)
2bda0e17 568{
7bcb11d3
JS
569 // Now, a negative radius value is interpreted to mean
570 // 'the proportion of the smallest X or Y dimension'
a23fd0e1 571
7bcb11d3
JS
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 }
a23fd0e1 581
72cdf4c9
VZ
582 wxCoord x2 = (x+width);
583 wxCoord y2 = (y+height);
a23fd0e1
VZ
584
585 (void)RoundRect(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2),
25889d3c 586 YLOG2DEV(y2), (int) (2*XLOG2DEV(radius)), (int)( 2*YLOG2DEV(radius)));
a23fd0e1 587
7bcb11d3
JS
588 CalcBoundingBox(x, y);
589 CalcBoundingBox(x2, y2);
2bda0e17
KB
590}
591
72cdf4c9 592void wxDC::DoDrawEllipse(wxCoord x, wxCoord y, wxCoord width, wxCoord height)
2bda0e17 593{
72cdf4c9
VZ
594 wxCoord x2 = (x+width);
595 wxCoord y2 = (y+height);
a23fd0e1
VZ
596
597 (void)Ellipse(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2));
598
7bcb11d3
JS
599 CalcBoundingBox(x, y);
600 CalcBoundingBox(x2, y2);
2bda0e17
KB
601}
602
6f65e337 603// Chris Breeze 20/5/98: first implementation of DrawEllipticArc on Windows
72cdf4c9 604void wxDC::DoDrawEllipticArc(wxCoord x,wxCoord y,wxCoord w,wxCoord h,double sa,double ea)
6f65e337 605{
72cdf4c9
VZ
606 wxCoord x2 = (x+w);
607 wxCoord y2 = (y+h);
a23fd0e1 608
7bcb11d3
JS
609 int rx1 = XLOG2DEV(x+w/2);
610 int ry1 = YLOG2DEV(y+h/2);
611 int rx2 = rx1;
612 int ry2 = ry1;
4314ec48
VZ
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));
a23fd0e1 621
7bcb11d3
JS
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
a23fd0e1 624 HPEN orig_pen = (HPEN) ::SelectObject(GetHdc(), (HPEN) ::GetStockObject(NULL_PEN));
7bcb11d3
JS
625 if (m_signY > 0)
626 {
a23fd0e1 627 (void)Pie(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2)+1, YLOG2DEV(y2)+1,
7bcb11d3
JS
628 rx1, ry1, rx2, ry2);
629 }
630 else
631 {
a23fd0e1 632 (void)Pie(GetHdc(), XLOG2DEV(x), YLOG2DEV(y)-1, XLOG2DEV(x2)+1, YLOG2DEV(y2),
7bcb11d3
JS
633 rx1, ry1-1, rx2, ry2-1);
634 }
a23fd0e1
VZ
635 ::SelectObject(GetHdc(), orig_pen);
636 (void)Arc(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), XLOG2DEV(x2), YLOG2DEV(y2),
fd3f686c 637 rx1, ry1, rx2, ry2);
a23fd0e1 638
7bcb11d3
JS
639 CalcBoundingBox(x, y);
640 CalcBoundingBox(x2, y2);
6f65e337
JS
641}
642
72cdf4c9 643void wxDC::DoDrawIcon(const wxIcon& icon, wxCoord x, wxCoord y)
2bda0e17 644{
4b7f2165
VZ
645 wxCHECK_RET( icon.Ok(), wxT("invalid icon in DrawIcon") );
646
647 ::DrawIcon(GetHdc(), XLOG2DEV(x), YLOG2DEV(y), GetHiconOf(icon));
a23fd0e1 648
7bcb11d3 649 CalcBoundingBox(x, y);
4b7f2165 650 CalcBoundingBox(x + icon.GetWidth(), y + icon.GetHeight());
2bda0e17
KB
651}
652
72cdf4c9 653void wxDC::DoDrawBitmap( const wxBitmap &bmp, wxCoord x, wxCoord y, bool useMask )
f5419957 654{
4b7f2165
VZ
655 wxCHECK_RET( bmp.Ok(), _T("invalid bitmap in wxDC::DrawBitmap") );
656
657 int width = bmp.GetWidth(),
658 height = bmp.GetHeight();
659
91b4c08d
VZ
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?
d624fd67
GRG
688
689 // GRG: now this works regardless of what the source bitmap
690 // contains in the area which is to be transparent.
691 //
91b4c08d
VZ
692 bool ok = ::MaskBlt(GetHdc(), x, y, width, height,
693 hdcMem, 0, 0,
694 hbmpMask, 0, 0,
8fcae2d6 695 MAKEROP4(SRCCOPY, 0x00AA0029)) != 0;
91b4c08d
VZ
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
d624fd67 703 // GRG: Blit() *should* draw transparently when there is a mask
8fcae2d6 704
91b4c08d
VZ
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()
f5419957 715 {
4b7f2165
VZ
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())
8caa4ed1 725 {
4b7f2165 726 ::SetTextColor(GetHdc(), m_textForegroundColour.GetPixel() );
8caa4ed1 727 }
4b7f2165 728 if (m_textBackgroundColour.Ok())
8caa4ed1 729 {
4b7f2165
VZ
730 ::SetBkColor(GetHdc(), m_textBackgroundColour.GetPixel() );
731 }
392f4b1b 732
4b7f2165
VZ
733 ::SelectObject( memdc, hbitmap );
734 ::BitBlt( cdc, x, y, width, height, memdc, 0, 0, SRCCOPY);
735 ::DeleteDC( memdc );
392f4b1b 736
4b7f2165
VZ
737 ::SetTextColor(GetHdc(), old_textground);
738 ::SetBkColor(GetHdc(), old_background);
f5419957 739 }
f5419957
JS
740}
741
72cdf4c9 742void wxDC::DoDrawText(const wxString& text, wxCoord x, wxCoord y)
a23fd0e1 743{
4314ec48
VZ
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
754void 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());
a23fd0e1
VZ
759
760 DWORD old_background = 0;
4314ec48 761 if ( m_textBackgroundColour.Ok() )
a23fd0e1
VZ
762 {
763 old_background = SetBkColor(GetHdc(), m_textBackgroundColour.GetPixel() );
764 }
765
4314ec48
VZ
766 SetBkMode(GetHdc(), m_backgroundMode == wxTRANSPARENT ? TRANSPARENT
767 : OPAQUE);
a23fd0e1 768
4314ec48 769 if ( ::TextOut(GetHdc(), XLOG2DEV(x), YLOG2DEV(y),
696e1ea0 770 text.c_str(), text.length()) == 0 )
4314ec48
VZ
771 {
772 wxLogLastError("TextOut");
773 }
a23fd0e1 774
4314ec48
VZ
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() )
a23fd0e1
VZ
779 (void)SetBkColor(GetHdc(), old_background);
780
c45a644e 781 SetBkMode(GetHdc(), TRANSPARENT);
a23fd0e1
VZ
782}
783
95724b1a
VZ
784void wxDC::DoDrawRotatedText(const wxString& text,
785 wxCoord x, wxCoord y,
786 double angle)
787{
696e1ea0
VZ
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() )
4314ec48
VZ
793 {
794 DoDrawText(text, x, y);
795 }
796 else
797 {
696e1ea0
VZ
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();
4314ec48 802 LOGFONT lf;
696e1ea0
VZ
803 if ( ::GetObject(hfont, sizeof(lf), &lf) == 0 )
804 {
805 wxLogLastError("GetObject(hfont)");
806 }
4314ec48
VZ
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
696e1ea0 813 hfont = ::CreateFontIndirect(&lf);
4314ec48
VZ
814 if ( !hfont )
815 {
816 wxLogLastError("CreateFont");
817 }
818 else
819 {
696e1ea0 820 HFONT hfontOld = (HFONT)::SelectObject(GetHdc(), hfont);
4314ec48
VZ
821
822 DrawAnyText(text, x, y);
823
824 (void)::SelectObject(GetHdc(), hfontOld);
a3a1ceae 825 (void)::DeleteObject(hfont);
4314ec48
VZ
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));
4314ec48
VZ
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 }
95724b1a
VZ
846}
847
a23fd0e1
VZ
848// ---------------------------------------------------------------------------
849// set GDI objects
850// ---------------------------------------------------------------------------
851
852void 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
2bda0e17
KB
887void wxDC::SetFont(const wxFont& the_font)
888{
7bcb11d3
JS
889 // Set the old object temporarily, in case the assignment deletes an object
890 // that's not yet selected out.
2bda0e17 891 if (m_oldFont)
34da0970 892 {
a23fd0e1 893 ::SelectObject(GetHdc(), (HFONT) m_oldFont);
7bcb11d3
JS
894 m_oldFont = 0;
895 }
a23fd0e1 896
7bcb11d3 897 m_font = the_font;
a23fd0e1 898
7bcb11d3
JS
899 if (!the_font.Ok())
900 {
901 if (m_oldFont)
a23fd0e1
VZ
902 ::SelectObject(GetHdc(), (HFONT) m_oldFont);
903 m_oldFont = 0;
7bcb11d3 904 }
a23fd0e1 905
7bcb11d3
JS
906 if (m_font.Ok() && m_font.GetResourceHandle())
907 {
a23fd0e1 908 HFONT f = (HFONT) ::SelectObject(GetHdc(), (HFONT) m_font.GetResourceHandle());
7bcb11d3
JS
909 if (f == (HFONT) NULL)
910 {
223d09f6 911 wxLogDebug(wxT("::SelectObject failed in wxDC::SetFont."));
7bcb11d3
JS
912 }
913 if (!m_oldFont)
914 m_oldFont = (WXHFONT) f;
34da0970 915 }
2bda0e17
KB
916}
917
918void wxDC::SetPen(const wxPen& pen)
919{
7bcb11d3
JS
920 // Set the old object temporarily, in case the assignment deletes an object
921 // that's not yet selected out.
2bda0e17 922 if (m_oldPen)
2bda0e17 923 {
a23fd0e1 924 ::SelectObject(GetHdc(), (HPEN) m_oldPen);
7bcb11d3
JS
925 m_oldPen = 0;
926 }
a23fd0e1 927
7bcb11d3 928 m_pen = pen;
a23fd0e1 929
7bcb11d3
JS
930 if (!m_pen.Ok())
931 {
932 if (m_oldPen)
a23fd0e1
VZ
933 ::SelectObject(GetHdc(), (HPEN) m_oldPen);
934 m_oldPen = 0;
7bcb11d3 935 }
a23fd0e1 936
7bcb11d3
JS
937 if (m_pen.Ok())
938 {
939 if (m_pen.GetResourceHandle())
940 {
a23fd0e1 941 HPEN p = (HPEN) ::SelectObject(GetHdc(), (HPEN)m_pen.GetResourceHandle());
7bcb11d3
JS
942 if (!m_oldPen)
943 m_oldPen = (WXHPEN) p;
944 }
2bda0e17 945 }
2bda0e17
KB
946}
947
948void wxDC::SetBrush(const wxBrush& brush)
949{
7bcb11d3
JS
950 // Set the old object temporarily, in case the assignment deletes an object
951 // that's not yet selected out.
2bda0e17 952 if (m_oldBrush)
2bda0e17 953 {
a23fd0e1 954 ::SelectObject(GetHdc(), (HBRUSH) m_oldBrush);
7bcb11d3
JS
955 m_oldBrush = 0;
956 }
a23fd0e1 957
7bcb11d3 958 m_brush = brush;
a23fd0e1 959
7bcb11d3
JS
960 if (!m_brush.Ok())
961 {
962 if (m_oldBrush)
a23fd0e1
VZ
963 ::SelectObject(GetHdc(), (HBRUSH) m_oldBrush);
964 m_oldBrush = 0;
7bcb11d3 965 }
a23fd0e1 966
7bcb11d3
JS
967 if (m_brush.Ok())
968 {
969 if (m_brush.GetResourceHandle())
970 {
971 HBRUSH b = 0;
a23fd0e1 972 b = (HBRUSH) ::SelectObject(GetHdc(), (HBRUSH)m_brush.GetResourceHandle());
7bcb11d3
JS
973 if (!m_oldBrush)
974 m_oldBrush = (WXHBRUSH) b;
975 }
2bda0e17 976 }
2bda0e17
KB
977}
978
2bda0e17
KB
979void wxDC::SetBackground(const wxBrush& brush)
980{
7bcb11d3 981 m_backgroundBrush = brush;
a23fd0e1 982
7bcb11d3
JS
983 if (!m_backgroundBrush.Ok())
984 return;
a23fd0e1 985
7bcb11d3 986 if (m_canvas)
2bda0e17 987 {
7bcb11d3
JS
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;
a23fd0e1 993
7bcb11d3
JS
994 if (customColours)
995 {
996 if (m_backgroundBrush.GetStyle()==wxTRANSPARENT)
997 {
cc2b7472 998 m_canvas->SetTransparent(TRUE);
7bcb11d3
JS
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());
cc2b7472 1010 m_canvas->SetTransparent(FALSE);
7bcb11d3
JS
1011 }
1012 }
1013 }
a23fd0e1 1014 COLORREF new_color = m_backgroundBrush.GetColour().GetPixel();
7bcb11d3 1015 {
a23fd0e1 1016 (void)SetBkColor(GetHdc(), new_color);
2bda0e17 1017 }
2bda0e17
KB
1018}
1019
1020void wxDC::SetBackgroundMode(int mode)
1021{
7bcb11d3 1022 m_backgroundMode = mode;
a23fd0e1 1023
c45a644e
RR
1024 // SetBackgroundColour now only refers to text background
1025 // and m_backgroundMode is used there
1026
1027/*
7bcb11d3 1028 if (m_backgroundMode == wxTRANSPARENT)
a23fd0e1 1029 ::SetBkMode(GetHdc(), TRANSPARENT);
7bcb11d3 1030 else
4b7f2165 1031 ::SetBkMode(GetHdc(), OPAQUE);
c45a644e 1032*/
2bda0e17
KB
1033}
1034
1035void wxDC::SetLogicalFunction(int function)
1036{
7bcb11d3 1037 m_logicalFunction = function;
a23fd0e1 1038
ed791986 1039 SetRop(m_hDC);
2bda0e17
KB
1040}
1041
1042void wxDC::SetRop(WXHDC dc)
1043{
ed791986 1044 if ( !dc || m_logicalFunction < 0 )
7bcb11d3 1045 return;
a23fd0e1 1046
ed791986
VZ
1047 int rop;
1048
7bcb11d3
JS
1049 switch (m_logicalFunction)
1050 {
ed791986
VZ
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;
71fe5c01 1067 default:
71fe5c01 1068 wxFAIL_MSG( wxT("unsupported logical function") );
ed791986 1069 return;
7bcb11d3 1070 }
ed791986
VZ
1071
1072 SetROP2(GetHdc(), rop);
2bda0e17
KB
1073}
1074
1075bool wxDC::StartDoc(const wxString& message)
1076{
7bcb11d3 1077 // We might be previewing, so return TRUE to let it continue.
2bda0e17 1078 return TRUE;
2bda0e17
KB
1079}
1080
a23fd0e1 1081void wxDC::EndDoc()
2bda0e17 1082{
2bda0e17
KB
1083}
1084
a23fd0e1 1085void wxDC::StartPage()
2bda0e17 1086{
2bda0e17
KB
1087}
1088
a23fd0e1 1089void wxDC::EndPage()
2bda0e17 1090{
2bda0e17
KB
1091}
1092
a23fd0e1
VZ
1093// ---------------------------------------------------------------------------
1094// text metrics
1095// ---------------------------------------------------------------------------
1096
72cdf4c9 1097wxCoord wxDC::GetCharHeight() const
2bda0e17 1098{
7bcb11d3 1099 TEXTMETRIC lpTextMetric;
a23fd0e1
VZ
1100
1101 GetTextMetrics(GetHdc(), &lpTextMetric);
1102
7bcb11d3 1103 return YDEV2LOGREL(lpTextMetric.tmHeight);
2bda0e17
KB
1104}
1105
72cdf4c9 1106wxCoord wxDC::GetCharWidth() const
2bda0e17 1107{
7bcb11d3 1108 TEXTMETRIC lpTextMetric;
a23fd0e1
VZ
1109
1110 GetTextMetrics(GetHdc(), &lpTextMetric);
1111
7bcb11d3 1112 return XDEV2LOGREL(lpTextMetric.tmAveCharWidth);
2bda0e17
KB
1113}
1114
72cdf4c9
VZ
1115void wxDC::DoGetTextExtent(const wxString& string, wxCoord *x, wxCoord *y,
1116 wxCoord *descent, wxCoord *externalLeading,
1117 wxFont *theFont) const
2bda0e17 1118{
7bcb11d3
JS
1119 wxFont *fontToUse = (wxFont*) theFont;
1120 if (!fontToUse)
1121 fontToUse = (wxFont*) &m_font;
a23fd0e1 1122
7bcb11d3
JS
1123 SIZE sizeRect;
1124 TEXTMETRIC tm;
a23fd0e1 1125
837e5743 1126 GetTextExtentPoint(GetHdc(), WXSTRINGCAST string, wxStrlen(WXSTRINGCAST string), &sizeRect);
a23fd0e1
VZ
1127 GetTextMetrics(GetHdc(), &tm);
1128
7bcb11d3
JS
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;
2bda0e17
KB
1133}
1134
1135void wxDC::SetMapMode(int mode)
1136{
7bcb11d3 1137 m_mappingMode = mode;
a23fd0e1 1138
7bcb11d3
JS
1139 int pixel_width = 0;
1140 int pixel_height = 0;
1141 int mm_width = 0;
1142 int mm_height = 0;
a23fd0e1
VZ
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
7bcb11d3 1149 if ((pixel_width == 0) || (pixel_height == 0) || (mm_width == 0) || (mm_height == 0))
2bda0e17 1150 {
7bcb11d3 1151 return;
2bda0e17 1152 }
a23fd0e1 1153
7bcb11d3
JS
1154 double mm2pixelsX = pixel_width/mm_width;
1155 double mm2pixelsY = pixel_height/mm_height;
a23fd0e1 1156
7bcb11d3 1157 switch (mode)
2bda0e17 1158 {
7bcb11d3
JS
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 }
e3065973 1171 case wxMM_METRIC:
7bcb11d3
JS
1172 {
1173 m_logicalScaleX = mm2pixelsX;
1174 m_logicalScaleY = mm2pixelsY;
1175 break;
1176 }
e3065973 1177 case wxMM_LOMETRIC:
7bcb11d3
JS
1178 {
1179 m_logicalScaleX = (mm2pixelsX/10.0);
1180 m_logicalScaleY = (mm2pixelsY/10.0);
1181 break;
1182 }
2bda0e17 1183 default:
e3065973 1184 case wxMM_TEXT:
7bcb11d3
JS
1185 {
1186 m_logicalScaleX = 1.0;
1187 m_logicalScaleY = 1.0;
1188 break;
1189 }
2bda0e17 1190 }
a23fd0e1
VZ
1191
1192 if (::GetMapMode(GetHdc()) != MM_ANISOTROPIC)
1193 ::SetMapMode(GetHdc(), MM_ANISOTROPIC);
1194
1195 SetViewportExtEx(GetHdc(), VIEWPORT_EXTENT, VIEWPORT_EXTENT, NULL);
7bcb11d3
JS
1196 m_windowExtX = (int)MS_XDEV2LOGREL(VIEWPORT_EXTENT);
1197 m_windowExtY = (int)MS_YDEV2LOGREL(VIEWPORT_EXTENT);
a23fd0e1
VZ
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);
2bda0e17
KB
1201}
1202
1203void wxDC::SetUserScale(double x, double y)
1204{
7bcb11d3
JS
1205 m_userScaleX = x;
1206 m_userScaleY = y;
a23fd0e1 1207
7bcb11d3 1208 SetMapMode(m_mappingMode);
2bda0e17
KB
1209}
1210
6f65e337
JS
1211void wxDC::SetAxisOrientation(bool xLeftRight, bool yBottomUp)
1212{
7bcb11d3
JS
1213 m_signX = xLeftRight ? 1 : -1;
1214 m_signY = yBottomUp ? -1 : 1;
a23fd0e1 1215
7bcb11d3 1216 SetMapMode(m_mappingMode);
6f65e337
JS
1217}
1218
2bda0e17
KB
1219void wxDC::SetSystemScale(double x, double y)
1220{
a23fd0e1
VZ
1221 m_scaleX = x;
1222 m_scaleY = y;
1223
7bcb11d3 1224 SetMapMode(m_mappingMode);
2bda0e17
KB
1225}
1226
72cdf4c9 1227void wxDC::SetLogicalOrigin(wxCoord x, wxCoord y)
2bda0e17 1228{
7bcb11d3
JS
1229 m_logicalOriginX = x;
1230 m_logicalOriginY = y;
a23fd0e1
VZ
1231
1232 ::SetWindowOrgEx(GetHdc(), (int)m_logicalOriginX, (int)m_logicalOriginY, NULL);
2bda0e17
KB
1233}
1234
72cdf4c9 1235void wxDC::SetDeviceOrigin(wxCoord x, wxCoord y)
2bda0e17 1236{
7bcb11d3
JS
1237 m_deviceOriginX = x;
1238 m_deviceOriginY = y;
2bda0e17 1239
a23fd0e1 1240 ::SetViewportOrgEx(GetHdc(), (int)m_deviceOriginX, (int)m_deviceOriginY, NULL);
2bda0e17
KB
1241}
1242
a23fd0e1
VZ
1243// ---------------------------------------------------------------------------
1244// coordinates transformations
1245// ---------------------------------------------------------------------------
2bda0e17 1246
72cdf4c9 1247wxCoord wxDCBase::DeviceToLogicalX(wxCoord x) const
2bda0e17 1248{
72cdf4c9 1249 return (wxCoord) (((x) - m_deviceOriginX)/(m_logicalScaleX*m_userScaleX*m_signX*m_scaleX) - m_logicalOriginX);
2bda0e17
KB
1250}
1251
72cdf4c9 1252wxCoord wxDCBase::DeviceToLogicalXRel(wxCoord x) const
2bda0e17 1253{
72cdf4c9 1254 return (wxCoord) ((x)/(m_logicalScaleX*m_userScaleX*m_signX*m_scaleX));
2bda0e17
KB
1255}
1256
72cdf4c9 1257wxCoord wxDCBase::DeviceToLogicalY(wxCoord y) const
2bda0e17 1258{
72cdf4c9 1259 return (wxCoord) (((y) - m_deviceOriginY)/(m_logicalScaleY*m_userScaleY*m_signY*m_scaleY) - m_logicalOriginY);
2bda0e17
KB
1260}
1261
72cdf4c9 1262wxCoord wxDCBase::DeviceToLogicalYRel(wxCoord y) const
2bda0e17 1263{
72cdf4c9 1264 return (wxCoord) ((y)/(m_logicalScaleY*m_userScaleY*m_signY*m_scaleY));
2bda0e17
KB
1265}
1266
72cdf4c9 1267wxCoord wxDCBase::LogicalToDeviceX(wxCoord x) const
2bda0e17 1268{
72cdf4c9 1269 return (wxCoord) ((x - m_logicalOriginX)*m_logicalScaleX*m_userScaleX*m_signX*m_scaleX + m_deviceOriginX);
2bda0e17
KB
1270}
1271
72cdf4c9 1272wxCoord wxDCBase::LogicalToDeviceXRel(wxCoord x) const
2bda0e17 1273{
72cdf4c9 1274 return (wxCoord) (x*m_logicalScaleX*m_userScaleX*m_signX*m_scaleX);
2bda0e17
KB
1275}
1276
72cdf4c9 1277wxCoord wxDCBase::LogicalToDeviceY(wxCoord y) const
2bda0e17 1278{
72cdf4c9 1279 return (wxCoord) ((y - m_logicalOriginY)*m_logicalScaleY*m_userScaleY*m_signY*m_scaleY + m_deviceOriginY);
2bda0e17
KB
1280}
1281
72cdf4c9 1282wxCoord wxDCBase::LogicalToDeviceYRel(wxCoord y) const
2bda0e17 1283{
72cdf4c9 1284 return (wxCoord) (y*m_logicalScaleY*m_userScaleY*m_signY*m_scaleY);
2bda0e17
KB
1285}
1286
a23fd0e1
VZ
1287// ---------------------------------------------------------------------------
1288// bit blit
1289// ---------------------------------------------------------------------------
4b7f2165
VZ
1290
1291bool wxDC::DoBlit(wxCoord xdest, wxCoord ydest,
1292 wxCoord width, wxCoord height,
1293 wxDC *source, wxCoord xsrc, wxCoord ysrc,
1294 int rop, bool useMask)
2bda0e17 1295{
4b7f2165
VZ
1296 wxMask *mask = NULL;
1297 if ( useMask )
1298 {
1299 const wxBitmap& bmp = source->m_selectedBitmap;
1300 mask = bmp.GetMask();
1301
d5536ade
VZ
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 }
4b7f2165 1308 }
a23fd0e1 1309
a23fd0e1
VZ
1310 COLORREF old_textground = ::GetTextColor(GetHdc());
1311 COLORREF old_background = ::GetBkColor(GetHdc());
7bcb11d3
JS
1312 if (m_textForegroundColour.Ok())
1313 {
a23fd0e1 1314 ::SetTextColor(GetHdc(), m_textForegroundColour.GetPixel() );
7bcb11d3
JS
1315 }
1316 if (m_textBackgroundColour.Ok())
1317 {
a23fd0e1 1318 ::SetBkColor(GetHdc(), m_textBackgroundColour.GetPixel() );
7bcb11d3 1319 }
a23fd0e1 1320
71fe5c01
RR
1321 DWORD dwRop = SRCCOPY;
1322 switch (rop)
1323 {
ed791986
VZ
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;
71fe5c01
RR
1339 case wxNOR: dwRop = NOTSRCCOPY; break;
1340 default:
71fe5c01 1341 wxFAIL_MSG( wxT("unsupported logical function") );
ed791986 1342 return FALSE;
71fe5c01
RR
1343 }
1344
4b7f2165 1345 bool success;
730bc726
JS
1346
1347 if (useMask)
7bcb11d3 1348 {
4b7f2165 1349#ifdef __WIN32__
91b4c08d 1350 // prepare the mask bitmap
a58a12e9
VZ
1351 HBITMAP hbmpMask = wxInvertMask((HBITMAP)mask->GetMaskBitmap());
1352
91b4c08d
VZ
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
a58a12e9
VZ
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
a58a12e9 1373
d624fd67
GRG
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 //
a58a12e9
VZ
1379 success = ::MaskBlt(GetHdc(), xdest, ydest, width, height,
1380 GetHdcOf(*source), xsrc, ysrc,
1381 hbmpMask, 0, 0,
8fcae2d6 1382 MAKEROP4(0x00AA0029, dwRop)) != 0;
a58a12e9 1383
91b4c08d
VZ
1384 if ( hbrNew )
1385 {
1386 (void)::SelectObject(GetHdc(), hbrOld);
1387 }
1388
a58a12e9
VZ
1389 ::DeleteObject(hbmpMask);
1390
1391 if ( !success )
4b7f2165 1392#endif // Win32
7bcb11d3 1393 {
7bcb11d3 1394 // Blit bitmap with mask
a23fd0e1 1395
4b7f2165
VZ
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) )
7bcb11d3 1406 {
4b7f2165 1407 wxLogLastError("BitBlt");
7bcb11d3 1408 }
4b7f2165
VZ
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) )
7bcb11d3 1413 {
4b7f2165 1414 wxLogLastError("BitBlt");
7bcb11d3 1415 }
4b7f2165
VZ
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);
7bcb11d3
JS
1452 }
1453 }
4b7f2165 1454 else // no mask, just BitBlt() it
730bc726 1455 {
4b7f2165
VZ
1456 success = ::BitBlt(GetHdc(), xdest, ydest,
1457 (int)width, (int)height,
1458 GetHdcOf(*source), xsrc, ysrc, dwRop) != 0;
1459 if ( !success )
730bc726 1460 {
4b7f2165 1461 wxLogLastError("BitBlt");
730bc726 1462 }
730bc726 1463 }
a23fd0e1
VZ
1464 ::SetTextColor(GetHdc(), old_textground);
1465 ::SetBkColor(GetHdc(), old_background);
2bda0e17 1466
a23fd0e1 1467 return success;
2bda0e17
KB
1468}
1469
a23fd0e1 1470void wxDC::DoGetSize(int *w, int *h) const
2bda0e17 1471{
a23fd0e1
VZ
1472 if ( w ) *w = ::GetDeviceCaps(GetHdc(), HORZRES);
1473 if ( h ) *h = ::GetDeviceCaps(GetHdc(), VERTRES);
2bda0e17
KB
1474}
1475
a23fd0e1 1476void wxDC::DoGetSizeMM(int *w, int *h) const
2bda0e17 1477{
a23fd0e1
VZ
1478 if ( w ) *w = ::GetDeviceCaps(GetHdc(), HORZSIZE);
1479 if ( h ) *h = ::GetDeviceCaps(GetHdc(), VERTSIZE);
7bcb11d3 1480}
2bda0e17 1481
a23fd0e1 1482wxSize wxDC::GetPPI() const
7bcb11d3 1483{
a23fd0e1
VZ
1484 int x = ::GetDeviceCaps(GetHdc(), LOGPIXELSX);
1485 int y = ::GetDeviceCaps(GetHdc(), LOGPIXELSY);
2bda0e17 1486
a23fd0e1 1487 return wxSize(x, y);
2bda0e17
KB
1488}
1489
2bda0e17
KB
1490// For use by wxWindows only, unless custom units are required.
1491void wxDC::SetLogicalScale(double x, double y)
1492{
7bcb11d3
JS
1493 m_logicalScaleX = x;
1494 m_logicalScaleY = y;
2bda0e17
KB
1495}
1496
2bda0e17 1497#if WXWIN_COMPATIBILITY
a23fd0e1 1498void wxDC::DoGetTextExtent(const wxString& string, float *x, float *y,
7bcb11d3
JS
1499 float *descent, float *externalLeading,
1500 wxFont *theFont, bool use16bit) const
2bda0e17 1501{
72cdf4c9 1502 wxCoord x1, y1, descent1, externalLeading1;
fd3f686c
VZ
1503 GetTextExtent(string, & x1, & y1, & descent1, & externalLeading1, theFont, use16bit);
1504 *x = x1; *y = y1;
2bda0e17
KB
1505 if (descent)
1506 *descent = descent1;
1507 if (externalLeading)
1508 *externalLeading = externalLeading1;
1509}
1510#endif
8b9518ee 1511
a23fd0e1
VZ
1512// ---------------------------------------------------------------------------
1513// spline drawing code
1514// ---------------------------------------------------------------------------
7b46ecac 1515
dfad0599
JS
1516#if wxUSE_SPLINES
1517
dfad0599
JS
1518class wxSpline: public wxObject
1519{
7bcb11d3
JS
1520public:
1521 int type;
1522 wxList *points;
a23fd0e1 1523
7bcb11d3 1524 wxSpline(wxList *list);
a23fd0e1
VZ
1525 void DeletePoints();
1526
7bcb11d3 1527 // Doesn't delete points
a23fd0e1 1528 ~wxSpline();
dfad0599
JS
1529};
1530
dfad0599
JS
1531void wx_draw_open_spline(wxDC *dc, wxSpline *spline);
1532
1533void wx_quadratic_spline(double a1, double b1, double a2, double b2,
1534 double a3, double b3, double a4, double b4);
a23fd0e1 1535void wx_clear_stack();
dfad0599 1536int wx_spline_pop(double *x1, double *y1, double *x2, double *y2, double *x3,
7bcb11d3 1537 double *y3, double *x4, double *y4);
dfad0599 1538void wx_spline_push(double x1, double y1, double x2, double y2, double x3, double y3,
7bcb11d3 1539 double x4, double y4);
dfad0599
JS
1540static bool wx_spline_add_point(double x, double y);
1541static void wx_spline_draw_point_array(wxDC *dc);
1542wxSpline *wx_make_spline(int x1, int y1, int x2, int y2, int x3, int y3);
1543
a23fd0e1 1544void wxDC::DoDrawSpline(wxList *list)
dfad0599 1545{
7bcb11d3 1546 wxSpline spline(list);
a23fd0e1 1547
7bcb11d3 1548 wx_draw_open_spline(this, &spline);
dfad0599
JS
1549}
1550
dfad0599
JS
1551wxList wx_spline_point_list;
1552
1553void 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;
a23fd0e1 1558
dfad0599
JS
1559 wxNode *node = spline->points->First();
1560 p = (wxPoint *)node->Data();
a23fd0e1 1561
dfad0599
JS
1562 x1 = p->x;
1563 y1 = p->y;
a23fd0e1 1564
dfad0599
JS
1565 node = node->Next();
1566 p = (wxPoint *)node->Data();
a23fd0e1 1567
dfad0599
JS
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);
a23fd0e1 1574
dfad0599 1575 wx_spline_add_point(x1, y1);
a23fd0e1 1576
dfad0599
JS
1577 while ((node = node->Next()) != NULL)
1578 {
1579 p = (wxPoint *)node->Data();
7bcb11d3
JS
1580 x1 = x2;
1581 y1 = y2;
1582 x2 = p->x;
1583 y2 = p->y;
dfad0599
JS
1584 cx4 = (double)(x1 + x2) / 2;
1585 cy4 = (double)(y1 + y2) / 2;
1586 cx3 = (double)(x1 + cx4) / 2;
1587 cy3 = (double)(y1 + cy4) / 2;
a23fd0e1 1588
dfad0599 1589 wx_quadratic_spline(cx1, cy1, cx2, cy2, cx3, cy3, cx4, cy4);
a23fd0e1 1590
7bcb11d3
JS
1591 cx1 = cx4;
1592 cy1 = cy4;
dfad0599
JS
1593 cx2 = (double)(cx1 + x2) / 2;
1594 cy2 = (double)(cy1 + y2) / 2;
1595 }
a23fd0e1 1596
dfad0599
JS
1597 wx_spline_add_point((double)wx_round(cx1), (double)wx_round(cy1));
1598 wx_spline_add_point(x2, y2);
a23fd0e1 1599
dfad0599 1600 wx_spline_draw_point_array(dc);
a23fd0e1 1601
dfad0599
JS
1602}
1603
1604/********************* CURVES FOR SPLINES *****************************
1605
7bcb11d3 1606 The following spline drawing routine is from
a23fd0e1 1607
fd3f686c
VZ
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.
a23fd0e1 1612
7bcb11d3 1613 and
a23fd0e1 1614
7bcb11d3
JS
1615 "On Chaikin's Algorithm" by R. F. Riesenfeld,
1616 Computer Graphics and Image Processing, 4, Academic Press,
1617 1975, 304-310.
a23fd0e1 1618
dfad0599
JS
1619***********************************************************************/
1620
fd3f686c
VZ
1621#define half(z1, z2) ((z1+z2)/2.0)
1622#define THRESHOLD 5
dfad0599
JS
1623
1624/* iterative version */
1625
1626void wx_quadratic_spline(double a1, double b1, double a2, double b2, double a3, double b3, double a4,
7bcb11d3 1627 double b4)
dfad0599
JS
1628{
1629 register double xmid, ymid;
1630 double x1, y1, x2, y2, x3, y3, x4, y4;
a23fd0e1 1631
dfad0599
JS
1632 wx_clear_stack();
1633 wx_spline_push(a1, b1, a2, b2, a3, b3, a4, b4);
a23fd0e1 1634
dfad0599
JS
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);
7bcb11d3
JS
1638 if (fabs(x1 - xmid) < THRESHOLD && fabs(y1 - ymid) < THRESHOLD &&
1639 fabs(xmid - x4) < THRESHOLD && fabs(ymid - y4) < THRESHOLD) {
dfad0599
JS
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));
7bcb11d3 1642 } else {
dfad0599 1643 wx_spline_push(xmid, ymid, (double)half(xmid, x3), (double)half(ymid, y3),
7bcb11d3 1644 (double)half(x3, x4), (double)half(y3, y4), x4, y4);
dfad0599 1645 wx_spline_push(x1, y1, (double)half(x1, x2), (double)half(y1, y2),
7bcb11d3
JS
1646 (double)half(x2, xmid), (double)half(y2, ymid), xmid, ymid);
1647 }
dfad0599
JS
1648 }
1649}
1650
1651
1652/* utilities used by spline drawing routines */
1653
1654
1655typedef struct wx_spline_stack_struct {
1656 double x1, y1, x2, y2, x3, y3, x4, y4;
1657}
7bcb11d3 1658Stack;
dfad0599
JS
1659
1660#define SPLINE_STACK_DEPTH 20
1661static Stack wx_spline_stack[SPLINE_STACK_DEPTH];
1662static Stack *wx_stack_top;
1663static int wx_stack_count;
1664
a23fd0e1 1665void wx_clear_stack()
dfad0599
JS
1666{
1667 wx_stack_top = wx_spline_stack;
1668 wx_stack_count = 0;
1669}
1670
1671void 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
1685int 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)
7bcb11d3 1689 return (0);
dfad0599
JS
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
1703static bool wx_spline_add_point(double x, double y)
1704{
a23fd0e1 1705 wxPoint *point = new wxPoint;
7bcb11d3
JS
1706 point->x = (int) x;
1707 point->y = (int) y;
1708 wx_spline_point_list.Append((wxObject*)point);
1709 return TRUE;
dfad0599
JS
1710}
1711
1712static void wx_spline_draw_point_array(wxDC *dc)
1713{
7bcb11d3
JS
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 }
dfad0599
JS
1723}
1724
1725wxSpline::wxSpline(wxList *list)
1726{
7bcb11d3 1727 points = list;
dfad0599
JS
1728}
1729
a23fd0e1 1730wxSpline::~wxSpline()
dfad0599
JS
1731{
1732}
1733
a23fd0e1 1734void wxSpline::DeletePoints()
dfad0599 1735{
7bcb11d3
JS
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;
dfad0599
JS
1743}
1744
1745
1746#endif // wxUSE_SPLINES
7b46ecac 1747