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