1 /////////////////////////////////////////////////////////////////////////////
2 // Name: msw/spinctrl.cpp
3 // Purpose: wxSpinCtrl class implementation for Win32
4 // Author: Vadim Zeitlin
8 // Copyright: (c) Vadim Zeitlin
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 // ============================================================================
14 // ============================================================================
17 #pragma implementation "spinctrlbase.h"
18 #pragma implementation "spinctrl.h"
21 // ----------------------------------------------------------------------------
23 // ----------------------------------------------------------------------------
25 // for compilers that support precompilation, includes "wx.h".
26 #include "wx/wxprec.h"
38 #if defined(__WIN95__)
40 #include "wx/spinctrl.h"
41 #include "wx/msw/private.h"
43 #if defined(__WIN95__) && !((defined(__GNUWIN32_OLD__) || defined(__TWIN32__)) && !defined(__CYGWIN10__))
47 #include <limits.h> // for INT_MIN
49 // ----------------------------------------------------------------------------
51 // ----------------------------------------------------------------------------
53 IMPLEMENT_DYNAMIC_CLASS(wxSpinCtrl
, wxControl
)
55 BEGIN_EVENT_TABLE(wxSpinCtrl
, wxSpinButton
)
56 EVT_CHAR(wxSpinCtrl::OnChar
)
57 EVT_SPIN(-1, wxSpinCtrl::OnSpinChange
)
60 #define GetBuddyHwnd() (HWND)(m_hwndBuddy)
62 // ----------------------------------------------------------------------------
64 // ----------------------------------------------------------------------------
66 // the margin between the up-down control and its buddy (can be arbitrary,
67 // choose what you like - or may be decide during run-time depending on the
69 static const int MARGIN_BETWEEN
= 1;
71 // ============================================================================
73 // ============================================================================
75 wxArraySpins
wxSpinCtrl::ms_allSpins
;
77 // ----------------------------------------------------------------------------
78 // wnd proc for the buddy text ctrl
79 // ----------------------------------------------------------------------------
81 LRESULT APIENTRY _EXPORT
wxBuddyTextWndProc(HWND hwnd
,
86 wxSpinCtrl
*spin
= (wxSpinCtrl
*)::GetWindowLong(hwnd
, GWL_USERDATA
);
88 // forward some messages (the key and focus ones only so far) to
98 spin
->MSWWindowProc(message
, wParam
, lParam
);
100 // The control may have been deleted at this point, so check.
101 if (!(::IsWindow(hwnd
) && ((wxSpinCtrl
*)::GetWindowLong(hwnd
, GWL_USERDATA
)) == spin
))
106 // we want to get WXK_RETURN in order to generate the event for it
107 return DLGC_WANTCHARS
;
110 return ::CallWindowProc(CASTWNDPROC spin
->GetBuddyWndProc(),
111 hwnd
, message
, wParam
, lParam
);
115 wxSpinCtrl
*wxSpinCtrl::GetSpinForTextCtrl(WXHWND hwndBuddy
)
117 wxSpinCtrl
*spin
= (wxSpinCtrl
*)::GetWindowLong((HWND
)hwndBuddy
,
120 int i
= ms_allSpins
.Index(spin
);
122 if ( i
== wxNOT_FOUND
)
126 wxASSERT_MSG( spin
->m_hwndBuddy
== hwndBuddy
,
127 _T("wxSpinCtrl has incorrect buddy HWND!") );
132 // process a WM_COMMAND generated by the buddy text control
133 bool wxSpinCtrl::ProcessTextCommand(WXWORD cmd
, WXWORD
WXUNUSED(id
))
139 wxCommandEvent
event(wxEVT_COMMAND_TEXT_UPDATED
, GetId());
140 event
.SetEventObject(this);
141 wxString val
= wxGetWindowText(m_hwndBuddy
);
142 event
.SetString(val
);
143 event
.SetInt(GetValue());
144 return GetEventHandler()->ProcessEvent(event
);
149 wxFocusEvent
event(cmd
== EN_KILLFOCUS
? wxEVT_KILL_FOCUS
152 event
.SetEventObject( this );
153 return GetEventHandler()->ProcessEvent(event
);
163 void wxSpinCtrl::OnChar(wxKeyEvent
& event
)
165 switch ( event
.KeyCode() )
169 wxCommandEvent
event(wxEVT_COMMAND_TEXT_ENTER
, m_windowId
);
170 InitCommandEvent(event
);
171 wxString val
= wxGetWindowText(m_hwndBuddy
);
172 event
.SetString(val
);
173 event
.SetInt(GetValue());
174 if ( GetEventHandler()->ProcessEvent(event
) )
180 // always produce navigation event - even if we process TAB
181 // ourselves the fact that we got here means that the user code
182 // decided to skip processing of this TAB - probably to let it
183 // do its default job.
185 wxNavigationKeyEvent eventNav
;
186 eventNav
.SetDirection(!event
.ShiftDown());
187 eventNav
.SetWindowChange(event
.ControlDown());
188 eventNav
.SetEventObject(this);
190 if ( GetParent()->GetEventHandler()->ProcessEvent(eventNav
) )
196 // no, we didn't process it
200 // ----------------------------------------------------------------------------
202 // ----------------------------------------------------------------------------
204 bool wxSpinCtrl::Create(wxWindow
*parent
,
206 const wxString
& value
,
210 int min
, int max
, int initial
,
211 const wxString
& name
)
213 // before using DoGetBestSize(), have to set style to let the base class
214 // know whether this is a horizontal or vertical control (we're always
216 style
|= wxSP_VERTICAL
;
217 SetWindowStyle(style
);
219 // calculate the sizes: the size given is the toal size for both controls
220 // and we need to fit them both in the given width (height is the same)
221 wxSize
sizeText(size
), sizeBtn(size
);
222 sizeBtn
.x
= wxSpinButton::DoGetBestSize().x
;
223 if ( sizeText
.x
<= 0 )
225 // DEFAULT_ITEM_WIDTH is the default width for the text control
226 sizeText
.x
= DEFAULT_ITEM_WIDTH
+ MARGIN_BETWEEN
+ sizeBtn
.x
;
229 sizeText
.x
-= sizeBtn
.x
+ MARGIN_BETWEEN
;
230 if ( sizeText
.x
<= 0 )
232 wxLogDebug(_T("not enough space for wxSpinCtrl!"));
236 posBtn
.x
+= sizeText
.x
+ MARGIN_BETWEEN
;
238 // create the spin button
239 if ( !wxSpinButton::Create(parent
, id
, posBtn
, sizeBtn
, style
, name
) )
248 WXDWORD exStyle
= Determine3DEffects(WS_EX_CLIENTEDGE
, &want3D
);
249 int msStyle
= WS_CHILD
;
251 // Even with extended styles, need to combine with WS_BORDER for them to
253 if ( want3D
|| wxStyleHasBorder(style
) )
254 msStyle
|= WS_BORDER
;
256 if ( style
& wxCLIP_SIBLINGS
)
257 msStyle
|= WS_CLIPSIBLINGS
;
259 // create the text window
260 m_hwndBuddy
= (WXHWND
)::CreateWindowEx
262 exStyle
, // sunken border
263 _T("EDIT"), // window class
264 NULL
, // no window title
265 msStyle
/* | WS_CLIPSIBLINGS */, // style (will be shown later)
266 pos
.x
, pos
.y
, // position
267 0, 0, // size (will be set later)
268 GetHwndOf(parent
), // parent
269 (HMENU
)-1, // control id
270 wxGetInstance(), // app instance
271 NULL
// unused client data
276 wxLogLastError(wxT("CreateWindow(buddy text window)"));
281 // subclass the text ctrl to be able to intercept some events
282 m_wndProcBuddy
= (WXFARPROC
)::GetWindowLong(GetBuddyHwnd(), GWL_WNDPROC
);
283 ::SetWindowLong(GetBuddyHwnd(), GWL_USERDATA
, (LONG
)this);
284 ::SetWindowLong(GetBuddyHwnd(), GWL_WNDPROC
, (LONG
)wxBuddyTextWndProc
);
286 // should have the same font as the other controls
287 SetFont(GetParent()->GetFont());
289 // set the size of the text window - can do it only now, because we
290 // couldn't call DoGetBestSize() before as font wasn't set
291 if ( sizeText
.y
<= 0 )
294 wxGetCharSize(GetHWND(), &cx
, &cy
, &GetFont());
296 sizeText
.y
= EDIT_HEIGHT_FROM_CHAR_HEIGHT(cy
);
299 DoMoveWindow(pos
.x
, pos
.y
,
300 sizeText
.x
+ sizeBtn
.x
+ MARGIN_BETWEEN
, sizeText
.y
);
302 (void)::ShowWindow(GetBuddyHwnd(), SW_SHOW
);
304 // associate the text window with the spin button
305 (void)::SendMessage(GetHwnd(), UDM_SETBUDDY
, (WPARAM
)m_hwndBuddy
, 0);
307 if ( !value
.IsEmpty() )
312 // do it after finishing with m_hwndBuddy creation to avoid generating
313 // initial wxEVT_COMMAND_TEXT_UPDATED message
314 ms_allSpins
.Add(this);
319 wxSpinCtrl::~wxSpinCtrl()
321 ms_allSpins
.Remove(this);
323 // This removes spurious memory leak reporting
324 if (ms_allSpins
.GetCount() == 0)
327 // destroy the buddy window because this pointer which wxBuddyTextWndProc
328 // uses will not soon be valid any more
329 ::DestroyWindow(GetBuddyHwnd());
332 // ----------------------------------------------------------------------------
333 // wxTextCtrl-like methods
334 // ----------------------------------------------------------------------------
336 void wxSpinCtrl::SetValue(const wxString
& text
)
338 if ( !::SetWindowText(GetBuddyHwnd(), text
.c_str()) )
340 wxLogLastError(wxT("SetWindowText(buddy)"));
344 int wxSpinCtrl::GetValue() const
346 wxString val
= wxGetWindowText(m_hwndBuddy
);
349 if ( (wxSscanf(val
, wxT("%lu"), &n
) != 1) )
355 void wxSpinCtrl::SetSelection(long from
, long to
)
357 // if from and to are both -1, it means (in wxWindows) that all text should
358 // be selected - translate into Windows convention
359 if ( (from
== -1) && (to
== -1) )
364 ::SendMessage((HWND
)m_hwndBuddy
, EM_SETSEL
, (WPARAM
)from
, (LPARAM
)to
);
367 // ----------------------------------------------------------------------------
368 // forward some methods to subcontrols
369 // ----------------------------------------------------------------------------
371 bool wxSpinCtrl::SetFont(const wxFont
& font
)
373 if ( !wxWindowBase::SetFont(font
) )
379 WXHANDLE hFont
= GetFont().GetResourceHandle();
380 (void)::SendMessage(GetBuddyHwnd(), WM_SETFONT
, (WPARAM
)hFont
, TRUE
);
385 bool wxSpinCtrl::Show(bool show
)
387 if ( !wxControl::Show(show
) )
392 ::ShowWindow(GetBuddyHwnd(), show
? SW_SHOW
: SW_HIDE
);
397 bool wxSpinCtrl::Enable(bool enable
)
399 if ( !wxControl::Enable(enable
) )
404 ::EnableWindow(GetBuddyHwnd(), enable
);
409 void wxSpinCtrl::SetFocus()
411 ::SetFocus(GetBuddyHwnd());
414 // ----------------------------------------------------------------------------
416 // ----------------------------------------------------------------------------
418 void wxSpinCtrl::OnSpinChange(wxSpinEvent
& eventSpin
)
420 wxCommandEvent
event(wxEVT_COMMAND_SPINCTRL_UPDATED
, GetId());
421 event
.SetEventObject(this);
422 event
.SetInt(eventSpin
.GetPosition());
424 (void)GetEventHandler()->ProcessEvent(event
);
426 if ( eventSpin
.GetSkipped() )
432 // ----------------------------------------------------------------------------
434 // ----------------------------------------------------------------------------
436 wxSize
wxSpinCtrl::DoGetBestSize() const
438 wxSize sizeBtn
= wxSpinButton::DoGetBestSize();
439 sizeBtn
.x
+= DEFAULT_ITEM_WIDTH
+ MARGIN_BETWEEN
;
442 wxGetCharSize(GetHWND(), NULL
, &y
, &GetFont());
443 y
= EDIT_HEIGHT_FROM_CHAR_HEIGHT(y
);
447 // make the text tall enough
454 void wxSpinCtrl::DoMoveWindow(int x
, int y
, int width
, int height
)
456 int widthBtn
= wxSpinButton::DoGetBestSize().x
;
457 int widthText
= width
- widthBtn
- MARGIN_BETWEEN
;
458 if ( widthText
<= 0 )
460 wxLogDebug(_T("not enough space for wxSpinCtrl!"));
463 if ( !::MoveWindow(GetBuddyHwnd(), x
, y
, widthText
, height
, TRUE
) )
465 wxLogLastError(wxT("MoveWindow(buddy)"));
468 x
+= widthText
+ MARGIN_BETWEEN
;
469 if ( !::MoveWindow(GetHwnd(), x
, y
, widthBtn
, height
, TRUE
) )
471 wxLogLastError(wxT("MoveWindow"));
475 // get total size of the control
476 void wxSpinCtrl::DoGetSize(int *x
, int *y
) const
478 RECT spinrect
, textrect
, ctrlrect
;
479 GetWindowRect(GetHwnd(), &spinrect
);
480 GetWindowRect(GetBuddyHwnd(), &textrect
);
481 UnionRect(&ctrlrect
,&textrect
, &spinrect
);
484 *x
= ctrlrect
.right
- ctrlrect
.left
;
486 *y
= ctrlrect
.bottom
- ctrlrect
.top
;
489 void wxSpinCtrl::DoGetPosition(int *x
, int *y
) const
491 // hack: pretend that our HWND is the text control just for a moment
492 WXHWND hWnd
= GetHWND();
493 wxConstCast(this, wxSpinCtrl
)->m_hWnd
= m_hwndBuddy
;
495 wxSpinButton::DoGetPosition(x
, y
);
497 wxConstCast(this, wxSpinCtrl
)->m_hWnd
= hWnd
;