]> git.saurik.com Git - wxWidgets.git/blame - src/os2/control.cpp
Make DoGetBestSize cache the value of GetSize() the first time it is called
[wxWidgets.git] / src / os2 / control.cpp
CommitLineData
0e320a79
DW
1/////////////////////////////////////////////////////////////////////////////
2// Name: control.cpp
3// Purpose: wxControl class
45fcbf3b 4// Author: David Webster
0e320a79 5// Modified by:
45fcbf3b 6// Created: 09/17/99
0e320a79 7// RCS-ID: $Id$
6aa89a22 8// Copyright: (c) Julian Smart
45fcbf3b 9// Licence: wxWindows licence
0e320a79
DW
10/////////////////////////////////////////////////////////////////////////////
11
12#ifdef __GNUG__
13#pragma implementation "control.h"
14#endif
15
45fcbf3b
DW
16// For compilers that support precompilation, includes "wx.h".
17#include "wx/wxprec.h"
18
19#ifndef WX_PRECOMP
20#include "wx/event.h"
21#include "wx/app.h"
22#include "wx/dcclient.h"
a4a16252 23#include "wx/scrolwin.h"
6eb280e9 24#include "wx/log.h"
45fcbf3b 25#endif
86de7616 26#include "wx/os2/private.h"
0e320a79
DW
27#include "wx/control.h"
28
0e320a79
DW
29IMPLEMENT_ABSTRACT_CLASS(wxControl, wxWindow)
30
31BEGIN_EVENT_TABLE(wxControl, wxWindow)
45fcbf3b 32 EVT_ERASE_BACKGROUND(wxControl::OnEraseBackground)
0e320a79 33END_EVENT_TABLE()
0e320a79
DW
34
35// Item members
36wxControl::wxControl()
37{
c9cb56f7
DW
38} // end of wxControl::wxControl
39
40bool wxControl::Create(
41 wxWindow* pParent
42, wxWindowID vId
43, const wxPoint& rPos
44, const wxSize& rSize
45, long lStyle
c9cb56f7 46, const wxValidator& rValidator
c9cb56f7
DW
47, const wxString& rsName
48)
3d62dcb6 49{
c9cb56f7
DW
50 bool bRval = wxWindow::Create( pParent
51 ,vId
52 ,rPos
53 ,rSize
54 ,lStyle
55 ,rsName
56 );
57 if (bRval)
58 {
3d62dcb6 59#if wxUSE_VALIDATORS
c9cb56f7 60 SetValidator(rValidator);
3d62dcb6
DW
61#endif
62 }
c9cb56f7
DW
63 return bRval;
64} // end of wxControl::Create
3d62dcb6 65
0e320a79
DW
66wxControl::~wxControl()
67{
45fcbf3b 68 m_isBeingDeleted = TRUE;
0e320a79
DW
69}
70
0cf6acbf 71bool wxControl::OS2CreateControl(
b9b1d6c8
DW
72 const wxChar* zClassname
73, const wxString& rsLabel
0cf6acbf
DW
74, const wxPoint& rPos
75, const wxSize& rSize
76, long lStyle
0cf6acbf
DW
77)
78{
b9b1d6c8
DW
79 WXDWORD dwExstyle;
80 WXDWORD dwStyle = OS2GetStyle( lStyle
81 ,&dwExstyle
82 );
83
84 return OS2CreateControl( zClassname
85 ,dwStyle
86 ,rPos
87 ,rSize
88 ,rsLabel
89 ,dwExstyle
90 );
0cf6acbf
DW
91} // end of wxControl::OS2CreateControl
92
c9cb56f7
DW
93bool wxControl::OS2CreateControl(
94 const wxChar* zClassname
95, WXDWORD dwStyle
96, const wxPoint& rPos
97, const wxSize& rSize
98, const wxString& rsLabel
99, WXDWORD dwExstyle
100)
0e320a79 101{
c9cb56f7
DW
102 //
103 // Doesn't do anything at all under OS/2
104 //
105 if (dwExstyle == (WXDWORD)-1)
3d62dcb6 106 {
0093fe11
SN
107 dwExstyle = 0;
108 (void) OS2GetStyle(GetWindowStyle(), &dwExstyle);
3d62dcb6 109 }
b9b1d6c8
DW
110 //
111 // All controls should have these styles (wxWindows creates all controls
112 // visible by default)
113 //
cfcebdb1
DW
114 if (m_isShown )
115 dwStyle |= WS_VISIBLE;
3d62dcb6 116
5d44b24e
DW
117 wxWindow* pParent = GetParent();
118 PSZ zClass;
45fcbf3b 119
5d44b24e 120 if (!pParent)
45fcbf3b 121 return FALSE;
0cf6acbf
DW
122
123 if ((strcmp(zClassname, "COMBOBOX")) == 0)
124 zClass = WC_COMBOBOX;
3c299c3a
DW
125 else if ((strcmp(zClassname, "STATIC")) == 0)
126 zClass = WC_STATIC;
1b086de1
DW
127 else if ((strcmp(zClassname, "BUTTON")) == 0)
128 zClass = WC_BUTTON;
f289196b
DW
129 else if ((strcmp(zClassname, "NOTEBOOK")) == 0)
130 zClass = WC_NOTEBOOK;
4fd899b6
DW
131 else if ((strcmp(zClassname, "CONTAINER")) == 0)
132 zClass = WC_CONTAINER;
c9cb56f7 133 dwStyle |= WS_VISIBLE;
5d44b24e 134
5d44b24e
DW
135 m_hWnd = (WXHWND)::WinCreateWindow( (HWND)GetHwndOf(pParent) // Parent window handle
136 ,(PSZ)zClass // Window class
137 ,(PSZ)rsLabel.c_str() // Initial Text
138 ,(ULONG)dwStyle // Style flags
139 ,(LONG)0 // X pos of origin
140 ,(LONG)0 // Y pos of origin
141 ,(LONG)0 // control width
142 ,(LONG)0 // control height
143 ,(HWND)GetHwndOf(pParent) // owner window handle (same as parent
144 ,HWND_TOP // initial z position
145 ,(ULONG)GetId() // Window identifier
146 ,NULL // no control data
147 ,NULL // no Presentation parameters
c9cb56f7
DW
148 );
149
5d44b24e
DW
150 if ( !m_hWnd )
151 {
152#ifdef __WXDEBUG__
153 wxLogError(wxT("Failed to create a control of class '%s'"), zClassname);
154#endif // DEBUG
155
156 return FALSE;
157 }
c9cb56f7
DW
158 //
159 // Subclass again for purposes of dialog editing mode
160 //
45fcbf3b
DW
161 SubclassWin(m_hWnd);
162
c9cb56f7 163 //
31d7fc0f 164 // Controls use the same colours as their parent dialog by default
c9cb56f7 165 //
45fcbf3b 166 InheritAttributes();
31d7fc0f
VZ
167 //
168 // All OS/2 ctrls use the small font
169 //
170 SetFont(*wxSMALL_FONT);
171
70a2c656
DW
172 SetXComp(0);
173 SetYComp(0);
f289196b
DW
174 SetSize( rPos.x
175 ,rPos.y
176 ,rSize.x
177 ,rSize.y
178 );
45fcbf3b 179 return TRUE;
c9cb56f7 180} // end of wxControl::OS2CreateControl
0e320a79 181
e78c4d50 182wxSize wxControl::DoGetBestSize() const
0e320a79 183{
45fcbf3b 184 return wxSize(DEFAULT_ITEM_WIDTH, DEFAULT_ITEM_HEIGHT);
c9cb56f7 185} // end of wxControl::DoGetBestSize
0e320a79 186
45fcbf3b 187bool wxControl::ProcessCommand(wxCommandEvent& event)
0e320a79 188{
45fcbf3b
DW
189 return GetEventHandler()->ProcessEvent(event);
190}
191
c9cb56f7
DW
192WXHBRUSH wxControl::OnCtlColor(
193 WXHDC hWxDC
194, WXHWND hWnd
195, WXUINT uCtlColor
196, WXUINT uMessage
197, WXWPARAM wParam
198, WXLPARAM lParam
199)
45fcbf3b 200{
c9cb56f7
DW
201 HPS hPS = (HPS)hWxDC; // pass in a PS handle in OS/2
202 wxColour vColFore = GetForegroundColour();
203 wxColour vColBack = GetBackgroundColour();
45fcbf3b 204
c9cb56f7
DW
205 if (GetParent()->GetTransparentBackground())
206 ::GpiSetBackMix(hPS, BM_LEAVEALONE);
207 else
208 ::GpiSetBackMix(hPS, BM_OVERPAINT);
45fcbf3b 209
c9cb56f7
DW
210 ::GpiSetBackColor(hPS, vColBack.GetPixel());
211 ::GpiSetColor(hPS, vColFore.GetPixel());
45fcbf3b 212
c9cb56f7
DW
213 wxBrush* pBrush = wxTheBrushList->FindOrCreateBrush( vColBack
214 ,wxSOLID
215 );
216 return (WXHBRUSH)pBrush->GetResourceHandle();
217} // end of wxControl::OnCtlColor
0e320a79 218
c9cb56f7
DW
219void wxControl::OnEraseBackground(
220 wxEraseEvent& rEvent
221)
45fcbf3b 222{
c9cb56f7
DW
223 RECTL vRect;
224 HPS hPS = rEvent.GetDC()->GetHPS();
225 SIZEL vSize = {0,0};
226
227 ::GpiSetPS(hPS, &vSize, PU_PELS | GPIF_DEFAULT);
228 ::WinQueryWindowRect((HWND)GetHwnd(), &vRect);
229 ::WinFillRect(hPS, &vRect, GetBackgroundColour().GetPixel());
230} // end of wxControl::OnEraseBackground
231
b9b1d6c8
DW
232WXDWORD wxControl::OS2GetStyle(
233 long lStyle
234, WXDWORD* pdwExstyle
c9cb56f7 235) const
45fcbf3b 236{
b9b1d6c8
DW
237 long dwStyle = wxWindow::OS2GetStyle( lStyle
238 ,pdwExstyle
239 );
45fcbf3b 240
b9b1d6c8
DW
241 if (AcceptsFocus())
242 {
243 dwStyle |= WS_TABSTOP;
244 }
245 return dwStyle;
246} // end of wxControl::OS2GetStyle
45fcbf3b 247
d37bb826
SN
248void wxControl::SetLabel(
249 const wxString& rsLabel
250)
251{
252 wxString sLabel = ::wxPMTextToLabel(rsLabel);
253
254 ::WinSetWindowText(GetHwnd(), sLabel.c_str());
255} // end of wxControl::SetLabel
256
45fcbf3b
DW
257// ---------------------------------------------------------------------------
258// global functions
259// ---------------------------------------------------------------------------
260
261// Call this repeatedly for several wnds to find the overall size
262// of the widget.
263// Call it initially with -1 for all values in rect.
264// Keep calling for other widgets, and rect will be modified
265// to calculate largest bounding rectangle.
c9cb56f7
DW
266void wxFindMaxSize(
267 WXHWND hWnd
268, RECT* pRect
269)
0e320a79 270{
c9cb56f7
DW
271 int nLeft = pRect->xLeft;
272 int nRight = pRect->xRight;
273 int nTop = pRect->yTop;
274 int nBottom = pRect->yBottom;
0e320a79 275
c9cb56f7 276 ::WinQueryWindowRect((HWND)hWnd, pRect);
0e320a79 277
c9cb56f7 278 if (nLeft < 0)
45fcbf3b 279 return;
0e320a79 280
c9cb56f7
DW
281 if (nLeft < pRect->xLeft)
282 pRect->xLeft = nLeft;
0e320a79 283
c9cb56f7
DW
284 if (nRight > pRect->xRight)
285 pRect->xRight = nRight;
0e320a79 286
c9cb56f7
DW
287 if (nTop < pRect->yTop)
288 pRect->yTop = nTop;
289
290 if (nBottom > pRect->yBottom)
291 pRect->yBottom = nBottom;
292} // end of wxFindMaxSize
0e320a79 293
0e320a79 294