src/msw/frame.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        frame.cpp
   3 // Purpose:     wxFrame
   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 "frame.h"
  14 #endif
  15
  16 // For compilers that support precompilation, includes "wx.h".
  17 #include "wx/wxprec.h"
  18
  19 #ifdef __BORLANDC__
  20 #pragma hdrstop
  21 #endif
  22
  23 #ifndef WX_PRECOMP
  24 #include "wx/setup.h"
  25 #include "wx/frame.h"
  26 #include "wx/menu.h"
  27 #include "wx/app.h"
  28 #include "wx/utils.h"
  29 #include "wx/dialog.h"
  30 #include "wx/settings.h"
  31 #include "wx/dcclient.h"
  32 #endif
  33
  34 #include "wx/msw/private.h"
  35 #include "wx/statusbr.h"
  36 #include "wx/toolbar.h"
  37 #include "wx/menuitem.h"
  38
  39 #ifdef LoadAccelerators
  40 #undef LoadAccelerators
  41 #endif
  42
  43 #if wxUSE_NATIVE_STATUSBAR
  44 #include <wx/msw/statbr95.h>
  45 #endif
  46
  47 extern wxList wxModelessWindows;
  48 extern wxList wxPendingDelete;
  49 extern char wxFrameClassName[];
  50 extern wxMenu *wxCurrentPopupMenu;
  51
  52 #if !USE_SHARED_LIBRARY
  53 BEGIN_EVENT_TABLE(wxFrame, wxWindow)
  54   EVT_SIZE(wxFrame::OnSize)
  55   EVT_ACTIVATE(wxFrame::OnActivate)
  56   EVT_MENU_HIGHLIGHT_ALL(wxFrame::OnMenuHighlight)
  57   EVT_SYS_COLOUR_CHANGED(wxFrame::OnSysColourChanged)
  58   EVT_IDLE(wxFrame::OnIdle)
  59   EVT_CLOSE(wxFrame::OnCloseWindow)
  60 END_EVENT_TABLE()
  61
  62 IMPLEMENT_DYNAMIC_CLASS(wxFrame, wxWindow)
  63 #endif
  64
  65 #if wxUSE_NATIVE_STATUSBAR
  66 bool wxFrame::m_useNativeStatusBar = TRUE;
  67 #else
  68 bool wxFrame::m_useNativeStatusBar = FALSE;
  69 #endif
  70
  71 wxFrame::wxFrame(void)
  72 {
  73   m_frameToolBar = NULL ;
  74   m_frameMenuBar = NULL;
  75   m_frameStatusBar = NULL;
  76
  77   m_windowParent = NULL;
  78   m_iconized = FALSE;
  79 }
  80
  81 bool wxFrame::Create(wxWindow *parent,
  82            wxWindowID id,
  83            const wxString& title,
  84            const wxPoint& pos,
  85            const wxSize& size,
  86            long style,
  87            const wxString& name)
  88 {
  89   if (!parent)
  90     wxTopLevelWindows.Append(this);
  91
  92   SetName(name);
  93 //  m_modalShowing = FALSE;
  94   m_windowStyle = style;
  95   m_frameMenuBar = NULL;
  96   m_frameToolBar = NULL ;
  97   m_frameStatusBar = NULL;
  98
  99   SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_APPWORKSPACE));
 100
 101 //  m_icon = NULL;
 102   if ( id > -1 )
 103     m_windowId = id;
 104   else
 105     m_windowId = (int)NewControlId();
 106
 107   if (parent) parent->AddChild(this);
 108
 109   int x = pos.x;
 110   int y = pos.y;
 111   int width = size.x;
 112   int height = size.y;
 113
 114   m_iconized = FALSE;
 115
 116   // we pass NULL as parent to MSWCreate because frames with parents behave
 117   // very strangely under Win95 shell
 118   MSWCreate(m_windowId, NULL, wxFrameClassName, this, title,
 119             x, y, width, height, style);
 120
 121   wxModelessWindows.Append(this);
 122   return TRUE;
 123 }
 124
 125 wxFrame::~wxFrame(void)
 126 {
 127   m_isBeingDeleted = TRUE;
 128   wxTopLevelWindows.DeleteObject(this);
 129
 130   if (m_frameStatusBar)
 131     delete m_frameStatusBar;
 132   if (m_frameMenuBar)
 133     delete m_frameMenuBar;
 134
 135 /* New behaviour March 1998: check if it's the last top-level window */
 136 //  if (wxTheApp && (this == wxTheApp->GetTopWindow()))
 137
 138   if (wxTheApp && (wxTopLevelWindows.Number() == 0))
 139   {
 140     wxTheApp->SetTopWindow(NULL);
 141
 142     if (wxTheApp->GetExitOnFrameDelete())
 143     {
 144        PostQuitMessage(0);
 145     }
 146   }
 147
 148   wxModelessWindows.DeleteObject(this);
 149
 150   // For some reason, wxWindows can activate another task altogether
 151   // when a frame is destroyed after a modal dialog has been invoked.
 152   // Try to bring the parent to the top.
 153   if (GetParent() && GetParent()->GetHWND())
 154     ::BringWindowToTop((HWND) GetParent()->GetHWND());
 155 }
 156
 157 WXHMENU wxFrame::GetWinMenu(void) const
 158 {
 159   return m_hMenu;
 160 }
 161
 162 // Get size *available for subwindows* i.e. excluding menu bar, toolbar etc.
 163 void wxFrame::GetClientSize(int *x, int *y) const
 164 {
 165   RECT rect;
 166   GetClientRect((HWND) GetHWND(), &rect);
 167
 168   if ( GetStatusBar() )
 169   {
 170     int statusX, statusY;
 171     GetStatusBar()->GetClientSize(&statusX, &statusY);
 172     rect.bottom -= statusY;
 173   }
 174
 175   wxPoint pt(GetClientAreaOrigin());
 176   rect.bottom -= pt.y;
 177   rect.right -= pt.x;
 178
 179   *x = rect.right;
 180   *y = rect.bottom;
 181 }
 182
 183 // Set the client size (i.e. leave the calculation of borders etc.
 184 // to wxWindows)
 185 void wxFrame::SetClientSize(int width, int height)
 186 {
 187   HWND hWnd = (HWND) GetHWND();
 188
 189   RECT rect;
 190   GetClientRect(hWnd, &rect);
 191
 192   RECT rect2;
 193   GetWindowRect(hWnd, &rect2);
 194
 195   // Find the difference between the entire window (title bar and all)
 196   // and the client area; add this to the new client size to move the
 197   // window
 198   int actual_width = rect2.right - rect2.left - rect.right + width;
 199   int actual_height = rect2.bottom - rect2.top - rect.bottom + height;
 200
 201   if ( GetStatusBar() )
 202   {
 203     int statusX, statusY;
 204     GetStatusBar()->GetClientSize(&statusX, &statusY);
 205     actual_height += statusY;
 206   }
 207
 208   wxPoint pt(GetClientAreaOrigin());
 209   actual_width += pt.y;
 210   actual_height += pt.x;
 211
 212   POINT point;
 213   point.x = rect2.left;
 214   point.y = rect2.top;
 215
 216   MoveWindow(hWnd, point.x, point.y, actual_width, actual_height, (BOOL)TRUE);
 217
 218   wxSizeEvent event(wxSize(width, height), m_windowId);
 219   event.SetEventObject( this );
 220   GetEventHandler()->ProcessEvent(event);
 221 }
 222
 223 void wxFrame::GetSize(int *width, int *height) const
 224 {
 225   RECT rect;
 226   GetWindowRect((HWND) GetHWND(), &rect);
 227   *width = rect.right - rect.left;
 228   *height = rect.bottom - rect.top;
 229 }
 230
 231 void wxFrame::GetPosition(int *x, int *y) const
 232 {
 233   RECT rect;
 234   GetWindowRect((HWND) GetHWND(), &rect);
 235   POINT point;
 236   point.x = rect.left;
 237   point.y = rect.top;
 238
 239   *x = point.x;
 240   *y = point.y;
 241 }
 242
 243 void wxFrame::SetSize(int x, int y, int width, int height, int sizeFlags)
 244 {
 245   int currentX, currentY;
 246   int x1 = x;
 247   int y1 = y;
 248   int w1 = width;
 249   int h1 = height;
 250
 251   GetPosition(&currentX, &currentY);
 252   if (x == -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
 253     x1 = currentX;
 254   if (y == -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
 255     y1 = currentY;
 256
 257   int ww,hh ;
 258   GetSize(&ww,&hh) ;
 259   if (width == -1) w1 = ww ;
 260   if (height==-1) h1 = hh ;
 261
 262   MoveWindow((HWND) GetHWND(), x1, y1, w1, h1, (BOOL)TRUE);
 263
 264   wxSizeEvent event(wxSize(width, height), m_windowId);
 265   event.SetEventObject( this );
 266   GetEventHandler()->ProcessEvent(event);
 267 }
 268
 269 bool wxFrame::Show(bool show)
 270 {
 271   int cshow;
 272   if (show)
 273     cshow = SW_SHOW;
 274   else
 275     cshow = SW_HIDE;
 276
 277   if (!show)
 278   {
 279     // Try to highlight the correct window (the parent)
 280     HWND hWndParent = 0;
 281     if (GetParent())
 282     {
 283       hWndParent = (HWND) GetParent()->GetHWND();
 284       if (hWndParent)
 285         ::BringWindowToTop(hWndParent);
 286     }
 287   }
 288
 289   ShowWindow((HWND) GetHWND(), (BOOL)cshow);
 290   if (show)
 291   {
 292     BringWindowToTop((HWND) GetHWND());
 293
 294     wxActivateEvent event(wxEVT_ACTIVATE, TRUE, m_windowId);
 295     event.SetEventObject( this );
 296     GetEventHandler()->ProcessEvent(event);
 297   }
 298   return TRUE;
 299 }
 300
 301 void wxFrame::Iconize(bool iconize)
 302 {
 303   if (!iconize)
 304     Show(TRUE);
 305
 306   int cshow;
 307   if (iconize)
 308     cshow = SW_MINIMIZE;
 309   else
 310     cshow = SW_RESTORE;
 311   ShowWindow((HWND) GetHWND(), (BOOL)cshow);
 312   m_iconized = iconize;
 313 }
 314
 315 // Equivalent to maximize/restore in Windows
 316 void wxFrame::Maximize(bool maximize)
 317 {
 318   Show(TRUE);
 319   int cshow;
 320   if (maximize)
 321     cshow = SW_MAXIMIZE;
 322   else
 323     cshow = SW_RESTORE;
 324   ShowWindow((HWND) GetHWND(), cshow);
 325   m_iconized = FALSE;
 326 }
 327
 328 bool wxFrame::IsIconized(void) const
 329 {
 330   ((wxFrame *)this)->m_iconized = (::IsIconic((HWND) GetHWND()) != 0);
 331   return m_iconized;
 332 }
 333
 334 void wxFrame::SetTitle(const wxString& title)
 335 {
 336   SetWindowText((HWND) GetHWND(), (const char *)title);
 337 }
 338
 339 wxString wxFrame::GetTitle(void) const
 340 {
 341   GetWindowText((HWND) GetHWND(), wxBuffer, 1000);
 342   return wxString(wxBuffer);
 343 }
 344
 345 void wxFrame::SetIcon(const wxIcon& icon)
 346 {
 347   m_icon = icon;
 348 #if defined(__WIN95__)
 349   if ( m_icon.Ok() )
 350     SendMessage((HWND) GetHWND(), WM_SETICON,
 351                 (WPARAM)TRUE, (LPARAM)(HICON) m_icon.GetHICON());
 352 #endif
 353 }
 354
 355 wxStatusBar *wxFrame::OnCreateStatusBar(int number, long style, wxWindowID id,
 356     const wxString& name)
 357 {
 358     wxStatusBar *statusBar = NULL;
 359
 360 #if wxUSE_NATIVE_STATUSBAR
 361     if (UsesNativeStatusBar())
 362     {
 363         statusBar = new wxStatusBar95(this, id, style);
 364     }
 365     else
 366 #endif
 367     {
 368         statusBar = new wxStatusBar(this, id, wxPoint(0, 0), wxSize(100, 20),
 369             style, name);
 370
 371         // Set the height according to the font and the border size
 372         wxClientDC dc(statusBar);
 373         dc.SetFont(* statusBar->GetFont());
 374
 375         long x, y;
 376         dc.GetTextExtent("X", &x, &y);
 377
 378         int height = (int)( (y  * 1.1) + 2* statusBar->GetBorderY());
 379
 380         statusBar->SetSize(-1, -1, 100, height);
 381     }
 382
 383   statusBar->SetFieldsCount(number);
 384   return statusBar;
 385 }
 386
 387 wxStatusBar* wxFrame::CreateStatusBar(int number, long style, wxWindowID id,
 388     const wxString& name)
 389 {
 390   // VZ: calling CreateStatusBar twice is an error - why anyone would do it?
 391   wxCHECK_MSG( m_frameStatusBar == NULL, FALSE,
 392                "recreating status bar in wxFrame" );
 393
 394   m_frameStatusBar = OnCreateStatusBar(number, style, id,
 395     name);
 396   if ( m_frameStatusBar )
 397   {
 398     PositionStatusBar();
 399     return m_frameStatusBar;
 400   }
 401   else
 402     return NULL;
 403 }
 404
 405 void wxFrame::SetStatusText(const wxString& text, int number)
 406 {
 407   wxCHECK_RET( m_frameStatusBar != NULL, "no statusbar to set text for" );
 408
 409   m_frameStatusBar->SetStatusText(text, number);
 410 }
 411
 412 void wxFrame::SetStatusWidths(int n, const int widths_field[])
 413 {
 414   wxCHECK_RET( m_frameStatusBar != NULL, "no statusbar to set widths for" );
 415
 416   m_frameStatusBar->SetStatusWidths(n, widths_field);
 417   PositionStatusBar();
 418 }
 419
 420 void wxFrame::PositionStatusBar(void)
 421 {
 422   // native status bar positions itself
 423   if (m_frameStatusBar
 424 #if wxUSE_NATIVE_STATUSBAR
 425    && !m_frameStatusBar->IsKindOf(CLASSINFO(wxStatusBar95))
 426 #endif
 427     )
 428   {
 429       int w, h;
 430       GetClientSize(&w, &h);
 431       int sw, sh;
 432       m_frameStatusBar->GetSize(&sw, &sh);
 433
 434       // Since we wish the status bar to be directly under the client area,
 435       // we use the adjusted sizes without using wxSIZE_NO_ADJUSTMENTS.
 436       m_frameStatusBar->SetSize(0, h, w, sh);
 437   }
 438 }
 439
 440 void wxFrame::SetMenuBar(wxMenuBar *menu_bar)
 441 {
 442   if (!menu_bar)
 443   {
 444     m_frameMenuBar = NULL;
 445     return;
 446   }
 447
 448   if (menu_bar->m_menuBarFrame)
 449    return;
 450
 451   int i;
 452   HMENU menu = CreateMenu();
 453
 454   for (i = 0; i < menu_bar->m_menuCount; i ++)
 455   {
 456     HMENU popup = (HMENU)menu_bar->m_menus[i]->m_hMenu;
 457     //
 458     // After looking Bounds Checker result, it seems that all
 459     // menus must be individually destroyed. So, don't reset m_hMenu,
 460     // to  allow ~wxMenu to do the job.
 461     //
 462     menu_bar->m_menus[i]->m_savehMenu = (WXHMENU) popup;
 463     // Uncommenting for the moment... JACS
 464     menu_bar->m_menus[i]->m_hMenu = 0;
 465     AppendMenu(menu, MF_POPUP | MF_STRING, (UINT)popup, menu_bar->m_titles[i]);
 466   }
 467
 468   menu_bar->m_hMenu = (WXHMENU)menu;
 469   if (m_frameMenuBar)
 470     delete m_frameMenuBar;
 471
 472   this->m_hMenu = (WXHMENU) menu;
 473
 474   DWORD err = 0;
 475   if (!SetMenu((HWND) GetHWND(), menu))
 476   {
 477 #ifdef __WIN32__
 478     err = GetLastError();
 479 #endif
 480   }
 481
 482   m_frameMenuBar = menu_bar;
 483   menu_bar->m_menuBarFrame = this;
 484 }
 485
 486 #if 0
 487 bool wxFrame::LoadAccelerators(const wxString& table)
 488 {
 489   m_acceleratorTable = (WXHANDLE)
 490 #ifdef __WIN32__
 491 #ifdef UNICODE
 492      ::LoadAcceleratorsW(wxGetInstance(), (const char *)table);
 493 #else
 494      ::LoadAcceleratorsA(wxGetInstance(), (const char *)table);
 495 #endif
 496 #else
 497      ::LoadAccelerators(wxGetInstance(), (const char *)table);
 498 #endif
 499
 500   // The above is necessary because LoadAccelerators is a macro
 501   // which we have undefed earlier in the file to avoid confusion
 502   // with wxFrame::LoadAccelerators. Ugh!
 503
 504   return (m_acceleratorTable != (WXHANDLE) NULL);
 505 }
 506 #endif
 507
 508 void wxFrame::Fit(void)
 509 {
 510   // Work out max. size
 511   wxNode *node = GetChildren()->First();
 512   int max_width = 0;
 513   int max_height = 0;
 514   while (node)
 515   {
 516     // Find a child that's a subwindow, but not a dialog box.
 517     wxWindow *win = (wxWindow *)node->Data();
 518
 519     if (!win->IsKindOf(CLASSINFO(wxFrame)) &&
 520          !win->IsKindOf(CLASSINFO(wxDialog)))
 521     {
 522       int width, height;
 523       int x, y;
 524       win->GetSize(&width, &height);
 525       win->GetPosition(&x, &y);
 526
 527       if ((x + width) > max_width)
 528         max_width = x + width;
 529       if ((y + height) > max_height)
 530         max_height = y + height;
 531     }
 532     node = node->Next();
 533   }
 534   SetClientSize(max_width, max_height);
 535 }
 536
 537 // Responds to colour changes, and passes event on to children.
 538 void wxFrame::OnSysColourChanged(wxSysColourChangedEvent& event)
 539 {
 540     SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_APPWORKSPACE));
 541     Refresh();
 542
 543     if ( m_frameStatusBar )
 544     {
 545         wxSysColourChangedEvent event2;
 546         event2.SetEventObject( m_frameStatusBar );
 547         m_frameStatusBar->GetEventHandler()->ProcessEvent(event2);
 548     }
 549
 550     // Propagate the event to the non-top-level children
 551     wxWindow::OnSysColourChanged(event);
 552 }
 553
 554 /*
 555  * Frame window
 556  *
 557  */
 558
 559 void wxFrame::MSWCreate(int id, wxWindow *parent, const char *wclass, wxWindow *wx_win, const char *title,
 560                    int x, int y, int width, int height, long style)
 561
 562 {
 563   m_defaultIcon = (WXHICON) (wxSTD_FRAME_ICON ? wxSTD_FRAME_ICON : wxDEFAULT_FRAME_ICON);
 564
 565   // If child windows aren't properly drawn initially, WS_CLIPCHILDREN
 566   // could be the culprit. But without it, you can get a lot of flicker.
 567
 568   DWORD msflags = 0;
 569   if ((style & wxCAPTION) == wxCAPTION)
 570     msflags = WS_OVERLAPPED;
 571   else
 572     msflags = WS_POPUP;
 573
 574   if (style & wxMINIMIZE_BOX)
 575     msflags |= WS_MINIMIZEBOX;
 576   if (style & wxMAXIMIZE_BOX)
 577     msflags |= WS_MAXIMIZEBOX;
 578   if (style & wxTHICK_FRAME)
 579     msflags |= WS_THICKFRAME;
 580   if (style & wxSYSTEM_MENU)
 581     msflags |= WS_SYSMENU;
 582   if ((style & wxMINIMIZE) || (style & wxICONIZE))
 583     msflags |= WS_MINIMIZE;
 584   if (style & wxMAXIMIZE)
 585     msflags |= WS_MAXIMIZE;
 586   if (style & wxCAPTION)
 587     msflags |= WS_CAPTION;
 588   if (style & wxCLIP_CHILDREN)
 589     msflags |= WS_CLIPCHILDREN;
 590
 591   // Keep this in wxFrame because it saves recoding this function
 592   // in wxTinyFrame
 593 #if wxUSE_ITSY_BITSY
 594   if (style & wxTINY_CAPTION_VERT)
 595     msflags |= IBS_VERTCAPTION;
 596   if (style & wxTINY_CAPTION_HORIZ)
 597     msflags |= IBS_HORZCAPTION;
 598 #else
 599   if (style & wxTINY_CAPTION_VERT)
 600     msflags |= WS_CAPTION;
 601   if (style & wxTINY_CAPTION_HORIZ)
 602     msflags |= WS_CAPTION;
 603 #endif
 604   if ((style & wxTHICK_FRAME) == 0)
 605     msflags |= WS_BORDER;
 606
 607   WXDWORD extendedStyle = MakeExtendedStyle(style);
 608
 609   if (style & wxSTAY_ON_TOP)
 610     extendedStyle |= WS_EX_TOPMOST;
 611
 612   m_iconized = FALSE;
 613   wxWindow::MSWCreate(id, parent, wclass, wx_win, title, x, y, width, height,
 614          msflags, NULL, extendedStyle);
 615   // Seems to be necessary if we use WS_POPUP
 616   // style instead of WS_OVERLAPPED
 617   if (width > -1 && height > -1)
 618     ::PostMessage((HWND) GetHWND(), WM_SIZE, SIZE_RESTORED, MAKELPARAM(width, height));
 619 }
 620
 621 bool wxFrame::MSWOnPaint(void)
 622 {
 623 #if WXDEBUG > 1
 624   wxDebugMsg("wxFrameWnd::OnPaint %d\n", handle);
 625 #endif
 626   RECT rect;
 627   if (GetUpdateRect((HWND) GetHWND(), &rect, FALSE))
 628   {
 629     if (m_iconized)
 630     {
 631       HICON the_icon;
 632     if (m_icon.Ok())
 633       the_icon = (HICON) m_icon.GetHICON();
 634       if (the_icon == 0)
 635         the_icon = (HICON) m_defaultIcon;
 636
 637       PAINTSTRUCT ps;
 638       // Hold a pointer to the dc so long as the OnPaint() message
 639       // is being processed
 640       HDC cdc = BeginPaint((HWND) GetHWND(), &ps);
 641
 642       // Erase background before painting or we get white background
 643       this->MSWDefWindowProc(WM_ICONERASEBKGND,(WORD)ps.hdc,0L);
 644
 645       if (the_icon)
 646       {
 647         RECT rect;
 648         GetClientRect((HWND) GetHWND(), &rect);
 649         int icon_width = 32;
 650         int icon_height = 32;
 651         int icon_x = (int)((rect.right - icon_width)/2);
 652         int icon_y = (int)((rect.bottom - icon_height)/2);
 653         DrawIcon(cdc, icon_x, icon_y, the_icon);
 654       }
 655
 656       EndPaint((HWND) GetHWND(), &ps);
 657     }
 658     else
 659     {
 660         wxPaintEvent event(m_windowId);
 661         event.m_eventObject = this;
 662         if (!GetEventHandler()->ProcessEvent(event))
 663             Default();
 664     }
 665     return 0;
 666   }
 667   return 1;
 668 }
 669
 670 WXHICON wxFrame::MSWOnQueryDragIcon(void)
 671 {
 672   if (m_icon.Ok() && (m_icon.GetHICON() != 0))
 673     return m_icon.GetHICON();
 674   else
 675     return m_defaultIcon;
 676 }
 677
 678 void wxFrame::MSWOnSize(int x, int y, WXUINT id)
 679 {
 680 #if WXDEBUG > 1
 681   wxDebugMsg("wxFrameWnd::OnSize %d\n", m_hWnd);
 682 #endif
 683   switch (id)
 684   {
 685     case SIZENORMAL:
 686       // only do it it if we were iconized before, otherwise resizing the
 687       // parent frame has a curious side effect of bringing it under it's
 688       // children
 689       if ( !m_iconized )
 690         break;
 691
 692       // restore all child frames too
 693       IconizeChildFrames(FALSE);
 694
 695       // fall through
 696
 697     case SIZEFULLSCREEN:
 698       m_iconized = FALSE;
 699       break;
 700
 701     case SIZEICONIC:
 702       // iconize all child frames too
 703       IconizeChildFrames(TRUE);
 704
 705       m_iconized = TRUE;
 706       break;
 707   }
 708
 709  if (!m_iconized)
 710  {
 711   // forward WM_SIZE to status bar control
 712 #if wxUSE_NATIVE_STATUSBAR
 713   if (m_frameStatusBar && m_frameStatusBar->IsKindOf(CLASSINFO(wxStatusBar95)))
 714   {
 715     wxSizeEvent event(wxSize(x, y), m_frameStatusBar->GetId());
 716     event.SetEventObject( m_frameStatusBar );
 717
 718     ((wxStatusBar95 *)m_frameStatusBar)->OnSize(event);
 719   }
 720 #endif
 721
 722   PositionStatusBar();
 723   PositionToolBar();
 724
 725   wxSizeEvent event(wxSize(x, y), m_windowId);
 726   event.SetEventObject( this );
 727   if (!GetEventHandler()->ProcessEvent(event))
 728     Default();
 729  }
 730 }
 731
 732 bool wxFrame::MSWOnClose(void)
 733 {
 734 #if WXDEBUG > 1
 735   wxDebugMsg("wxFrameWnd::OnClose %d\n", handle);
 736 #endif
 737     return Close();
 738 }
 739
 740 bool wxFrame::MSWOnCommand(WXWORD id, WXWORD cmd, WXHWND control)
 741 {
 742 #if WXDEBUG > 1
 743   wxDebugMsg("wxFrameWnd::OnCommand %d\n", handle);
 744 #endif
 745   if (cmd == 0 || cmd == 1 ) // Can be either a menu command or an accelerator.
 746   {
 747     // In case it's e.g. a toolbar.
 748     wxWindow *win = wxFindWinFromHandle(control);
 749     if (win)
 750       return win->MSWCommand(cmd, id);
 751
 752     if (wxCurrentPopupMenu)
 753     {
 754         wxMenu *popupMenu = wxCurrentPopupMenu;
 755         wxCurrentPopupMenu = NULL;
 756         if (popupMenu->MSWCommand(cmd, id))
 757             return TRUE;
 758     }
 759
 760     if (GetMenuBar() && GetMenuBar()->FindItemForId(id))
 761     {
 762       ProcessCommand(id);
 763       return TRUE;
 764     }
 765     else
 766       return FALSE;
 767   }
 768   else
 769     return FALSE;
 770 }
 771
 772 void wxFrame::MSWOnMenuHighlight(WXWORD nItem, WXWORD nFlags, WXHMENU hSysMenu)
 773 {
 774   if (nFlags == 0xFFFF && hSysMenu == 0)
 775   {
 776     wxMenuEvent event(wxEVT_MENU_HIGHLIGHT, -1);
 777     event.SetEventObject( this );
 778     GetEventHandler()->ProcessEvent(event);
 779   }
 780   else if (nFlags != MF_SEPARATOR)
 781   {
 782     wxMenuEvent event(wxEVT_MENU_HIGHLIGHT, nItem);
 783     event.SetEventObject( this );
 784     GetEventHandler()->ProcessEvent(event);
 785   }
 786 }
 787
 788 bool wxFrame::MSWProcessMessage(WXMSG* pMsg)
 789 {
 790   return FALSE;
 791 }
 792
 793 bool wxFrame::MSWTranslateMessage(WXMSG* pMsg)
 794 {
 795   if (m_acceleratorTable.Ok() &&
 796           ::TranslateAccelerator((HWND) GetHWND(), (HACCEL) m_acceleratorTable.GetHACCEL(), (MSG *)pMsg))
 797     return TRUE;
 798
 799   return FALSE;
 800 }
 801
 802 // Default resizing behaviour - if only ONE subwindow,
 803 // resize to client rectangle size
 804 void wxFrame::OnSize(wxSizeEvent& event)
 805 {
 806   // if we're using constraints - do use them
 807   #if wxUSE_CONSTRAINTS
 808     if ( GetAutoLayout() ) {
 809       Layout();
 810       return;
 811     }
 812   #endif
 813
 814   // do we have _exactly_ one child?
 815   wxWindow *child = NULL;
 816   for ( wxNode *node = GetChildren()->First(); node; node = node->Next() )
 817   {
 818     wxWindow *win = (wxWindow *)node->Data();
 819     if ( !win->IsKindOf(CLASSINFO(wxFrame))  &&
 820          !win->IsKindOf(CLASSINFO(wxDialog)) &&
 821          (win != GetStatusBar()) &&
 822          (win != GetToolBar()) )
 823     {
 824       if ( child )
 825         return;     // it's our second subwindow - nothing to do
 826       child = win;
 827     }
 828   }
 829
 830   if ( child ) {
 831     // we have exactly one child - set it's size to fill the whole frame
 832     int clientW, clientH;
 833     GetClientSize(&clientW, &clientH);
 834
 835     int x = 0;
 836     int y = 0;
 837
 838     child->SetSize(x, y, clientW, clientH);
 839   }
 840 }
 841
 842 // Default activation behaviour - set the focus for the first child
 843 // subwindow found.
 844 void wxFrame::OnActivate(wxActivateEvent& event)
 845 {
 846   for(wxNode *node = GetChildren()->First(); node; node = node->Next())
 847   {
 848     // Find a child that's a subwindow, but not a dialog box.
 849     wxWindow *child = (wxWindow *)node->Data();
 850     if (!child->IsKindOf(CLASSINFO(wxFrame)) &&
 851          !child->IsKindOf(CLASSINFO(wxDialog)))
 852     {
 853 #if WXDEBUG > 1
 854       wxDebugMsg("wxFrame::OnActivate: about to set the child's focus.\n");
 855 #endif
 856       child->SetFocus();
 857       return;
 858     }
 859   }
 860 }
 861
 862 // The default implementation for the close window event - calls
 863 // OnClose for backward compatibility.
 864
 865 void wxFrame::OnCloseWindow(wxCloseEvent& event)
 866 {
 867     // Compatibility
 868     if ( GetEventHandler()->OnClose() || event.GetForce())
 869     {
 870         this->Destroy();
 871     }
 872     else
 873         event.Veto(TRUE);
 874 }
 875
 876 bool wxFrame::OnClose(void)
 877 {
 878     return TRUE;
 879 }
 880
 881 // Destroy the window (delayed, if a managed window)
 882 bool wxFrame::Destroy(void)
 883 {
 884   if (!wxPendingDelete.Member(this))
 885     wxPendingDelete.Append(this);
 886   return TRUE;
 887 }
 888
 889 // Default menu selection behaviour - display a help string
 890 void wxFrame::OnMenuHighlight(wxMenuEvent& event)
 891 {
 892   if (GetStatusBar())
 893   {
 894     if (event.GetMenuId() == -1)
 895       SetStatusText("");
 896     else
 897     {
 898       wxMenuBar *menuBar = GetMenuBar();
 899       if (menuBar)
 900       {
 901         wxString helpString(menuBar->GetHelpString(event.GetMenuId()));
 902         if (helpString != "")
 903           SetStatusText(helpString);
 904       }
 905     }
 906   }
 907 }
 908
 909 wxMenuBar *wxFrame::GetMenuBar(void) const
 910 {
 911   return m_frameMenuBar;
 912 }
 913
 914 void wxFrame::Centre(int direction)
 915 {
 916   int display_width, display_height, width, height, x, y;
 917   wxDisplaySize(&display_width, &display_height);
 918
 919   GetSize(&width, &height);
 920   GetPosition(&x, &y);
 921
 922   if (direction & wxHORIZONTAL)
 923     x = (int)((display_width - width)/2);
 924   if (direction & wxVERTICAL)
 925     y = (int)((display_height - height)/2);
 926
 927   SetSize(x, y, width, height);
 928 }
 929
 930 // Call this to simulate a menu command
 931 void wxFrame::Command(int id)
 932 {
 933   ProcessCommand(id);
 934 }
 935
 936 void wxFrame::ProcessCommand(int id)
 937 {
 938   wxCommandEvent commandEvent(wxEVENT_TYPE_MENU_COMMAND, id);
 939   commandEvent.SetInt( id );
 940   commandEvent.SetEventObject( this );
 941
 942   wxMenuBar *bar = GetMenuBar() ;
 943   if (!bar)
 944     return;
 945
 946   wxMenuItem *item = bar->FindItemForId(id) ;
 947   if (item && item->IsCheckable())
 948   {
 949     bar->Check(id,!bar->Checked(id)) ;
 950   }
 951   GetEventHandler()->ProcessEvent(commandEvent);
 952 }
 953
 954 // Checks if there is a toolbar, and returns the first free client position
 955 wxPoint wxFrame::GetClientAreaOrigin() const
 956 {
 957     wxPoint pt(0, 0);
 958     if (GetToolBar())
 959     {
 960         int w, h;
 961         GetToolBar()->GetSize(& w, & h);
 962
 963         if (GetToolBar()->GetWindowStyleFlag() & wxTB_VERTICAL)
 964         {
 965             pt.x += w;
 966         }
 967         else
 968         {
 969             pt.y += h;
 970         }
 971     }
 972     return pt;
 973 }
 974
 975 void wxFrame::ScreenToClient(int *x, int *y) const
 976 {
 977     wxWindow::ScreenToClient(x, y);
 978
 979     // We may be faking the client origin.
 980     // So a window that's really at (0, 30) may appear
 981     // (to wxWin apps) to be at (0, 0).
 982     wxPoint pt(GetClientAreaOrigin());
 983     *x -= pt.x;
 984     *y -= pt.y;
 985 }
 986
 987 void wxFrame::ClientToScreen(int *x, int *y) const
 988 {
 989     // We may be faking the client origin.
 990     // So a window that's really at (0, 30) may appear
 991     // (to wxWin apps) to be at (0, 0).
 992     wxPoint pt1(GetClientAreaOrigin());
 993     *x += pt1.x;
 994     *y += pt1.y;
 995
 996     wxWindow::ClientToScreen(x, y);
 997 }
 998
 999 wxToolBar* wxFrame::CreateToolBar(long style, wxWindowID id, const wxString& name)
