]> git.saurik.com Git - wxWidgets.git/blob - src/msw/dc.cpp
1. wxSpinButton fixed: it now sends EVT_SPIN_UP/DOWN messages (and unnecessary
[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 // background colour is used only for DrawText, otherwise
642 // always TRANSPARENT, RR
643 SetBkMode(GetHdc(), TRANSPARENT);
644
645 CalcBoundingBox(x, y);
646
647 long w, h;
648 GetTextExtent(text, &w, &h);
649 CalcBoundingBox((x + w), (y + h));
650 }
651
652 // ---------------------------------------------------------------------------
653 // set GDI objects
654 // ---------------------------------------------------------------------------
655
656 void wxDC::SetPalette(const wxPalette& palette)
657 {
658 // Set the old object temporarily, in case the assignment deletes an object
659 // that's not yet selected out.
660 if (m_oldPalette)
661 {
662 ::SelectPalette(GetHdc(), (HPALETTE) m_oldPalette, TRUE);
663 m_oldPalette = 0;
664 }
665
666 m_palette = palette;
667
668 if (!m_palette.Ok())
669 {
670 // Setting a NULL colourmap is a way of restoring
671 // the original colourmap
672 if (m_oldPalette)
673 {
674 ::SelectPalette(GetHdc(), (HPALETTE) m_oldPalette, TRUE);
675 m_oldPalette = 0;
676 }
677
678 return;
679 }
680
681 if (m_palette.Ok() && m_palette.GetHPALETTE())
682 {
683 HPALETTE oldPal = ::SelectPalette(GetHdc(), (HPALETTE) m_palette.GetHPALETTE(), TRUE);
684 if (!m_oldPalette)
685 m_oldPalette = (WXHPALETTE) oldPal;
686
687 ::RealizePalette(GetHdc());
688 }
689 }
690
691 void wxDC::SetFont(const wxFont& the_font)
692 {
693 // Set the old object temporarily, in case the assignment deletes an object
694 // that's not yet selected out.
695 if (m_oldFont)
696 {
697 ::SelectObject(GetHdc(), (HFONT) m_oldFont);
698 m_oldFont = 0;
699 }
700
701 m_font = the_font;
702
703 if (!the_font.Ok())
704 {
705 if (m_oldFont)
706 ::SelectObject(GetHdc(), (HFONT) m_oldFont);
707 m_oldFont = 0;
708 }
709
710 if (m_font.Ok() && m_font.GetResourceHandle())
711 {
712 HFONT f = (HFONT) ::SelectObject(GetHdc(), (HFONT) m_font.GetResourceHandle());
713 if (f == (HFONT) NULL)
714 {
715 wxLogDebug(_T("::SelectObject failed in wxDC::SetFont."));
716 }
717 if (!m_oldFont)
718 m_oldFont = (WXHFONT) f;
719 }
720 }
721
722 void wxDC::SetPen(const wxPen& pen)
723 {
724 // Set the old object temporarily, in case the assignment deletes an object
725 // that's not yet selected out.
726 if (m_oldPen)
727 {
728 ::SelectObject(GetHdc(), (HPEN) m_oldPen);
729 m_oldPen = 0;
730 }
731
732 m_pen = pen;
733
734 if (!m_pen.Ok())
735 {
736 if (m_oldPen)
737 ::SelectObject(GetHdc(), (HPEN) m_oldPen);
738 m_oldPen = 0;
739 }
740
741 if (m_pen.Ok())
742 {
743 if (m_pen.GetResourceHandle())
744 {
745 HPEN p = (HPEN) ::SelectObject(GetHdc(), (HPEN)m_pen.GetResourceHandle());
746 if (!m_oldPen)
747 m_oldPen = (WXHPEN) p;
748 }
749 }
750 }
751
752 void wxDC::SetBrush(const wxBrush& brush)
753 {
754 // Set the old object temporarily, in case the assignment deletes an object
755 // that's not yet selected out.
756 if (m_oldBrush)
757 {
758 ::SelectObject(GetHdc(), (HBRUSH) m_oldBrush);
759 m_oldBrush = 0;
760 }
761
762 m_brush = brush;
763
764 if (!m_brush.Ok())
765 {
766 if (m_oldBrush)
767 ::SelectObject(GetHdc(), (HBRUSH) m_oldBrush);
768 m_oldBrush = 0;
769 }
770
771 if (m_brush.Ok())
772 {
773 if (m_brush.GetResourceHandle())
774 {
775 HBRUSH b = 0;
776 b = (HBRUSH) ::SelectObject(GetHdc(), (HBRUSH)m_brush.GetResourceHandle());
777 if (!m_oldBrush)
778 m_oldBrush = (WXHBRUSH) b;
779 }
780 }
781 }
782
783 void wxDC::SetBackground(const wxBrush& brush)
784 {
785 m_backgroundBrush = brush;
786
787 if (!m_backgroundBrush.Ok())
788 return;
789
790 if (m_canvas)
791 {
792 bool customColours = TRUE;
793 // If we haven't specified wxUSER_COLOURS, don't allow the panel/dialog box to
794 // change background colours from the control-panel specified colours.
795 if (m_canvas->IsKindOf(CLASSINFO(wxWindow)) && ((m_canvas->GetWindowStyleFlag() & wxUSER_COLOURS) != wxUSER_COLOURS))
796 customColours = FALSE;
797
798 if (customColours)
799 {
800 if (m_backgroundBrush.GetStyle()==wxTRANSPARENT)
801 {
802 m_canvas->SetTransparent(TRUE);
803 }
804 else
805 {
806 // New behaviour, 10/2/99: setting the background brush of a DC
807 // doesn't affect the window background colour. However,
808 // I'm leaving in the transparency setting because it's needed by
809 // various controls (e.g. wxStaticText) to determine whether to draw
810 // transparently or not. TODO: maybe this should be a new function
811 // wxWindow::SetTransparency(). Should that apply to the child itself, or the
812 // parent?
813 // m_canvas->SetBackgroundColour(m_backgroundBrush.GetColour());
814 m_canvas->SetTransparent(FALSE);
815 }
816 }
817 }
818 COLORREF new_color = m_backgroundBrush.GetColour().GetPixel();
819 {
820 (void)SetBkColor(GetHdc(), new_color);
821 }
822 }
823
824 void wxDC::SetBackgroundMode(int mode)
825 {
826 m_backgroundMode = mode;
827
828 // SetBackgroundColour now only refers to text background
829 // and m_backgroundMode is used there
830
831 /*
832 if (m_backgroundMode == wxTRANSPARENT)
833 ::SetBkMode(GetHdc(), TRANSPARENT);
834 else
835 ::SetBkMode(GetHdc(), OPAQUE);
836 */
837 }
838
839 void wxDC::SetLogicalFunction(int function)
840 {
841 m_logicalFunction = function;
842
843 SetRop((WXHDC) m_hDC);
844 }
845
846 void wxDC::SetRop(WXHDC dc)
847 {
848 if (!dc || m_logicalFunction < 0)
849 return;
850
851 int c_rop;
852 // These may be wrong
853 switch (m_logicalFunction)
854 {
855 // case wxXOR: c_rop = R2_XORPEN; break;
856 case wxXOR: c_rop = R2_NOTXORPEN; break;
857 case wxINVERT: c_rop = R2_NOT; break;
858 case wxOR_REVERSE: c_rop = R2_MERGEPENNOT; break;
859 case wxAND_REVERSE: c_rop = R2_MASKPENNOT; break;
860 case wxCLEAR: c_rop = R2_WHITE; break;
861 case wxSET: c_rop = R2_BLACK; break;
862 case wxSRC_INVERT: c_rop = R2_NOTCOPYPEN; break;
863 case wxOR_INVERT: c_rop = R2_MERGENOTPEN; break;
864 case wxAND: c_rop = R2_MASKPEN; break;
865 case wxOR: c_rop = R2_MERGEPEN; break;
866 case wxAND_INVERT: c_rop = R2_MASKNOTPEN; break;
867 case wxEQUIV:
868 case wxNAND:
869 case wxCOPY:
870 default:
871 c_rop = R2_COPYPEN; break;
872 }
873 SetROP2((HDC) dc, c_rop);
874 }
875
876 bool wxDC::StartDoc(const wxString& message)
877 {
878 // We might be previewing, so return TRUE to let it continue.
879 return TRUE;
880 }
881
882 void wxDC::EndDoc()
883 {
884 }
885
886 void wxDC::StartPage()
887 {
888 }
889
890 void wxDC::EndPage()
891 {
892 }
893
894 // ---------------------------------------------------------------------------
895 // text metrics
896 // ---------------------------------------------------------------------------
897
898 long wxDC::GetCharHeight() const
899 {
900 TEXTMETRIC lpTextMetric;
901
902 GetTextMetrics(GetHdc(), &lpTextMetric);
903
904 return YDEV2LOGREL(lpTextMetric.tmHeight);
905 }
906
907 long wxDC::GetCharWidth() const
908 {
909 TEXTMETRIC lpTextMetric;
910
911 GetTextMetrics(GetHdc(), &lpTextMetric);
912
913 return XDEV2LOGREL(lpTextMetric.tmAveCharWidth);
914 }
915
916 void wxDC::GetTextExtent(const wxString& string, long *x, long *y,
917 long *descent, long *externalLeading,
918 wxFont *theFont) const
919 {
920 wxFont *fontToUse = (wxFont*) theFont;
921 if (!fontToUse)
922 fontToUse = (wxFont*) &m_font;
923
924 SIZE sizeRect;
925 TEXTMETRIC tm;
926
927 GetTextExtentPoint(GetHdc(), WXSTRINGCAST string, wxStrlen(WXSTRINGCAST string), &sizeRect);
928 GetTextMetrics(GetHdc(), &tm);
929
930 if (x) *x = XDEV2LOGREL(sizeRect.cx);
931 if (y) *y = YDEV2LOGREL(sizeRect.cy);
932 if (descent) *descent = tm.tmDescent;
933 if (externalLeading) *externalLeading = tm.tmExternalLeading;
934 }
935
936 void wxDC::SetMapMode(int mode)
937 {
938 m_mappingMode = mode;
939
940 int pixel_width = 0;
941 int pixel_height = 0;
942 int mm_width = 0;
943 int mm_height = 0;
944
945 pixel_width = GetDeviceCaps(GetHdc(), HORZRES);
946 pixel_height = GetDeviceCaps(GetHdc(), VERTRES);
947 mm_width = GetDeviceCaps(GetHdc(), HORZSIZE);
948 mm_height = GetDeviceCaps(GetHdc(), VERTSIZE);
949
950 if ((pixel_width == 0) || (pixel_height == 0) || (mm_width == 0) || (mm_height == 0))
951 {
952 return;
953 }
954
955 double mm2pixelsX = pixel_width/mm_width;
956 double mm2pixelsY = pixel_height/mm_height;
957
958 switch (mode)
959 {
960 case wxMM_TWIPS:
961 {
962 m_logicalScaleX = (twips2mm * mm2pixelsX);
963 m_logicalScaleY = (twips2mm * mm2pixelsY);
964 break;
965 }
966 case wxMM_POINTS:
967 {
968 m_logicalScaleX = (pt2mm * mm2pixelsX);
969 m_logicalScaleY = (pt2mm * mm2pixelsY);
970 break;
971 }
972 case wxMM_METRIC:
973 {
974 m_logicalScaleX = mm2pixelsX;
975 m_logicalScaleY = mm2pixelsY;
976 break;
977 }
978 case wxMM_LOMETRIC:
979 {
980 m_logicalScaleX = (mm2pixelsX/10.0);
981 m_logicalScaleY = (mm2pixelsY/10.0);
982 break;
983 }
984 default:
985 case wxMM_TEXT:
986 {
987 m_logicalScaleX = 1.0;
988 m_logicalScaleY = 1.0;
989 break;
990 }
991 }
992
993 if (::GetMapMode(GetHdc()) != MM_ANISOTROPIC)
994 ::SetMapMode(GetHdc(), MM_ANISOTROPIC);
995
996 SetViewportExtEx(GetHdc(), VIEWPORT_EXTENT, VIEWPORT_EXTENT, NULL);
997 m_windowExtX = (int)MS_XDEV2LOGREL(VIEWPORT_EXTENT);
998 m_windowExtY = (int)MS_YDEV2LOGREL(VIEWPORT_EXTENT);
999 ::SetWindowExtEx(GetHdc(), m_windowExtX, m_windowExtY, NULL);
1000 ::SetViewportOrgEx(GetHdc(), (int)m_deviceOriginX, (int)m_deviceOriginY, NULL);
1001 ::SetWindowOrgEx(GetHdc(), (int)m_logicalOriginX, (int)m_logicalOriginY, NULL);
1002 }
1003
1004 void wxDC::SetUserScale(double x, double y)
1005 {
1006 m_userScaleX = x;
1007 m_userScaleY = y;
1008
1009 SetMapMode(m_mappingMode);
1010 }
1011
1012 void wxDC::SetAxisOrientation(bool xLeftRight, bool yBottomUp)
1013 {
1014 m_signX = xLeftRight ? 1 : -1;
1015 m_signY = yBottomUp ? -1 : 1;
1016
1017 SetMapMode(m_mappingMode);
1018 }
1019
1020 void wxDC::SetSystemScale(double x, double y)
1021 {
1022 m_scaleX = x;
1023 m_scaleY = y;
1024
1025 SetMapMode(m_mappingMode);
1026 }
1027
1028 void wxDC::SetLogicalOrigin(long x, long y)
1029 {
1030 m_logicalOriginX = x;
1031 m_logicalOriginY = y;
1032
1033 ::SetWindowOrgEx(GetHdc(), (int)m_logicalOriginX, (int)m_logicalOriginY, NULL);
1034 }
1035
1036 void wxDC::SetDeviceOrigin(long x, long y)
1037 {
1038 m_deviceOriginX = x;
1039 m_deviceOriginY = y;
1040
1041 ::SetViewportOrgEx(GetHdc(), (int)m_deviceOriginX, (int)m_deviceOriginY, NULL);
1042 }
1043
1044 // ---------------------------------------------------------------------------
1045 // coordinates transformations
1046 // ---------------------------------------------------------------------------
1047
1048 long wxDCBase::DeviceToLogicalX(long x) const
1049 {
1050 return (long) (((x) - m_deviceOriginX)/(m_logicalScaleX*m_userScaleX*m_signX*m_scaleX) - m_logicalOriginX);
1051 }
1052
1053 long wxDCBase::DeviceToLogicalXRel(long x) const
1054 {
1055 return (long) ((x)/(m_logicalScaleX*m_userScaleX*m_signX*m_scaleX));
1056 }
1057
1058 long wxDCBase::DeviceToLogicalY(long y) const
1059 {
1060 return (long) (((y) - m_deviceOriginY)/(m_logicalScaleY*m_userScaleY*m_signY*m_scaleY) - m_logicalOriginY);
1061 }
1062
1063 long wxDCBase::DeviceToLogicalYRel(long y) const
1064 {
1065 return (long) ((y)/(m_logicalScaleY*m_userScaleY*m_signY*m_scaleY));
1066 }
1067
1068 long wxDCBase::LogicalToDeviceX(long x) const
1069 {
1070 return (long) ((x - m_logicalOriginX)*m_logicalScaleX*m_userScaleX*m_signX*m_scaleX + m_deviceOriginX);
1071 }
1072
1073 long wxDCBase::LogicalToDeviceXRel(long x) const
1074 {
1075 return (long) (x*m_logicalScaleX*m_userScaleX*m_signX*m_scaleX);
1076 }
1077
1078 long wxDCBase::LogicalToDeviceY(long y) const
1079 {
1080 return (long) ((y - m_logicalOriginY)*m_logicalScaleY*m_userScaleY*m_signY*m_scaleY + m_deviceOriginY);
1081 }
1082
1083 long wxDCBase::LogicalToDeviceYRel(long y) const
1084 {
1085 return (long) (y*m_logicalScaleY*m_userScaleY*m_signY*m_scaleY);
1086 }
1087
1088 // ---------------------------------------------------------------------------
1089 // bit blit
1090 // ---------------------------------------------------------------------------
1091 bool wxDC::DoBlit(long xdest, long ydest, long width, long height,
1092 wxDC *source, long xsrc, long ysrc, int rop, bool useMask)
1093 {
1094 long xdest1 = xdest;
1095 long ydest1 = ydest;
1096 long xsrc1 = xsrc;
1097 long ysrc1 = ysrc;
1098
1099 // Chris Breeze 18/5/98: use text foreground/background colours
1100 // when blitting from 1-bit bitmaps
1101 COLORREF old_textground = ::GetTextColor(GetHdc());
1102 COLORREF old_background = ::GetBkColor(GetHdc());
1103 if (m_textForegroundColour.Ok())
1104 {
1105 ::SetTextColor(GetHdc(), m_textForegroundColour.GetPixel() );
1106 }
1107 if (m_textBackgroundColour.Ok())
1108 {
1109 ::SetBkColor(GetHdc(), m_textBackgroundColour.GetPixel() );
1110 }
1111
1112 DWORD dwRop = rop == wxCOPY ? SRCCOPY :
1113 rop == wxCLEAR ? WHITENESS :
1114 rop == wxSET ? BLACKNESS :
1115 rop == wxINVERT ? DSTINVERT :
1116 rop == wxAND ? MERGECOPY :
1117 rop == wxOR ? MERGEPAINT :
1118 rop == wxSRC_INVERT ? NOTSRCCOPY :
1119 rop == wxXOR ? SRCINVERT :
1120 rop == wxOR_REVERSE ? MERGEPAINT :
1121 rop == wxAND_REVERSE ? SRCERASE :
1122 rop == wxSRC_OR ? SRCPAINT :
1123 rop == wxSRC_AND ? SRCAND :
1124 SRCCOPY;
1125
1126 bool success = TRUE;
1127 if (useMask && source->m_selectedBitmap.Ok() && source->m_selectedBitmap.GetMask())
1128 {
1129
1130 #if 0 // __WIN32__
1131 // Not implemented under Win95 (or maybe a specific device?)
1132 if (MaskBlt(GetHdc(), xdest1, ydest1, (int)width, (int)height,
1133 (HDC) source->m_hDC, xsrc1, ysrc1, (HBITMAP) source->m_selectedBitmap.GetMask()->GetMaskBitmap(),
1134 0, 0, 0xAACC0020))
1135 {
1136 // Success
1137 }
1138 else
1139 #endif
1140 {
1141 // Old code
1142 #if 0
1143 HDC dc_mask = CreateCompatibleDC((HDC) source->m_hDC);
1144 ::SelectObject(dc_mask, (HBITMAP) source->m_selectedBitmap.GetMask()->GetMaskBitmap());
1145 success = (BitBlt(GetHdc(), xdest1, ydest1, (int)width, (int)height,
1146 dc_mask, xsrc1, ysrc1, 0x00220326 /* NOTSRCAND */) != 0);
1147 success = (BitBlt(GetHdc(), xdest1, ydest1, (int)width, (int)height,
1148 (HDC) source->m_hDC, xsrc1, ysrc1, SRCPAINT) != 0);
1149 ::SelectObject(dc_mask, 0);
1150 ::DeleteDC(dc_mask);
1151 #endif
1152 // New code from Chris Breeze, 15/7/98
1153 // Blit bitmap with mask
1154
1155 if (IsKindOf(CLASSINFO(wxPrinterDC)))
1156 {
1157 // If we are printing source colours are screen colours
1158 // not printer colours and so we need copy the bitmap
1159 // pixel by pixel.
1160 RECT rect;
1161 HDC dc_mask = ::CreateCompatibleDC((HDC) source->m_hDC);
1162 HDC dc_src = (HDC) source->m_hDC;
1163
1164 ::SelectObject(dc_mask, (HBITMAP) source->m_selectedBitmap.GetMask()->GetMaskBitmap());
1165 for (int x = 0; x < width; x++)
1166 {
1167 for (int y = 0; y < height; y++)
1168 {
1169 COLORREF cref = ::GetPixel(dc_mask, x, y);
1170 if (cref)
1171 {
1172 HBRUSH brush = ::CreateSolidBrush(::GetPixel(dc_src, x, y));
1173 rect.left = xdest1 + x; rect.right = rect.left + 1;
1174 rect.top = ydest1 + y; rect.bottom = rect.top + 1;
1175 ::FillRect(GetHdc(), &rect, brush);
1176 ::DeleteObject(brush);
1177 }
1178 }
1179 }
1180 ::SelectObject(dc_mask, 0);
1181 ::DeleteDC(dc_mask);
1182 }
1183 else
1184 {
1185 // create a temp buffer bitmap and DCs to access it and the mask
1186 HDC dc_mask = ::CreateCompatibleDC((HDC) source->m_hDC);
1187 HDC dc_buffer = ::CreateCompatibleDC(GetHdc());
1188 HBITMAP buffer_bmap = ::CreateCompatibleBitmap(GetHdc(), width, height);
1189 ::SelectObject(dc_mask, (HBITMAP) source->m_selectedBitmap.GetMask()->GetMaskBitmap());
1190 ::SelectObject(dc_buffer, buffer_bmap);
1191
1192 // copy dest to buffer
1193 ::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
1194 GetHdc(), xdest1, ydest1, SRCCOPY);
1195
1196 // copy src to buffer using selected raster op
1197 ::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
1198 (HDC) source->m_hDC, xsrc1, ysrc1, dwRop);
1199
1200 // set masked area in buffer to BLACK (pixel value 0)
1201 COLORREF prevBkCol = ::SetBkColor(GetHdc(), RGB(255, 255, 255));
1202 COLORREF prevCol = ::SetTextColor(GetHdc(), RGB(0, 0, 0));
1203 ::BitBlt(dc_buffer, 0, 0, (int)width, (int)height,
1204 dc_mask, xsrc1, ysrc1, SRCAND);
1205
1206 // set unmasked area in dest to BLACK
1207 ::SetBkColor(GetHdc(), RGB(0, 0, 0));
1208 ::SetTextColor(GetHdc(), RGB(255, 255, 255));
1209 ::BitBlt(GetHdc(), xdest1, ydest1, (int)width, (int)height,
1210 dc_mask, xsrc1, ysrc1, SRCAND);
1211 ::SetBkColor(GetHdc(), prevBkCol); // restore colours to original values
1212 ::SetTextColor(GetHdc(), prevCol);
1213
1214 // OR buffer to dest
1215 success = (::BitBlt(GetHdc(), xdest1, ydest1, (int)width, (int)height,
1216 dc_buffer, 0, 0, SRCPAINT) != 0);
1217
1218 // tidy up temporary DCs and bitmap
1219 ::SelectObject(dc_mask, 0);
1220 ::DeleteDC(dc_mask);
1221 ::SelectObject(dc_buffer, 0);
1222 ::DeleteDC(dc_buffer);
1223 ::DeleteObject(buffer_bmap);
1224 }
1225 }
1226 }
1227 else
1228 {
1229 if (IsKindOf(CLASSINFO(wxPrinterDC)))
1230 {
1231 // If we are printing, source colours are screen colours
1232 // not printer colours and so we need copy the bitmap
1233 // pixel by pixel.
1234 HDC dc_src = (HDC) source->m_hDC;
1235 RECT rect;
1236 for (int x = 0; x < width; x++)
1237 {
1238 for (int y = 0; y < height; y++)
1239 {
1240 HBRUSH brush = ::CreateSolidBrush(::GetPixel(dc_src, x, y));
1241 rect.left = xdest1 + x; rect.right = rect.left + 1;
1242 rect.top = ydest1 + y; rect.bottom = rect.top + 1;
1243 ::FillRect(GetHdc(), &rect, brush);
1244 ::DeleteObject(brush);
1245 }
1246 }
1247 }
1248 else
1249 {
1250 success = (BitBlt(GetHdc(), xdest1, ydest1, (int)width, (int)height, (HDC) source->m_hDC,
1251 xsrc1, ysrc1, dwRop) != 0);
1252 }
1253 }
1254 ::SetTextColor(GetHdc(), old_textground);
1255 ::SetBkColor(GetHdc(), old_background);
1256
1257 return success;
1258 }
1259
1260 void wxDC::DoGetSize(int *w, int *h) const
1261 {
1262 if ( w ) *w = ::GetDeviceCaps(GetHdc(), HORZRES);
1263 if ( h ) *h = ::GetDeviceCaps(GetHdc(), VERTRES);
1264 }
1265
1266 void wxDC::DoGetSizeMM(int *w, int *h) const
1267 {
1268 if ( w ) *w = ::GetDeviceCaps(GetHdc(), HORZSIZE);
1269 if ( h ) *h = ::GetDeviceCaps(GetHdc(), VERTSIZE);
1270 }
1271
1272 wxSize wxDC::GetPPI() const
1273 {
1274 int x = ::GetDeviceCaps(GetHdc(), LOGPIXELSX);
1275 int y = ::GetDeviceCaps(GetHdc(), LOGPIXELSY);
1276
1277 return wxSize(x, y);
1278 }
1279
1280 // For use by wxWindows only, unless custom units are required.
1281 void wxDC::SetLogicalScale(double x, double y)
1282 {
1283 m_logicalScaleX = x;
1284 m_logicalScaleY = y;
1285 }
1286
1287 #if WXWIN_COMPATIBILITY
1288 void wxDC::DoGetTextExtent(const wxString& string, float *x, float *y,
1289 float *descent, float *externalLeading,
1290 wxFont *theFont, bool use16bit) const
1291 {
1292 long x1, y1, descent1, externalLeading1;
1293 GetTextExtent(string, & x1, & y1, & descent1, & externalLeading1, theFont, use16bit);
1294 *x = x1; *y = y1;
1295 if (descent)
1296 *descent = descent1;
1297 if (externalLeading)
1298 *externalLeading = externalLeading1;
1299 }
1300 #endif
1301
1302 // ---------------------------------------------------------------------------
1303 // spline drawing code
1304 // ---------------------------------------------------------------------------
1305
1306 #if wxUSE_SPLINES
1307
1308 class wxSpline: public wxObject
1309 {
1310 public:
1311 int type;
1312 wxList *points;
1313
1314 wxSpline(wxList *list);
1315 void DeletePoints();
1316
1317 // Doesn't delete points
1318 ~wxSpline();
1319 };
1320
1321 void wx_draw_open_spline(wxDC *dc, wxSpline *spline);
1322
1323 void wx_quadratic_spline(double a1, double b1, double a2, double b2,
1324 double a3, double b3, double a4, double b4);
1325 void wx_clear_stack();
1326 int wx_spline_pop(double *x1, double *y1, double *x2, double *y2, double *x3,
1327 double *y3, double *x4, double *y4);
1328 void wx_spline_push(double x1, double y1, double x2, double y2, double x3, double y3,
1329 double x4, double y4);
1330 static bool wx_spline_add_point(double x, double y);
1331 static void wx_spline_draw_point_array(wxDC *dc);
1332 wxSpline *wx_make_spline(int x1, int y1, int x2, int y2, int x3, int y3);
1333
1334 void wxDC::DoDrawSpline(wxList *list)
1335 {
1336 wxSpline spline(list);
1337
1338 wx_draw_open_spline(this, &spline);
1339 }
1340
1341 wxList wx_spline_point_list;
1342
1343 void wx_draw_open_spline(wxDC *dc, wxSpline *spline)
1344 {
1345 wxPoint *p;
1346 double cx1, cy1, cx2, cy2, cx3, cy3, cx4, cy4;
1347 double x1, y1, x2, y2;
1348
1349 wxNode *node = spline->points->First();
1350 p = (wxPoint *)node->Data();
1351
1352 x1 = p->x;
1353 y1 = p->y;
1354
1355 node = node->Next();
1356 p = (wxPoint *)node->Data();
1357
1358 x2 = p->x;
1359 y2 = p->y;
1360 cx1 = (double)((x1 + x2) / 2);
1361 cy1 = (double)((y1 + y2) / 2);
1362 cx2 = (double)((cx1 + x2) / 2);
1363 cy2 = (double)((cy1 + y2) / 2);
1364
1365 wx_spline_add_point(x1, y1);
1366
1367 while ((node = node->Next()) != NULL)
1368 {
1369 p = (wxPoint *)node->Data();
1370 x1 = x2;
1371 y1 = y2;
1372 x2 = p->x;
1373 y2 = p->y;
1374 cx4 = (double)(x1 + x2) / 2;
1375 cy4 = (double)(y1 + y2) / 2;
1376 cx3 = (double)(x1 + cx4) / 2;
1377 cy3 = (double)(y1 + cy4) / 2;
1378
1379 wx_quadratic_spline(cx1, cy1, cx2, cy2, cx3, cy3, cx4, cy4);
1380
1381 cx1 = cx4;
1382 cy1 = cy4;
1383 cx2 = (double)(cx1 + x2) / 2;
1384 cy2 = (double)(cy1 + y2) / 2;
1385 }
1386
1387 wx_spline_add_point((double)wx_round(cx1), (double)wx_round(cy1));
1388 wx_spline_add_point(x2, y2);
1389
1390 wx_spline_draw_point_array(dc);
1391
1392 }
1393
1394 /********************* CURVES FOR SPLINES *****************************
1395
1396 The following spline drawing routine is from
1397
1398 "An Algorithm for High-Speed Curve Generation"
1399 by George Merrill Chaikin,
1400 Computer Graphics and Image Processing, 3, Academic Press,
1401 1974, 346-349.
1402
1403 and
1404
1405 "On Chaikin's Algorithm" by R. F. Riesenfeld,
1406 Computer Graphics and Image Processing, 4, Academic Press,
1407 1975, 304-310.
1408
1409 ***********************************************************************/
1410
1411 #define half(z1, z2) ((z1+z2)/2.0)
1412 #define THRESHOLD 5
1413
1414 /* iterative version */
1415
1416 void wx_quadratic_spline(double a1, double b1, double a2, double b2, double a3, double b3, double a4,
1417 double b4)
1418 {
1419 register double xmid, ymid;
1420 double x1, y1, x2, y2, x3, y3, x4, y4;
1421
1422 wx_clear_stack();
1423 wx_spline_push(a1, b1, a2, b2, a3, b3, a4, b4);
1424
1425 while (wx_spline_pop(&x1, &y1, &x2, &y2, &x3, &y3, &x4, &y4)) {
1426 xmid = (double)half(x2, x3);
1427 ymid = (double)half(y2, y3);
1428 if (fabs(x1 - xmid) < THRESHOLD && fabs(y1 - ymid) < THRESHOLD &&
1429 fabs(xmid - x4) < THRESHOLD && fabs(ymid - y4) < THRESHOLD) {
1430 wx_spline_add_point((double)wx_round(x1), (double)wx_round(y1));
1431 wx_spline_add_point((double)wx_round(xmid), (double)wx_round(ymid));
1432 } else {
1433 wx_spline_push(xmid, ymid, (double)half(xmid, x3), (double)half(ymid, y3),
1434 (double)half(x3, x4), (double)half(y3, y4), x4, y4);
1435 wx_spline_push(x1, y1, (double)half(x1, x2), (double)half(y1, y2),
1436 (double)half(x2, xmid), (double)half(y2, ymid), xmid, ymid);
1437 }
1438 }
1439 }
1440
1441
1442 /* utilities used by spline drawing routines */
1443
1444
1445 typedef struct wx_spline_stack_struct {
1446 double x1, y1, x2, y2, x3, y3, x4, y4;
1447 }
1448 Stack;
1449
1450 #define SPLINE_STACK_DEPTH 20
1451 static Stack wx_spline_stack[SPLINE_STACK_DEPTH];
1452 static Stack *wx_stack_top;
1453 static int wx_stack_count;
1454
1455 void wx_clear_stack()
1456 {
1457 wx_stack_top = wx_spline_stack;
1458 wx_stack_count = 0;
1459 }
1460
1461 void wx_spline_push(double x1, double y1, double x2, double y2, double x3, double y3, double x4, double y4)
1462 {
1463 wx_stack_top->x1 = x1;
1464 wx_stack_top->y1 = y1;
1465 wx_stack_top->x2 = x2;
1466 wx_stack_top->y2 = y2;
1467 wx_stack_top->x3 = x3;
1468 wx_stack_top->y3 = y3;
1469 wx_stack_top->x4 = x4;
1470 wx_stack_top->y4 = y4;
1471 wx_stack_top++;
1472 wx_stack_count++;
1473 }
1474
1475 int wx_spline_pop(double *x1, double *y1, double *x2, double *y2,
1476 double *x3, double *y3, double *x4, double *y4)
1477 {
1478 if (wx_stack_count == 0)
1479 return (0);
1480 wx_stack_top--;
1481 wx_stack_count--;
1482 *x1 = wx_stack_top->x1;
1483 *y1 = wx_stack_top->y1;
1484 *x2 = wx_stack_top->x2;
1485 *y2 = wx_stack_top->y2;
1486 *x3 = wx_stack_top->x3;
1487 *y3 = wx_stack_top->y3;
1488 *x4 = wx_stack_top->x4;
1489 *y4 = wx_stack_top->y4;
1490 return (1);
1491 }
1492
1493 static bool wx_spline_add_point(double x, double y)
1494 {
1495 wxPoint *point = new wxPoint;
1496 point->x = (int) x;
1497 point->y = (int) y;
1498 wx_spline_point_list.Append((wxObject*)point);
1499 return TRUE;
1500 }
1501
1502 static void wx_spline_draw_point_array(wxDC *dc)
1503 {
1504 dc->DrawLines(&wx_spline_point_list, 0, 0);
1505 wxNode *node = wx_spline_point_list.First();
1506 while (node)
1507 {
1508 wxPoint *point = (wxPoint *)node->Data();
1509 delete point;
1510 delete node;
1511 node = wx_spline_point_list.First();
1512 }
1513 }
1514
1515 wxSpline::wxSpline(wxList *list)
1516 {
1517 points = list;
1518 }
1519
1520 wxSpline::~wxSpline()
1521 {
1522 }
1523
1524 void wxSpline::DeletePoints()
1525 {
1526 for(wxNode *node = points->First(); node; node = points->First())
1527 {
1528 wxPoint *point = (wxPoint *)node->Data();
1529 delete point;
1530 delete node;
1531 }
1532 delete points;
1533 }
1534
1535
1536 #endif // wxUSE_SPLINES
1537