]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/msw/spinbutt.cpp
1. some more of "#if wxUSE_XXX" here and there
[wxWidgets.git] / src / msw / spinbutt.cpp
... / ...
CommitLineData
1/////////////////////////////////////////////////////////////////////////////
2// Name: spinbutt.cpp
3// Purpose: wxSpinButton
4// Author: Julian Smart
5// Modified by:
6// Created: 04/01/98
7// RCS-ID: $Id$
8// Copyright: (c) Julian Smart and Markus Holzem
9// Licence: wxWindows license
10/////////////////////////////////////////////////////////////////////////////
11
12#ifdef __GNUG__
13 #pragma implementation "spinbutt.h"
14#endif
15
16// For compilers that support precompilation, includes "wx.h".
17#include "wx/wxprec.h"
18
19#ifdef __BORLANDC__
20 #pragma hdrstop
21#endif
22
23#ifndef WX_PRECOMP
24 #include "wx/wx.h"
25#endif
26
27// Can't resolve reference to CreateUpDownControl in
28// TWIN32, but could probably use normal CreateWindow instead.
29
30#if defined(__WIN95__) && !defined(__TWIN32__)
31
32#include "wx/spinbutt.h"
33#include "wx/msw/private.h"
34
35#if !defined(__GNUWIN32__) || defined(__TWIN32__)
36 #include <commctrl.h>
37#endif
38
39#if !USE_SHARED_LIBRARY
40 IMPLEMENT_DYNAMIC_CLASS(wxSpinButton, wxControl)
41#endif
42
43wxSpinButton::wxSpinButton()
44{
45 m_min = 0;
46 m_max = 100;
47}
48
49bool wxSpinButton::Create(wxWindow *parent, wxWindowID id, const wxPoint& pos, const wxSize& size,
50 long style, const wxString& name)
51{
52 wxSystemSettings settings;
53 m_backgroundColour = parent->GetBackgroundColour() ;
54 m_foregroundColour = parent->GetForegroundColour() ;
55
56 SetName(name);
57
58 int x = pos.x;
59 int y = pos.y;
60 int width = size.x;
61 int height = size.y;
62
63 m_windowStyle = style;
64
65 SetParent(parent);
66
67 if (width <= 0)
68 width = 100;
69 if (height <= 0)
70 height = 30;
71 if (x < 0)
72 x = 0;
73 if (y < 0)
74 y = 0;
75
76 m_min = 0;
77 m_max = 100;
78
79 m_windowId = (id == -1) ? NewControlId() : id;
80
81 DWORD wstyle = WS_VISIBLE | WS_CHILD | WS_TABSTOP;
82
83 if ( m_windowStyle & wxSP_HORIZONTAL )
84 wstyle |= UDS_HORZ;
85 if ( m_windowStyle & wxSP_ARROW_KEYS )
86 wstyle |= UDS_ARROWKEYS;
87 if ( m_windowStyle & wxSP_WRAP )
88 wstyle |= UDS_WRAP;
89
90 // Create the ListView control.
91 HWND hWndListControl = CreateUpDownControl(wstyle,
92 x, y, width, height,
93 (HWND) parent->GetHWND(),
94 m_windowId,
95 wxGetInstance(),
96 0,
97 m_min, m_max, m_min);
98
99 m_hWnd = (WXHWND) hWndListControl;
100 if (parent) parent->AddChild(this);
101
102 // TODO: have this for all controls.
103 if ( !m_hWnd )
104 return FALSE;
105
106 SubclassWin((WXHWND) m_hWnd);
107
108 return TRUE;
109}
110
111wxSpinButton::~wxSpinButton()
112{
113}
114
115// Attributes
116////////////////////////////////////////////////////////////////////////////
117
118int wxSpinButton::GetValue() const
119{
120 return (int) ::SendMessage((HWND) GetHWND(), UDM_GETPOS, 0, 0);
121}
122
123void wxSpinButton::SetValue(int val)
124{
125 ::SendMessage((HWND) GetHWND(), UDM_SETPOS, 0, (LPARAM) MAKELONG((short) val, 0));
126}
127
128void wxSpinButton::SetRange(int minVal, int maxVal)
129{
130 m_min = minVal;
131 m_max = maxVal;
132 ::SendMessage((HWND) GetHWND(), UDM_SETRANGE, 0,
133 (LPARAM) MAKELONG((short)maxVal, (short)minVal));
134}
135
136bool wxSpinButton::MSWOnScroll(int orientation, WXWORD wParam,
137 WXWORD pos, WXHWND control)
138{
139 if ( !control )
140 return FALSE;
141
142 wxSpinEvent event(wxEVT_NULL, m_windowId);
143 event.SetPosition(pos);
144 event.SetOrientation(orientation);
145 event.SetEventObject(this);
146
147 switch ( wParam )
148 {
149 case SB_TOP:
150 event.m_eventType = wxEVT_SCROLL_TOP;
151 break;
152
153 case SB_BOTTOM:
154 event.m_eventType = wxEVT_SCROLL_BOTTOM;
155 break;
156
157 case SB_LINEUP:
158 event.m_eventType = wxEVT_SCROLL_LINEUP;
159 break;
160
161 case SB_LINEDOWN:
162 event.m_eventType = wxEVT_SCROLL_LINEDOWN;
163 break;
164
165 case SB_PAGEUP:
166 event.m_eventType = wxEVT_SCROLL_PAGEUP;
167 break;
168
169 case SB_PAGEDOWN:
170 event.m_eventType = wxEVT_SCROLL_PAGEDOWN;
171 break;
172
173 case SB_THUMBTRACK:
174 case SB_THUMBPOSITION:
175 event.m_eventType = wxEVT_SCROLL_THUMBTRACK;
176 break;
177
178 default:
179 return FALSE;
180 }
181
182 return GetEventHandler()->ProcessEvent(event);
183}
184
185bool wxSpinButton::MSWCommand(WXUINT cmd, WXWORD id)
186{
187 // No command messages
188 return FALSE;
189}
190
191// Spin event
192IMPLEMENT_DYNAMIC_CLASS(wxSpinEvent, wxScrollEvent)
193
194wxSpinEvent::wxSpinEvent(wxEventType commandType, int id)
195 : wxScrollEvent(commandType, id)
196{
197}
198
199#endif // __WIN95__