OS/2 scrolling support for controls
git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@13430 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775
This commit is contained in:
@@ -294,7 +294,11 @@ bool wxRadioBox::Create(
|
||||
|
||||
|
||||
if (!OS2CreateControl( "STATIC"
|
||||
,SS_GROUPBOX | WS_GROUP
|
||||
#if RADIOBTN_PARENT_IS_RADIOBOX
|
||||
,SS_GROUPBOX | WS_GROUP | WS_CLIPCHILDREN
|
||||
#else
|
||||
,SS_GROUPBOX | WS_GROUP | WS_CLIPSIBLINGS
|
||||
#endif
|
||||
,rPos
|
||||
,rSize
|
||||
,rsTitle
|
||||
@@ -341,11 +345,19 @@ bool wxRadioBox::Create(
|
||||
,NULL
|
||||
,NULL
|
||||
);
|
||||
lColor = (LONG)vColour.GetPixel();
|
||||
::WinSetPresParam( hWndBtn
|
||||
,PP_FOREGROUNDCOLOR
|
||||
,sizeof(LONG)
|
||||
,(PVOID)&lColor
|
||||
);
|
||||
lColor = (LONG)m_backgroundColour.GetPixel();
|
||||
|
||||
::WinSetPresParam( hWndBtn
|
||||
,PP_BACKGROUNDCOLOR
|
||||
,sizeof(LONG)
|
||||
,(PVOID)&lColor
|
||||
);
|
||||
if (!hWndBtn)
|
||||
{
|
||||
return FALSE;
|
||||
@@ -374,11 +386,19 @@ bool wxRadioBox::Create(
|
||||
,NULL
|
||||
);
|
||||
SetFont(*wxSMALL_FONT);
|
||||
lColor = (LONG)vColour.GetPixel();
|
||||
::WinSetPresParam( m_hWnd
|
||||
,PP_FOREGROUNDCOLOR
|
||||
,sizeof(LONG)
|
||||
,(PVOID)&lColor
|
||||
);
|
||||
lColor = (LONG)m_backgroundColour.GetPixel();
|
||||
|
||||
::WinSetPresParam( m_hWnd
|
||||
,PP_BACKGROUNDCOLOR
|
||||
,sizeof(LONG)
|
||||
,(PVOID)&lColor
|
||||
);
|
||||
SetSelection(0);
|
||||
SetSize( rPos.x
|
||||
,rPos.y
|
||||
|
Reference in New Issue
Block a user