}
bool wxControl::OS2CreateControl(
- wxWindow* pParent
-, wxWindowID vId
+ const wxChar* zClassname
+, const wxString& rsLabel
, const wxPoint& rPos
, const wxSize& rSize
, long lStyle
-#if wxUSE_VALIDATORS
-, const wxValidator& rValidator
-#endif
-, const wxString& rsName
)
{
- //
- // Even if it's possible to create controls without parents in some port,
- // it should surely be discouraged because it doesn't work at all under
- // Windows
- //
- if (!CreateBase( pParent
- ,vId
- ,rPos
- ,rSize
- ,lStyle
-#if wxUSE_VALIDATORS
- ,rValidator
-#endif
- ,rsName
- ))
- return FALSE;
- pParent->AddChild(this);
- return TRUE;
+ WXDWORD dwExstyle;
+ WXDWORD dwStyle = OS2GetStyle( lStyle
+ ,&dwExstyle
+ );
+
+ return OS2CreateControl( zClassname
+ ,dwStyle
+ ,rPos
+ ,rSize
+ ,rsLabel
+ ,dwExstyle
+ );
} // end of wxControl::OS2CreateControl
bool wxControl::OS2CreateControl(
, WXDWORD dwExstyle
)
{
- int nX = rPos.x == -1 ? 0 : rPos.x;
- int nY = rPos.y == -1 ? 0 : rPos.y;
- int nW = rSize.x == -1 ? 0 : rSize.x;
- int nH = rSize.y == -1 ? 0 : rSize.y;
+ bool bWant3D = FALSE;
+
//
// Doesn't do anything at all under OS/2
//
if (dwExstyle == (WXDWORD)-1)
{
- dwExstyle = GetExStyle(dwStyle);
+ dwExstyle = Determine3DEffects(WS_EX_CLIENTEDGE, &bWant3D);
}
+ //
+ // All controls should have these styles (wxWindows creates all controls
+ // visible by default)
+ //
+ if (m_isShown )
+ dwStyle |= WS_VISIBLE;
wxWindow* pParent = GetParent();
PSZ zClass;
zClass = WC_STATIC;
else if ((strcmp(zClassname, "BUTTON")) == 0)
zClass = WC_BUTTON;
+ else if ((strcmp(zClassname, "NOTEBOOK")) == 0)
+ zClass = WC_NOTEBOOK;
dwStyle |= WS_VISIBLE;
- //
- // 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)))
- dwStyle |= WS_CLIPSIBLINGS;
-
m_hWnd = (WXHWND)::WinCreateWindow( (HWND)GetHwndOf(pParent) // Parent window handle
,(PSZ)zClass // Window class
,(PSZ)rsLabel.c_str() // Initial Text
// Controls use the same font and colours as their parent dialog by default
//
InheritAttributes();
- if (nW == 0 || nH == 0)
- SetBestSize(rSize);
+ SetXComp(0);
+ SetYComp(0);
+ SetSize( rPos.x
+ ,rPos.y
+ ,rSize.x
+ ,rSize.y
+ );
return TRUE;
} // end of wxControl::OS2CreateControl
::WinFillRect(hPS, &vRect, GetBackgroundColour().GetPixel());
} // end of wxControl::OnEraseBackground
-WXDWORD wxControl::GetExStyle(
- WXDWORD& rStyle
+WXDWORD wxControl::OS2GetStyle(
+ long lStyle
+, WXDWORD* pdwExstyle
) const
{
- //
- // Meaningless under OS/2, just return what was sent
- //
- WXDWORD exStyle = rStyle;
+ long dwStyle = wxWindow::OS2GetStyle( lStyle
+ ,pdwExstyle
+ );
- return exStyle;
-} // end of wxControl::GetExStyle
+ if (AcceptsFocus())
+ {
+ dwStyle |= WS_TABSTOP;
+ }
+ return dwStyle;
+} // end of wxControl::OS2GetStyle
// ---------------------------------------------------------------------------
// global functions