X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/e58dab20ce995856303154a367bcca904066525c..02a1dfbae942c883d8651e34dcfbc5153aabc56e:/src/os2/toplevel.cpp?ds=inline diff --git a/src/os2/toplevel.cpp b/src/os2/toplevel.cpp index 238342a052..82cc9d5629 100644 --- a/src/os2/toplevel.cpp +++ b/src/os2/toplevel.cpp @@ -56,6 +56,7 @@ wxWindowList wxModelessWindows; extern void wxAssociateWinWithHandle( HWND hWnd ,wxWindowOS2* pWin ); +bool wxTopLevelWindowOS2::m_sbInitialized = FALSE; // ============================================================================ // wxTopLevelWindowMSW implementation @@ -111,22 +112,24 @@ void wxTopLevelWindowOS2::Init() memset(&m_vSwpClient, 0, sizeof(SWP)); } // end of wxTopLevelWindowIOS2::Init -long wxTopLevelWindowOS2::OS2GetCreateWindowFlags( - long* plExflags +WXDWORD wxTopLevelWindowOS2::OS2GetStyle( + long lStyle +, WXDWORD* pdwExflags ) const { - long lStyle = GetWindowStyle(); - long lMsflags = 0; + long lMsflags = wxWindow::OS2GetStyle( (lStyle & ~wxBORDER_MASK) | wxBORDER_NONE + ,pdwExflags + ); if (lStyle == wxDEFAULT_FRAME_STYLE) - lMsflags = FCF_SIZEBORDER | FCF_TITLEBAR | FCF_SYSMENU | - FCF_MINMAX | FCF_TASKLIST; + lMsflags |= FCF_SIZEBORDER | FCF_TITLEBAR | FCF_SYSMENU | + FCF_MINMAX | FCF_TASKLIST; else { if ((lStyle & wxCAPTION) == wxCAPTION) - lMsflags = FCF_TASKLIST; + lMsflags |= FCF_TASKLIST; else - lMsflags = FCF_NOMOVEWITHOWNER; + lMsflags |= FCF_NOMOVEWITHOWNER; if ((lStyle & wxVSCROLL) == wxVSCROLL) lMsflags |= FCF_VERTSCROLL; @@ -155,7 +158,7 @@ long wxTopLevelWindowOS2::OS2GetCreateWindowFlags( if ((lStyle & wxTHICK_FRAME) == 0) lMsflags |= FCF_BORDER; if (lStyle & wxFRAME_TOOL_WINDOW) - *plExflags = kFrameToolWindow; + *pdwExflags = kFrameToolWindow; if (lStyle & wxSTAY_ON_TOP) lMsflags |= FCF_SYSMODAL; @@ -269,6 +272,19 @@ bool wxTopLevelWindowOS2::CreateDialog( nX = (vSizeDpy.x - nWidth) / 2; nY = (vSizeDpy.y - nHeight) / 2; } + m_backgroundColour.Set(wxString("LIGHT GREY")); + + LONG lColor = (LONG)m_backgroundColour.GetPixel(); + + if (!::WinSetPresParam( m_hWnd + ,PP_BACKGROUNDCOLOR + ,sizeof(LONG) + ,(PVOID)&lColor + )) + { + return FALSE; + } + ::WinSetWindowPos( GetHwnd() ,HWND_TOP ,nX @@ -277,6 +293,8 @@ bool wxTopLevelWindowOS2::CreateDialog( ,nHeight ,SWP_MOVE | SWP_SIZE | SWP_ZORDER | SWP_SHOW ); + ::WinQueryWindowPos(GetHwnd(), GetSwp()); + m_hFrame = m_hWnd; SubclassWin(m_hWnd); return TRUE; } // end of wxTopLevelWindowOS2::CreateDialog @@ -287,8 +305,8 @@ bool wxTopLevelWindowOS2::CreateFrame( , const wxSize& rSize ) { - long lExflags; - long lFlags = OS2GetCreateWindowFlags(&lExflags); + WXDWORD lExflags; + WXDWORD lFlags = OS2GetCreateWindowFlags(&lExflags); long lStyle = GetWindowStyleFlag(); int nX = rPos.x; int nY = rPos.y; @@ -486,64 +504,6 @@ wxTopLevelWindowOS2::~wxTopLevelWindowOS2() } } // end of wxTopLevelWindowOS2::~wxTopLevelWindowOS2 -// -// IF we have child controls in the Frame's client we need to alter -// the y position, because, OS/2 controls are positioned relative to -// wxWindows orgin (top left) not the OS/2 origin (bottom left) -// -void wxTopLevelWindowOS2::AlterChildPos() -{ - // - // OS/2 is the only OS concerned about this - // - wxWindow* pChild = NULL; - wxControl* pCtrl = NULL; - RECTL vRect; - SWP vSwp; - - ::WinQueryWindowRect(GetHwnd(), &vRect); - for (wxWindowList::Node* pNode = GetChildren().GetFirst(); - pNode; - pNode = pNode->GetNext()) - { - wxWindow* pChild = pNode->GetData(); - - ::WinQueryWindowPos(pChild->GetHWND(), &vSwp); - vSwp.y += (vRect.yTop - m_vSwpClient.cy); - if (pChild->IsKindOf(CLASSINFO(wxControl))) - { - pCtrl = wxDynamicCast(pChild, wxControl); - // - // Must deal with controls that have margins like ENTRYFIELD. The SWP - // struct of such a control will have and origin offset from its intended - // position by the width of the margins. - // - vSwp.y -= pCtrl->GetYComp(); - vSwp.x -= pCtrl->GetXComp(); - } - ::WinSetWindowPos( pChild->GetHWND() - ,HWND_TOP - ,vSwp.x - ,vSwp.y - ,vSwp.cx - ,vSwp.cy - ,SWP_MOVE - ); - ::WinQueryWindowPos(pChild->GetHWND(), &vSwp); - pChild = NULL; - } - ::WinQueryWindowPos(GetHwnd(), &m_vSwpClient); -} // end of wxTopLevelWindowOS2::AlterChildPos - -void wxTopLevelWindowOS2::UpdateInternalSize( - wxWindow* pChild -, int nHeight -) -{ - pChild->MoveChildren(m_vSwpClient.cy - nHeight); - ::WinQueryWindowPos(GetHwnd(), &m_vSwpClient); -} // end of wxTopLevelWindowOS2::UpdateInternalSize - // ---------------------------------------------------------------------------- // wxTopLevelWindowOS2 client size // ---------------------------------------------------------------------------- @@ -593,6 +553,11 @@ void wxTopLevelWindowOS2::DoShowWindow( ) { ::WinShowWindow(m_hFrame, (BOOL)(nShowCmd & SWP_SHOW)); + + // + // Need to artificially send a size event as wxApps often expect to do some + // final child control sizing + SendSizeEvent(); m_bIconized = nShowCmd == SWP_MINIMIZE; } // end of wxTopLevelWindowOS2::DoShowWindow @@ -630,7 +595,13 @@ bool wxTopLevelWindowOS2::Show( m_bIconized = vSwp.fl & SWP_MINIMIZE; ::WinQueryWindowPos(m_hWnd, &m_vSwpClient); ::WinSendMsg(m_hFrame, WM_UPDATEFRAME, (MPARAM)~0, 0); + ::WinQueryWindowPos(m_hWnd, &vSwp); ::WinEnableWindow(m_hFrame, TRUE); + + // + // Deal with children + // + MoveChildren(m_vSwpClient.cy - vSwp.cy); vEvent.SetEventObject(this); GetEventHandler()->ProcessEvent(vEvent); } @@ -716,6 +687,21 @@ void wxTopLevelWindowOS2::Restore() DoShowWindow(SWP_RESTORE); } // end of wxTopLevelWindowOS2::Restore +// generate an artificial resize event +void wxTopLevelWindowOS2::SendSizeEvent() +{ + if (!m_bIconized) + { + RECTL vRect = wxGetWindowRect(GetHwnd()); + + (void)::WinPostMsg( m_hFrame + ,WM_SIZE + ,MPFROM2SHORT(vRect.xRight - vRect.xLeft, vRect.yTop - vRect.yBottom) + ,MPFROM2SHORT(vRect.xRight - vRect.xLeft, vRect.yTop - vRect.yBottom) + ); + } +} // end of wxTopLevelWindowOS2::SendSizeEvent + // ---------------------------------------------------------------------------- // wxTopLevelWindowOS2 fullscreen // ---------------------------------------------------------------------------- @@ -836,17 +822,26 @@ bool wxTopLevelWindowOS2::ShowFullScreen( void wxTopLevelWindowOS2::SetIcon( const wxIcon& rIcon ) +{ + SetIcons(wxIconBundle(rIcon)); +} // end of wxTopLevelWindowOS2::SetIcon + +void wxTopLevelWindowOS2::SetIcons( + const wxIconBundle& rIcons +) { // // This sets m_icon // - wxTopLevelWindowBase::SetIcon(rIcon); + wxTopLevelWindowBase::SetIcons(rIcons); + + const wxIcon& vIcon = rIcons.GetIcon(wxSize(32, 32)); - if (m_icon.Ok()) + if (vIcon.Ok() && vIcon.GetWidth() == 32 && vIcon.GetHeight() == 32) { ::WinSendMsg( m_hFrame ,WM_SETICON - ,(MPARAM)((HPOINTER)m_icon.GetHICON()) + ,(MPARAM)((HPOINTER)vIcon.GetHICON()) ,NULL ); ::WinSendMsg( m_hFrame