1000 {
1001     wxCHECK_MSG( m_frameToolBar == NULL, FALSE,
1002                "recreating toolbar in wxFrame" );
1003
1004     wxToolBar* toolBar = OnCreateToolBar(style, id, name);
1005     if (toolBar)
1006     {
1007         SetToolBar(toolBar);
1008         PositionToolBar();
1009         return toolBar;
1010     }
1011     else
1012     {
1013         return NULL;
1014     }
1015 }
1016
1017 wxToolBar* wxFrame::OnCreateToolBar(long style, wxWindowID id, const wxString& name)
1018 {
1019     return new wxToolBar(this, id, wxDefaultPosition, wxDefaultSize, style, name);
1020 }
1021
1022 void wxFrame::PositionToolBar(void)
1023 {
1024     RECT rect;
1025     ::GetClientRect((HWND) GetHWND(), &rect);
1026
1027     if ( GetStatusBar() )
1028     {
1029       int statusX, statusY;
1030       GetStatusBar()->GetClientSize(&statusX, &statusY);
1031       rect.bottom -= statusY;
1032     }
1033
1034     if (GetToolBar())
1035     {
1036         int tw, th;
1037         GetToolBar()->GetSize(& tw, & th);
1038
1039         if (GetToolBar()->GetWindowStyleFlag() & wxTB_VERTICAL)
1040         {
1041             // Use the 'real' MSW position
1042             GetToolBar()->SetSize(0, 0, tw, rect.bottom, wxSIZE_NO_ADJUSTMENTS);
1043         }
1044         else
1045         {
1046             // Use the 'real' MSW position
1047             GetToolBar()->SetSize(0, 0, rect.right, th, wxSIZE_NO_ADJUSTMENTS);
1048         }
1049     }
1050 }
1051
1052 // propagate our state change to all child frames
1053 void wxFrame::IconizeChildFrames(bool bIconize)
1054 {
1055   wxWindow *child = NULL;
1056   for ( wxNode *node = GetChildren()->First(); node; node = node->Next() ) {
1057     wxWindow *win = (wxWindow *)node->Data();
1058     if ( win->IsKindOf(CLASSINFO(wxFrame)) ) {
1059       ((wxFrame *)win)->Iconize(bIconize);
1060     }
1061   }
1062 }
1063