1 /////////////////////////////////////////////////////////////////////////////
5 // Modified by: Mark Newsam (Based on GTK file)
7 // Copyright: (c) Robert Roebling
8 // Licence: wxWindows licence
9 /////////////////////////////////////////////////////////////////////////////
11 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
12 #pragma implementation "spinctrl.h"
19 #include "wx/spinbutt.h"
20 #include "wx/spinctrl.h"
21 #include "wx/textctrl.h"
24 // ----------------------------------------------------------------------------
26 // ----------------------------------------------------------------------------
28 // the focus rect around a text may have 4 pixels in each direction
29 // we handle these problems right now in an extended vis region of a window
30 static const wxCoord TEXTBORDER
= 0 ;
31 // the margin between the text control and the spin
32 static const wxCoord MARGIN
= 8 - TEXTBORDER
;
34 // ----------------------------------------------------------------------------
35 // wxSpinCtrlText: text control used by spin control
36 // ----------------------------------------------------------------------------
38 class wxSpinCtrlText
: public wxTextCtrl
41 wxSpinCtrlText(wxSpinCtrl
*spin
, const wxString
& value
)
42 : wxTextCtrl(spin
, -1, value
, wxDefaultPosition
, wxSize(40, -1))
46 // remove the default minsize, the spinctrl will have one instead
51 void OnTextChange(wxCommandEvent
& event
)
54 if ( m_spin
->GetTextValue(&val
) )
56 m_spin
->GetSpinButton()->SetValue(val
);
62 bool ProcessEvent(wxEvent
&event
)
64 // Hand button down events to wxSpinCtrl. Doesn't work.
65 if (event
.GetEventType() == wxEVT_LEFT_DOWN
&& m_spin
->ProcessEvent( event
))
68 return wxTextCtrl::ProcessEvent( event
);
77 BEGIN_EVENT_TABLE(wxSpinCtrlText
, wxTextCtrl
)
78 EVT_TEXT(-1, wxSpinCtrlText::OnTextChange
)
81 // ----------------------------------------------------------------------------
82 // wxSpinCtrlButton: spin button used by spin control
83 // ----------------------------------------------------------------------------
85 class wxSpinCtrlButton
: public wxSpinButton
88 wxSpinCtrlButton(wxSpinCtrl
*spin
, int style
)
92 SetWindowStyle(style
| wxSP_VERTICAL
);
94 // TODO: The spin button gets truncated a little bit due to size
95 // differences so change it's default size a bit. SMALL still gets a
96 // bit truncated, but MINI seems to be too small... Readdress this
97 // when the textctrl issues are all sorted out.
98 //SetWindowVariant(wxWINDOW_VARIANT_SMALL);
100 // remove the default minsize, the spinctrl will have one instead
105 void OnSpinButton(wxSpinEvent
& eventSpin
)
107 m_spin
->SetTextValue(eventSpin
.GetPosition());
109 wxCommandEvent
event(wxEVT_COMMAND_SPINCTRL_UPDATED
, m_spin
->GetId());
110 event
.SetEventObject(m_spin
);
111 event
.SetInt(eventSpin
.GetPosition());
113 m_spin
->GetEventHandler()->ProcessEvent(event
);
119 DECLARE_EVENT_TABLE()
122 BEGIN_EVENT_TABLE(wxSpinCtrlButton
, wxSpinButton
)
123 EVT_SPIN(-1, wxSpinCtrlButton::OnSpinButton
)
126 IMPLEMENT_DYNAMIC_CLASS(wxSpinCtrl
, wxControl
)
128 // ============================================================================
130 // ============================================================================
132 // ----------------------------------------------------------------------------
133 // wxSpinCtrl creation
134 // ----------------------------------------------------------------------------
136 void wxSpinCtrl::Init()
142 bool wxSpinCtrl::Create(wxWindow
*parent
,
144 const wxString
& value
,
151 const wxString
& name
)
153 m_macIsUserPane
= true;
154 if ( !wxControl::Create(parent
, id
, pos
, size
, style
,
155 wxDefaultValidator
, name
) )
160 // the string value overrides the numeric one (for backwards compatibility
161 // reasons and also because it is simpler to satisfy the string value which
162 // comes much sooner in the list of arguments and leave the initial
163 // parameter unspecified)
164 if ( !value
.empty() )
167 if ( value
.ToLong(&l
) )
171 wxSize csize
= size
;
172 m_text
= new wxSpinCtrlText(this, value
);
173 m_btn
= new wxSpinCtrlButton(this, style
);
175 m_btn
->SetRange(min
, max
);
176 m_btn
->SetValue(initial
);
179 csize
.x
= m_text
->GetSize().x
+ MARGIN
+ m_btn
->GetSize().x
;
182 if ( size
.y
== -1 ) {
183 csize
.y
= m_text
->GetSize().y
+ 2 * TEXTBORDER
; //allow for text border highlights
184 if ( m_btn
->GetSize().y
> csize
.y
)
185 csize
.y
= m_btn
->GetSize().y
;
190 MacPostControlCreate(pos
, csize
);
191 SetInitialBestSize(csize
);
196 wxSpinCtrl::~wxSpinCtrl()
198 // delete the controls now, don't leave them alive even though they would
199 // still be eventually deleted by our parent - but it will be too late, the
200 // user code expects them to be gone now
207 // ----------------------------------------------------------------------------
209 // ----------------------------------------------------------------------------
211 wxSize
wxSpinCtrl::DoGetBestSize() const
213 if (!m_btn
|| !m_text
)
216 wxSize sizeBtn
= m_btn
->GetBestSize(),
217 sizeText
= m_text
->GetBestSize();
219 sizeText
.y
+= 2 * TEXTBORDER
;
220 sizeText
.x
+= 2 * TEXTBORDER
;
223 if (sizeText
.y
> sizeBtn
.y
)
228 return wxSize(sizeBtn
.x
+ sizeText
.x
+ MARGIN
, height
);
231 void wxSpinCtrl::DoMoveWindow(int x
, int y
, int width
, int height
)
233 // position the subcontrols inside the client area
234 wxSize sizeBtn
= m_btn
->GetSize();
235 wxSize sizeText
= m_text
->GetSize();
237 wxControl::DoMoveWindow(x
, y
, width
, height
);
239 wxCoord wText
= width
- sizeBtn
.x
- MARGIN
- 2 * TEXTBORDER
;
241 m_text
->SetSize(TEXTBORDER
, (height
- sizeText
.y
) / 2, wText
, -1);
242 m_btn
->SetSize(0 + wText
+ MARGIN
+ 2 * TEXTBORDER
, (height
- sizeBtn
.y
) / 2 , -1, -1 );
245 // ----------------------------------------------------------------------------
246 // operations forwarded to the subcontrols
247 // ----------------------------------------------------------------------------
249 bool wxSpinCtrl::Enable(bool enable
)
251 if ( !wxControl::Enable(enable
) )
256 bool wxSpinCtrl::Show(bool show
)
258 if ( !wxControl::Show(show
) )
263 // ----------------------------------------------------------------------------
264 // value and range access
265 // ----------------------------------------------------------------------------
267 bool wxSpinCtrl::GetTextValue(int *val
) const
270 if ( !m_text
->GetValue().ToLong(&l
) )
272 // not a number at all
276 if ( l
< GetMin() || l
> GetMax() )
287 int wxSpinCtrl::GetValue() const
289 return m_btn
? m_btn
->GetValue() : 0;
292 int wxSpinCtrl::GetMin() const
294 return m_btn
? m_btn
->GetMin() : 0;
297 int wxSpinCtrl::GetMax() const
299 return m_btn
? m_btn
->GetMax() : 0;
302 // ----------------------------------------------------------------------------
303 // changing value and range
304 // ----------------------------------------------------------------------------
306 void wxSpinCtrl::SetTextValue(int val
)
308 wxCHECK_RET( m_text
, _T("invalid call to wxSpinCtrl::SetTextValue") );
310 m_text
->SetValue(wxString::Format(_T("%d"), val
));
313 m_text
->SetSelection(0, -1);
315 // and give focus to the control!
316 // m_text->SetFocus(); Why???? TODO.
319 void wxSpinCtrl::SetValue(int val
)
321 wxCHECK_RET( m_btn
, _T("invalid call to wxSpinCtrl::SetValue") );
325 m_btn
->SetValue(val
);
328 void wxSpinCtrl::SetValue(const wxString
& text
)
330 wxCHECK_RET( m_text
, _T("invalid call to wxSpinCtrl::SetValue") );
333 if ( text
.ToLong(&val
) && ((val
> INT_MIN
) && (val
< INT_MAX
)) )
337 else // not a number at all or out of range
339 m_text
->SetValue(text
);
340 m_text
->SetSelection(0, -1);
344 void wxSpinCtrl::SetRange(int min
, int max
)
346 wxCHECK_RET( m_btn
, _T("invalid call to wxSpinCtrl::SetRange") );
348 m_btn
->SetRange(min
, max
);
351 void wxSpinCtrl::SetSelection(long from
, long to
)
353 // if from and to are both -1, it means (in wxWidgets) that all text should
355 if ( (from
== -1) && (to
== -1) )
359 m_text
->SetSelection(from
, to
);
362 #endif // wxUSE_SPINCTRL