]> git.saurik.com Git - wxWidgets.git/blob - src/os2/button.cpp
Use wxMarkupParser in wxStaticText for dealing with markup.
[wxWidgets.git] / src / os2 / button.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/os2/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 #include "wx/button.h"
16
17 #ifndef WX_PRECOMP
18 #include "wx/app.h"
19 #include "wx/brush.h"
20 #include "wx/panel.h"
21 #include "wx/bmpbuttn.h"
22 #include "wx/settings.h"
23 #include "wx/dcscreen.h"
24 #include "wx/scrolwin.h"
25 #include "wx/toplevel.h"
26 #endif
27
28 #include "wx/stockitem.h"
29 #include "wx/os2/private.h"
30
31 #define BUTTON_HEIGHT_FROM_CHAR_HEIGHT(cy) (11*EDIT_HEIGHT_FROM_CHAR_HEIGHT(cy)/10)
32
33 //
34 // Should be at the very least less than winDEFAULT_BUTTON_MARGIN
35 //
36 #define FOCUS_MARGIN 3
37
38 #ifndef BST_CHECKED
39 #define BST_CHECKED 0x0001
40 #endif
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 ,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 wxTopLevelWindow *tlw = wxDynamicCast(wxGetTopLevelParent(this), wxTopLevelWindow);
119
120 if (tlw)
121 {
122 if (tlw->GetDefaultItem() == this)
123 {
124 //
125 // Don't leave the panel with invalid default item
126 //
127 tlw->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 wxWindow *wxButton::SetDefault()
233 {
234 //
235 // Set this one as the default button both for wxWidgets and Windows
236 //
237 wxWindow* pWinOldDefault = wxButtonBase::SetDefault();
238
239 SetDefaultStyle( wxDynamicCast(pWinOldDefault, wxButton), false);
240 SetDefaultStyle( this, true );
241
242 return pWinOldDefault;
243 } // end of wxButton::SetDefault
244
245 void wxButton::SetTmpDefault()
246 {
247 wxTopLevelWindow *tlw = wxDynamicCast(wxGetTopLevelParent(this), wxTopLevelWindow);
248
249 wxCHECK_RET( tlw, wxT("button without top level window?") );
250
251 wxWindow* pWinOldDefault = tlw->GetDefaultItem();
252
253 tlw->SetTmpDefaultItem(this);
254 SetDefaultStyle( wxDynamicCast(pWinOldDefault, wxButton), false);
255 SetDefaultStyle( this, true );
256 } // end of wxButton::SetTmpDefault
257
258 void wxButton::UnsetTmpDefault()
259 {
260 wxTopLevelWindow *tlw = wxDynamicCast(wxGetTopLevelParent(this), wxTopLevelWindow);
261
262 wxCHECK_RET( tlw, wxT("button without top level window?") );
263
264 tlw->SetTmpDefaultItem(NULL);
265
266 wxWindow* pWinOldDefault = tlw->GetDefaultItem();
267
268 SetDefaultStyle( this, false );
269 SetDefaultStyle( wxDynamicCast(pWinOldDefault, wxButton), true );
270 } // end of wxButton::UnsetTmpDefault
271
272 void wxButton::SetDefaultStyle(
273 wxButton* pBtn
274 , bool bOn
275 )
276 {
277 long lStyle;
278 //
279 // We may be called with NULL pointer -- simpler to do the check here than
280 // in the caller which does wxDynamicCast()
281 //
282 if (!pBtn)
283 return;
284
285 //
286 // First, let DefDlgProc() know about the new default button
287 //
288 if (bOn)
289 {
290 if (!wxTheApp->IsActive())
291 return;
292
293 //
294 // In OS/2 the dialog/panel doesn't really know it has a default
295 // button, the default button simply has that style. We'll just
296 // simulate by setting focus to it
297 //
298 pBtn->SetFocus();
299 }
300 lStyle = ::WinQueryWindowULong(GetHwndOf(pBtn), QWL_STYLE);
301 if (!(lStyle & BS_DEFAULT) == bOn)
302 {
303 if ((lStyle & BS_USERBUTTON) != BS_USERBUTTON)
304 {
305 if (bOn)
306 lStyle |= BS_DEFAULT;
307 else
308 lStyle &= ~BS_DEFAULT;
309 ::WinSetWindowULong(GetHwndOf(pBtn), QWL_STYLE, lStyle);
310 }
311 else
312 {
313 //
314 // Redraw the button - it will notice itself that it's not the
315 // default one any longer
316 //
317 pBtn->Refresh();
318 }
319 }
320 } // end of wxButton::UpdateDefaultStyle
321
322 // ----------------------------------------------------------------------------
323 // event/message handlers
324 // ----------------------------------------------------------------------------
325
326 bool wxButton::OS2Command(WXUINT uParam, WXWORD WXUNUSED(wId))
327 {
328 bool bProcessed = false;
329
330 switch (uParam)
331 {
332 case BN_CLICKED: // normal buttons send this
333 case BN_DBLCLICKED: // owner-drawn ones also send this
334 bProcessed = SendClickEvent();
335 break;
336 }
337
338 return bProcessed;
339 } // end of wxButton::OS2Command
340
341 WXHBRUSH wxButton::OnCtlColor( WXHDC WXUNUSED(pDC),
342 WXHWND WXUNUSED(pWnd),
343 WXUINT WXUNUSED(nCtlColor),
344 WXUINT WXUNUSED(uMessage),
345 WXWPARAM WXUNUSED(wParam),
346 WXLPARAM WXUNUSED(lParam) )
347 {
348 wxBrush* pBackgroundBrush = wxTheBrushList->FindOrCreateBrush( GetBackgroundColour()
349 ,wxSOLID
350 );
351
352 return (WXHBRUSH)pBackgroundBrush->GetResourceHandle();
353 } // end of wxButton::OnCtlColor
354
355 void wxButton::MakeOwnerDrawn()
356 {
357 long lStyle = 0L;
358
359 lStyle = ::WinQueryWindowULong(GetHwnd(), QWL_STYLE);
360 if ((lStyle & BS_USERBUTTON) != BS_USERBUTTON)
361 {
362 //
363 // Make it so
364 //
365 lStyle |= BS_USERBUTTON;
366 ::WinSetWindowULong(GetHwnd(), QWL_STYLE, lStyle);
367 }
368 } // end of wxButton::MakeOwnerDrawn
369
370 WXDWORD wxButton::OS2GetStyle(
371 long lStyle
372 , WXDWORD* pdwExstyle
373 ) const
374 {
375 //
376 // Buttons never have an external border, they draw their own one
377 //
378 WXDWORD dwStyle = wxControl::OS2GetStyle( (lStyle & ~wxBORDER_MASK) | wxBORDER_NONE
379 ,pdwExstyle
380 );
381
382 //
383 // We must use WS_CLIPSIBLINGS with the buttons or they would draw over
384 // each other in any resizeable dialog which has more than one button in
385 // the bottom
386 //
387 dwStyle |= WS_CLIPSIBLINGS;
388 return dwStyle;
389 } // end of wxButton::OS2GetStyle
390
391 MRESULT wxButton::WindowProc( WXUINT uMsg,
392 WXWPARAM wParam,
393 WXLPARAM lParam )
394 {
395 //
396 // When we receive focus, we want to temporary become the default button in
397 // our parent panel so that pressing "Enter" would activate us -- and when
398 // losing it we should restore the previous default button as well
399 //
400 if (uMsg == WM_SETFOCUS)
401 {
402 if (SHORT1FROMMP(lParam) == TRUE)
403 SetTmpDefault();
404 else
405 UnsetTmpDefault();
406
407 //
408 // Let the default processign take place too
409 //
410 }
411
412 else if (uMsg == WM_BUTTON1DBLCLK)
413 {
414 //
415 // Emulate a click event to force an owner-drawn button to change its
416 // appearance - without this, it won't do it
417 //
418 (void)wxControl::OS2WindowProc( WM_BUTTON1DOWN
419 ,wParam
420 ,lParam
421 );
422
423 //
424 // And conitnue with processing the message normally as well
425 //
426 }
427
428 //
429 // Let the base class do all real processing
430 //
431 return (wxControl::OS2WindowProc( uMsg
432 ,wParam
433 ,lParam
434 ));
435 } // end of wxWindowProc