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