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