src/gtk1/dialog.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        dialog.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 "dialog.h"
  12 #endif
  13
  14 #include "wx/dialog.h"
  15 #include "wx/frame.h"
  16 #include "wx/app.h"
  17 #include "wx/cursor.h"
  18
  19 #include <gdk/gdk.h>
  20 #include <gtk/gtk.h>
  21 #include <gdk/gdkkeysyms.h>
  22
  23 #include "wx/gtk/win_gtk.h"
  24
  25 //-----------------------------------------------------------------------------
  26 // idle system
  27 //-----------------------------------------------------------------------------
  28
  29 extern void wxapp_install_idle_handler();
  30 extern bool g_isIdle;
  31 extern int g_openDialogs;
  32
  33 //-----------------------------------------------------------------------------
  34 // data
  35 //-----------------------------------------------------------------------------
  36
  37 extern wxList wxPendingDelete;
  38
  39 //-----------------------------------------------------------------------------
  40 // "focus" from m_window
  41 //-----------------------------------------------------------------------------
  42
  43 static gint gtk_dialog_focus_callback( GtkWidget *widget, GtkDirectionType WXUNUSED(d), wxWindow *WXUNUSED(win) )
  44 {
  45     if (g_isIdle)
  46         wxapp_install_idle_handler();
  47
  48     // This disables GTK's tab traversal
  49     gtk_signal_emit_stop_by_name( GTK_OBJECT(widget), "focus" );
  50     return TRUE;
  51 }
  52
  53 //-----------------------------------------------------------------------------
  54 // "delete_event"
  55 //-----------------------------------------------------------------------------
  56
  57 bool gtk_dialog_delete_callback( GtkWidget *WXUNUSED(widget), GdkEvent *WXUNUSED(event), wxDialog *win )
  58 {
  59     if (g_isIdle)
  60         wxapp_install_idle_handler();
  61
  62     if (win->IsEnabled())
  63         win->Close();
  64
  65     return TRUE;
  66 }
  67
  68 //-----------------------------------------------------------------------------
  69 // "size_allocate"
  70 //-----------------------------------------------------------------------------
  71
  72 static void gtk_dialog_size_callback( GtkWidget *WXUNUSED(widget), GtkAllocation* alloc, wxDialog *win )
  73 {
  74     if (g_isIdle)
  75         wxapp_install_idle_handler();
  76
  77     if (!win->m_hasVMT) return;
  78
  79     if ((win->m_width != alloc->width) || (win->m_height != alloc->height))
  80     {
  81         win->m_width = alloc->width;
  82         win->m_height = alloc->height;
  83         win->GtkUpdateSize();
  84     }
  85 }
  86
  87 //-----------------------------------------------------------------------------
  88 // "configure_event"
  89 //-----------------------------------------------------------------------------
  90
  91 static gint
  92 #if (GTK_MINOR_VERSION > 0)
  93 gtk_dialog_configure_callback( GtkWidget *WXUNUSED(widget), GdkEventConfigure *WXUNUSED(event), wxDialog *win )
  94 #else
  95 gtk_dialog_configure_callback( GtkWidget *WXUNUSED(widget), GdkEventConfigure *event, wxDialog *win )
  96 #endif
  97 {
  98     if (g_isIdle)
  99         wxapp_install_idle_handler();
 100
 101     if (!win->m_hasVMT) return FALSE;
 102
 103 #if (GTK_MINOR_VERSION > 0)
 104     int x = 0;
 105     int y = 0;
 106     gdk_window_get_root_origin( win->m_widget->window, &x, &y );
 107     win->m_x = x;
 108     win->m_y = y;
 109 #else
 110     win->m_x = event->x;
 111     win->m_y = event->y;
 112 #endif
 113
 114     wxMoveEvent mevent( wxPoint(win->m_x,win->m_y), win->GetId() );
 115     mevent.SetEventObject( win );
 116     win->GetEventHandler()->ProcessEvent( mevent );
 117
 118     return FALSE;
 119 }
 120
 121 //-----------------------------------------------------------------------------
 122 // "realize" from m_widget
 123 //-----------------------------------------------------------------------------
 124
 125 /* we cannot MWM hints and icons before the widget has been realized,
 126    so we do this directly after realization */
 127
 128 static gint
 129 gtk_dialog_realized_callback( GtkWidget *widget, wxDialog *win )
 130 {
 131     if (g_isIdle)
 132         wxapp_install_idle_handler();
 133
 134     /* all this is for Motif Window Manager "hints" and is supposed to be
 135        recognized by other WM as well. not tested. */
 136     long decor = (long) GDK_DECOR_BORDER;
 137     long func = (long) GDK_FUNC_MOVE ;
 138
 139     /* Some WM don't display any border around the frame contents if
 140        used with these hints, so we add a resize border around it,
 141        without automatically allowinng it to be resized though.
 142
 143        This avoids the problem, but looks odd. What shall we do?
 144     */
 145     decor |= GDK_DECOR_RESIZEH;
 146
 147     if ((win->GetWindowStyle() & wxCAPTION) != 0)
 148         decor |= GDK_DECOR_TITLE;
 149     if ((win->GetWindowStyle() & wxSYSTEM_MENU) != 0)
 150     {
 151        decor |= GDK_DECOR_MENU;
 152        func |= GDK_FUNC_CLOSE;
 153     }
 154     if ((win->GetWindowStyle() & wxMINIMIZE_BOX) != 0)
 155     {
 156         func |= GDK_FUNC_MINIMIZE;
 157         decor |= GDK_DECOR_MINIMIZE;
 158     }
 159     if ((win->GetWindowStyle() & wxMAXIMIZE_BOX) != 0)
 160     {
 161         decor |= GDK_DECOR_MAXIMIZE;
 162         func |= GDK_FUNC_MAXIMIZE;
 163     }
 164     if ((win->GetWindowStyle() & wxRESIZE_BORDER) != 0)
 165     {
 166        func |= GDK_FUNC_RESIZE;
 167        decor |= GDK_DECOR_RESIZEH;
 168     }
 169     gdk_window_set_decorations( win->m_widget->window, (GdkWMDecoration)decor);
 170     gdk_window_set_functions( win->m_widget->window, (GdkWMFunction)func);
 171
 172     /* GTK's shrinking/growing policy */
 173     if ((win->GetWindowStyle() & wxRESIZE_BORDER) == 0)
 174         gtk_window_set_policy(GTK_WINDOW(win->m_widget), 0, 0, 1);
 175     else
 176         gtk_window_set_policy(GTK_WINDOW(win->m_widget), 1, 1, 1);
 177
 178     /* reset the icon */
 179     if (win->m_icon != wxNullIcon)
 180     {
 181         wxIcon icon( win->m_icon );
 182         win->m_icon = wxNullIcon;
 183         win->SetIcon( icon );
 184     }
 185
 186     return FALSE;
 187 }
 188
 189 //-----------------------------------------------------------------------------
 190 // InsertChild for wxDialog
 191 //-----------------------------------------------------------------------------
 192
 193 /* Callback for wxFrame. This very strange beast has to be used because
 194  * C++ has no virtual methods in a constructor. We have to emulate a
 195  * virtual function here as wxWindows requires different ways to insert
 196  * a child in container classes. */
 197
 198 static void wxInsertChildInDialog( wxDialog* parent, wxWindow* child )
 199 {
 200     gtk_pizza_put( GTK_PIZZA(parent->m_wxwindow),
 201                      GTK_WIDGET(child->m_widget),
 202                      child->m_x,
 203                      child->m_y,
 204                      child->m_width,
 205                      child->m_height );
 206
 207     if (parent->HasFlag(wxTAB_TRAVERSAL))
 208     {
 209         /* we now allow a window to get the focus as long as it
 210            doesn't have any children. */
 211         GTK_WIDGET_UNSET_FLAGS( parent->m_wxwindow, GTK_CAN_FOCUS );
 212     }
 213 }
 214
 215 //-----------------------------------------------------------------------------
 216 // wxDialog
 217 //-----------------------------------------------------------------------------
 218
 219 BEGIN_EVENT_TABLE(wxDialog,wxPanel)
 220     EVT_BUTTON  (wxID_OK,       wxDialog::OnOK)
 221     EVT_BUTTON  (wxID_CANCEL,   wxDialog::OnCancel)
 222     EVT_BUTTON  (wxID_APPLY,    wxDialog::OnApply)
 223     EVT_SIZE    (wxDialog::OnSize)
 224     EVT_CLOSE   (wxDialog::OnCloseWindow)
 225 END_EVENT_TABLE()
 226
 227 IMPLEMENT_DYNAMIC_CLASS(wxDialog,wxPanel)
 228
 229 void wxDialog::Init()
 230 {
 231     m_returnCode = 0;
 232     m_sizeSet = FALSE;
 233     m_modalShowing = FALSE;
 234     m_isFrame = TRUE;
 235 }
 236
 237 wxDialog::wxDialog( wxWindow *parent,
 238                     wxWindowID id, const wxString &title,
 239                     const wxPoint &pos, const wxSize &size,
 240                     long style, const wxString &name )
 241 {
 242     Init();
 243
 244     Create( parent, id, title, pos, size, style, name );
 245 }
 246
 247 bool wxDialog::Create( wxWindow *parent,
 248                        wxWindowID id, const wxString &title,
 249                        const wxPoint &pos, const wxSize &size,
 250                        long style, const wxString &name )
 251 {
 252     wxTopLevelWindows.Append( this );
 253
 254     m_needParent = FALSE;
 255
 256     if (!PreCreation( parent, pos, size ) ||
 257         !CreateBase( parent, id, pos, size, style, wxDefaultValidator, name ))
 258     {
 259         wxFAIL_MSG( wxT("wxDialog creation failed") );
 260         return FALSE;
 261     }
 262
 263     // All dialogs should really have this style
 264     m_windowStyle |= wxTAB_TRAVERSAL;
 265
 266     m_insertCallback = (wxInsertChildFunction) wxInsertChildInDialog;
 267
 268     m_widget = gtk_window_new( GTK_WINDOW_DIALOG );
 269
 270     if ((m_parent) && (GTK_IS_WINDOW(m_parent->m_widget)))
 271         gtk_window_set_transient_for( GTK_WINDOW(m_widget), GTK_WINDOW(m_parent->m_widget) );
 272
 273     if (!name.IsEmpty())
 274         gtk_window_set_wmclass( GTK_WINDOW(m_widget), name.mb_str(), name.mb_str() );
 275
 276     GTK_WIDGET_UNSET_FLAGS( m_widget, GTK_CAN_FOCUS );
 277
 278     gtk_signal_connect( GTK_OBJECT(m_widget), "delete_event",
 279         GTK_SIGNAL_FUNC(gtk_dialog_delete_callback), (gpointer)this );
 280
 281     m_wxwindow = gtk_pizza_new();
 282     gtk_widget_show( m_wxwindow );
 283     GTK_WIDGET_UNSET_FLAGS( m_wxwindow, GTK_CAN_FOCUS );
 284
 285     gtk_container_add( GTK_CONTAINER(m_widget), m_wxwindow );
 286
 287     SetTitle( title );
 288
 289     if (m_parent) m_parent->AddChild( this );
 290
 291     PostCreation();
 292
 293     if ((m_x != -1) || (m_y != -1))
 294         gtk_widget_set_uposition( m_widget, m_x, m_y );
 295     gtk_widget_set_usize( m_widget, m_width, m_height );
 296
 297     /*  we cannot set MWM hints  before the widget has
 298         been realized, so we do this directly after realization */
 299     gtk_signal_connect( GTK_OBJECT(m_widget), "realize",
 300                         GTK_SIGNAL_FUNC(gtk_dialog_realized_callback), (gpointer) this );
 301
 302     /* the user resized the frame by dragging etc. */
 303     gtk_signal_connect( GTK_OBJECT(m_widget), "size_allocate",
 304         GTK_SIGNAL_FUNC(gtk_dialog_size_callback), (gpointer)this );
 305
 306     gtk_signal_connect( GTK_OBJECT(m_widget), "configure_event",
 307         GTK_SIGNAL_FUNC(gtk_dialog_configure_callback), (gpointer)this );
 308
 309     /* disable native tab traversal */
 310     gtk_signal_connect( GTK_OBJECT(m_widget), "focus",
 311         GTK_SIGNAL_FUNC(gtk_dialog_focus_callback), (gpointer)this );
 312
 313     return TRUE;
 314 }
 315
 316 wxDialog::~wxDialog()
 317 {
 318     m_isBeingDeleted = TRUE;
 319
 320     wxTopLevelWindows.DeleteObject( this );
 321
 322     if (wxTheApp->GetTopWindow() == this)
 323     {
 324         wxTheApp->SetTopWindow( (wxWindow*) NULL );
 325     }
 326
 327     if ((wxTopLevelWindows.Number() == 0) &&
 328         (wxTheApp->GetExitOnFrameDelete()))
 329     {
 330         wxTheApp->ExitMainLoop();
 331     }
 332 }
 333
 334 void wxDialog::SetTitle( const wxString& title )
 335 {
 336     m_title = title;
 337     if (m_title.IsNull()) m_title = wxT("");
 338     gtk_window_set_title( GTK_WINDOW(m_widget), m_title.mbc_str() );
 339 }
 340
 341 wxString wxDialog::GetTitle() const
 342 {
 343     return (wxString&)m_title;
 344 }
 345
 346 void wxDialog::OnApply( wxCommandEvent &WXUNUSED(event) )
 347 {
 348     if (Validate()) TransferDataFromWindow();
 349 }
 350
 351 void wxDialog::OnCancel( wxCommandEvent &WXUNUSED(event) )
 352 {
 353     if (IsModal())
 354     {
 355         EndModal(wxID_CANCEL);
 356     }
 357     else
 358     {
 359         SetReturnCode(wxID_CANCEL);
 360         Show(FALSE);
 361     }
 362 }
 363
 364 void wxDialog::OnOK( wxCommandEvent &WXUNUSED(event) )
 365 {
 366     if (Validate() && TransferDataFromWindow())
 367     {
 368         if (IsModal())
 369         {
 370             EndModal(wxID_OK);
 371         }
 372         else
 373         {
 374             SetReturnCode(wxID_OK);
 375             this->Show(FALSE);
 376         }
 377     }
 378 }
 379
 380 void wxDialog::OnPaint( wxPaintEvent& WXUNUSED(event) )
 381 {
 382     // yes
 383 }
 384
 385 void wxDialog::OnCloseWindow(wxCloseEvent& WXUNUSED(event))
 386 {
 387     // We'll send a Cancel message by default,
 388     // which may close the dialog.
 389     // Check for looping if the Cancel event handler calls Close().
 390
 391     // Note that if a cancel button and handler aren't present in the dialog,
 392     // nothing will happen when you close the dialog via the window manager, or
 393     // via Close().
 394     // We wouldn't want to destroy the dialog by default, since the dialog may have been
 395     // created on the stack.
 396     // However, this does mean that calling dialog->Close() won't delete the dialog
 397     // unless the handler for wxID_CANCEL does so. So use Destroy() if you want to be
 398     // sure to destroy the dialog.
 399     // The default OnCancel (above) simply ends a modal dialog, and hides a modeless dialog.
 400
 401     static wxList s_closing;
 402
 403     if (s_closing.Member(this))
 404         return;   // no loops
 405
 406     s_closing.Append(this);
 407
 408     wxCommandEvent cancelEvent(wxEVT_COMMAND_BUTTON_CLICKED, wxID_CANCEL);
 409     cancelEvent.SetEventObject( this );
 410     GetEventHandler()->ProcessEvent(cancelEvent);
 411     s_closing.DeleteObject(this);
 412 }
 413
 414 bool wxDialog::Destroy()
 415 {
 416     if (!wxPendingDelete.Member(this)) wxPendingDelete.Append(this);
 417
 418     return TRUE;
 419 }
 420
 421 void wxDialog::OnSize( wxSizeEvent &WXUNUSED(event) )
 422 {
 423     wxASSERT_MSG( (m_widget != NULL), wxT("invalid dialog") );
 424
 425 #if wxUSE_CONSTRAINTS
 426     if (GetAutoLayout())
 427     {
 428         Layout();
 429     }
 430     else
 431 #endif // wxUSE_CONSTRAINTS
 432     {
 433         /* no child: go out ! */
 434         if (!GetChildren().First()) return;
 435
 436         /* do we have exactly one child? */
 437         wxWindow *child = (wxWindow *) NULL;
 438         for(wxNode *node = GetChildren().First(); node; node = node->Next())
 439         {
 440             wxWindow *win = (wxWindow *)node->Data();
 441             if (!wxIS_KIND_OF(win,wxFrame) && !wxIS_KIND_OF(win,wxDialog))
 442             {
 443                 /* it's the second one: do nothing */
 444                 if (child) return;
 445                 child = win;
 446             }
 447         }
 448
 449         /* yes: set it's size to fill all the frame */
 450         int client_x, client_y;
 451         GetClientSize( &client_x, &client_y );
 452         child->SetSize( 1, 1, client_x-2, client_y);
 453     }
 454 }
 455
 456 void wxDialog::DoMoveWindow(int WXUNUSED(x), int WXUNUSED(y), int WXUNUSED(width), int WXUNUSED(height) )
 457 {
 458     wxFAIL_MSG( wxT("DoMoveWindow called for wxDialog") );
 459 }
 460
 461 void wxDialog::DoSetSize( int x, int y, int width, int height, int sizeFlags )
 462 {
 463     wxASSERT_MSG( (m_widget != NULL), wxT("invalid dialog") );
 464     wxASSERT_MSG( (m_wxwindow != NULL), wxT("invalid dialog") );
 465
 466     if (m_resizing) return; /* I don't like recursions */
 467     m_resizing = TRUE;
 468
 469     int old_x = m_x;
 470     int old_y = m_y;
 471
 472     int old_width = m_width;
 473     int old_height = m_height;
 474
 475     if ((sizeFlags & wxSIZE_ALLOW_MINUS_ONE) == 0)
 476     {
 477         if (x != -1) m_x = x;
 478         if (y != -1) m_y = y;
 479         if (width != -1) m_width = width;
 480         if (height != -1) m_height = height;
 481     }
 482     else
 483     {
 484         m_x = x;
 485         m_y = y;
 486         m_width = width;
 487         m_height = height;
 488     }
 489
 490 /*
 491     if ((sizeFlags & wxSIZE_AUTO_WIDTH) == wxSIZE_AUTO_WIDTH)
 492     {
 493         if (width == -1) m_width = 80;
 494     }
 495
 496     if ((sizeFlags & wxSIZE_AUTO_HEIGHT) == wxSIZE_AUTO_HEIGHT)
 497     {
 498        if (height == -1) m_height = 26;
 499     }
 500 */
 501
 502     if ((m_minWidth != -1) && (m_width < m_minWidth)) m_width = m_minWidth;
 503     if ((m_minHeight != -1) && (m_height < m_minHeight)) m_height = m_minHeight;
 504     if ((m_maxWidth != -1) && (m_width > m_maxWidth)) m_width = m_maxWidth;
 505     if ((m_maxHeight != -1) && (m_height > m_maxHeight)) m_height = m_maxHeight;
 506
 507     if ((m_x != -1) || (m_y != -1))
 508     {
 509         if ((m_x != old_x) || (m_y != old_y))
 510         {
 511             /* we set the position here and when showing the dialog
 512                for the first time in idle time */
 513             gtk_widget_set_uposition( m_widget, m_x, m_y );
 514         }
 515     }
 516
 517     if ((m_width != old_width) || (m_height != old_height))
 518     {
 519         gtk_widget_set_usize( m_widget, m_width, m_height );
 520
 521         /* actual resizing is deferred to GtkOnSize in idle time and
 522            when showing the dialog */
 523         m_sizeSet = FALSE;
 524     }
 525
 526     m_resizing = FALSE;
 527 }
 528
 529 void wxDialog::GtkOnSize( int WXUNUSED(x), int WXUNUSED(y), int width, int height )
 530 {
 531     // due to a bug in gtk, x,y are always 0
 532     // m_x = x;
 533     // m_y = y;
 534
 535     if ((m_height == height) && (m_width == width) && (m_sizeSet)) return;
 536     if (!m_wxwindow) return;
 537
 538     m_width = width;
 539     m_height = height;
 540
 541     if ((m_minWidth != -1) && (m_width < m_minWidth)) m_width = m_minWidth;
 542     if ((m_minHeight != -1) && (m_height < m_minHeight)) m_height = m_minHeight;
 543     if ((m_maxWidth != -1) && (m_width > m_maxWidth)) m_width = m_maxWidth;
 544     if ((m_maxHeight != -1) && (m_height > m_maxHeight)) m_height = m_maxHeight;
 545
 546     /* set size hints */
 547     gint flag = 0; // GDK_HINT_POS;
 548     if ((m_minWidth != -1) || (m_minHeight != -1)) flag |= GDK_HINT_MIN_SIZE;
 549     if ((m_maxWidth != -1) || (m_maxHeight != -1)) flag |= GDK_HINT_MAX_SIZE;
 550     GdkGeometry geom;
 551     geom.min_width = m_minWidth;
 552     geom.min_height = m_minHeight;
 553     geom.max_width = m_maxWidth;
 554     geom.max_height = m_maxHeight;
 555     gtk_window_set_geometry_hints( GTK_WINDOW(m_widget),
 556                                    (GtkWidget*) NULL,
 557                                    &geom,
 558                                    (GdkWindowHints) flag );
 559
 560     m_sizeSet = TRUE;
 561
 562     wxSizeEvent event( wxSize(m_width,m_height), GetId() );
 563     event.SetEventObject( this );
 564     GetEventHandler()->ProcessEvent( event );
 565 }
 566
 567 void wxDialog::OnInternalIdle()
 568 {
 569     if (!m_sizeSet && GTK_WIDGET_REALIZED(m_wxwindow))
 570         GtkOnSize( m_x, m_y, m_width, m_height );
 571
 572     wxWindow::OnInternalIdle();
 573 }
 574
 575 bool wxDialog::Show( bool show )
 576 {
 577     if (!show && IsModal())
 578     {
 579         EndModal( wxID_CANCEL );
 580     }
 581
 582     if (show && !m_sizeSet)
 583     {
 584         /* by calling GtkOnSize here, we don't have to call
 585            either after showing the frame, which would entail
 586            much ugly flicker nor from within the size_allocate
 587            handler, because GTK 1.1.X forbids that. */
 588
 589         GtkOnSize( m_x, m_y, m_width, m_height );
 590     }
 591
 592     bool ret = wxWindow::Show( show );
 593
 594     if (show) InitDialog();
 595
 596     return ret;
 597 }
 598
 599 bool wxDialog::IsModal() const
 600 {
 601     return m_modalShowing;
 602 }
 603
 604 void wxDialog::SetModal( bool WXUNUSED(flag) )
 605 {
 606 /*
 607   if (flag)
 608     m_windowStyle |= wxDIALOG_MODAL;
 609   else
 610     if (m_windowStyle & wxDIALOG_MODAL) m_windowStyle -= wxDIALOG_MODAL;
 611 */
 612     wxFAIL_MSG( wxT("wxDialog:SetModal obsolete now") );
 613 }
 614
 615 int wxDialog::ShowModal()
 616 {
 617     if (IsModal())
 618     {
 619        wxFAIL_MSG( wxT("wxDialog:ShowModal called twice") );
 620        return GetReturnCode();
 621     }
 622
 623     wxBusyCursorSuspender cs; // temporarily suppress the busy cursor
 624
 625     Show( TRUE );
 626
 627     m_modalShowing = TRUE;
 628
 629     g_openDialogs++;
 630
 631     gtk_grab_add( m_widget );
 632     gtk_main();
 633     gtk_grab_remove( m_widget );
 634
 635     g_openDialogs--;
 636
 637     return GetReturnCode();
 638 }
 639
 640 void wxDialog::EndModal( int retCode )
 641 {
 642     SetReturnCode( retCode );
 643
 644     if (!IsModal())
 645     {
 646         wxFAIL_MSG( wxT("wxDialog:EndModal called twice") );
 647         return;
 648     }
 649
 650     m_modalShowing = FALSE;
 651
 652     gtk_main_quit();
 653
 654     Show( FALSE );
 655 }
 656
 657 void wxDialog::InitDialog()
 658 {
 659     wxWindow::InitDialog();
 660 }
 661
 662 void wxDialog::SetIcon( const wxIcon &icon )
 663 {
 664     m_icon = icon;
 665     if (!icon.Ok()) return;
 666
 667     if (!m_widget->window) return;
 668
 669     wxMask *mask = icon.GetMask();
 670     GdkBitmap *bm = (GdkBitmap *) NULL;
 671     if (mask) bm = mask->GetBitmap();
 672
 673     gdk_window_set_icon( m_widget->window, (GdkWindow *) NULL, icon.GetPixmap(), bm );
 674 }