]> git.saurik.com Git - wxWidgets.git/blob - src/os2/button.cpp
no, we shouldn't inconditionally add the separator at the end even if wxPATH_GET_SEPA...
[wxWidgets.git] / src / os2 / button.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: button.cpp
3 // Purpose: wxButton
4 // Author: David Webster
5 // Modified by:
6 // Created: 10/13/99
7 // RCS-ID: $Id$
8 // Copyright: (c) David Webster
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 // For compilers that support precompilation, includes "wx.h".
13 #include "wx/wxprec.h"
14
15 #ifndef WX_PRECOMP
16 #include "wx/button.h"
17 #include "wx/brush.h"
18 #include "wx/panel.h"
19 #include "wx/bmpbuttn.h"
20 #include "wx/settings.h"
21 #include "wx/dcscreen.h"
22 #include "wx/scrolwin.h"
23 #endif
24
25 #include "wx/os2/private.h"
26
27 #define BUTTON_HEIGHT_FROM_CHAR_HEIGHT(cy) (11*EDIT_HEIGHT_FROM_CHAR_HEIGHT(cy)/10)
28
29 //
30 // Should be at the very least less than winDEFAULT_BUTTON_MARGIN
31 //
32 #define FOCUS_MARGIN 3
33
34 #ifndef BST_CHECKED
35 #define BST_CHECKED 0x0001
36 #endif
37
38 IMPLEMENT_DYNAMIC_CLASS(wxButton, wxControl)
39
40 // Button
41
42 bool wxButton::Create(
43 wxWindow* pParent
44 , wxWindowID vId
45 , const wxString& rsLabel
46 , const wxPoint& rPos
47 , const wxSize& rSize
48 , long lStyle
49 #if wxUSE_VALIDATORS
50 , const wxValidator& rValidator
51 #endif
52 , const wxString& rsName
53 )
54 {
55 SetName(rsName);
56 #if wxUSE_VALIDATORS
57 SetValidator(rValidator);
58 #endif
59 m_windowStyle = lStyle;
60 pParent->AddChild((wxButton *)this);
61 if (vId == -1)
62 m_windowId = NewControlId();
63 else
64 m_windowId = vId;
65 lStyle = WS_VISIBLE | WS_TABSTOP | BS_PUSHBUTTON;
66
67 //
68 // OS/2 PM does not have Right/Left/Top/Bottom styles.
69 // We will have to define an additional style when we implement notebooks
70 // for a notebook page button
71 //
72 if (m_windowStyle & wxCLIP_SIBLINGS )
73 lStyle |= WS_CLIPSIBLINGS;
74
75 m_hWnd = (WXHWND)::WinCreateWindow( GetHwndOf(pParent) // Parent handle
76 ,WC_BUTTON // A Button class window
77 ,(PSZ)rsLabel.c_str() // Button text
78 ,lStyle // Button style
79 ,0, 0, 0, 0 // Location and size
80 ,GetHwndOf(pParent) // Owner handle
81 ,HWND_TOP // Top of Z-Order
82 ,vId // Identifier
83 ,NULL // No control data
84 ,NULL // No Presentation parameters
85 );
86 if (m_hWnd == 0)
87 {
88 return FALSE;
89 }
90
91 //
92 // Subclass again for purposes of dialog editing mode
93 //
94 SubclassWin(m_hWnd);
95 wxFont* pButtonFont = new wxFont( 8
96 ,wxSWISS
97 ,wxNORMAL
98 ,wxNORMAL
99 );
100 SetFont(*pButtonFont);
101 SetXComp(0);
102 SetYComp(0);
103 SetSize( rPos.x
104 ,rPos.y
105 ,rSize.x
106 ,rSize.y
107 );
108 delete pButtonFont;
109 return TRUE;
110 } // end of wxButton::Create
111
112 wxButton::~wxButton()
113 {
114 wxPanel* pPanel = wxDynamicCast(GetParent(), wxPanel);
115
116 if (pPanel)
117 {
118 if (pPanel->GetDefaultItem() == this)
119 {
120 //
121 // Don't leave the panel with invalid default item
122 //
123 pPanel->SetDefaultItem(NULL);
124 }
125 }
126 } // end of wxButton::~wxButton
127
128 // ----------------------------------------------------------------------------
129 // size management including autosizing
130 // ----------------------------------------------------------------------------
131
132 wxSize wxButton::DoGetBestSize() const
133 {
134 wxString rsLabel = wxGetWindowText(GetHWND());
135 int nWidthButton;
136 int nWidthChar;
137 int nHeightChar;
138
139 GetTextExtent( rsLabel
140 ,&nWidthButton
141 ,NULL
142 );
143
144 wxGetCharSize( GetHWND()
145 ,&nWidthChar
146 ,&nHeightChar
147 ,(wxFont*)&GetFont()
148 );
149
150 //
151 // Add a margin - the button is wider than just its label
152 //
153 nWidthButton += 3 * nWidthChar;
154
155 //
156 // The button height is proportional to the height of the font used
157 //
158 int nHeightButton = BUTTON_HEIGHT_FROM_CHAR_HEIGHT(nHeightChar);
159
160 //
161 // Need a little extra to make it look right
162 //
163 nHeightButton += nHeightChar/1.5;
164
165 wxSize vSize = GetDefaultSize();
166
167 if (nWidthButton > vSize.x)
168 vSize.x = nWidthButton;
169 if (nHeightButton > vSize.y)
170 vSize.y = nHeightButton;
171 return vSize;
172 } // end of wxButton::DoGetBestSize
173
174 /* static */
175 wxSize wxButton::GetDefaultSize()
176 {
177 static wxSize vSizeBtn;
178
179 if (vSizeBtn.x == 0)
180 {
181 wxScreenDC vDc;
182
183 vDc.SetFont(wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT));
184
185 //
186 // The size of a standard button in the dialog units is 50x14,
187 // translate this to pixels
188 // NB1: the multipliers come from the Windows convention
189 // NB2: the extra +1/+2 were needed to get the size be the same as the
190 // size of the buttons in the standard dialog - I don't know how
191 // this happens, but on my system this size is 75x23 in pixels and
192 // 23*8 isn't even divisible by 14... Would be nice to understand
193 // why these constants are needed though!
194 vSizeBtn.x = (50 * (vDc.GetCharWidth() + 1))/4;
195 vSizeBtn.y = ((14 * vDc.GetCharHeight()) + 2)/8;
196 }
197 return vSizeBtn;
198 } // end of wxButton::GetDefaultSize
199
200 void wxButton::Command (
201 wxCommandEvent& rEvent
202 )
203 {
204 ProcessCommand (rEvent);
205 } // end of wxButton::Command
206
207 // ----------------------------------------------------------------------------
208 // helpers
209 // ----------------------------------------------------------------------------
210
211 bool wxButton::SendClickEvent()
212 {
213 wxCommandEvent vEvent( wxEVT_COMMAND_BUTTON_CLICKED
214 ,GetId()
215 );
216
217 vEvent.SetEventObject(this);
218 return ProcessCommand(vEvent);
219 } // end of wxButton::SendClickEvent
220
221 void wxButton::SetDefault()
222 {
223 wxWindow* pParent = GetParent();
224
225 wxCHECK_RET( pParent, _T("button without parent?") );
226
227 //
228 // Set this one as the default button both for wxWindows and Windows
229 //
230 wxWindow* pWinOldDefault = pParent->SetDefaultItem(this);
231 UpdateDefaultStyle( this
232 ,pWinOldDefault
233 );
234 } // end of wxButton::SetDefault
235
236 void wxButton::SetTmpDefault()
237 {
238 wxWindow* pParent = GetParent();
239
240 wxCHECK_RET( pParent, _T("button without parent?") );
241
242 wxWindow* pWinOldDefault = pParent->GetDefaultItem();
243 pParent->SetTmpDefaultItem(this);
244 if (pWinOldDefault != this)
245 {
246 UpdateDefaultStyle( this
247 ,pWinOldDefault
248 );
249 }
250 //else: no styles to update
251 } // end of wxButton::SetTmpDefault
252
253 void wxButton::UnsetTmpDefault()
254 {
255 wxWindow* pParent = GetParent();
256
257 wxCHECK_RET( pParent, _T("button without parent?") );
258
259 pParent->SetTmpDefaultItem(NULL);
260
261 wxWindow* pWinOldDefault = pParent->GetDefaultItem();
262
263 if (pWinOldDefault != this)
264 {
265 UpdateDefaultStyle( pWinOldDefault
266 ,this
267 );
268 }
269 //else: we had been default before anyhow
270 } // end of wxButton::UnsetTmpDefault
271
272 void wxButton::UpdateDefaultStyle(
273 wxWindow* pWinDefault
274 , wxWindow* pWinOldDefault)
275 {
276 wxButton* pBtnOldDefault = wxDynamicCast(pWinOldDefault, wxButton);
277 long lStyle;
278
279 if ( pBtnOldDefault && pBtnOldDefault != pWinDefault )
280 {
281 lStyle = ::WinQueryWindowULong(GetHwndOf(pBtnOldDefault), QWL_STYLE);
282 if ((lStyle & BS_USERBUTTON) != BS_USERBUTTON)
283 {
284 lStyle &= ~BS_DEFAULT;
285 ::WinSetWindowULong(GetHwndOf(pBtnOldDefault), QWL_STYLE, lStyle);
286 }
287 else
288 {
289 // redraw the button - it will notice itself that it's not the
290 // default one any longer
291 pBtnOldDefault->Refresh();
292 }
293 }
294
295 wxButton* pBtnDefault = wxDynamicCast(pWinDefault, wxButton);
296
297 if (pBtnDefault)
298 {
299 lStyle = ::WinQueryWindowULong(GetHwndOf(pBtnDefault), QWL_STYLE);
300 if ((lStyle & BS_USERBUTTON) != BS_USERBUTTON)
301 {
302 lStyle != BS_DEFAULT;
303 ::WinSetWindowULong(GetHwndOf(pBtnDefault), QWL_STYLE, lStyle);
304 }
305 }
306 } // end of wxButton::UpdateDefaultStyle
307
308 // ----------------------------------------------------------------------------
309 // event/message handlers
310 // ----------------------------------------------------------------------------
311
312 bool wxButton::OS2Command(
313 WXUINT uParam
314 , WXWORD wId
315 )
316 {
317 bool bProcessed = FALSE;
318
319 switch (uParam)
320 {
321 case BN_CLICKED: // normal buttons send this
322 case BN_DBLCLICKED: // owner-drawn ones also send this
323 bProcessed = SendClickEvent();
324 break;
325 }
326 return bProcessed;
327 } // end of wxButton::OS2Command
328
329 WXHBRUSH wxButton::OnCtlColor(
330 WXHDC pDC
331 , WXHWND pWnd
332 , WXUINT nCtlColor
333 , WXUINT uMessage
334 , WXWPARAM wParam
335 , WXLPARAM lParam
336 )
337 {
338 wxBrush* pBackgroundBrush = wxTheBrushList->FindOrCreateBrush( GetBackgroundColour()
339 ,wxSOLID
340 );
341
342 return (WXHBRUSH)pBackgroundBrush->GetResourceHandle();
343 } // end of wxButton::OnCtlColor
344
345 void wxButton::MakeOwnerDrawn()
346 {
347 long lStyle = 0L;
348
349 lStyle = ::WinQueryWindowULong(GetHwnd(), QWL_STYLE);
350 if ((lStyle & BS_USERBUTTON) != BS_USERBUTTON)
351 {
352 //
353 // Make it so
354 //
355 lStyle |= BS_USERBUTTON;
356 ::WinSetWindowULong(GetHwnd(), QWL_STYLE, lStyle);
357 }
358 } // end of wxButton::MakeOwnerDrawn
359
360 WXDWORD wxButton::OS2GetStyle(
361 long lStyle
362 , WXDWORD* pdwExstyle
363 ) const
364 {
365 //
366 // Buttons never have an external border, they draw their own one
367 //
368 WXDWORD dwStyle = wxControl::OS2GetStyle( (lStyle & ~wxBORDER_MASK) | wxBORDER_NONE
369 ,pdwExstyle
370 );
371
372 //
373 // We must use WS_CLIPSIBLINGS with the buttons or they would draw over
374 // each other in any resizeable dialog which has more than one button in
375 // the bottom
376 //
377 dwStyle |= WS_CLIPSIBLINGS;
378 return dwStyle;
379 } // end of wxButton::OS2GetStyle
380
381 MRESULT wxButton::WindowProc(
382 WXUINT uMsg
383 , WXWPARAM wParam
384 , WXLPARAM lParam
385 )
386 {
387 //
388 // When we receive focus, we want to temporary become the default button in
389 // our parent panel so that pressing "Enter" would activate us -- and when
390 // losing it we should restore the previous default button as well
391 //
392 if (uMsg == WM_SETFOCUS)
393 {
394 if (SHORT1FROMMP(lParam) == TRUE)
395 SetTmpDefault();
396 else
397 UnsetTmpDefault();
398
399 //
400 // Let the default processign take place too
401 //
402 }
403
404 else if (uMsg == WM_BUTTON1DBLCLK)
405 {
406 //
407 // Emulate a click event to force an owner-drawn button to change its
408 // appearance - without this, it won't do it
409 //
410 (void)wxControl::OS2WindowProc( WM_BUTTON1DOWN
411 ,wParam
412 ,lParam
413 );
414
415 //
416 // And conitnue with processing the message normally as well
417 //
418 }
419
420 //
421 // Let the base class do all real processing
422 //
423 return (wxControl::OS2WindowProc( uMsg
424 ,wParam
425 ,lParam
426 ));
427 } // end of wxWindowProc
428