src/gtk1/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     if (wxTopLevelWindows.Number() == 0) wxTheApp->ExitMainLoop();
 197 }
 198
 199 bool wxFrame::Show( bool show )
 200 {
 201     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 202
 203     if (show && !m_sizeSet)
 204     {
 205   // by calling GtkOnSize here, we don't have to call
 206   // either after showing the frame, which would entail
 207   // much ugly flicker nor from within the size_allocate
 208   // handler, because GTK 1.1.X forbids that.
 209
 210         GtkOnSize( m_x, m_y, m_width, m_height );
 211     }
 212
 213     return wxWindow::Show( show );
 214 }
 215
 216 void wxFrame::OnCloseWindow( wxCloseEvent &event )
 217 {
 218     if (GetEventHandler()->OnClose() || event.GetForce()) this->Destroy();
 219 }
 220
 221 bool wxFrame::Destroy()
 222 {
 223     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 224
 225     if (!wxPendingDelete.Member(this)) wxPendingDelete.Append(this);
 226
 227     return TRUE;
 228 }
 229
 230 wxPoint wxFrame::GetClientAreaOrigin() const
 231 {
 232     wxPoint pt( m_miniEdge, m_miniEdge + m_miniTitle );
 233     if (m_frameMenuBar)
 234     {
 235         int h = 0;
 236         m_frameMenuBar->GetSize( (int*)NULL, &h );
 237         pt.y += h;
 238     }
 239     if (m_frameToolBar)
 240     {
 241         int h = 0;
 242         m_frameToolBar->GetSize( (int*)NULL, &h );
 243         pt.y += h;
 244     }
 245     return pt;
 246 }
 247
 248 void wxFrame::SetSize( int x, int y, int width, int height, int sizeFlags )
 249 {
 250     wxASSERT_MSG( (m_widget != NULL), "invalid window" );
 251
 252     // Don't do anything for children of wxMDIChildFrame
 253     if (!m_wxwindow) return;
 254
 255     if (m_resizing) return; // I don't like recursions
 256     m_resizing = TRUE;
 257
 258     int old_x = m_x;
 259     int old_y = m_y;
 260     int old_width = m_width;
 261     int old_height = m_height;
 262
 263     if ((sizeFlags & wxSIZE_USE_EXISTING) == wxSIZE_USE_EXISTING)
 264     {
 265         if (x != -1) m_x = x;
 266         if (y != -1) m_y = y;
 267         if (width != -1) m_width = width;
 268         if (height != -1) m_height = height;
 269     }
 270     else
 271     {
 272         m_x = x;
 273         m_y = y;
 274         m_width = width;
 275         m_height = height;
 276     }
 277
 278     if ((sizeFlags & wxSIZE_AUTO_WIDTH) == wxSIZE_AUTO_WIDTH)
 279     {
 280         if (width == -1) m_width = 80;
 281     }
 282
 283     if ((sizeFlags & wxSIZE_AUTO_HEIGHT) == wxSIZE_AUTO_HEIGHT)
 284     {
 285        if (height == -1) m_height = 26;
 286     }
 287
 288     if ((m_minWidth != -1) && (m_width < m_minWidth)) m_width = m_minWidth;
 289     if ((m_minHeight != -1) && (m_height < m_minHeight)) m_height = m_minHeight;
 290     if ((m_maxWidth != -1) && (m_width > m_maxWidth)) m_width = m_minWidth;
 291     if ((m_maxHeight != -1) && (m_height > m_maxHeight)) m_height = m_minHeight;
 292
 293     if ((m_x != -1) || (m_y != -1))
 294     {
 295         if ((m_x != old_x) || (m_y != old_y))
 296             gtk_widget_set_uposition( m_widget, m_x, m_y );
 297     }
 298
 299     if ((m_width != old_width) || (m_height != old_height))
 300     {
 301         gtk_widget_set_usize( m_widget, m_width, m_height );
 302     }
 303
 304     wxSizeEvent event( wxSize(m_width,m_height), GetId() );
 305     event.SetEventObject( this );
 306     GetEventHandler()->ProcessEvent( event );
 307
 308     m_resizing = FALSE;
 309 }
 310
 311 void wxFrame::SetSize( int width, int height )
 312 {
 313     SetSize( -1, -1, width, height, wxSIZE_USE_EXISTING );
 314 }
 315
 316 void wxFrame::Centre( int direction )
 317 {
 318     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 319
 320     int x = 0;
 321     int y = 0;
 322
 323     if (direction & wxHORIZONTAL == wxHORIZONTAL) x = (gdk_screen_width () - m_width) / 2;
 324     if (direction & wxVERTICAL == wxVERTICAL) y = (gdk_screen_height () - m_height) / 2;
 325
 326     Move( x, y );
 327 }
 328
 329 void wxFrame::GetClientSize( int *width, int *height ) const
 330 {
 331     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 332
 333     wxWindow::GetClientSize( width, height );
 334     if (height)
 335     {
 336         if (m_frameMenuBar) (*height) -= wxMENU_HEIGHT;
 337         if (m_frameStatusBar) (*height) -= wxSTATUS_HEIGHT;
 338         if (m_frameToolBar)
 339         {
 340             int y = 0;
 341             m_frameToolBar->GetSize( (int *) NULL, &y );
 342             (*height) -= y;
 343         }
 344         (*height) -= m_miniEdge*2 + m_miniTitle;
 345     }
 346     if (width)
 347     {
 348         (*width) -= m_miniEdge*2;
 349     }
 350 }
 351
 352 void wxFrame::SetClientSize( int const width, int const height )
 353 {
 354     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 355
 356     int h = height;
 357     if (m_frameMenuBar) h += wxMENU_HEIGHT;
 358     if (m_frameStatusBar) h += wxSTATUS_HEIGHT;
 359     if (m_frameToolBar)
 360     {
 361         int y = 0;
 362         m_frameToolBar->GetSize( (int *) NULL, &y );
 363         h += y;
 364     }
 365     wxWindow::SetClientSize( width + m_miniEdge*2, h  + m_miniEdge*2 + m_miniTitle );
 366 }
 367
 368 void wxFrame::GtkOnSize( int WXUNUSED(x), int WXUNUSED(y), int width, int height )
 369 {
 370     // due to a bug in gtk, x,y are always 0
 371     // m_x = x;
 372     // m_y = y;
 373
 374     if (m_resizing) return;
 375     m_resizing = TRUE;
 376
 377     if (!m_wxwindow) return;
 378
 379     m_width = width;
 380     m_height = height;
 381
 382     if ((m_minWidth != -1) && (m_width < m_minWidth)) m_width = m_minWidth;
 383     if ((m_minHeight != -1) && (m_height < m_minHeight)) m_height = m_minHeight;
 384     if ((m_maxWidth != -1) && (m_width > m_maxWidth)) m_width = m_minWidth;
 385     if ((m_maxHeight != -1) && (m_height > m_maxHeight)) m_height = m_minHeight;
 386
 387     gtk_widget_set_usize( m_widget, m_width, m_height );
 388
 389     // this emulates the new wxMSW behaviour of placing all
 390     // frame-subwindows (menu, toolbar..) on one native window
 391         // OK, this hurts in the eye, but I don't want to call SetSize()
 392         // because I don't want to call any non-native functions here.
 393
 394     if (m_frameMenuBar)
 395     {
 396         int xx = m_miniEdge;
 397         int yy = m_miniEdge + m_miniTitle;
 398         int ww = m_width  - 2*m_miniEdge;
 399         int hh = wxMENU_HEIGHT;
 400         m_frameMenuBar->m_x = xx;
 401         m_frameMenuBar->m_y = yy;
 402         m_frameMenuBar->m_width = ww;
 403         m_frameMenuBar->m_height = hh;
 404
 405         gtk_myfixed_move( GTK_MYFIXED(m_wxwindow), m_frameMenuBar->m_widget, xx, yy );
 406         gtk_widget_set_usize( m_frameMenuBar->m_widget, ww, hh );
 407     }
 408
 409     if (m_frameToolBar)
 410     {
 411         int xx = m_miniEdge;
 412         int yy = m_miniEdge + m_miniTitle;
 413         if (m_frameMenuBar) yy += wxMENU_HEIGHT;
 414         int ww = m_width - 2*m_miniEdge;
 415         int hh = m_frameToolBar->m_height;
 416
 417         m_frameToolBar->m_x = xx;
 418         m_frameToolBar->m_y = yy;
 419         m_frameToolBar->m_height = hh;
 420         m_frameToolBar->m_width = ww;
 421
 422         gtk_myfixed_move( GTK_MYFIXED(m_wxwindow), m_frameToolBar->m_widget, xx, yy );
 423         gtk_widget_set_usize( m_frameToolBar->m_widget, ww, hh );
 424     }
 425
 426     if (m_frameStatusBar)
 427     {
 428         int xx = 0 + m_miniEdge;
 429         int yy = m_height - wxSTATUS_HEIGHT - m_miniEdge;
 430         int ww = m_width - 2*m_miniEdge;
 431         int hh = wxSTATUS_HEIGHT;
 432
 433         m_frameStatusBar->m_x = xx;
 434         m_frameStatusBar->m_y = yy;
 435         m_frameStatusBar->m_width = ww;
 436         m_frameStatusBar->m_height = hh;
 437
 438         gtk_myfixed_move( GTK_MYFIXED(m_wxwindow), m_frameStatusBar->m_widget, xx, yy );
 439         gtk_widget_set_usize( m_frameStatusBar->m_widget, ww, hh );
 440     }
 441
 442     m_sizeSet = TRUE;
 443
 444     wxSizeEvent event( wxSize(m_width,m_height), GetId() );
 445     event.SetEventObject( this );
 446     GetEventHandler()->ProcessEvent( event );
 447
 448     m_resizing = FALSE;
 449 }
 450
 451 void wxFrame::OnIdle(wxIdleEvent& WXUNUSED(event) )
 452 {
 453     if (!m_sizeSet)
 454         GtkOnSize( m_x, m_y, m_width, m_height );
 455
 456     DoMenuUpdates();
 457 }
 458
 459 void wxFrame::OnSize( wxSizeEvent &WXUNUSED(event) )
 460 {
 461     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 462
 463     if (GetAutoLayout())
 464     {
 465         Layout();
 466     }
 467     else
 468     {
 469         // no child: go out !
 470         if (!GetChildren().First()) return;
 471
 472         // do we have exactly one child?
 473         wxWindow *child = (wxWindow *) NULL;
 474         for(wxNode *node = GetChildren().First(); node; node = node->Next())
 475         {
 476             wxWindow *win = (wxWindow *)node->Data();
 477             if (!wxIS_KIND_OF(win,wxFrame) && !wxIS_KIND_OF(win,wxDialog)
 478 #if 0  // not in m_children anyway ?
 479               && (win != m_frameMenuBar) &&
 480               (win != m_frameToolBar) &&
 481               (win != m_frameStatusBar)
 482 #endif
 483             )
 484             {
 485           // it's the second one: do nothing
 486                 if (child) return;
 487                 child = win;
 488             }
 489         }
 490
 491         // yes: set it's size to fill all the frame
 492         int client_x, client_y;
 493         GetClientSize( &client_x, &client_y );
 494         child->SetSize( 1, 1, client_x-2, client_y-2 );
 495     }
 496 }
 497
 498 static void SetInvokingWindow( wxMenu *menu, wxWindow *win )
 499 {
 500     menu->SetInvokingWindow( win );
 501     wxNode *node = menu->m_items.First();
 502     while (node)
 503     {
 504         wxMenuItem *menuitem = (wxMenuItem*)node->Data();
 505         if (menuitem->IsSubMenu())
 506             SetInvokingWindow( menuitem->GetSubMenu(), win );
 507         node = node->Next();
 508     }
 509 }
 510
 511 void wxFrame::SetMenuBar( wxMenuBar *menuBar )
 512 {
 513     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 514     wxASSERT_MSG( (m_wxwindow != NULL), "invalid frame" );
 515
 516     m_frameMenuBar = menuBar;
 517
 518     if (m_frameMenuBar)
 519     {
 520         wxNode *node = m_frameMenuBar->m_menus.First();
 521         while (node)
 522         {
 523             wxMenu *menu = (wxMenu*)node->Data();
 524             SetInvokingWindow( menu, this );
 525             node = node->Next();
 526         }
 527
 528         if (m_frameMenuBar->m_parent != this)
 529         {
 530             m_frameMenuBar->m_parent = this;
 531             gtk_myfixed_put( GTK_MYFIXED(m_wxwindow),
 532                 m_frameMenuBar->m_widget, m_frameMenuBar->m_x, m_frameMenuBar->m_y );
 533         }
 534     }
 535
 536     if (m_sizeSet) GtkOnSize( m_x, m_y, m_width, m_height );
 537 }
 538
 539 wxMenuBar *wxFrame::GetMenuBar() const
 540 {
 541     return m_frameMenuBar;
 542 }
 543
 544 wxToolBar* wxFrame::CreateToolBar(long style, wxWindowID id, const wxString& name)
 545 {
 546     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 547
 548     wxCHECK_MSG( m_frameToolBar == NULL, FALSE, "recreating toolbar in wxFrame" );
 549
 550     m_frameToolBar = OnCreateToolBar( style, id, name );
 551
 552     GetChildren().DeleteObject( m_frameToolBar );
 553
 554     if (m_sizeSet) GtkOnSize( m_x, m_y, m_width, m_height );
 555
 556     return m_frameToolBar;
 557 }
 558
 559 wxToolBar* wxFrame::OnCreateToolBar( long style, wxWindowID id, const wxString& name )
 560 {
 561     return new wxToolBar( this, id, wxDefaultPosition, wxDefaultSize, style, name );
 562 }
 563
 564 wxToolBar *wxFrame::GetToolBar() const
 565 {
 566     return m_frameToolBar;
 567 }
 568
 569 wxStatusBar* wxFrame::CreateStatusBar( int number, long style, wxWindowID id, const wxString& name )
 570 {
 571     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 572
 573     wxCHECK_MSG( m_frameStatusBar == NULL, FALSE, "recreating status bar in wxFrame" );
 574
 575     m_frameStatusBar = OnCreateStatusBar( number, style, id, name );
 576
 577     if (m_sizeSet) GtkOnSize( m_x, m_y, m_width, m_height );
 578
 579     return m_frameStatusBar;
 580 }
 581
 582 wxStatusBar *wxFrame::OnCreateStatusBar( int number, long style, wxWindowID id, const wxString& name )
 583 {
 584     wxStatusBar *statusBar = (wxStatusBar *) NULL;
 585
 586     statusBar = new wxStatusBar(this, id, wxPoint(0, 0), wxSize(100, 20), style, name);
 587
 588     // Set the height according to the font and the border size
 589     wxClientDC dc(statusBar);
 590     dc.SetFont( statusBar->GetFont() );
 591
 592     long x, y;
 593     dc.GetTextExtent( "X", &x, &y );
 594
 595     int height = (int)( (y  * 1.1) + 2* statusBar->GetBorderY());
 596
 597     statusBar->SetSize( -1, -1, 100, height );
 598
 599     statusBar->SetFieldsCount( number );
 600     return statusBar;
 601 }
 602
 603 void wxFrame::SetStatusText(const wxString& text, int number)
 604 {
 605     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 606
 607     wxCHECK_RET( m_frameStatusBar != NULL, "no statusbar to set text for" );
 608
 609     m_frameStatusBar->SetStatusText(text, number);
 610 }
 611
 612 void wxFrame::SetStatusWidths(int n, const int widths_field[] )
 613 {
 614     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 615
 616     wxCHECK_RET( m_frameStatusBar != NULL, "no statusbar to set widths for" );
 617
 618     m_frameStatusBar->SetStatusWidths(n, widths_field);
 619 }
 620
 621 wxStatusBar *wxFrame::GetStatusBar() const
 622 {
 623     return m_frameStatusBar;
 624 }
 625
 626 void wxFrame::SetTitle( const wxString &title )
 627 {
 628     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 629
 630     m_title = title;
 631     if (m_title.IsNull()) m_title = "";
 632     gtk_window_set_title( GTK_WINDOW(m_widget), title );
 633 }
 634
 635 void wxFrame::SetIcon( const wxIcon &icon )
 636 {
 637     wxASSERT_MSG( (m_widget != NULL), "invalid frame" );
 638
 639     m_icon = icon;
 640     if (!icon.Ok()) return;
 641
 642     wxMask *mask = icon.GetMask();
 643     GdkBitmap *bm = (GdkBitmap *) NULL;
 644     if (mask) bm = mask->GetBitmap();
 645
 646     gdk_window_set_icon( m_widget->window, (GdkWindow *) NULL, icon.GetPixmap(), bm );
 647 }
 648