src/os2/frame.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        frame.cpp
   3 // Purpose:     wxFrame
   4 // Author:      David Webster
   5 // Modified by:
   6 // Created:     10/27/99
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) David Webster
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // For compilers that support precompilation, includes "wx.h".
  13 #include "wx/wxprec.h"
  14
  15 #ifndef WX_PRECOMP
  16     #include "wx/defs.h"
  17     #include "wx/object.h"
  18     #include "wx/dynarray.h"
  19     #include "wx/list.h"
  20     #include "wx/hash.h"
  21     #include "wx/string.h"
  22     #include "wx/intl.h"
  23     #include "wx/log.h"
  24     #include "wx/event.h"
  25     #include "wx/setup.h"
  26     #include "wx/frame.h"
  27     #include "wx/menu.h"
  28     #include "wx/app.h"
  29     #include "wx/utils.h"
  30     #include "wx/dialog.h"
  31     #include "wx/settings.h"
  32     #include "wx/dcclient.h"
  33     #include "wx/mdi.h"
  34 #endif // WX_PRECOMP
  35
  36 #include "wx/os2/private.h"
  37
  38 #if wxUSE_STATUSBAR
  39     #include "wx/statusbr.h"
  40     #include "wx/generic/statusbr.h"
  41 #endif // wxUSE_STATUSBAR
  42
  43 #if wxUSE_TOOLBAR
  44     #include "wx/toolbar.h"
  45 #endif // wxUSE_TOOLBAR
  46
  47 #include "wx/menuitem.h"
  48 #include "wx/log.h"
  49
  50 // ----------------------------------------------------------------------------
  51 // globals
  52 // ----------------------------------------------------------------------------
  53
  54 extern wxWindowList wxModelessWindows;
  55 extern wxList WXDLLEXPORT wxPendingDelete;
  56
  57 #if wxUSE_MENUS_NATIVE
  58 extern wxMenu *wxCurrentPopupMenu;
  59 #endif
  60
  61 extern void  wxAssociateWinWithHandle( HWND         hWnd
  62                                       ,wxWindowOS2* pWin
  63                                      );
  64
  65 // ----------------------------------------------------------------------------
  66 // event tables
  67 // ----------------------------------------------------------------------------
  68
  69 BEGIN_EVENT_TABLE(wxFrame, wxFrameBase)
  70     EVT_SYS_COLOUR_CHANGED(wxFrame::OnSysColourChanged)
  71 END_EVENT_TABLE()
  72
  73 IMPLEMENT_DYNAMIC_CLASS(wxFrame, wxWindow)
  74
  75 // ============================================================================
  76 // implementation
  77 // ============================================================================
  78
  79 // ----------------------------------------------------------------------------
  80 // static class members
  81 // ----------------------------------------------------------------------------
  82 #if wxUSE_STATUSBAR
  83
  84 #if wxUSE_NATIVE_STATUSBAR
  85     bool wxFrame::m_bUseNativeStatusBar = TRUE;
  86 #else
  87     bool wxFrame::m_bUseNativeStatusBar = FALSE;
  88 #endif
  89
  90 #endif //wxUSE_STATUSBAR
  91
  92 // ----------------------------------------------------------------------------
  93 // creation/destruction
  94 // ----------------------------------------------------------------------------
  95
  96 void wxFrame::Init()
  97 {
  98     m_nFsStatusBarFields = 0;
  99     m_nFsStatusBarHeight = 0;
 100     m_nFsToolBarHeight   = 0;
 101     m_hWndToolTip        = 0L;
 102     m_bWasMinimized      = FALSE;
 103
 104
 105     m_frameMenuBar   = NULL;
 106     m_frameToolBar   = NULL;
 107     m_frameStatusBar = NULL;
 108
 109     m_hTitleBar = NULLHANDLE;
 110     m_hHScroll  = NULLHANDLE;
 111     m_hVScroll  = NULLHANDLE;
 112
 113     //
 114     // Initialize SWP's
 115     //
 116     memset(&m_vSwpTitleBar, 0, sizeof(SWP));
 117     memset(&m_vSwpMenuBar, 0, sizeof(SWP));
 118     memset(&m_vSwpHScroll, 0, sizeof(SWP));
 119     memset(&m_vSwpVScroll, 0, sizeof(SWP));
 120     memset(&m_vSwpStatusBar, 0, sizeof(SWP));
 121     memset(&m_vSwpToolBar, 0, sizeof(SWP));
 122     m_bIconized = FALSE;
 123
 124 } // end of wxFrame::Init
 125
 126 bool wxFrame::Create(
 127   wxWindow*                         pParent
 128 , wxWindowID                        vId
 129 , const wxString&                   rsTitle
 130 , const wxPoint&                    rPos
 131 , const wxSize&                     rSize
 132 , long                              lStyle
 133 , const wxString&                   rsName
 134 )
 135 {
 136     if (!wxTopLevelWindow::Create( pParent
 137                                   ,vId
 138                                   ,rsTitle
 139                                   ,rPos
 140                                   ,rSize
 141                                   ,lStyle
 142                                   ,rsName
 143                                  ))
 144         return FALSE;
 145     wxModelessWindows.Append(this);
 146     return TRUE;
 147 } // end of wxFrame::Create
 148
 149 wxFrame::~wxFrame()
 150 {
 151     m_isBeingDeleted = TRUE;
 152     DeleteAllBars();
 153 } // end of wxFrame::~wxFrame
 154
 155 //
 156 // Get size *available for subwindows* i.e. excluding menu bar, toolbar etc.
 157 //
 158 void wxFrame::DoGetClientSize(
 159   int*                              pX
 160 , int*                              pY
 161 ) const
 162 {
 163     wxTopLevelWindow::DoGetClientSize( pX
 164                                       ,pY
 165                                      );
 166     //
 167     // No need to use statusbar code as in WIN32 as the FORMATFRAME
 168     // window procedure ensures PM knows about the new frame client
 169     // size internally.  A ::WinQueryWindowRect (that is called in
 170     // wxWindow's GetClient size from above) is all that is needed!
 171     //
 172 } // end of wxFrame::DoGetClientSize
 173
 174 //
 175 // Set the client size (i.e. leave the calculation of borders etc.
 176 // to wxWindows)
 177 //
 178 void wxFrame::DoSetClientSize(
 179   int                               nWidth
 180 , int                               nHeight
 181 )
 182 {
 183     wxStatusBar*                    pStatusBar = GetStatusBar();
 184
 185     //
 186     // Statusbars are not part of the OS/2 Client but parent frame
 187     // so no statusbar consideration
 188     //
 189     wxTopLevelWindow::DoSetClientSize( nWidth
 190                                       ,nHeight
 191                                      );
 192 } // end of wxFrame::DoSetClientSize
 193
 194 // ----------------------------------------------------------------------------
 195 // wxFrame: various geometry-related functions
 196 // ----------------------------------------------------------------------------
 197
 198 void wxFrame::Raise()
 199 {
 200     wxFrameBase::Raise();
 201     ::WinSetWindowPos( (HWND) GetParent()->GetHWND()
 202                       ,HWND_TOP
 203                       ,0
 204                       ,0
 205                       ,0
 206                       ,0
 207                       ,SWP_ZORDER
 208                      );
 209 }
 210
 211 #if wxUSE_STATUSBAR
 212 wxStatusBar* wxFrame::OnCreateStatusBar(
 213   int                               nNumber
 214 , long                              lulStyle
 215 , wxWindowID                        vId
 216 , const wxString&                   rName
 217 )
 218 {
 219     wxStatusBar*                    pStatusBar = NULL;
 220     SWP                             vSwp;
 221     ERRORID                         vError;
 222     wxString                        sError;
 223
 224     pStatusBar = wxFrameBase::OnCreateStatusBar( nNumber
 225                                                 ,lulStyle
 226                                                 ,vId
 227                                                 ,rName
 228                                                  );
 229
 230     if( !pStatusBar )
 231         return NULL;
 232
 233     wxClientDC                      vDC(pStatusBar);
 234     int                             nY;
 235
 236     //
 237     // Set the height according to the font and the border size
 238     //
 239     vDC.SetFont(pStatusBar->GetFont()); // Screws up the menues for some reason
 240     vDC.GetTextExtent( "X"
 241                       ,NULL
 242                       ,&nY
 243                      );
 244
 245     int                             nHeight = ((11 * nY) / 10 + 2 * pStatusBar->GetBorderY());
 246
 247     pStatusBar->SetSize( -1
 248                         ,-1
 249                         ,-1
 250                         ,nHeight
 251                        );
 252
 253     ::WinSetParent( pStatusBar->GetHWND()
 254                    ,m_hFrame
 255                    ,FALSE
 256                   );
 257     ::WinSetOwner( pStatusBar->GetHWND()
 258                   ,m_hFrame
 259                  );
 260     //
 261     // to show statusbar
 262     //
 263     if(::WinIsWindowShowing(m_hFrame))
 264         ::WinSendMsg(m_hFrame, WM_UPDATEFRAME, (MPARAM)~0, 0);
 265
 266     return pStatusBar;
 267 } // end of wxFrame::OnCreateStatusBar
 268
 269 void wxFrame::PositionStatusBar()
 270 {
 271     SWP                             vSwp;
 272     ERRORID                         vError;
 273     wxString                        sError;
 274
 275     //
 276     // Native status bar positions itself
 277     //
 278     if (m_frameStatusBar)
 279     {
 280         int                         nWidth;
 281         int                         nY;
 282         int                         nStatbarWidth;
 283         int                         nStatbarHeight;
 284         HWND                        hWndClient;
 285         RECTL                       vRect;
 286         RECTL                       vFRect;
 287
 288         ::WinQueryWindowRect(m_hFrame, &vRect);
 289         nY = vRect.yTop;
 290         ::WinMapWindowPoints(m_hFrame, HWND_DESKTOP, (PPOINTL)&vRect, 2);
 291         vFRect = vRect;
 292         ::WinCalcFrameRect(m_hFrame, &vRect, TRUE);
 293         nWidth = vRect.xRight - vRect.xLeft;
 294         nY = nY - (vRect.yBottom - vFRect.yBottom);
 295
 296         m_frameStatusBar->GetSize( &nStatbarWidth
 297                                   ,&nStatbarHeight
 298                                  );
 299
 300         nY= nY - nStatbarHeight;
 301         //
 302         // Since we wish the status bar to be directly under the client area,
 303         // we use the adjusted sizes without using wxSIZE_NO_ADJUSTMENTS.
 304         //
 305         m_frameStatusBar->SetSize( vRect.xLeft - vFRect.xLeft
 306                                   ,nY
 307                                   ,nWidth
 308                                   ,nStatbarHeight
 309                                  );
 310         if (!::WinQueryWindowPos(m_frameStatusBar->GetHWND(), &vSwp))
 311         {
 312             vError = ::WinGetLastError(vHabmain);
 313             sError = wxPMErrorToStr(vError);
 314             wxLogError("Error setting parent for StautsBar. Error: %s\n", sError.c_str());
 315             return;
 316         }
 317     }
 318 } // end of wxFrame::PositionStatusBar
 319 #endif // wxUSE_STATUSBAR
 320
 321 #if wxUSE_TOOLBAR
 322 wxToolBar* wxFrame::OnCreateToolBar(
 323   long                              lStyle
 324 , wxWindowID                        vId
 325 , const wxString&                   rsName
 326 )
 327 {
 328     wxToolBar*                      pToolBar = wxFrameBase::OnCreateToolBar( lStyle
 329                                                                             ,vId
 330                                                                             ,rsName
 331                                                                            );
 332
 333     ::WinSetParent( pToolBar->GetHWND()
 334                    ,m_hFrame
 335                    ,FALSE
 336                   );
 337     ::WinSetOwner( pToolBar->GetHWND()
 338                   ,m_hFrame
 339                  );
 340     return pToolBar;
 341 } // end of WinGuiBase_CFrame::OnCreateToolBar
 342 #endif
 343
 344 #if wxUSE_MENUS_NATIVE
 345 void wxFrame::DetachMenuBar()
 346 {
 347     if (m_frameMenuBar)
 348     {
 349         m_frameMenuBar->Detach();
 350         m_frameMenuBar = NULL;
 351     }
 352 } // end of wxFrame::DetachMenuBar
 353
 354 void wxFrame::SetMenuBar(
 355   wxMenuBar*                        pMenuBar
 356 )
 357 {
 358     ERRORID                         vError;
 359     wxString                        sError;
 360     HWND                            hTitlebar = NULLHANDLE;
 361     HWND                            hHScroll = NULLHANDLE;
 362     HWND                            hVScroll = NULLHANDLE;
 363     HWND                            hMenuBar = NULLHANDLE;
 364     SWP                             vSwp;
 365     SWP                             vSwpTitlebar;
 366     SWP                             vSwpVScroll;
 367     SWP                             vSwpHScroll;
 368     SWP                             vSwpMenu;
 369
 370     if (!pMenuBar)
 371     {
 372         DetachMenuBar();
 373
 374         //
 375         // Actually remove the menu from the frame
 376         //
 377         m_hMenu = (WXHMENU)0;
 378         InternalSetMenuBar();
 379     }
 380     else // set new non NULL menu bar
 381     {
 382         m_frameMenuBar = NULL;
 383
 384         //
 385         // Can set a menubar several times.
 386         // TODO: how to prevent a memory leak if you have a currently-unattached
 387         // menubar? wxWindows assumes that the frame will delete the menu (otherwise
 388         // there are problems for MDI).
 389         //
 390         if (pMenuBar->GetHMenu())
 391         {
 392             m_hMenu = pMenuBar->GetHMenu();
 393         }
 394         else
 395         {
 396             pMenuBar->Detach();
 397             m_hMenu = pMenuBar->Create();
 398             if (!m_hMenu)
 399                 return;
 400         }
 401         InternalSetMenuBar();
 402         m_frameMenuBar = pMenuBar;
 403         pMenuBar->Attach((wxFrame*)this);
 404     }
 405 } // end of wxFrame::SetMenuBar
 406
 407 void wxFrame::AttachMenuBar(
 408   wxMenuBar*                        pMenubar
 409 )
 410 {
 411     wxFrameBase::AttachMenuBar(pMenubar);
 412
 413     m_frameMenuBar = pMenubar;
 414
 415     if (!pMenubar)
 416     {
 417         //
 418         // Actually remove the menu from the frame
 419         //
 420         m_hMenu = (WXHMENU)0;
 421         InternalSetMenuBar();
 422     }
 423     else // Set new non NULL menu bar
 424     {
 425         //
 426         // Can set a menubar several times.
 427         //
 428         if (pMenubar->GetHMenu())
 429         {
 430             m_hMenu = pMenubar->GetHMenu();
 431         }
 432         else
 433         {
 434             if (pMenubar->IsAttached())
 435                 pMenubar->Detach();
 436
 437             m_hMenu = pMenubar->Create();
 438
 439             if (!m_hMenu)
 440                 return;
 441         }
 442         InternalSetMenuBar();
 443     }
 444 } // end of wxFrame::AttachMenuBar
 445
 446 void wxFrame::InternalSetMenuBar()
 447 {
 448     ERRORID                         vError;
 449     wxString                        sError;
 450     //
 451     // Set the parent and owner of the menubar to be the frame
 452     //
 453     if (!::WinSetParent(m_hMenu, m_hFrame, FALSE))
 454     {
 455         vError = ::WinGetLastError(vHabmain);
 456         sError = wxPMErrorToStr(vError);
 457         wxLogError("Error setting parent for submenu. Error: %s\n", sError.c_str());
 458     }
 459
 460     if (!::WinSetOwner(m_hMenu, m_hFrame))
 461     {
 462         vError = ::WinGetLastError(vHabmain);
 463         sError = wxPMErrorToStr(vError);
 464         wxLogError("Error setting parent for submenu. Error: %s\n", sError.c_str());
 465     }
 466     ::WinSendMsg(m_hFrame, WM_UPDATEFRAME, (MPARAM)FCF_MENU, (MPARAM)0);
 467 } // end of wxFrame::InternalSetMenuBar
 468 #endif // wxUSE_MENUS_NATIVE
 469
 470 //
 471 // Responds to colour changes, and passes event on to children
 472 //
 473 void wxFrame::OnSysColourChanged(
 474   wxSysColourChangedEvent&          rEvent
 475 )
 476 {
 477     SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_APPWORKSPACE));
 478     Refresh();
 479
 480 #if wxUSE_STATUSBAR
 481     if (m_frameStatusBar)
 482     {
 483         wxSysColourChangedEvent     vEvent2;
 484
 485         vEvent2.SetEventObject(m_frameStatusBar);
 486         m_frameStatusBar->GetEventHandler()->ProcessEvent(vEvent2);
 487     }
 488 #endif //wxUSE_STATUSBAR
 489
 490     //
 491     // Propagate the event to the non-top-level children
 492     //
 493     wxWindow::OnSysColourChanged(rEvent);
 494 } // end of wxFrame::OnSysColourChanged
 495
 496 // Pass TRUE to show full screen, FALSE to restore.
 497 bool wxFrame::ShowFullScreen(
 498   bool                              bShow
 499 , long                              lStyle
 500 )
 501 {
 502     if (bShow)
 503     {
 504         if (IsFullScreen())
 505             return FALSE;
 506
 507         m_bFsIsShowing = TRUE;
 508         m_lFsStyle = lStyle;
 509
 510 #if wxUSE_TOOLBAR
 511         wxToolBar*                  pTheToolBar = GetToolBar();
 512 #endif //wxUSE_TOOLBAR
 513
 514 #if wxUSE_STATUSBAR
 515         wxStatusBar*                pTheStatusBar = GetStatusBar();
 516 #endif //wxUSE_STATUSBAR
 517
 518         int                         nDummyWidth;
 519
 520 #if wxUSE_TOOLBAR
 521         if (pTheToolBar)
 522             pTheToolBar->GetSize(&nDummyWidth, &m_nFsToolBarHeight);
 523 #endif //wxUSE_TOOLBAR
 524
 525 #if wxUSE_STATUSBAR
 526         if (pTheStatusBar)
 527             pTheStatusBar->GetSize(&nDummyWidth, &m_nFsStatusBarHeight);
 528 #endif //wxUSE_STATUSBAR
 529
 530 #if wxUSE_TOOLBAR
 531         //
 532         // Zap the toolbar, menubar, and statusbar
 533         //
 534         if ((lStyle & wxFULLSCREEN_NOTOOLBAR) && pTheToolBar)
 535         {
 536             pTheToolBar->SetSize(-1,0);
 537             pTheToolBar->Show(FALSE);
 538         }
 539 #endif //wxUSE_TOOLBAR
 540
 541         if (lStyle & wxFULLSCREEN_NOMENUBAR)
 542         {
 543             ::WinSetParent(m_hMenu, m_hFrame, FALSE);
 544             ::WinSetOwner(m_hMenu, m_hFrame);
 545             ::WinSendMsg((HWND)m_hFrame, WM_UPDATEFRAME, (MPARAM)FCF_MENU, (MPARAM)0);
 546         }
 547
 548 #if wxUSE_STATUSBAR
 549         //
 550         // Save the number of fields in the statusbar
 551         //
 552         if ((lStyle & wxFULLSCREEN_NOSTATUSBAR) && pTheStatusBar)
 553         {
 554             m_nFsStatusBarFields = pTheStatusBar->GetFieldsCount();
 555             SetStatusBar((wxStatusBar*) NULL);
 556             delete pTheStatusBar;
 557         }
 558         else
 559             m_nFsStatusBarFields = 0;
 560 #endif //wxUSE_STATUSBAR
 561
 562         //
 563         // Zap the frame borders
 564         //
 565
 566         //
 567         // Save the 'normal' window style
 568         //
 569         m_lFsOldWindowStyle = ::WinQueryWindowULong(m_hFrame, QWL_STYLE);
 570
 571         //
 572         // Save the old position, width & height, maximize state
 573         //
 574         m_vFsOldSize = GetRect();
 575         m_bFsIsMaximized = IsMaximized();
 576
 577         //
 578         // Decide which window style flags to turn off
 579         //
 580         LONG                        lNewStyle = m_lFsOldWindowStyle;
 581         LONG                        lOffFlags = 0;
 582
 583         if (lStyle & wxFULLSCREEN_NOBORDER)
 584             lOffFlags |= FCF_BORDER;
 585         if (lStyle & wxFULLSCREEN_NOCAPTION)
 586             lOffFlags |= (FCF_TASKLIST | FCF_SYSMENU);
 587
 588         lNewStyle &= (~lOffFlags);
 589
 590         //
 591         // Change our window style to be compatible with full-screen mode
 592         //
 593         ::WinSetWindowULong((HWND)m_hFrame, QWL_STYLE, (ULONG)lNewStyle);
 594
 595         //
 596         // Resize to the size of the desktop
 597         int                         nWidth;
 598         int                         nHeight;
 599
 600         RECTL                       vRect;
 601
 602         ::WinQueryWindowRect(HWND_DESKTOP, &vRect);
 603         nWidth = vRect.xRight - vRect.xLeft;
 604         //
 605         // Rmember OS/2 is backwards!
 606         //
 607         nHeight = vRect.yTop - vRect.yBottom;
 608
 609         SetSize( nWidth
 610                 ,nHeight
 611                );
 612
 613         //
 614         // Now flush the window style cache and actually go full-screen
 615         //
 616         ::WinSetWindowPos( (HWND) GetParent()->GetHWND()
 617                           ,HWND_TOP
 618                           ,0
 619                           ,0
 620                           ,nWidth
 621                           ,nHeight
 622                           ,SWP_SIZE | SWP_SHOW
 623                          );
 624
 625         wxSizeEvent                 vEvent( wxSize( nWidth
 626                                                    ,nHeight
 627                                                   )
 628                                            ,GetId()
 629                                           );
 630
 631         GetEventHandler()->ProcessEvent(vEvent);
 632         return TRUE;
 633     }
 634     else
 635     {
 636         if (!IsFullScreen())
 637             return FALSE;
 638
 639         m_bFsIsShowing = FALSE;
 640
 641 #if wxUSE_TOOLBAR
 642         wxToolBar*                  pTheToolBar = GetToolBar();
 643
 644         //
 645         // Restore the toolbar, menubar, and statusbar
 646         //
 647         if (pTheToolBar && (m_lFsStyle & wxFULLSCREEN_NOTOOLBAR))
 648         {
 649             pTheToolBar->SetSize(-1, m_nFsToolBarHeight);
 650             pTheToolBar->Show(TRUE);
 651         }
 652 #endif //wxUSE_TOOLBAR
 653
 654 #if wxUSE_STATUSBAR
 655         if ((m_lFsStyle & wxFULLSCREEN_NOSTATUSBAR) && (m_nFsStatusBarFields > 0))
 656         {
 657             CreateStatusBar(m_nFsStatusBarFields);
 658 //          PositionStatusBar();
 659         }
 660 #endif //wxUSE_STATUSBAR
 661
 662         if ((m_lFsStyle & wxFULLSCREEN_NOMENUBAR) && (m_hMenu != 0))
 663         {
 664             ::WinSetParent(m_hMenu, m_hFrame, FALSE);
 665             ::WinSetOwner(m_hMenu, m_hFrame);
 666             ::WinSendMsg(m_hFrame, WM_UPDATEFRAME, (MPARAM)FCF_MENU, (MPARAM)0);
 667         }
 668         Maximize(m_bFsIsMaximized);
 669
 670         ::WinSetWindowULong( m_hFrame
 671                             ,QWL_STYLE
 672                             ,(ULONG)m_lFsOldWindowStyle
 673                            );
 674         ::WinSetWindowPos( (HWND) GetParent()->GetHWND()
 675                           ,HWND_TOP
 676                           ,m_vFsOldSize.x
 677                           ,m_vFsOldSize.y
 678                           ,m_vFsOldSize.width
 679                           ,m_vFsOldSize.height
 680                           ,SWP_SIZE | SWP_SHOW
 681                          );
 682     }
 683     return wxFrameBase::ShowFullScreen(bShow, lStyle);
 684 } // end of wxFrame::ShowFullScreen
 685
 686 //
 687 // Frame window
 688 //
 689 // ----------------------------------------------------------------------------
 690 // wxFrame size management: we exclude the areas taken by menu/status/toolbars
 691 // from the client area, so the client area is what's really available for the
 692 // frame contents
 693 // ----------------------------------------------------------------------------
 694
 695 // Checks if there is a toolbar, and returns the first free client position
 696 wxPoint wxFrame::GetClientAreaOrigin() const
 697 {
 698     wxPoint                         vPoint = wxTopLevelWindow::GetClientAreaOrigin();
 699
 700     //
 701     // In OS/2 the toolbar and statusbar are frame extensions so there is no
 702     // adjustment.  The client is supposedly resized for a toolbar in OS/2
 703     // as it is for the status bar.
 704     //
 705     return vPoint;
 706 } // end of wxFrame::GetClientAreaOrigin
 707
 708 // ----------------------------------------------------------------------------
 709 // tool/status bar stuff
 710 // ----------------------------------------------------------------------------
 711
 712 #if wxUSE_TOOLBAR
 713
 714 wxToolBar* wxFrame::CreateToolBar(
 715   long                              lStyle
 716 , wxWindowID                        vId
 717 , const wxString&                   rName
 718 )
 719 {
 720     if (wxFrameBase::CreateToolBar( lStyle
 721                                    ,vId
 722                                    ,rName
 723                                   ))
 724     {
 725         PositionToolBar();
 726     }
 727     return m_frameToolBar;
 728 } // end of wxFrame::CreateToolBar
 729
 730 void wxFrame::PositionToolBar()
 731 {
 732     wxToolBar*                      pToolBar = GetToolBar();
 733     wxCoord                         vWidth;
 734     wxCoord                         vHeight;
 735     wxCoord                         vTWidth;
 736     wxCoord                         vTHeight;
 737
 738     if (!pToolBar)
 739         return;
 740
 741     HWND                            hWndClient;
 742     RECTL                           vRect;
 743     RECTL                           vFRect;
 744     SWP                             vSwp;
 745     wxPoint                         vPos;
 746
 747     ::WinQueryWindowRect(m_hFrame, &vRect);
 748     vPos.y = (wxCoord)vRect.yTop;
 749     ::WinMapWindowPoints(m_hFrame, HWND_DESKTOP, (PPOINTL)&vRect, 2);
 750     vFRect = vRect;
 751     ::WinCalcFrameRect(m_hFrame, &vRect, TRUE);
 752
 753     vPos.y = (wxCoord)(vFRect.yTop - vRect.yTop);
 754     pToolBar->GetSize( &vTWidth
 755                       ,&vTHeight
 756                      );
 757
 758     if (pToolBar->GetWindowStyleFlag() & wxTB_HORIZONTAL)
 759     {
 760         vWidth = (wxCoord)(vRect.xRight - vRect.xLeft);
 761         pToolBar->SetSize( vRect.xLeft - vFRect.xLeft
 762                           ,vPos.y
 763                           ,vWidth
 764                           ,vTHeight
 765                          );
 766     }
 767     else
 768     {
 769         wxCoord                     vSwidth = 0;
 770         wxCoord                     vSheight = 0;
 771
 772         if (m_frameStatusBar)
 773             m_frameStatusBar->GetSize( &vSwidth
 774                                       ,&vSheight
 775                                      );
 776         vHeight = (wxCoord)(vRect.yTop - vRect.yBottom);
 777         pToolBar->SetSize( vRect.xLeft - vFRect.xLeft
 778                           ,vPos.y
 779                           ,vTWidth
 780                           ,vHeight - vSheight
 781                          );
 782     }
 783     if( ::WinIsWindowShowing(m_hFrame) )
 784         ::WinSendMsg(m_hFrame, WM_UPDATEFRAME, (MPARAM)~0, 0);
 785 } // end of wxFrame::PositionToolBar
 786 #endif // wxUSE_TOOLBAR
 787
 788 // ----------------------------------------------------------------------------
 789 // frame state (iconized/maximized/...)
 790 // ----------------------------------------------------------------------------
 791
 792 //
 793 // propagate our state change to all child frames: this allows us to emulate X
 794 // Windows behaviour where child frames float independently of the parent one
 795 // on the desktop, but are iconized/restored with it
 796 //
 797 void wxFrame::IconizeChildFrames(
 798   bool                              bIconize
 799 )
 800 {
 801     for (wxWindowList::Node* pNode = GetChildren().GetFirst();
 802          pNode;
 803          pNode = pNode->GetNext() )
 804     {
 805         wxWindow*                   pWin = pNode->GetData();
 806         wxFrame*                    pFrame = wxDynamicCast(pWin, wxFrame);
 807
 808         if ( pFrame
 809 #if wxUSE_MDI_ARCHITECTURE
 810                 && !wxDynamicCast(pFrame, wxMDIChildFrame)
 811 #endif // wxUSE_MDI_ARCHITECTURE
 812            )
 813         {
 814             //
 815             // We don't want to restore the child frames which had been
 816             // iconized even before we were iconized, so save the child frame
 817             // status when iconizing the parent frame and check it when
 818             // restoring it.
 819             //
 820             if (bIconize)
 821             {
 822                 pFrame->m_bWasMinimized = pFrame->IsIconized();
 823             }
 824
 825             //
 826             // This test works for both iconizing and restoring
 827             //
 828             if (!pFrame->m_bWasMinimized)
 829                 pFrame->Iconize(bIconize);
 830         }
 831     }
 832 } // end of wxFrame::IconizeChildFrames
 833
 834 WXHICON wxFrame::GetDefaultIcon() const
 835 {
 836     return (WXHICON)(wxSTD_FRAME_ICON ? wxSTD_FRAME_ICON
 837                                       : wxDEFAULT_FRAME_ICON);
 838 }
 839 // ===========================================================================
 840 // message processing
 841 // ===========================================================================
 842
 843 // ---------------------------------------------------------------------------
 844 // preprocessing
 845 // ---------------------------------------------------------------------------
 846 bool wxFrame::OS2TranslateMessage(
 847   WXMSG*                            pMsg
 848 )
 849 {
 850     //
 851     // try the menu bar accels
 852     //
 853     wxMenuBar*                      pMenuBar = GetMenuBar();
 854
 855     if (!pMenuBar)
 856         return FALSE;
 857
 858 #if wxUSE_ACCEL && wxUSE_MENUS_NATIVE
 859     const wxAcceleratorTable&       rAcceleratorTable = pMenuBar->GetAccelTable();
 860     return rAcceleratorTable.Translate(GetHWND(), pMsg);
 861 #else
 862     return FALSE;
 863 #endif //wxUSE_ACCEL
 864 } // end of wxFrame::OS2TranslateMessage
 865
 866 // ---------------------------------------------------------------------------
 867 // our private (non virtual) message handlers
 868 // ---------------------------------------------------------------------------
 869 bool wxFrame::HandlePaint()
 870 {
 871     RECTL                           vRect;
 872
 873     if (::WinQueryUpdateRect(GetHWND(), &vRect))
 874     {
 875         if (m_bIconized)
 876         {
 877             //
 878             // Icons in PM are the same as "pointers"
 879             //
 880             const wxIcon&           vIcon = GetIcon();
 881             HPOINTER                hIcon;
 882
 883             if (vIcon.Ok())
 884                 hIcon = (HPOINTER)::WinSendMsg(m_hFrame, WM_QUERYICON, 0L, 0L);
 885             else
 886                 hIcon = (HPOINTER)m_hDefaultIcon;
 887
 888             //
 889             // Hold a pointer to the dc so long as the OnPaint() message
 890             // is being processed
 891             //
 892             RECTL                   vRect2;
 893             HPS                     hPs = ::WinBeginPaint(GetHwnd(), NULLHANDLE, &vRect2);
 894
 895             //
 896             // Erase background before painting or we get white background
 897             //
 898             OS2DefWindowProc(WM_ERASEBACKGROUND, (MPARAM)hPs, (MPARAM)&vRect2);
 899
 900             if (hIcon)
 901             {
 902                 HWND                            hWndClient;
 903                 RECTL                           vRect3;
 904
 905                 ::WinQueryWindowRect(GetHwnd(), &vRect3);
 906
 907                 static const int    nIconWidth = 32;
 908                 static const int    nIconHeight = 32;
 909                 int                 nIconX = (int)((vRect3.xRight - nIconWidth)/2);
 910                 int                 nIconY = (int)((vRect3.yBottom + nIconHeight)/2);
 911
 912                 ::WinDrawPointer(hPs, nIconX, nIconY, hIcon, DP_NORMAL);
 913             }
 914             ::WinEndPaint(hPs);
 915             return TRUE;
 916         }
 917         else
 918         {
 919             if (!wxWindow::HandlePaint())
 920             {
 921                 HPS                     hPS;
 922                 RECTL                   vRect;
 923
 924                 hPS = ::WinBeginPaint( GetHwnd()
 925                                       ,NULLHANDLE
 926                                       ,&vRect
 927                                      );
 928                 if(hPS)
 929                 {
 930                     ::GpiCreateLogColorTable( hPS
 931                                              ,0L
 932                                              ,LCOLF_CONSECRGB
 933                                              ,0L
 934                                              ,(LONG)wxTheColourDatabase->m_nSize
 935                                              ,(PLONG)wxTheColourDatabase->m_palTable
 936                                             );
 937                     ::GpiCreateLogColorTable( hPS
 938                                              ,0L
 939                                              ,LCOLF_RGB
 940                                              ,0L
 941                                              ,0L
 942                                              ,NULL
 943                                             );
 944
 945                     ::WinFillRect( hPS
 946                                   ,&vRect
 947                                   ,GetBackgroundColour().GetPixel()
 948                                  );
 949                    ::WinEndPaint(hPS);
 950                 }
 951             }
 952             return TRUE;
 953         }
 954     }
 955     else
 956     {
 957         // nothing to paint - processed
 958         return TRUE;
 959     }
 960     return FALSE;
 961 } // end of wxFrame::HandlePaint
 962
 963 bool wxFrame::HandleSize(
 964   int                               nX
 965 , int                               nY
 966 , WXUINT                            nId
 967 )
 968 {
 969     bool                            bProcessed = FALSE;
 970
 971     switch (nId)
 972     {
 973         case kSizeNormal:
 974             //
 975             // Only do it it if we were iconized before, otherwise resizing the
 976             // parent frame has a curious side effect of bringing it under it's
 977             // children
 978             if (!m_bIconized )
 979                 break;
 980
 981             //
 982             // restore all child frames too
 983             //
 984             IconizeChildFrames(FALSE);
 985             (void)SendIconizeEvent(FALSE);
 986
 987             //
 988             // fall through
 989             //
 990
 991         case kSizeMax:
 992             m_bIconized = FALSE;
 993             break;
 994
 995         case kSizeMin:
 996             //
 997             // Iconize all child frames too
 998             //
 999             IconizeChildFrames(TRUE);
1000             (void)SendIconizeEvent();
1001             m_bIconized = TRUE;
1002             break;
1003     }
1004
1005     if (!m_bIconized)
1006     {
1007         //
1008         // forward WM_SIZE to status bar control
1009         //
1010 #if wxUSE_NATIVE_STATUSBAR
1011         if (m_frameStatusBar && m_frameStatusBar->IsKindOf(CLASSINFO(wxStatusBar95)))
1012         {
1013             wxSizeEvent             vEvent( wxSize( nX
1014                                                    ,nY
1015                                                   )
1016                                            ,m_frameStatusBar->GetId()
1017                                           );
1018
1019             vEvent.SetEventObject(m_frameStatusBar);
1020             m_frameStatusBar->OnSize(vEvent);
1021         }
1022 #endif // wxUSE_NATIVE_STATUSBAR
1023
1024         PositionStatusBar();
1025 #if  wxUSE_TOOLBAR
1026         PositionToolBar();
1027 #endif // wxUSE_TOOLBAR
1028
1029         bProcessed = wxWindow::HandleSize( nX
1030                                           ,nY
1031                                           ,nId
1032                                          );
1033     }
1034     return bProcessed;
1035 } // end of wxFrame::HandleSize
1036
1037 bool wxFrame::HandleCommand(
1038   WXWORD                            nId
1039 , WXWORD                            nCmd
1040 , WXHWND                            hControl
1041 )
1042 {
1043     if (hControl)
1044     {
1045         //
1046         // In case it's e.g. a toolbar.
1047         //
1048         wxWindow*                   pWin = wxFindWinFromHandle(hControl);
1049
1050         if (pWin)
1051             return pWin->OS2Command( nCmd
1052                                     ,nId
1053                                    );
1054     }
1055
1056     //
1057     // Handle here commands from menus and accelerators
1058     //
1059     if (nCmd == CMDSRC_MENU || nCmd == CMDSRC_ACCELERATOR)
1060     {
1061 #if wxUSE_MENUS_NATIVE
1062         if (wxCurrentPopupMenu)
1063         {
1064             wxMenu*                 pPopupMenu = wxCurrentPopupMenu;
1065
1066             wxCurrentPopupMenu = NULL;
1067
1068             return pPopupMenu->OS2Command( nCmd
1069                                           ,nId
1070                                          );
1071             return TRUE;
1072         }
1073 #endif
1074
1075         if (ProcessCommand(nId))
1076         {
1077             return TRUE;
1078         }
1079     }
1080     return FALSE;
1081 } // end of wxFrame::HandleCommand
1082
1083 bool wxFrame::HandleMenuSelect(
1084   WXWORD                            nItem
1085 , WXWORD                            nFlags
1086 , WXHMENU                           hMenu
1087 )
1088 {
1089     if( !nFlags )
1090     {
1091         MENUITEM mItem;
1092         MRESULT  rc;
1093
1094         rc = ::WinSendMsg(hMenu, MM_QUERYITEM, MPFROM2SHORT(nItem, TRUE), (MPARAM)&mItem);
1095
1096         if(rc && !(mItem.afStyle & (MIS_SUBMENU | MIS_SEPARATOR)))
1097         {
1098             wxMenuEvent                     vEvent(wxEVT_MENU_HIGHLIGHT, nItem);
1099
1100             vEvent.SetEventObject(this);
1101             GetEventHandler()->ProcessEvent(vEvent); // return value would be ignored by PM
1102         }
1103         else
1104         {
1105             DoGiveHelp(wxEmptyString, FALSE);
1106             return FALSE;
1107         }
1108     }
1109     return TRUE;
1110 } // end of wxFrame::HandleMenuSelect
1111
1112 // ---------------------------------------------------------------------------
1113 // Main Frame window proc
1114 // ---------------------------------------------------------------------------
1115 MRESULT EXPENTRY wxFrameMainWndProc(
1116   HWND                              hWnd
1117 , ULONG                             ulMsg
1118 , MPARAM                            wParam
1119 , MPARAM                            lParam
1120 )
1121 {
1122     MRESULT                         rc = (MRESULT)0;
1123     bool                            bProcessed = FALSE;
1124     wxFrame*                        pWnd  = NULL;
1125
1126     pWnd = (wxFrame*) wxFindWinFromHandle((WXHWND) hWnd);
1127     switch (ulMsg)
1128     {
1129         case WM_QUERYFRAMECTLCOUNT:
1130             if(pWnd && pWnd->m_fnOldWndProc)
1131             {
1132                 USHORT              uItemCount = SHORT1FROMMR(pWnd->m_fnOldWndProc(hWnd, ulMsg, wParam, lParam));
1133
1134                 rc = MRFROMSHORT(uItemCount);
1135             }
1136             break;
1137
1138         case WM_FORMATFRAME:
1139 /////////////////////////////////////////////////////////////////////////////////
1140 // Applications that subclass frame controls may find that the frame is already
1141 // subclassed the number of frame controls is variable.
1142 // The WM_FORMATFRAME and WM_QUERYFRAMECTLCOUNT messages must always be
1143 // subclassed by calling the previous window procedure and modifying its result.
1144 ////////////////////////////////////////////////////////////////////////////////
1145             {
1146                 int                 nItemCount;
1147                 int                 i;
1148                 PSWP                pSWP = NULL;
1149                 RECTL               vRectl;
1150                 RECTL               vRstb;
1151                 RECTL               vRtlb;
1152                 int                 nHeight = 0;
1153                 int                 nHeight2 = 0;
1154                 int                 nWidth = 0;
1155
1156                 pSWP = (PSWP)PVOIDFROMMP(wParam);
1157                 nItemCount = SHORT1FROMMR(pWnd->m_fnOldWndProc(hWnd, ulMsg, wParam, lParam));
1158                 if(pWnd->m_frameStatusBar)
1159                 {
1160                     ::WinQueryWindowRect(pWnd->m_frameStatusBar->GetHWND(), &vRstb);
1161                     pWnd->m_frameStatusBar->GetSize(NULL, &nHeight);
1162                 }
1163                 if(pWnd->m_frameToolBar)
1164                 {
1165                     ::WinQueryWindowRect(pWnd->m_frameToolBar->GetHWND(), &vRtlb);
1166                     pWnd->m_frameToolBar->GetSize(&nWidth, &nHeight2);
1167                 }
1168                 ::WinQueryWindowRect(pWnd->m_hFrame, &vRectl);
1169                 ::WinMapWindowPoints(pWnd->m_hFrame, HWND_DESKTOP, (PPOINTL)&vRectl, 2);
1170                 ::WinCalcFrameRect(pWnd->m_hFrame, &vRectl, TRUE);
1171                 ::WinMapWindowPoints(HWND_DESKTOP, pWnd->m_hFrame, (PPOINTL)&vRectl, 2);
1172                 for(i = 0; i < nItemCount; i++)
1173                 {
1174                     if(pWnd->m_hWnd && pSWP[i].hwnd == pWnd->m_hWnd)
1175                     {
1176                         if (pWnd->m_frameToolBar && pWnd->m_frameToolBar->GetWindowStyleFlag() & wxTB_HORIZONTAL)
1177                         {
1178                             pSWP[i].x    = vRectl.xLeft;
1179                             pSWP[i].y    = vRectl.yBottom + nHeight;
1180                             pSWP[i].cx   = vRectl.xRight - vRectl.xLeft;
1181                             pSWP[i].cy   = vRectl.yTop - vRectl.yBottom - (nHeight + nHeight2);
1182                         }
1183                         else
1184                         {
1185                             pSWP[i].x    = vRectl.xLeft + nWidth;
1186                             pSWP[i].y    = vRectl.yBottom + nHeight;
1187                             pSWP[i].cx   = vRectl.xRight - (vRectl.xLeft + nWidth);
1188                             pSWP[i].cy   = vRectl.yTop - vRectl.yBottom - nHeight;
1189                         }
1190                         pSWP[i].fl   = SWP_SIZE | SWP_MOVE | SWP_SHOW;
1191                         pSWP[i].hwndInsertBehind = HWND_TOP;
1192                     }
1193                 }
1194                 bProcessed = TRUE;
1195                 rc = MRFROMSHORT(nItemCount);
1196             }
1197             break;
1198
1199        default:
1200             if(pWnd && pWnd->m_fnOldWndProc)
1201                 rc = pWnd->m_fnOldWndProc(hWnd, ulMsg, wParam, lParam);
1202             else
1203                 rc = ::WinDefWindowProc(hWnd, ulMsg, wParam, lParam);
1204     }
1205     return rc;
1206 } // end of wxFrameMainWndProc
1207
1208 MRESULT EXPENTRY wxFrameWndProc(
1209   HWND                              hWnd
1210 , ULONG                             ulMsg
1211 , MPARAM                            wParam
1212 , MPARAM                            lParam
1213 )
1214 {
1215     //
1216     // Trace all ulMsgs - useful for the debugging
1217     //
1218     HWND                            parentHwnd;
1219     wxFrame*                        pWnd  = NULL;
1220
1221     parentHwnd  = WinQueryWindow(hWnd,QW_PARENT);
1222     pWnd = (wxFrame*) wxFindWinFromHandle((WXHWND) hWnd);
1223
1224     //
1225     // When we get the first message for the HWND we just created, we associate
1226     // it with wxWindow stored in wxWndHook
1227     //
1228
1229     MRESULT                         rc = (MRESULT)0;
1230     bool                            bProcessed = FALSE;
1231
1232     //
1233     // Stop right here if we don't have a valid handle in our wxWindow object.
1234     //
1235     if (pWnd && !pWnd->GetHWND())
1236     {
1237         pWnd->SetHWND((WXHWND) hWnd);
1238         rc = pWnd->OS2DefWindowProc(ulMsg, wParam, lParam );
1239         pWnd->SetHWND(0);
1240     }
1241     else
1242     {
1243         if (pWnd)
1244             rc = pWnd->OS2WindowProc(ulMsg, wParam, lParam);
1245         else
1246             rc = ::WinDefWindowProc(hWnd, ulMsg, wParam, lParam);
1247     }
1248     return rc;
1249 } // end of wxFrameWndProc
1250
1251 MRESULT wxFrame::OS2WindowProc(
1252   WXUINT                            uMessage
1253 , WXWPARAM                          wParam
1254 , WXLPARAM                          lParam
1255 )
1256 {
1257     MRESULT                         mRc = 0L;
1258     bool                            bProcessed = FALSE;
1259
1260     switch (uMessage)
1261     {
1262         case WM_CLOSE:
1263             //
1264             // If we can't close, tell the system that we processed the
1265             // message - otherwise it would close us
1266             //
1267             bProcessed = !Close();
1268             break;
1269
1270         case WM_PAINT:
1271             bProcessed = HandlePaint();
1272             mRc = (MRESULT)FALSE;
1273             break;
1274
1275          case WM_ERASEBACKGROUND:
1276             //
1277             // Returning TRUE to requests PM to paint the window background
1278             // in SYSCLR_WINDOW. We capture this here because the PS returned
1279             // in Frames is the PS for the whole frame, which we can't really
1280             // use at all. If you want to paint a different background, do it
1281             // in an OnPaint using a wxPaintDC.
1282             //
1283             mRc = (MRESULT)(TRUE);
1284             break;
1285
1286       case WM_COMMAND:
1287             {
1288                 WORD                wId;
1289                 WORD                wCmd;
1290                 WXHWND              hWnd;
1291
1292                 UnpackCommand( (WXWPARAM)wParam
1293                               ,(WXLPARAM)lParam
1294                               ,&wId
1295                               ,&hWnd
1296                               ,&wCmd
1297                              );
1298
1299                 bProcessed = HandleCommand( wId
1300                                            ,wCmd
1301                                            ,(WXHWND)hWnd
1302                                           );
1303             }
1304             break;
1305
1306         case WM_MENUSELECT:
1307             {
1308                 WXWORD              wItem;
1309                 WXWORD              wFlags;
1310                 WXHMENU             hMenu;
1311
1312                 UnpackMenuSelect( wParam
1313                                  ,lParam
1314                                  ,&wItem
1315                                  ,&wFlags
1316                                  ,&hMenu
1317                                 );
1318                 bProcessed = HandleMenuSelect( wItem
1319                                               ,wFlags
1320                                               ,hMenu
1321                                              );
1322                 mRc = (MRESULT)TRUE;
1323             }
1324             break;
1325
1326         case WM_SIZE:
1327             {
1328                 SHORT               nScxold = SHORT1FROMMP(wParam); // Old horizontal size.
1329                 SHORT               nScyold = SHORT2FROMMP(wParam); // Old vertical size.
1330                 SHORT               nScxnew = SHORT1FROMMP(lParam); // New horizontal size.
1331                 SHORT               nScynew = SHORT2FROMMP(lParam); // New vertical size.
1332
1333                 lParam = MRFROM2SHORT( nScxnew - 20
1334                                       ,nScynew - 30
1335                                      );
1336             }
1337             bProcessed = HandleSize(LOWORD(lParam), HIWORD(lParam), (WXUINT)wParam);
1338             mRc = (MRESULT)FALSE;
1339             break;
1340
1341         case CM_QUERYDRAGIMAGE:
1342             {
1343                 const wxIcon&           vIcon = GetIcon();
1344                 HPOINTER                hIcon;
1345
1346                 if (vIcon.Ok())
1347                     hIcon = (HPOINTER)::WinSendMsg(GetHWND(), WM_QUERYICON, 0L, 0L);
1348                 else
1349                     hIcon = (HPOINTER)m_hDefaultIcon;
1350                 mRc = (MRESULT)hIcon;
1351                 bProcessed = mRc != 0;
1352             }
1353             break;
1354     }
1355
1356     if (!bProcessed )
1357         mRc = wxWindow::OS2WindowProc( uMessage
1358                                       ,wParam
1359                                       ,lParam
1360                                      );
1361     return (MRESULT)mRc;
1362 } // wxFrame::OS2WindowProc
1363
1364 void wxFrame::SetClient(WXHWND c_Hwnd)
1365 {
1366    // Duh...nothing to do under OS/2
1367 }
1368
1369 void wxFrame::SetClient(
1370   wxWindow*                         pWindow
1371 )
1372 {
1373     wxWindow*                       pOldClient      = this->GetClient();
1374     bool                            bClientHasFocus = pOldClient && (pOldClient == wxWindow::FindFocus());
1375
1376     if(pOldClient == pWindow)  // nothing to do
1377         return;
1378     if(pWindow == NULL) // just need to remove old client
1379     {
1380         if(pOldClient == NULL) // nothing to do
1381             return;
1382
1383         if(bClientHasFocus )
1384             this->SetFocus();
1385
1386         pOldClient->Enable( FALSE );
1387         pOldClient->Show( FALSE );
1388         ::WinSetWindowUShort(pOldClient->GetHWND(), QWS_ID, (USHORT)pOldClient->GetId());
1389         // to avoid OS/2 bug need to update frame
1390         ::WinSendMsg((HWND)this->GetFrame(), WM_UPDATEFRAME, (MPARAM)~0, 0);
1391         return;
1392     }
1393
1394     //
1395     // Else need to change client
1396     //
1397     if(bClientHasFocus)
1398          this->SetFocus();
1399
1400     ::WinEnableWindowUpdate((HWND)GetHWND(), FALSE);
1401     if(pOldClient)
1402     {
1403         pOldClient->Enable(FALSE);
1404         pOldClient->Show(FALSE);
1405         ::WinSetWindowUShort(pOldClient->GetHWND(), QWS_ID, (USHORT)pOldClient->GetId());
1406     }
1407     pWindow->Reparent(this);
1408     ::WinSetWindowUShort(pWindow->GetHWND(), QWS_ID, FID_CLIENT);
1409     ::WinEnableWindowUpdate((HWND)GetHWND(), TRUE);
1410     pWindow->Enable();
1411     pWindow->Show();   // ensure client is showing
1412     if( this->IsShown() )
1413     {
1414         this->Show();
1415         ::WinSendMsg(m_hFrame, WM_UPDATEFRAME, (MPARAM)~0, 0);
1416     }
1417 }
1418
1419 wxWindow* wxFrame::GetClient()
1420 {
1421     return wxFindWinFromHandle((WXHWND)::WinWindowFromID(m_hFrame, FID_CLIENT));
1422 }
1423
1424 void wxFrame::SendSizeEvent()
1425 {
1426     if (!m_bIconized)
1427     {
1428         RECTL                       vRect = wxGetWindowRect(GetHwnd());
1429
1430         ::WinPostMsg( GetHwnd()
1431                      ,WM_SIZE
1432                      ,MPFROM2SHORT( vRect.xRight - vRect.xLeft
1433                                    ,vRect.xRight - vRect.xLeft
1434                                   )
1435                      ,MPFROM2SHORT( vRect.yTop - vRect.yBottom
1436                                    ,vRect.yTop - vRect.yBottom
1437                                   )
1438                     );
1439     }
1440 }
1441