X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/5d44b24ee63543390aa28e1eb4ff162da4264838..6b6fc9b0a0d9bb3f85875bc356a8d9a256c7baed:/src/os2/slider.cpp diff --git a/src/os2/slider.cpp b/src/os2/slider.cpp index 7f2ba24e7f..cf5d9798f5 100644 --- a/src/os2/slider.cpp +++ b/src/os2/slider.cpp @@ -20,6 +20,7 @@ #include #include #include +#include #endif #include "wx/slider.h" @@ -95,7 +96,7 @@ void wxSlider::AdjustSubControls( ,(LONG)nYOffset ,(LONG)nNewWidth ,(LONG)nValueHeight - ,SWP_ZORDER | SWP_SIZE | SWP_MOVE | SWP_SHOW + ,SWP_SIZE | SWP_MOVE ); } ::WinSetWindowPos( (HWND)m_hStaticMin @@ -104,7 +105,7 @@ void wxSlider::AdjustSubControls( ,(LONG)nYOffset ,(LONG)nMinLen ,(LONG)nCy - ,SWP_ZORDER | SWP_SIZE | SWP_MOVE | SWP_SHOW + ,SWP_SIZE | SWP_MOVE ); nXOffset += nWidth + nCx; @@ -200,15 +201,6 @@ bool wxSlider::Create( { lMsStyle |= WS_VISIBLE | SS_TEXT | DT_VCENTER; - // - // If the parent is a scrolled window the controls must - // have this style or they will overlap the scrollbars - // - if (pParent) - if (pParent->IsKindOf(CLASSINFO(wxScrolledWindow)) || - pParent->IsKindOf(CLASSINFO(wxGenericScrolledWindow))) - lMsStyle |= WS_CLIPSIBLINGS; - m_hStaticValue = (WXHWND)::WinCreateWindow( (HWND)GetHwndOf(pParent) // Parent window handle ,WC_STATIC // Window class ,(PSZ)NULL // Initial Text @@ -228,14 +220,6 @@ bool wxSlider::Create( lWstyle = SS_TEXT|DT_LEFT|WS_VISIBLE; if (m_windowStyle & wxCLIP_SIBLINGS) lWstyle |= WS_CLIPSIBLINGS; - // - // If the parent is a scrolled window the controls must - // have this style or they will overlap the scrollbars - // - if (pParent) - if (pParent->IsKindOf(CLASSINFO(wxScrolledWindow)) || - pParent->IsKindOf(CLASSINFO(wxGenericScrolledWindow))) - lWstyle |= WS_CLIPSIBLINGS; m_hStaticMin = (WXHWND)::WinCreateWindow( (HWND)GetHwndOf(pParent) // Parent window handle ,WC_STATIC // Window class @@ -281,15 +265,6 @@ bool wxSlider::Create( else lMsStyle |= SLS_PRIMARYSCALE2; - // - // If the parent is a scrolled window the controls must - // have this style or they will overlap the scrollbars - // - if (pParent) - if (pParent->IsKindOf(CLASSINFO(wxScrolledWindow)) || - pParent->IsKindOf(CLASSINFO(wxGenericScrolledWindow))) - lMsStyle |= WS_CLIPSIBLINGS; - m_nPageSize = ((nMaxValue - nMinValue)/10); vSlData.usScale1Increments = m_nPageSize; vSlData.usScale2Increments = m_nPageSize; @@ -328,7 +303,13 @@ bool wxSlider::Create( m_hWnd = (WXHWND)hScrollBar; SubclassWin(GetHWND()); ::WinSetWindowText((HWND)m_hWnd, ""); - SetFont(pParent->GetFont()); + + wxFont* pTextFont = new wxFont( 10 + ,wxMODERN + ,wxNORMAL + ,wxNORMAL + ); + SetFont(*pTextFont); if (m_windowStyle & wxSL_LABELS) { // @@ -338,14 +319,6 @@ bool wxSlider::Create( lWstyle = SS_TEXT|DT_LEFT|WS_VISIBLE; if (m_windowStyle & wxCLIP_SIBLINGS) lMsStyle |= WS_CLIPSIBLINGS; - // - // If the parent is a scrolled window the controls must - // have this style or they will overlap the scrollbars - // - if (pParent) - if (pParent->IsKindOf(CLASSINFO(wxScrolledWindow)) || - pParent->IsKindOf(CLASSINFO(wxGenericScrolledWindow))) - lWstyle |= WS_CLIPSIBLINGS; m_hStaticMax = (WXHWND)::WinCreateWindow( (HWND)GetHwndOf(pParent) // Parent window handle ,WC_STATIC // Window class @@ -440,6 +413,7 @@ bool wxSlider::Create( ,(PVOID)&lColor ); SetValue(nValue); + delete pTextFont; return TRUE; } // end of wxSlider::Create @@ -798,6 +772,16 @@ int wxSlider::GetSelStart() const return 0; } // end of wxSlider::GetSelStart +void wxSlider::DoGetSize( + int* pnWidth +, int* pnHeight +) const +{ + GetSize( pnWidth + ,pnHeight + ); +} // end of wxSlider::DoGetSize + void wxSlider::GetSize( int* pnWidth , int* pnHeight