]>
Commit | Line | Data |
---|---|---|
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 | ||
29 | IMPLEMENT_ABSTRACT_CLASS(wxControl, wxWindow) | |
30 | ||
31 | BEGIN_EVENT_TABLE(wxControl, wxWindow) | |
32 | EVT_ERASE_BACKGROUND(wxControl::OnEraseBackground) | |
33 | END_EVENT_TABLE() | |
34 | ||
35 | // Item members | |
36 | wxControl::wxControl() | |
37 | { | |
38 | } // end of wxControl::wxControl | |
39 | ||
40 | bool 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 | ||
66 | wxControl::~wxControl() | |
67 | { | |
68 | m_isBeingDeleted = true; | |
69 | } | |
70 | ||
71 | bool 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 | ||
93 | bool 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 | ||
182 | wxSize wxControl::DoGetBestSize() const | |
183 | { | |
184 | return wxSize(DEFAULT_ITEM_WIDTH, DEFAULT_ITEM_HEIGHT); | |
185 | } // end of wxControl::DoGetBestSize | |
186 | ||
187 | bool wxControl::ProcessCommand(wxCommandEvent& event) | |
188 | { | |
189 | return GetEventHandler()->ProcessEvent(event); | |
190 | } | |
191 | ||
192 | WXHBRUSH 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 | ||
217 | void 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 | ||
230 | WXDWORD 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 | ||
246 | void 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. | |
264 | void 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 |