]> git.saurik.com Git - wxWidgets.git/blob - src/msw/dc.cpp
fixed font-matching bug in wxFontList::FindOrCreateFont for wxGTK when
[wxWidgets.git] / src / msw / dc.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: dc.cpp
3 // Purpose: wxDC class
4 // Author: Julian Smart
5 // Modified by:
6 // Created: 01/02/97
7 // RCS-ID: $Id$
8 // Copyright: (c) Julian Smart and Markus Holzem
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 // ===========================================================================
13 // declarations
14 // ===========================================================================
15
16 // ---------------------------------------------------------------------------
17 // headers
18 // ---------------------------------------------------------------------------
19
20 #ifdef __GNUG__
21 #pragma implementation "dc.h"
22 #endif
23
24 // For compilers that support precompilation, includes "wx.h".
25 #include "wx/wxprec.h"
26
27 #ifdef __BORLANDC__
28 #pragma hdrstop
29 #endif
30
31 #ifndef WX_PRECOMP
32 #include "wx/window.h"
33 #include "wx/dc.h"
34 #include "wx/utils.h"
35 #include "wx/dialog.h"
36 #include "wx/app.h"
37 #include "wx/bitmap.h"
38 #include "wx/dcmemory.h"
39 #include "wx/log.h"
40 #include "wx/icon.h"
41 #endif
42
43 #include "wx/dcprint.h"
44
45 #include <string.h>
46 #include <math.h>
47
48 #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
66 static const int VIEWPORT_EXTENT = 1000;
67
68 static const int MM_POINTS = 9;
69 static const int MM_METRIC = 10;
70
71 // ===========================================================================
72 // implementation
73 // ===========================================================================
74
75 // ---------------------------------------------------------------------------
76 // wxDC
77 // ---------------------------------------------------------------------------
78
79 // Default constructor
80 wxDC::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
100 wxDC::~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.
117 void 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
164 void 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
175 void 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
194 void 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
203 void 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
221 bool wxDC::CanDrawBitmap() const
222 {
223 return TRUE;
224 }
225
226 bool 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
234 int wxDC::GetDepth() const
235 {
236 return (int)::GetDeviceCaps(GetHdc(), BITSPIXEL);
237 }
238
239 // ---------------------------------------------------------------------------
240 // drawing
241 // ---------------------------------------------------------------------------
242
243 void 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
273 void 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
283 bool 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
308 void 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
325 void 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
339 void 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
381 void 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
394 void 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
425 void 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
452 void 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
496 void 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
521 void 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
533 void 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
569 void 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
582 void 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
620 void 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
652 void 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
687 void 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
718 void 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
748 void 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
779 void 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
820 void 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
830 void wxDC::SetLogicalFunction(int function)
831 {
832 m_logicalFunction = function;
833
834 SetRop((WXHDC) m_hDC);
835 }
836
837 void 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
867 bool wxDC::StartDoc(const wxString& message)
868 {
869 // We might be previewing, so return TRUE to let it continue.
870 return TRUE;
871 }
872
873 void wxDC::EndDoc()
874 {
875 }
876
877 void wxDC::StartPage()
878 {
879 }
880
881 void wxDC::EndPage()
882 {
883 }
884
885 // ---------------------------------------------------------------------------
886 // text metrics
887 // ---------------------------------------------------------------------------
888
889 long wxDC::GetCharHeight() const
890 {
891 TEXTMETRIC lpTextMetric;
892
893 GetTextMetrics(GetHdc(), &lpTextMetric);
894
895 return YDEV2LOGREL(lpTextMetric.tmHeight);
896 }
897
898 long wxDC::GetCharWidth() const
899 {
900 TEXTMETRIC lpTextMetric;
901
902 GetTextMetrics(GetHdc(), &lpTextMetric);
903
904 return XDEV2LOGREL(lpTextMetric.tmAveCharWidth);
905 }
906
907 void 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
927 void 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
995 void wxDC::SetUserScale(double x, double y)
996 {
997 m_userScaleX = x;
998 m_userScaleY = y;
999
1000 SetMapMode(m_mappingMode);
1001 }
1002
1003 void 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
1011 void wxDC::SetSystemScale(double x, double y)
1012 {
1013 m_scaleX = x;
1014 m_scaleY = y;
1015
1016 SetMapMode(m_mappingMode);
1017 }
1018
1019 void 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
1027 void 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
1039 long wxDCBase::DeviceToLogicalX(long x) const
1040 {
1041 return (long) (((x) - m_deviceOriginX)/(m_logicalScaleX*m_userScaleX*m_signX*m_scaleX) - m_logicalOriginX);
1042 }
1043
1044 long wxDCBase::DeviceToLogicalXRel(long x) const
1045 {
1046 return (long) ((x)/(m_logicalScaleX*m_userScaleX*m_signX*m_scaleX));
1047 }
1048
1049 long wxDCBase::DeviceToLogicalY(long y) const
1050 {
1051 return (long) (((y) - m_deviceOriginY)/(m_logicalScaleY*m_userScaleY*m_signY*m_scaleY) - m_logicalOriginY);
1052 }
1053
1054 long wxDCBase::DeviceToLogicalYRel(long y) const
1055 {
1056 return (long) ((y)/(m_logicalScaleY*m_userScaleY*m_signY*m_scaleY));
1057 }
1058
1059 long wxDCBase::LogicalToDeviceX(long x) const
1060 {
1061 return (long) ((x - m_logicalOriginX)*m_logicalScaleX*m_userScaleX*m_signX*m_scaleX + m_deviceOriginX);
1062 }
1063
1064 long wxDCBase::LogicalToDeviceXRel(long x) const
1065 {
1066 return (long) (x*m_logicalScaleX*m_userScaleX*m_signX*m_scaleX);
1067 }
1068
1069 long wxDCBase::LogicalToDeviceY(long y) const
1070 {
1071 return (long) ((y - m_logicalOriginY)*m_logicalScaleY*m_userScaleY*m_signY*m_scaleY + m_deviceOriginY);
1072 }
1073
1074 long 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 // ---------------------------------------------------------------------------
1082 bool 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
1251 void wxDC::DoGetSize(int *w, int *h) const
1252 {
1253 if ( w ) *w = ::GetDeviceCaps(GetHdc(), HORZRES);
1254 if ( h ) *h = ::GetDeviceCaps(GetHdc(), VERTRES);
1255 }
1256
1257 void wxDC::DoGetSizeMM(int *w, int *h) const
1258 {
1259 if ( w ) *w = ::GetDeviceCaps(GetHdc(), HORZSIZE);
1260 if ( h ) *h = ::GetDeviceCaps(GetHdc(), VERTSIZE);
1261 }
1262
1263 wxSize 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.
1272 void wxDC::SetLogicalScale(double x, double y)
1273 {
1274 m_logicalScaleX = x;
1275 m_logicalScaleY = y;
1276 }
1277
1278 #if WXWIN_COMPATIBILITY
1279 void 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
1299 class wxSpline: public wxObject
1300 {
1301 public:
1302 int type;
1303 wxList *points;
1304
1305 wxSpline(wxList *list);
1306 void DeletePoints();
1307
1308 // Doesn't delete points
1309 ~wxSpline();
1310 };
1311
1312 void wx_draw_open_spline(wxDC *dc, wxSpline *spline);
1313
1314 void wx_quadratic_spline(double a1, double b1, double a2, double b2,
1315 double a3, double b3, double a4, double b4);
1316 void wx_clear_stack();
1317 int wx_spline_pop(double *x1, double *y1, double *x2, double *y2, double *x3,
1318 double *y3, double *x4, double *y4);
1319 void wx_spline_push(double x1, double y1, double x2, double y2, double x3, double y3,
1320 double x4, double y4);
1321 static bool wx_spline_add_point(double x, double y);
1322 static void wx_spline_draw_point_array(wxDC *dc);
1323 wxSpline *wx_make_spline(int x1, int y1, int x2, int y2, int x3, int y3);
1324
1325 void wxDC::DoDrawSpline(wxList *list)
1326 {
1327 wxSpline spline(list);
1328
1329 wx_draw_open_spline(this, &spline);
1330 }
1331
1332 wxList wx_spline_point_list;
1333
1334 void 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
1407 void 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
1436 typedef struct wx_spline_stack_struct {
1437 double x1, y1, x2, y2, x3, y3, x4, y4;
1438 }
1439 Stack;
1440
1441 #define SPLINE_STACK_DEPTH 20
1442 static Stack wx_spline_stack[SPLINE_STACK_DEPTH];
1443 static Stack *wx_stack_top;
1444 static int wx_stack_count;
1445
1446 void wx_clear_stack()
1447 {
1448 wx_stack_top = wx_spline_stack;
1449 wx_stack_count = 0;
1450 }
1451
1452 void 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
1466 int 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
1484 static 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
1493 static 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
1506 wxSpline::wxSpline(wxList *list)
1507 {
1508 points = list;
1509 }
1510
1511 wxSpline::~wxSpline()
1512 {
1513 }
1514
1515 void 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