src/common/gdicmn.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        gdicmn.cpp
   3 // Purpose:     Common GDI classes
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     01/02/97
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart and Markus Holzem
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13 #pragma implementation "gdicmn.h"
  14 #endif
  15
  16 #ifdef __VMS
  17 #define XtDisplay XTDISPLAY
  18 #endif
  19
  20 // For compilers that support precompilation, includes "wx.h".
  21 #include "wx/wxprec.h"
  22
  23 #ifdef __BORLANDC__
  24 #pragma hdrstop
  25 #endif
  26
  27 #include "wx/event.h"
  28 #include "wx/gdicmn.h"
  29 #include "wx/brush.h"
  30 #include "wx/pen.h"
  31 #include "wx/bitmap.h"
  32 #include "wx/icon.h"
  33 #include "wx/cursor.h"
  34 #include "wx/font.h"
  35 #include "wx/palette.h"
  36 #include "wx/app.h"
  37 #include "wx/dc.h"
  38 #include "wx/utils.h"
  39 #include "wx/settings.h"
  40
  41 #include "wx/log.h"
  42 #include <string.h>
  43
  44 #ifdef __WXMSW__
  45 #include <windows.h>
  46 #endif
  47
  48 #ifdef __WXMOTIF__
  49 #ifdef __VMS__
  50 #pragma message disable nosimpint
  51 #endif
  52 #include <Xm/Xm.h>
  53 #ifdef __VMS__
  54 #pragma message enable nosimpint
  55 #endif
  56 #endif
  57
  58 IMPLEMENT_CLASS(wxColourDatabase, wxList)
  59 IMPLEMENT_DYNAMIC_CLASS(wxFontList, wxList)
  60 IMPLEMENT_DYNAMIC_CLASS(wxPenList, wxList)
  61 IMPLEMENT_DYNAMIC_CLASS(wxBrushList, wxList)
  62 IMPLEMENT_DYNAMIC_CLASS(wxBitmapList, wxList)
  63 IMPLEMENT_DYNAMIC_CLASS(wxResourceCache, wxList)
  64
  65 IMPLEMENT_ABSTRACT_CLASS(wxDCBase, wxObject)
  66
  67 wxRect::wxRect(const wxPoint& topLeft, const wxPoint& bottomRight)
  68 {
  69   x = topLeft.x;
  70   y = topLeft.y;
  71   width = bottomRight.x - topLeft.x + 1;
  72   height = bottomRight.y - topLeft.y + 1;
  73
  74   if (width < 0)
  75   {
  76     width = -width;
  77     x -= width;
  78   }
  79
  80   if (height < 0)
  81   {
  82     height = -height;
  83     y -= height;
  84   }
  85 }
  86
  87 wxRect::wxRect(const wxPoint& point, const wxSize& size)
  88 {
  89     x = point.x; y = point.y;
  90     width = size.x; height = size.y;
  91 }
  92
  93 bool wxRect::operator==(const wxRect& rect) const
  94 {
  95   return ((x == rect.x) &&
  96           (y == rect.y) &&
  97           (width == rect.width) &&
  98           (height == rect.height));
  99 }
 100
 101 wxRect& wxRect::operator += (const wxRect& rect)
 102 {
 103     *this = (*this + rect);
 104     return ( *this ) ;
 105 }
 106
 107 wxRect wxRect::operator + (const wxRect& rect) const
 108 {
 109     int x1 = wxMin(this->x, rect.x);
 110     int y1 = wxMin(this->y, rect.y);
 111     int y2 = wxMax(y+height, rect.height+rect.y);
 112     int x2 = wxMax(x+width, rect.width+rect.x);
 113     return wxRect(x1, y1, x2-x1, y2-y1);
 114 }
 115
 116 wxRect& wxRect::Inflate(wxCoord dx, wxCoord dy)
 117 {
 118     x -= dx;
 119     y -= dy;
 120     width += 2*dx;
 121     height += 2*dy;
 122
 123     // check that we didn't make the rectangle invalid by accident (you almost
 124     // never want to have negative coords and never want negative size)
 125     if ( x < 0 )
 126         x = 0;
 127     if ( y < 0 )
 128         y = 0;
 129
 130     // what else can we do?
 131     if ( width < 0 )
 132         width = 0;
 133     if ( height < 0 )
 134         height = 0;
 135
 136     return *this;
 137 }
 138
 139 bool wxRect::Inside(int cx, int cy) const
 140 {
 141     return ( (cx >= x) && (cy >= y)
 142           && ((cy - y) < height)
 143           && ((cx - x) < width)
 144           );
 145 }
 146
 147 wxRect& wxRect::Intersect(const wxRect& rect)
 148 {
 149     int x2 = GetRight(),
 150         y2 = GetBottom();
 151
 152     if ( x < rect.x )
 153         x = rect.x;
 154     if ( y < rect.y )
 155         y = rect.y;
 156     if ( x2 > rect.GetRight() )
 157         x2 = rect.GetRight();
 158     if ( y2 > rect.GetBottom() )
 159         y2 = rect.GetBottom();
 160
 161     width = x2 - x + 1;
 162     height = y2 - y + 1;
 163
 164     if ( width <= 0 || height <= 0 )
 165     {
 166         width =
 167         height = 0;
 168     }
 169
 170     return *this;
 171 }
 172
 173 bool wxRect::Intersects(const wxRect& rect) const
 174 {
 175     wxRect r = Intersect(rect);
 176
 177     // if there is no intersection, both width and height are 0
 178     return r.width != 0;
 179 }
 180
 181 wxColourDatabase::wxColourDatabase (int type) : wxList (type)
 182 {
 183 }
 184
 185 wxColourDatabase::~wxColourDatabase ()
 186 {
 187   // Cleanup Colour allocated in Initialize()
 188   wxNode *node = First ();
 189   while (node)
 190     {
 191       wxColour *col = (wxColour *) node->Data ();
 192       wxNode *next = node->Next ();
 193       delete col;
 194       node = next;
 195     }
 196 #ifdef __WXPM__
 197     delete [] m_palTable;
 198 #endif
 199 }
 200
 201 // Colour database stuff
 202 void wxColourDatabase::Initialize ()
 203 {
 204     static const struct wxColourDesc
 205     {
 206         const wxChar *name;
 207         int r,g,b;
 208     }
 209     wxColourTable[] =
 210     {
 211         {wxT("AQUAMARINE"),112, 219, 147},
 212         {wxT("BLACK"),0, 0, 0},
 213         {wxT("BLUE"), 0, 0, 255},
 214         {wxT("BLUE VIOLET"), 159, 95, 159},
 215         {wxT("BROWN"), 165, 42, 42},
 216         {wxT("CADET BLUE"), 95, 159, 159},
 217         {wxT("CORAL"), 255, 127, 0},
 218         {wxT("CORNFLOWER BLUE"), 66, 66, 111},
 219         {wxT("CYAN"), 0, 255, 255},
 220         {wxT("DARK GREY"), 47, 47, 47},   // ?
 221
 222         {wxT("DARK GREEN"), 47, 79, 47},
 223         {wxT("DARK OLIVE GREEN"), 79, 79, 47},
 224         {wxT("DARK ORCHID"), 153, 50, 204},
 225         {wxT("DARK SLATE BLUE"), 107, 35, 142},
 226         {wxT("DARK SLATE GREY"), 47, 79, 79},
 227         {wxT("DARK TURQUOISE"), 112, 147, 219},
 228         {wxT("DIM GREY"), 84, 84, 84},
 229         {wxT("FIREBRICK"), 142, 35, 35},
 230         {wxT("FOREST GREEN"), 35, 142, 35},
 231         {wxT("GOLD"), 204, 127, 50},
 232         {wxT("GOLDENROD"), 219, 219, 112},
 233         {wxT("GREY"), 128, 128, 128},
 234         {wxT("GREEN"), 0, 255, 0},
 235         {wxT("GREEN YELLOW"), 147, 219, 112},
 236         {wxT("INDIAN RED"), 79, 47, 47},
 237         {wxT("KHAKI"), 159, 159, 95},
 238         {wxT("LIGHT BLUE"), 191, 216, 216},
 239         {wxT("LIGHT GREY"), 192, 192, 192},
 240         {wxT("LIGHT STEEL BLUE"), 143, 143, 188},
 241         {wxT("LIME GREEN"), 50, 204, 50},
 242         {wxT("LIGHT MAGENTA"), 255, 0, 255},
 243         {wxT("MAGENTA"), 255, 0, 255},
 244         {wxT("MAROON"), 142, 35, 107},
 245         {wxT("MEDIUM AQUAMARINE"), 50, 204, 153},
 246         {wxT("MEDIUM GREY"), 100, 100, 100},
 247         {wxT("MEDIUM BLUE"), 50, 50, 204},
 248         {wxT("MEDIUM FOREST GREEN"), 107, 142, 35},
 249         {wxT("MEDIUM GOLDENROD"), 234, 234, 173},
 250         {wxT("MEDIUM ORCHID"), 147, 112, 219},
 251         {wxT("MEDIUM SEA GREEN"), 66, 111, 66},
 252         {wxT("MEDIUM SLATE BLUE"), 127, 0, 255},
 253         {wxT("MEDIUM SPRING GREEN"), 127, 255, 0},
 254         {wxT("MEDIUM TURQUOISE"), 112, 219, 219},
 255         {wxT("MEDIUM VIOLET RED"), 219, 112, 147},
 256         {wxT("MIDNIGHT BLUE"), 47, 47, 79},
 257         {wxT("NAVY"), 35, 35, 142},
 258         {wxT("ORANGE"), 204, 50, 50},
 259         {wxT("ORANGE RED"), 255, 0, 127},
 260         {wxT("ORCHID"), 219, 112, 219},
 261         {wxT("PALE GREEN"), 143, 188, 143},
 262         {wxT("PINK"), 188, 143, 234},
 263         {wxT("PLUM"), 234, 173, 234},
 264         {wxT("PURPLE"), 176, 0, 255},
 265         {wxT("RED"), 255, 0, 0},
 266         {wxT("SALMON"), 111, 66, 66},
 267         {wxT("SEA GREEN"), 35, 142, 107},
 268         {wxT("SIENNA"), 142, 107, 35},
 269         {wxT("SKY BLUE"), 50, 153, 204},
 270         {wxT("SLATE BLUE"), 0, 127, 255},
 271         {wxT("SPRING GREEN"), 0, 255, 127},
 272         {wxT("STEEL BLUE"), 35, 107, 142},
 273         {wxT("TAN"), 219, 147, 112},
 274         {wxT("THISTLE"), 216, 191, 216},
 275         {wxT("TURQUOISE"), 173, 234, 234},
 276         {wxT("VIOLET"), 79, 47, 79},
 277         {wxT("VIOLET RED"), 204, 50, 153},
 278         {wxT("WHEAT"), 216, 216, 191},
 279         {wxT("WHITE"), 255, 255, 255},
 280         {wxT("YELLOW"), 255, 255, 0},
 281         {wxT("YELLOW GREEN"), 153, 204, 50},
 282         {wxT("MEDIUM GOLDENROD"), 234, 234, 173},
 283         {wxT("MEDIUM FOREST GREEN"), 107, 142, 35},
 284         {wxT("LIGHT MAGENTA"), 255, 0, 255},
 285         {wxT("MEDIUM GREY"), 100, 100, 100},
 286     };
 287
 288     size_t      n;
 289
 290     for ( n = 0; n < WXSIZEOF(wxColourTable); n++ )
 291     {
 292         const wxColourDesc& cc = wxColourTable[n];
 293         Append(cc.name, new wxColour(cc.r,cc.g,cc.b));
 294     }
 295 #ifdef __WXPM__
 296     m_palTable = new long[n];
 297     for ( n = 0; n < WXSIZEOF(wxColourTable); n++ )
 298     {
 299         const wxColourDesc& cc = wxColourTable[n];
 300         m_palTable[n] = OS2RGB(cc.r,cc.g,cc.b);
 301     }
 302     m_nSize = n;
 303 #endif
 304 }
 305
 306 /*
 307  * Changed by Ian Brown, July 1994.
 308  *
 309  * When running under X, the Colour Database starts off empty. The X server
 310  * is queried for the colour first time after which it is entered into the
 311  * database. This allows our client to use the server colour database which
 312  * is hopefully gamma corrected for the display being used.
 313  */
 314
 315 wxColour *wxColourDatabase::FindColour(const wxString& colour)
 316 {
 317     // VZ: make the comparaison case insensitive and also match both grey and
 318     //     gray
 319     wxString colName = colour;
 320     colName.MakeUpper();
 321     wxString colName2 = colName;
 322     if ( !colName2.Replace(_T("GRAY"), _T("GREY")) )
 323         colName2.clear();
 324
 325     wxNode *node = First();
 326     while ( node )
 327     {
 328         const wxChar *key = node->GetKeyString();
 329         if ( colName == key || colName2 == key )
 330         {
 331             return (wxColour *)node->Data();
 332         }
 333
 334         node = node->Next();
 335     }
 336
 337 #ifdef __WXMSW__
 338   return NULL;
 339 #endif
 340 #ifdef __WXPM__
 341   return NULL;
 342 #endif
 343 #ifdef __WXMGL__
 344   return NULL;
 345 #endif
 346
 347 // TODO for other implementations. This should really go into
 348 // platform-specific directories.
 349 #ifdef __WXMAC__
 350   return NULL;
 351 #endif
 352 #ifdef __WXSTUBS__
 353   return NULL;
 354 #endif
 355
 356 #ifdef __WXGTK__
 357   wxColour *col = new wxColour( colour );
 358
 359   if (!(col->Ok())) {
 360       delete col;
 361       return (wxColour *) NULL;
 362   }
 363   Append( colour, col );
 364   return col;
 365 #endif
 366
 367 #ifdef __X__
 368     XColor xcolour;
 369
 370 #ifdef __WXMOTIF__
 371     Display *display = XtDisplay((Widget) wxTheApp->GetTopLevelWidget()) ;
 372 #endif
 373 #ifdef __XVIEW__
 374     Xv_Screen screen = xv_get(xview_server, SERVER_NTH_SCREEN, 0);
 375     Xv_opaque root_window = xv_get(screen, XV_ROOT);
 376     Display *display = (Display *)xv_get(root_window, XV_DISPLAY);
 377 #endif
 378
 379     /* MATTHEW: [4] Use wxGetMainColormap */
 380     if (!XParseColor(display, (Colormap) wxTheApp->GetMainColormap((WXDisplay*) display), colour,&xcolour))
 381       return NULL;
 382
 383     unsigned char r = (unsigned char)(xcolour.red >> 8);
 384     unsigned char g = (unsigned char)(xcolour.green >> 8);
 385     unsigned char b = (unsigned char)(xcolour.blue >> 8);
 386
 387     wxColour *col = new wxColour(r, g, b);
 388     Append(colour, col);
 389
 390     return col;
 391 #endif // __X__
 392 }
 393
 394 wxString wxColourDatabase::FindName (const wxColour& colour) const
 395 {
 396     wxString name;
 397
 398     unsigned char red = colour.Red ();
 399     unsigned char green = colour.Green ();
 400     unsigned char blue = colour.Blue ();
 401
 402     for (wxNode * node = First (); node; node = node->Next ())
 403     {
 404         wxColour *col = (wxColour *) node->Data ();
 405
 406         if (col->Red () == red && col->Green () == green && col->Blue () == blue)
 407         {
 408             const wxChar *found = node->GetKeyString();
 409             if ( found )
 410             {
 411                 name = found;
 412
 413                 break;
 414             }
 415         }
 416     }
 417
 418     return name;
 419 }
 420
 421 void wxInitializeStockLists()
 422 {
 423   wxTheBrushList = new wxBrushList;
 424   wxThePenList = new wxPenList;
 425   wxTheFontList = new wxFontList;
 426   wxTheBitmapList = new wxBitmapList;
 427 }
 428
 429 void wxInitializeStockObjects ()
 430 {
 431 #ifdef __WXMOTIF__
 432 #endif
 433 #ifdef __X__
 434   // TODO
 435   //  wxFontPool = new XFontPool;
 436 #endif
 437
 438   // why under MSW fonts shouldn't have the standard system size?
 439 /*
 440 #ifdef __WXMSW__
 441   static const int sizeFont = 10;
 442 #else
 443 #endif
 444 */
 445 #if defined(__WXMAC__)
 446   static const int sizeFont = 12;
 447   wxNORMAL_FONT = new wxFont (sizeFont, wxMODERN, wxNORMAL, wxNORMAL);
 448 #elif defined(__WXPM__)
 449   static const int sizeFont = 12;
 450 #else
 451   wxNORMAL_FONT = new wxFont(wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT));
 452   static const int sizeFont = wxNORMAL_FONT->GetPointSize();
 453 #endif
 454
 455 #if defined(__WXPM__)
 456   /*
 457   // Basic OS/2 has a fairly limited number of fonts and these are as good
 458   // as I can do to get something that looks halfway "wx" normal
 459   */
 460   wxNORMAL_FONT = new wxFont (sizeFont, wxMODERN, wxNORMAL, wxNORMAL); /* System VIO */
 461   wxSMALL_FONT = new wxFont (sizeFont - 4, wxMODERN, wxNORMAL, wxNORMAL); /* System VIO */
 462   wxITALIC_FONT = new wxFont (sizeFont, wxROMAN, wxITALIC, wxNORMAL);
 463   wxSWISS_FONT = new wxFont (sizeFont, wxSWISS, wxNORMAL, wxNORMAL); /* Helv */
 464 #else
 465   wxSMALL_FONT = new wxFont (sizeFont - 2, wxSWISS, wxNORMAL, wxNORMAL);
 466   wxITALIC_FONT = new wxFont (sizeFont, wxROMAN, wxITALIC, wxNORMAL);
 467   wxSWISS_FONT = new wxFont (sizeFont, wxSWISS, wxNORMAL, wxNORMAL);
 468 #endif
 469
 470   wxRED_PEN = new wxPen (wxT("RED"), 1, wxSOLID);
 471   wxCYAN_PEN = new wxPen (wxT("CYAN"), 1, wxSOLID);
 472   wxGREEN_PEN = new wxPen (wxT("GREEN"), 1, wxSOLID);
 473   wxBLACK_PEN = new wxPen (wxT("BLACK"), 1, wxSOLID);
 474   wxWHITE_PEN = new wxPen (wxT("WHITE"), 1, wxSOLID);
 475   wxTRANSPARENT_PEN = new wxPen (wxT("BLACK"), 1, wxTRANSPARENT);
 476   wxBLACK_DASHED_PEN = new wxPen (wxT("BLACK"), 1, wxSHORT_DASH);
 477   wxGREY_PEN = new wxPen (wxT("GREY"), 1, wxSOLID);
 478   wxMEDIUM_GREY_PEN = new wxPen (wxT("MEDIUM GREY"), 1, wxSOLID);
 479   wxLIGHT_GREY_PEN = new wxPen (wxT("LIGHT GREY"), 1, wxSOLID);
 480
 481   wxBLUE_BRUSH = new wxBrush (wxT("BLUE"), wxSOLID);
 482   wxGREEN_BRUSH = new wxBrush (wxT("GREEN"), wxSOLID);
 483   wxWHITE_BRUSH = new wxBrush (wxT("WHITE"), wxSOLID);
 484   wxBLACK_BRUSH = new wxBrush (wxT("BLACK"), wxSOLID);
 485   wxTRANSPARENT_BRUSH = new wxBrush (wxT("BLACK"), wxTRANSPARENT);
 486   wxCYAN_BRUSH = new wxBrush (wxT("CYAN"), wxSOLID);
 487   wxRED_BRUSH = new wxBrush (wxT("RED"), wxSOLID);
 488   wxGREY_BRUSH = new wxBrush (wxT("GREY"), wxSOLID);
 489   wxMEDIUM_GREY_BRUSH = new wxBrush (wxT("MEDIUM GREY"), wxSOLID);
 490   wxLIGHT_GREY_BRUSH = new wxBrush (wxT("LIGHT GREY"), wxSOLID);
 491
 492   wxBLACK = new wxColour (wxT("BLACK"));
 493   wxWHITE = new wxColour (wxT("WHITE"));
 494   wxRED = new wxColour (wxT("RED"));
 495   wxBLUE = new wxColour (wxT("BLUE"));
 496   wxGREEN = new wxColour (wxT("GREEN"));
 497   wxCYAN = new wxColour (wxT("CYAN"));
 498   wxLIGHT_GREY = new wxColour (wxT("LIGHT GREY"));
 499
 500   wxSTANDARD_CURSOR = new wxCursor (wxCURSOR_ARROW);
 501   wxHOURGLASS_CURSOR = new wxCursor (wxCURSOR_WAIT);
 502   wxCROSS_CURSOR = new wxCursor (wxCURSOR_CROSS);
 503 }
 504
 505 void wxDeleteStockObjects ()
 506 {
 507   wxDELETE(wxNORMAL_FONT);
 508   wxDELETE(wxSMALL_FONT);
 509   wxDELETE(wxITALIC_FONT);
 510   wxDELETE(wxSWISS_FONT);
 511
 512   wxDELETE(wxRED_PEN);
 513   wxDELETE(wxCYAN_PEN);
 514   wxDELETE(wxGREEN_PEN);
 515   wxDELETE(wxBLACK_PEN);
 516   wxDELETE(wxWHITE_PEN);
 517   wxDELETE(wxTRANSPARENT_PEN);
 518   wxDELETE(wxBLACK_DASHED_PEN);
 519   wxDELETE(wxGREY_PEN);
 520   wxDELETE(wxMEDIUM_GREY_PEN);
 521   wxDELETE(wxLIGHT_GREY_PEN);
 522
 523   wxDELETE(wxBLUE_BRUSH);
 524   wxDELETE(wxGREEN_BRUSH);
 525   wxDELETE(wxWHITE_BRUSH);
 526   wxDELETE(wxBLACK_BRUSH);
 527   wxDELETE(wxTRANSPARENT_BRUSH);
 528   wxDELETE(wxCYAN_BRUSH);
 529   wxDELETE(wxRED_BRUSH);
 530   wxDELETE(wxGREY_BRUSH);
 531   wxDELETE(wxMEDIUM_GREY_BRUSH);
 532   wxDELETE(wxLIGHT_GREY_BRUSH);
 533
 534   wxDELETE(wxBLACK);
 535   wxDELETE(wxWHITE);
 536   wxDELETE(wxRED);
 537   wxDELETE(wxBLUE);
 538   wxDELETE(wxGREEN);
 539   wxDELETE(wxCYAN);
 540   wxDELETE(wxLIGHT_GREY);
 541
 542   wxDELETE(wxSTANDARD_CURSOR);
 543   wxDELETE(wxHOURGLASS_CURSOR);
 544   wxDELETE(wxCROSS_CURSOR);
 545 }
 546
 547 void wxDeleteStockLists()
 548 {
 549   wxDELETE(wxTheBrushList);
 550   wxDELETE(wxThePenList);
 551   wxDELETE(wxTheFontList);
 552   wxDELETE(wxTheBitmapList);
 553 }
 554
 555 // ============================================================================
 556 // wxTheXXXList stuff (semi-obsolete)
 557 // ============================================================================
 558
 559 wxBitmapList::wxBitmapList()
 560 {
 561 }
 562
 563 wxBitmapList::~wxBitmapList ()
 564 {
 565   wxNode *node = First ();
 566   while (node)
 567     {
 568       wxBitmap *bitmap = (wxBitmap *) node->Data ();
 569       wxNode *next = node->Next ();
 570       if (bitmap->GetVisible())
 571         delete bitmap;
 572       node = next;
 573     }
 574 }
 575
 576 // Pen and Brush lists
 577 wxPenList::~wxPenList ()
 578 {
 579   wxNode *node = First ();
 580   while (node)
 581     {
 582       wxPen *pen = (wxPen *) node->Data ();
 583       wxNode *next = node->Next ();
 584       if (pen->GetVisible())
 585         delete pen;
 586       node = next;
 587     }
 588 }
 589
 590 void wxPenList::AddPen (wxPen * pen)
 591 {
 592   Append (pen);
 593 }
 594
 595 void wxPenList::RemovePen (wxPen * pen)
 596 {
 597   DeleteObject (pen);
 598 }
 599
 600 wxPen *wxPenList::FindOrCreatePen (const wxColour& colour, int width, int style)
 601 {
 602     for (wxNode * node = First (); node; node = node->Next ())
 603     {
 604         wxPen *each_pen = (wxPen *) node->Data ();
 605         if (each_pen &&
 606                 each_pen->GetVisible() &&
 607                 each_pen->GetWidth () == width &&
 608                 each_pen->GetStyle () == style &&
 609                 each_pen->GetColour ().Red () == colour.Red () &&
 610                 each_pen->GetColour ().Green () == colour.Green () &&
 611                 each_pen->GetColour ().Blue () == colour.Blue ())
 612             return each_pen;
 613     }
 614
 615     wxPen *pen = new wxPen (colour, width, style);
 616     if ( !pen->Ok() )
 617     {
 618         // don't save the invalid pens in the list
 619         delete pen;
 620
 621         return NULL;
 622     }
 623
 624     AddPen(pen);
 625
 626     // we'll delete it ourselves later
 627     pen->SetVisible(TRUE);
 628
 629     return pen;
 630 }
 631
 632 wxBrushList::~wxBrushList ()
 633 {
 634   wxNode *node = First ();
 635   while (node)
 636     {
 637       wxBrush *brush = (wxBrush *) node->Data ();
 638       wxNode *next = node->Next ();
 639       if (brush && brush->GetVisible())
 640         delete brush;
 641       node = next;
 642     }
 643 }
 644
 645 void wxBrushList::AddBrush (wxBrush * brush)
 646 {
 647   Append (brush);
 648 }
 649
 650 wxBrush *wxBrushList::FindOrCreateBrush (const wxColour& colour, int style)
 651 {
 652     for (wxNode * node = First (); node; node = node->Next ())
 653     {
 654         wxBrush *each_brush = (wxBrush *) node->Data ();
 655         if (each_brush &&
 656                 each_brush->GetVisible() &&
 657                 each_brush->GetStyle () == style &&
 658                 each_brush->GetColour ().Red () == colour.Red () &&
 659                 each_brush->GetColour ().Green () == colour.Green () &&
 660                 each_brush->GetColour ().Blue () == colour.Blue ())
 661             return each_brush;
 662     }
 663
 664     wxBrush *brush = new wxBrush (colour, style);
 665
 666     if ( !brush->Ok() )
 667     {
 668         // don't put the brushes we failed to create into the list
 669         delete brush;
 670
 671         return NULL;
 672     }
 673
 674     AddBrush(brush);
 675
 676     // we'll delete it ourselves later
 677     brush->SetVisible(TRUE);
 678
 679     return brush;
 680 }
 681
 682 void wxBrushList::RemoveBrush (wxBrush * brush)
 683 {
 684   DeleteObject (brush);
 685 }
 686
 687 wxFontList::~wxFontList ()
 688 {
 689     wxNode *node = First ();
 690     while (node)
 691     {
 692         // Only delete objects that are 'visible', i.e.
 693         // that have been created using FindOrCreate...,
 694         // where the pointers are expected to be shared
 695         // (and therefore not deleted by any one part of an app).
 696         wxFont *font = (wxFont *) node->Data ();
 697         wxNode *next = node->Next ();
 698         if (font->GetVisible())
 699             delete font;
 700         node = next;
 701     }
 702 }
 703
 704 void wxFontList::AddFont (wxFont * font)
 705 {
 706   Append (font);
 707 }
 708
 709 void wxFontList::RemoveFont (wxFont * font)
 710 {
 711   DeleteObject (font);
 712 }
 713
 714 wxFont *wxFontList::FindOrCreateFont(int pointSize,
 715                                      int family,
 716                                      int style,
 717                                      int weight,
 718                                      bool underline,
 719                                      const wxString& facename,
 720                                      wxFontEncoding encoding)
 721 {
 722     wxFont *font = (wxFont *)NULL;
 723     wxNode *node;
 724     for ( node = First(); node; node = node->Next() )
 725     {
 726         font = (wxFont *)node->Data();
 727         if ( font->GetVisible() &&
 728              font->Ok() &&
 729              font->GetPointSize () == pointSize &&
 730              font->GetStyle () == style &&
 731              font->GetWeight () == weight &&
 732              font->GetUnderlined () == underline )
 733         {
 734             int fontFamily = font->GetFamily();
 735
 736 #if defined(__WXGTK__)
 737             // under GTK the default family is wxSWISS, so looking for a font
 738             // with wxDEFAULT family should return a wxSWISS one instead of
 739             // creating a new one
 740             bool same = (fontFamily == family) ||
 741                         (fontFamily == wxSWISS && family == wxDEFAULT);
 742 #else // !GTK
 743             // VZ: but why elsewhere do we require an exact match? mystery...
 744             bool same = fontFamily == family;
 745 #endif // GTK/!GTK
 746
 747             // empty facename matches anything at all: this is bad because
 748             // depending on which fonts are already created, we might get back
 749             // a different font if we create it with empty facename, but it is
 750             // still better than never matching anything in the cache at all
 751             // in this case
 752             if ( same && !!facename )
 753             {
 754                 const wxString& fontFace = font->GetFaceName();
 755
 756                 // empty facename matches everything
 757                 same = !fontFace || fontFace == facename;
 758             }
 759
 760             if ( same && (encoding != wxFONTENCODING_DEFAULT) )
 761             {
 762                 // have to match the encoding too
 763                 same = font->GetEncoding() == encoding;
 764             }
 765
 766             if ( same )
 767             {
 768                 return font;
 769             }
 770         }
 771     }
 772
 773     if ( !node )
 774     {
 775         // font not found, create the new one
 776         font = new wxFont(pointSize, family, style, weight,
 777                           underline, facename, encoding);
 778
 779         AddFont(font);
 780
 781         // and mark it as being cacheable
 782         font->SetVisible(TRUE);
 783     }
 784
 785     return font;
 786 }
 787
 788 void wxBitmapList::AddBitmap(wxBitmap *bitmap)
 789 {
 790     Append(bitmap);
 791 }
 792
 793 void wxBitmapList::RemoveBitmap(wxBitmap *bitmap)
 794 {
 795     DeleteObject(bitmap);
 796 }
 797
 798 wxSize wxGetDisplaySize()
 799 {
 800     int x, y;
 801     wxDisplaySize(& x, & y);
 802     return wxSize(x, y);
 803 }
 804
 805 wxRect wxGetClientDisplayRect()
 806 {
 807     int x, y, width, height;
 808     wxClientDisplayRect(&x, &y, &width, &height);  // call plat-specific version
 809     return wxRect(x, y, width, height);
 810 }
 811
 812 wxSize wxGetDisplaySizeMM()
 813 {
 814     int x, y;
 815     wxDisplaySizeMM(& x, & y);
 816     return wxSize(x, y);
 817 }
 818
 819 wxResourceCache::~wxResourceCache ()
 820 {
 821     wxNode *node = First ();
 822     while (node) {
 823         wxObject *item = (wxObject *)node->Data();
 824         delete item;
 825
 826         node = node->Next ();
 827     }
 828 }
 829