]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/os2/control.cpp
don't reserve space in the header for the column image if there is none (patch 1225522)
[wxWidgets.git] / src / os2 / control.cpp
... / ...
CommitLineData
1/////////////////////////////////////////////////////////////////////////////
2// Name: control.cpp
3// Purpose: wxControl class
4// Author: David Webster
5// Modified by:
6// Created: 09/17/99
7// RCS-ID: $Id$
8// Copyright: (c) Julian Smart
9// Licence: wxWindows licence
10/////////////////////////////////////////////////////////////////////////////
11
12#ifdef __GNUG__
13#pragma implementation "control.h"
14#endif
15
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"
23#include "wx/scrolwin.h"
24#include "wx/log.h"
25#endif
26#include "wx/os2/private.h"
27#include "wx/control.h"
28
29IMPLEMENT_ABSTRACT_CLASS(wxControl, wxWindow)
30
31BEGIN_EVENT_TABLE(wxControl, wxWindow)
32 EVT_ERASE_BACKGROUND(wxControl::OnEraseBackground)
33END_EVENT_TABLE()
34
35// Item members
36wxControl::wxControl()
37{
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
46, const wxValidator& rValidator
47, const wxString& rsName
48)
49{
50 bool bRval = wxWindow::Create( pParent
51 ,vId
52 ,rPos
53 ,rSize
54 ,lStyle
55 ,rsName
56 );
57 if (bRval)
58 {
59#if wxUSE_VALIDATORS
60 SetValidator(rValidator);
61#endif
62 }
63 return bRval;
64} // end of wxControl::Create
65
66wxControl::~wxControl()
67{
68 m_isBeingDeleted = true;
69}
70
71bool wxControl::OS2CreateControl(
72 const wxChar* zClassname
73, const wxString& rsLabel
74, const wxPoint& rPos
75, const wxSize& rSize
76, long lStyle
77)
78{
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 );
91} // end of wxControl::OS2CreateControl
92
93bool wxControl::OS2CreateControl( const wxChar* zClassname,
94 WXDWORD dwStyle,
95 const wxPoint& rPos,
96 const wxSize& rSize,
97 const wxString& rsLabel,
98 WXDWORD dwExstyle )
99{
100 //
101 // Doesn't do anything at all under OS/2
102 //
103 if (dwExstyle == (WXDWORD)-1)
104 {
105 dwExstyle = 0;
106 (void) OS2GetStyle(GetWindowStyle(), &dwExstyle);
107 }
108 //
109 // All controls should have these styles (wxWidgets creates all controls
110 // visible by default)
111 //
112 if (m_isShown )
113 dwStyle |= WS_VISIBLE;
114
115 wxWindow* pParent = GetParent();
116 PSZ zClass = "";
117
118 if (!pParent)
119 return FALSE;
120
121 if ((wxStrcmp(zClassname, _T("COMBOBOX"))) == 0)
122 zClass = WC_COMBOBOX;
123 else if ((wxStrcmp(zClassname, _T("STATIC"))) == 0)
124 zClass = WC_STATIC;
125 else if ((wxStrcmp(zClassname, _T("BUTTON"))) == 0)
126 zClass = WC_BUTTON;
127 else if ((wxStrcmp(zClassname, _T("NOTEBOOK"))) == 0)
128 zClass = WC_NOTEBOOK;
129 else if ((wxStrcmp(zClassname, _T("CONTAINER"))) == 0)
130 zClass = WC_CONTAINER;
131 dwStyle |= WS_VISIBLE;
132
133 wxString sLabel = ::wxPMTextToLabel(rsLabel);
134
135 m_hWnd = (WXHWND)::WinCreateWindow( (HWND)GetHwndOf(pParent) // Parent window handle
136 ,(PSZ)zClass // Window class
137 ,(PSZ)sLabel.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
148 );
149
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 }
158 //
159 // Subclass again for purposes of dialog editing mode
160 //
161 SubclassWin(m_hWnd);
162
163 //
164 // Controls use the same colours as their parent dialog by default
165 //
166 InheritAttributes();
167 //
168 // All OS/2 ctrls use the small font
169 //
170 SetFont(*wxSMALL_FONT);
171
172 SetXComp(0);
173 SetYComp(0);
174 SetSize( rPos.x
175 ,rPos.y
176 ,rSize.x
177 ,rSize.y
178 );
179 return true;
180} // end of wxControl::OS2CreateControl
181
182wxSize wxControl::DoGetBestSize() const
183{
184 return wxSize(DEFAULT_ITEM_WIDTH, DEFAULT_ITEM_HEIGHT);
185} // end of wxControl::DoGetBestSize
186
187bool wxControl::ProcessCommand(wxCommandEvent& event)
188{
189 return GetEventHandler()->ProcessEvent(event);
190}
191
192WXHBRUSH wxControl::OnCtlColor(WXHDC hWxDC,
193 WXHWND WXUNUSED(hWnd),
194 WXUINT WXUNUSED(uCtlColor),
195 WXUINT WXUNUSED(uMessage),
196 WXWPARAM WXUNUSED(wParam),
197 WXLPARAM WXUNUSED(lParam))
198{
199 HPS hPS = (HPS)hWxDC; // pass in a PS handle in OS/2
200 wxColour vColFore = GetForegroundColour();
201 wxColour vColBack = GetBackgroundColour();
202
203 if (GetParent()->GetTransparentBackground())
204 ::GpiSetBackMix(hPS, BM_LEAVEALONE);
205 else
206 ::GpiSetBackMix(hPS, BM_OVERPAINT);
207
208 ::GpiSetBackColor(hPS, vColBack.GetPixel());
209 ::GpiSetColor(hPS, vColFore.GetPixel());
210
211 wxBrush* pBrush = wxTheBrushList->FindOrCreateBrush( vColBack
212 ,wxSOLID
213 );
214 return (WXHBRUSH)pBrush->GetResourceHandle();
215} // end of wxControl::OnCtlColor
216
217void wxControl::OnEraseBackground(
218 wxEraseEvent& rEvent
219)
220{
221 RECTL vRect;
222 HPS hPS = rEvent.GetDC()->GetHPS();
223 SIZEL vSize = {0,0};
224
225 ::GpiSetPS(hPS, &vSize, PU_PELS | GPIF_DEFAULT);
226 ::WinQueryWindowRect((HWND)GetHwnd(), &vRect);
227 ::WinFillRect(hPS, &vRect, GetBackgroundColour().GetPixel());
228} // end of wxControl::OnEraseBackground
229
230WXDWORD wxControl::OS2GetStyle(
231 long lStyle
232, WXDWORD* pdwExstyle
233) const
234{
235 long dwStyle = wxWindow::OS2GetStyle( lStyle
236 ,pdwExstyle
237 );
238
239 if (AcceptsFocus())
240 {
241 dwStyle |= WS_TABSTOP;
242 }
243 return dwStyle;
244} // end of wxControl::OS2GetStyle
245
246void wxControl::SetLabel(
247 const wxString& rsLabel
248)
249{
250 wxString sLabel = ::wxPMTextToLabel(rsLabel);
251
252 ::WinSetWindowText(GetHwnd(), (PSZ)sLabel.c_str());
253} // end of wxControl::SetLabel
254
255// ---------------------------------------------------------------------------
256// global functions
257// ---------------------------------------------------------------------------
258
259// Call this repeatedly for several wnds to find the overall size
260// of the widget.
261// Call it initially with -1 for all values in rect.
262// Keep calling for other widgets, and rect will be modified
263// to calculate largest bounding rectangle.
264void wxFindMaxSize(
265 WXHWND hWnd
266, RECT* pRect
267)
268{
269 int nLeft = pRect->xLeft;
270 int nRight = pRect->xRight;
271 int nTop = pRect->yTop;
272 int nBottom = pRect->yBottom;
273
274 ::WinQueryWindowRect((HWND)hWnd, pRect);
275
276 if (nLeft < 0)
277 return;
278
279 if (nLeft < pRect->xLeft)
280 pRect->xLeft = nLeft;
281
282 if (nRight > pRect->xRight)
283 pRect->xRight = nRight;
284
285 if (nTop > pRect->yTop)
286 pRect->yTop = nTop;
287
288 if (nBottom < pRect->yBottom)
289 pRect->yBottom = nBottom;
290} // end of wxFindMaxSize