// System fonts are too big in OS/2 and they are blue
// We want smaller fonts and black by default.
//
- wxFont& rFont = *wxSMALL_FONT;
+ wxFont* pTextFont = new wxFont( 10
+ ,wxMODERN
+ ,wxNORMAL
+ ,wxNORMAL
+ );
wxColour vColour;
LONG lColor;
vColour.Set(wxString("BLACK"));
lColor = (LONG)vColour.GetPixel();
+ m_backgroundColour = pParent->GetBackgroundColour();
m_nSelectedButton = -1;
- m_nNoItems = nNum;
+ m_nNoItems = 0;
m_nMajorDim = nMajorDim == 0 ? nNum : nMajorDim;
m_nNoRowsOrCols = nMajorDim;
//
// Common initialization
//
- if (!OS2CreateControl( pParent
- ,vId
- ,rPos
- ,rSize
- ,lStyle
+ if (!CreateControl( pParent
+ ,vId
+ ,rPos
+ ,rSize
+ ,lStyle
#if wxUSE_VALIDATORS
- ,rVal
+ ,rVal
#endif
- ,rsName
- ))
-
-
-
-
+ ,rsName
+ ))
+ return FALSE;
if (!OS2CreateControl( "STATIC"
#if RADIOBTN_PARENT_IS_RADIOBOX
,SS_GROUPBOX | WS_GROUP | WS_CLIPCHILDREN
,rSize
,rsTitle
))
+ return FALSE;
#if RADIOBTN_PARENT_IS_RADIOBOX
HWND hWndParent = GetHwnd();
//
// Some radio boxes test consecutive id.
//
+ m_nNoItems = nNum;
(void)NewControlId();
m_ahRadioButtons = new WXHWND[nNum];
m_pnRadioWidth = new int[nNum];
m_pnRadioHeight = new int[nNum];
- if (rFont.Ok())
+ if (pTextFont->Ok())
{
- hFont = rFont.GetResourceHandle();
+ hFont = pTextFont->GetResourceHandle();
}
for (int i = 0; i < nNum; i++)
m_ahRadioButtons[i] = (WXHWND)hWndBtn;
SubclassRadioButton((WXHWND)hWndBtn);
wxOS2SetFont( hWndBtn
- ,rFont
+ ,*pTextFont
);
::WinSetWindowULong(hWndBtn, QWL_USER, (ULONG)this);
m_aSubControls.Add(nNewId);
,NULL
,NULL
);
- SetFont(*wxSMALL_FONT);
+ SetFont(*pTextFont);
lColor = (LONG)vColour.GetPixel();
::WinSetPresParam( m_hWnd
,PP_FOREGROUNDCOLOR
,sizeof(LONG)
,(PVOID)&lColor
);
+ SetXComp(0);
+ SetYComp(0);
SetSelection(0);
SetSize( rPos.x
,rPos.y
,rSize.x
,rSize.y
);
+ delete pTextFont;
return TRUE;
} // end of wxRadioBox::Create
nXx = nCurrentX;
if (nY == -1 && !(nSizeFlags & wxSIZE_ALLOW_MINUS_ONE))
nYy = nCurrentY;
-
+ if (nYy < 0)
+ nYy = 0;
+ if (nXx < 0)
+ nXx = 0;
wxGetCharSize( m_hWnd
,&nCx1
,(LONG)nMaxHeight
,SWP_ZORDER | SWP_SIZE | SWP_MOVE | SWP_SHOW
);
+ GetParent()->Refresh();
//
// Where do we put the next button?
//