src/gtk/frame.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        frame.cpp
   3 // Purpose:
   4 // Author:      Robert Roebling
   5 // Id:          $Id$
   6 // Copyright:   (c) 1998 Robert Roebling
   7 // Licence:     wxWindows licence
   8 /////////////////////////////////////////////////////////////////////////////
   9
  10 #ifdef __GNUG__
  11 #pragma implementation "frame.h"
  12 #endif
  13
  14 #include "wx/frame.h"
  15 #include "wx/dialog.h"
  16 #include "wx/control.h"
  17 #include "wx/app.h"
  18 #include "wx/menu.h"
  19 #include "wx/toolbar.h"
  20 #include "wx/statusbr.h"
  21 #include "wx/dcclient.h"
  22
  23 #include "glib.h"
  24 #include "gdk/gdk.h"
  25 #include "gtk/gtk.h"
  26 #include "wx/gtk/win_gtk.h"
  27
  28 //-----------------------------------------------------------------------------
  29 // constants
  30 //-----------------------------------------------------------------------------
  31
  32 const int wxMENU_HEIGHT    = 27;
  33 const int wxSTATUS_HEIGHT  = 25;
  34
  35 //-----------------------------------------------------------------------------
  36 // data
  37 //-----------------------------------------------------------------------------
  38
  39 extern wxList wxTopLevelWindows;
  40 extern wxList wxPendingDelete;
  41
  42 //-----------------------------------------------------------------------------
  43 // "size_allocate"
  44 //-----------------------------------------------------------------------------
  45
  46 static void gtk_frame_size_callback( GtkWidget *WXUNUSED(widget), GtkAllocation* alloc, wxFrame *win )
  47 {
  48     if (!win->HasVMT()) return;
  49
  50 /*
  51     printf( "OnFrameResize from " );
  52     if (win->GetClassInfo() && win->GetClassInfo()->GetClassName())
  53         printf( win->GetClassInfo()->GetClassName() );
  54     printf( ".\n" );
  55 */
  56
  57    if ((win->m_width != alloc->width) || (win->m_height != alloc->height))
  58    {
  59        win->m_sizeSet = FALSE;
  60        win->m_width = alloc->width;
  61        win->m_height = alloc->height;
  62    }
  63 }
  64
  65 //-----------------------------------------------------------------------------
  66 // "delete_event"
  67 //-----------------------------------------------------------------------------
  68
  69 static gint gtk_frame_delete_callback( GtkWidget *WXUNUSED(widget), GdkEvent *WXUNUSED(event), wxFrame *win )
  70 {
  71 /*
  72     printf( "OnDelete from " );
  73     if (win->GetClassInfo() && win->GetClassInfo()->GetClassName())
  74         printf( win->GetClassInfo()->GetClassName() );
  75     printf( ".\n" );
  76 */
  77
  78     win->Close();
  79
  80     return TRUE;
  81 }
  82
  83 //-----------------------------------------------------------------------------
  84 // "configure_event"
  85 //-----------------------------------------------------------------------------
  86
  87 static gint gtk_frame_configure_callback( GtkWidget *WXUNUSED(widget), GdkEventConfigure *event, wxFrame *win )
  88 {
  89     if (!win->HasVMT()) return FALSE;
  90
  91     win->m_x = event->x;
  92     win->m_y = event->y;
  93
  94     return FALSE;
  95 }
  96
  97 //-----------------------------------------------------------------------------
  98 // wxFrame
  99 //-----------------------------------------------------------------------------
 100
 101 BEGIN_EVENT_TABLE(wxFrame, wxWindow)
 102     EVT_SIZE(wxFrame::OnSize)
 103     EVT_CLOSE(wxFrame::OnCloseWindow)
 104     EVT_IDLE(wxFrame::OnIdle)
 105 END_EVENT_TABLE()
 106
 107 IMPLEMENT_DYNAMIC_CLASS(wxFrame,wxWindow)
 108
 109 wxFrame::wxFrame()
 110 {
 111     m_frameMenuBar = (wxMenuBar *) NULL;
 112     m_frameStatusBar = (wxStatusBar *) NULL;
 113     m_frameToolBar = (wxToolBar *) NULL;
 114     m_sizeSet = FALSE;
 115     m_miniEdge = 0;
 116     m_miniTitle = 0;
 117 }
 118
 119 wxFrame::wxFrame( wxWindow *parent, wxWindowID id, const wxString &title,
 120       const wxPoint &pos, const wxSize &size,
 121       long style, const wxString &name )
 122 {
 123     m_frameMenuBar = (wxMenuBar *) NULL;
 124     m_frameStatusBar = (wxStatusBar *) NULL;
 125     m_frameToolBar = (wxToolBar *) NULL;
 126     m_sizeSet = FALSE;
 127     m_miniEdge = 0;
 128     m_miniTitle = 0;
 129     Create( parent, id, title, pos, size, style, name );
 130 }
 131
 132 bool wxFrame::Create( wxWindow *parent, wxWindowID id, const wxString &title,
 133       const wxPoint &pos, const wxSize &size,
 134       long style, const wxString &name )
 135 {
 136     wxTopLevelWindows.Append( this );
 137
 138     m_needParent = FALSE;
 139
 140     PreCreation( parent, id, pos, size, style, name );
 141
 142     m_title = title;
 143
 144     GtkWindowType win_type = GTK_WINDOW_TOPLEVEL;
 145     if (style & wxSIMPLE_BORDER) win_type = GTK_WINDOW_POPUP;
 146
 147     m_widget = gtk_window_new( win_type );
 148
 149 #ifdef __WXDEBUG__
 150         debug_focus_in( m_widget, "wxFrame::m_widget", name );
 151 #endif
 152
 153     if ((size.x != -1) && (size.y != -1))
 154         gtk_widget_set_usize( m_widget, m_width, m_height );
 155     if ((pos.x != -1) && (pos.y != -1))
 156         gtk_widget_set_uposition( m_widget, m_x, m_y );
 157
 158     gtk_window_set_title( GTK_WINDOW(m_widget), title );
 159     GTK_WIDGET_UNSET_FLAGS( m_widget, GTK_CAN_FOCUS );
 160
 161     gtk_widget_set( m_widget, "GtkWindow::allow_shrink", TRUE, NULL );
 162
 163     gtk_signal_connect( GTK_OBJECT(m_widget), "delete_event",
 164         GTK_SIGNAL_FUNC(gtk_frame_delete_callback), (gpointer)this );
 165
 166     m_wxwindow = gtk_myfixed_new();
 167     gtk_widget_show( m_wxwindow );
 168     GTK_WIDGET_UNSET_FLAGS( m_wxwindow, GTK_CAN_FOCUS );
 169
 170 #ifdef __WXDEBUG__
 171         debug_focus_in( m_wxwindow, "wxFrame::m_wxwindow", name );
 172 #endif
 173
 174     gtk_container_add( GTK_CONTAINER(m_widget), m_wxwindow );
 175
 176     gtk_signal_connect( GTK_OBJECT(m_widget), "size_allocate",
 177         GTK_SIGNAL_FUNC(gtk_frame_size_callback), (gpointer)this );
 178
 179     gtk_signal_connect( GTK_OBJECT(m_widget), "configure_event",
 180         GTK_SIGNAL_FUNC(gtk_frame_configure_callback), (gpointer)this );
 181
 182     if (m_parent) m_parent->AddChild( this );
 183
 184     PostCreation();
 185
 186     return TRUE;
 187 }
 188
 189 wxFrame::~wxFrame()
 190 {
 191     if (m_frameMenuBar) delete m_frameMenuBar;
 192     if (m_frameStatusBar) delete m_frameStatusBar;
 193     if (m_frameToolBar) delete m_frameToolBar;
 194
 195     wxTopLevelWindows.DeleteObject( this );
 196
 197     if (wxTheApp->GetTopWindow() == this)
 198     {
 199         wxTheApp->SetTopWindow( (wxWindow*) NULL );
 200     }
 201
 202     if (wxTopLevelWindows.Number() == 0)
 203     {
 204         wxTheApp->ExitMainLoop();
 205     }
 206 }
 207
 208 bool wxFrame::Show( bool show )
 209 {
 210     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 211
 212     if (show && !m_sizeSet)
 213     {
 214   // by calling GtkOnSize here, we don't have to call
 215   // either after showing the frame, which would entail
 216   // much ugly flicker nor from within the size_allocate
 217   // handler, because GTK 1.1.X forbids that.
 218
 219         GtkOnSize( m_x, m_y, m_width, m_height );
 220     }
 221
 222     return wxWindow::Show( show );
 223 }
 224
 225 void wxFrame::OnCloseWindow( wxCloseEvent &event )
 226 {
 227     if (GetEventHandler()->OnClose() || event.GetForce()) this->Destroy();
 228 }
 229
 230 bool wxFrame::Destroy()
 231 {
 232     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 233
 234     if (!wxPendingDelete.Member(this)) wxPendingDelete.Append(this);
 235
 236     return TRUE;
 237 }
 238
 239 wxPoint wxFrame::GetClientAreaOrigin() const
 240 {
 241     wxPoint pt( m_miniEdge, m_miniEdge + m_miniTitle );
 242     if (m_frameMenuBar)
 243     {
 244         int h = 0;
 245         m_frameMenuBar->GetSize( (int*)NULL, &h );
 246         pt.y += h;
 247     }
 248     if (m_frameToolBar)
 249     {
 250         int h = 0;
 251         m_frameToolBar->GetSize( (int*)NULL, &h );
 252         pt.y += h;
 253     }
 254     return pt;
 255 }
 256
 257 void wxFrame::SetSize( int x, int y, int width, int height, int sizeFlags )
 258 {
 259     wxASSERT_MSG( (m_widget != NULL), "invalid window" );
 260
 261     // Don't do anything for children of wxMDIChildFrame
 262     if (!m_wxwindow) return;
 263
 264     if (m_resizing) return; // I don't like recursions
 265     m_resizing = TRUE;
 266
 267     int old_x = m_x;
 268     int old_y = m_y;
 269     int old_width = m_width;
 270     int old_height = m_height;
 271
 272     if ((sizeFlags & wxSIZE_USE_EXISTING) == wxSIZE_USE_EXISTING)
 273     {
 274         if (x != -1) m_x = x;
 275         if (y != -1) m_y = y;
 276         if (width != -1) m_width = width;
 277         if (height != -1) m_height = height;
 278     }
 279     else
 280     {
 281         m_x = x;
 282         m_y = y;
 283         m_width = width;
 284         m_height = height;
 285     }
 286
 287     if ((sizeFlags & wxSIZE_AUTO_WIDTH) == wxSIZE_AUTO_WIDTH)
 288     {
 289         if (width == -1) m_width = 80;
 290     }
 291
 292     if ((sizeFlags & wxSIZE_AUTO_HEIGHT) == wxSIZE_AUTO_HEIGHT)
 293     {
 294        if (height == -1) m_height = 26;
 295     }
 296
 297     if ((m_minWidth != -1) && (m_width < m_minWidth)) m_width = m_minWidth;
 298     if ((m_minHeight != -1) && (m_height < m_minHeight)) m_height = m_minHeight;
 299     if ((m_maxWidth != -1) && (m_width > m_maxWidth)) m_width = m_minWidth;
 300     if ((m_maxHeight != -1) && (m_height > m_maxHeight)) m_height = m_minHeight;
 301
 302     if ((m_x != -1) || (m_y != -1))
 303     {
 304         if ((m_x != old_x) || (m_y != old_y))
 305             gtk_widget_set_uposition( m_widget, m_x, m_y );
 306     }
 307
 308     if ((m_width != old_width) || (m_height != old_height))
 309     {
 310         gtk_widget_set_usize( m_widget, m_width, m_height );
 311     }
 312
 313     wxSizeEvent event( wxSize(m_width,m_height), GetId() );
 314     event.SetEventObject( this );
 315     GetEventHandler()->ProcessEvent( event );
 316
 317     m_resizing = FALSE;
 318 }
 319
 320 void wxFrame::SetSize( int width, int height )
 321 {
 322     SetSize( -1, -1, width, height, wxSIZE_USE_EXISTING );
 323 }
 324
 325 void wxFrame::Centre( int direction )
 326 {
 327     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 328
 329     int x = 0;
 330     int y = 0;
 331
 332     if (direction & wxHORIZONTAL == wxHORIZONTAL) x = (gdk_screen_width () - m_width) / 2;
 333     if (direction & wxVERTICAL == wxVERTICAL) y = (gdk_screen_height () - m_height) / 2;
 334
 335     Move( x, y );
 336 }
 337
 338 void wxFrame::GetClientSize( int *width, int *height ) const
 339 {
 340     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 341
 342     wxWindow::GetClientSize( width, height );
 343     if (height)
 344     {
 345         if (m_frameMenuBar) (*height) -= wxMENU_HEIGHT;
 346         if (m_frameStatusBar) (*height) -= wxSTATUS_HEIGHT;
 347         if (m_frameToolBar)
 348         {
 349             int y = 0;
 350             m_frameToolBar->GetSize( (int *) NULL, &y );
 351             (*height) -= y;
 352         }
 353         (*height) -= m_miniEdge*2 + m_miniTitle;
 354     }
 355     if (width)
 356     {
 357         (*width) -= m_miniEdge*2;
 358     }
 359 }
 360
 361 void wxFrame::SetClientSize( int const width, int const height )
 362 {
 363     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 364
 365     int h = height;
 366     if (m_frameMenuBar) h += wxMENU_HEIGHT;
 367     if (m_frameStatusBar) h += wxSTATUS_HEIGHT;
 368     if (m_frameToolBar)
 369     {
 370         int y = 0;
 371         m_frameToolBar->GetSize( (int *) NULL, &y );
 372         h += y;
 373     }
 374     wxWindow::SetClientSize( width + m_miniEdge*2, h  + m_miniEdge*2 + m_miniTitle );
 375 }
 376
 377 void wxFrame::GtkOnSize( int WXUNUSED(x), int WXUNUSED(y), int width, int height )
 378 {
 379     // due to a bug in gtk, x,y are always 0
 380     // m_x = x;
 381     // m_y = y;
 382
 383     if (m_resizing) return;
 384     m_resizing = TRUE;
 385
 386     if (!m_wxwindow) return;
 387
 388     m_width = width;
 389     m_height = height;
 390
 391     if ((m_minWidth != -1) && (m_width < m_minWidth)) m_width = m_minWidth;
 392     if ((m_minHeight != -1) && (m_height < m_minHeight)) m_height = m_minHeight;
 393     if ((m_maxWidth != -1) && (m_width > m_maxWidth)) m_width = m_minWidth;
 394     if ((m_maxHeight != -1) && (m_height > m_maxHeight)) m_height = m_minHeight;
 395
 396     gtk_widget_set_usize( m_widget, m_width, m_height );
 397
 398     // this emulates the new wxMSW behaviour of placing all
 399     // frame-subwindows (menu, toolbar..) on one native window
 400         // OK, this hurts in the eye, but I don't want to call SetSize()
 401         // because I don't want to call any non-native functions here.
 402
 403     if (m_frameMenuBar)
 404     {
 405         int xx = m_miniEdge;
 406         int yy = m_miniEdge + m_miniTitle;
 407         int ww = m_width  - 2*m_miniEdge;
 408         int hh = wxMENU_HEIGHT;
 409         m_frameMenuBar->m_x = xx;
 410         m_frameMenuBar->m_y = yy;
 411         m_frameMenuBar->m_width = ww;
 412         m_frameMenuBar->m_height = hh;
 413
 414         gtk_myfixed_move( GTK_MYFIXED(m_wxwindow), m_frameMenuBar->m_widget, xx, yy );
 415         gtk_widget_set_usize( m_frameMenuBar->m_widget, ww, hh );
 416     }
 417
 418     if (m_frameToolBar)
 419     {
 420         int xx = m_miniEdge;
 421         int yy = m_miniEdge + m_miniTitle;
 422         if (m_frameMenuBar) yy += wxMENU_HEIGHT;
 423         int ww = m_width - 2*m_miniEdge;
 424         int hh = m_frameToolBar->m_height;
 425
 426         m_frameToolBar->m_x = xx;
 427         m_frameToolBar->m_y = yy;
 428         m_frameToolBar->m_height = hh;
 429         m_frameToolBar->m_width = ww;
 430
 431         gtk_myfixed_move( GTK_MYFIXED(m_wxwindow), m_frameToolBar->m_widget, xx, yy );
 432         gtk_widget_set_usize( m_frameToolBar->m_widget, ww, hh );
 433     }
 434
 435     if (m_frameStatusBar)
 436     {
 437         int xx = 0 + m_miniEdge;
 438         int yy = m_height - wxSTATUS_HEIGHT - m_miniEdge;
 439         int ww = m_width - 2*m_miniEdge;
 440         int hh = wxSTATUS_HEIGHT;
 441
 442         m_frameStatusBar->m_x = xx;
 443         m_frameStatusBar->m_y = yy;
 444         m_frameStatusBar->m_width = ww;
 445         m_frameStatusBar->m_height = hh;
 446
 447         gtk_myfixed_move( GTK_MYFIXED(m_wxwindow), m_frameStatusBar->m_widget, xx, yy );
 448         gtk_widget_set_usize( m_frameStatusBar->m_widget, ww, hh );
 449     }
 450
 451     m_sizeSet = TRUE;
 452
 453     wxSizeEvent event( wxSize(m_width,m_height), GetId() );
 454     event.SetEventObject( this );
 455     GetEventHandler()->ProcessEvent( event );
 456
 457     m_resizing = FALSE;
 458 }
 459
 460 void wxFrame::OnIdle(wxIdleEvent& WXUNUSED(event) )
 461 {
 462     if (!m_sizeSet)
 463         GtkOnSize( m_x, m_y, m_width, m_height );
 464
 465     DoMenuUpdates();
 466 }
 467
 468 void wxFrame::OnSize( wxSizeEvent &WXUNUSED(event) )
 469 {
 470     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 471
 472     if (GetAutoLayout())
 473     {
 474         Layout();
 475     }
 476     else
 477     {
 478         // no child: go out !
 479         if (!GetChildren().First()) return;
 480
 481         // do we have exactly one child?
 482         wxWindow *child = (wxWindow *) NULL;
 483         for(wxNode *node = GetChildren().First(); node; node = node->Next())
 484         {
 485             wxWindow *win = (wxWindow *)node->Data();
 486             if (!wxIS_KIND_OF(win,wxFrame) && !wxIS_KIND_OF(win,wxDialog)
 487 #if 0  // not in m_children anyway ?
 488               && (win != m_frameMenuBar) &&
 489               (win != m_frameToolBar) &&
 490               (win != m_frameStatusBar)
 491 #endif
 492             )
 493             {
 494           // it's the second one: do nothing
 495                 if (child) return;
 496                 child = win;
 497             }
 498         }
 499
 500         // yes: set it's size to fill all the frame
 501         int client_x, client_y;
 502         GetClientSize( &client_x, &client_y );
 503         child->SetSize( 1, 1, client_x-2, client_y-2 );
 504     }
 505 }
 506
 507 static void SetInvokingWindow( wxMenu *menu, wxWindow *win )
 508 {
 509     menu->SetInvokingWindow( win );
 510     wxNode *node = menu->m_items.First();
 511     while (node)
 512     {
 513         wxMenuItem *menuitem = (wxMenuItem*)node->Data();
 514         if (menuitem->IsSubMenu())
 515             SetInvokingWindow( menuitem->GetSubMenu(), win );
 516         node = node->Next();
 517     }
 518 }
 519
 520 void wxFrame::SetMenuBar( wxMenuBar *menuBar )
 521 {
 522     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 523     wxASSERT_MSG( (m_wxwindow != NULL), "invalid frame" );
 524
 525     m_frameMenuBar = menuBar;
 526
 527     if (m_frameMenuBar)
 528     {
 529         wxNode *node = m_frameMenuBar->m_menus.First();
 530         while (node)
 531         {
 532             wxMenu *menu = (wxMenu*)node->Data();
 533             SetInvokingWindow( menu, this );
 534             node = node->Next();
 535         }
 536
 537         if (m_frameMenuBar->m_parent != this)
 538         {
 539             m_frameMenuBar->m_parent = this;
 540             gtk_myfixed_put( GTK_MYFIXED(m_wxwindow),
 541                 m_frameMenuBar->m_widget, m_frameMenuBar->m_x, m_frameMenuBar->m_y );
 542         }
 543     }
 544
 545     m_sizeSet = FALSE;
 546 }
 547
 548 wxMenuBar *wxFrame::GetMenuBar() const
 549 {
 550     return m_frameMenuBar;
 551 }
 552
 553 wxToolBar* wxFrame::CreateToolBar(long style, wxWindowID id, const wxString& name)
 554 {
 555     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 556
 557     wxCHECK_MSG( m_frameToolBar == NULL, FALSE, "recreating toolbar in wxFrame" );
 558
 559     m_frameToolBar = OnCreateToolBar( style, id, name );
 560
 561     GetChildren().DeleteObject( m_frameToolBar );
 562
 563     m_sizeSet = FALSE;
 564
 565     return m_frameToolBar;
 566 }
 567
 568 wxToolBar* wxFrame::OnCreateToolBar( long style, wxWindowID id, const wxString& name )
 569 {
 570     return new wxToolBar( this, id, wxDefaultPosition, wxDefaultSize, style, name );
 571 }
 572
 573 wxToolBar *wxFrame::GetToolBar() const
 574 {
 575     return m_frameToolBar;
 576 }
 577
 578 wxStatusBar* wxFrame::CreateStatusBar( int number, long style, wxWindowID id, const wxString& name )
 579 {
 580     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 581
 582     wxCHECK_MSG( m_frameStatusBar == NULL, FALSE, "recreating status bar in wxFrame" );
 583
 584     m_frameStatusBar = OnCreateStatusBar( number, style, id, name );
 585
 586     m_sizeSet = FALSE;
 587
 588     return m_frameStatusBar;
 589 }
 590
 591 wxStatusBar *wxFrame::OnCreateStatusBar( int number, long style, wxWindowID id, const wxString& name )
 592 {
 593     wxStatusBar *statusBar = (wxStatusBar *) NULL;
 594
 595     statusBar = new wxStatusBar(this, id, wxPoint(0, 0), wxSize(100, 20), style, name);
 596
 597     // Set the height according to the font and the border size
 598     wxClientDC dc(statusBar);
 599     dc.SetFont( statusBar->GetFont() );
 600
 601     long x, y;
 602     dc.GetTextExtent( "X", &x, &y );
 603
 604     int height = (int)( (y  * 1.1) + 2* statusBar->GetBorderY());
 605
 606     statusBar->SetSize( -1, -1, 100, height );
 607
 608     statusBar->SetFieldsCount( number );
 609     return statusBar;
 610 }
 611
 612 void wxFrame::SetStatusText(const wxString& text, int number)
 613 {
 614     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 615
 616     wxCHECK_RET( m_frameStatusBar != NULL, "no statusbar to set text for" );
 617
 618     m_frameStatusBar->SetStatusText(text, number);
 619 }
 620
 621 void wxFrame::SetStatusWidths(int n, const int widths_field[] )
 622 {
 623     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 624
 625     wxCHECK_RET( m_frameStatusBar != NULL, "no statusbar to set widths for" );
 626
 627     m_frameStatusBar->SetStatusWidths(n, widths_field);
 628 }
 629
 630 wxStatusBar *wxFrame::GetStatusBar() const
 631 {
 632     return m_frameStatusBar;
 633 }
 634
 635 void wxFrame::SetTitle( const wxString &title )
 636 {
 637     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 638
 639     m_title = title;
 640     if (m_title.IsNull()) m_title = "";
 641     gtk_window_set_title( GTK_WINDOW(m_widget), title );
 642 }
 643
 644 void wxFrame::SetIcon( const wxIcon &icon )
 645 {
 646     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 647
 648     m_icon = icon;
 649     if (!icon.Ok()) return;
 650
 651     wxMask *mask = icon.GetMask();
 652     GdkBitmap *bm = (GdkBitmap *) NULL;
 653     if (mask) bm = mask->GetBitmap();
 654
 655     gdk_window_set_icon( m_widget->window, (GdkWindow *) NULL, icon.GetPixmap(), bm );
 656 }
 657