]> git.saurik.com Git - wxWidgets.git/blob - src/os2/spinbutt.cpp
Use wxMarkupParser in wxStaticText for dealing with markup.
[wxWidgets.git] / src / os2 / spinbutt.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: spinbutt.cpp
3 // Purpose: wxSpinButton
4 // Author: David Webster
5 // Modified by:
6 // Created: 10/15/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
16 #ifndef WX_PRECOMP
17 #include "wx/wx.h"
18 #endif
19 #if wxUSE_SPINBTN
20
21 // Can't resolve reference to CreateUpDownControl in
22 // TWIN32, but could probably use normal CreateWindow instead.
23
24
25 #include "wx/spinbutt.h"
26
27 extern void wxAssociateWinWithHandle( HWND hWnd
28 ,wxWindowOS2* pWin
29 );
30
31 #include "wx/os2/private.h"
32
33 // ============================================================================
34 // implementation
35 // ============================================================================
36
37 // ----------------------------------------------------------------------------
38 // wxWin macros
39 // ----------------------------------------------------------------------------
40
41 bool wxSpinButton::Create(
42 wxWindow* pParent
43 , wxWindowID vId
44 , const wxPoint& rPos
45 , const wxSize& rSize
46 , long lStyle
47 , const wxString& rsName
48 )
49 {
50 int nX = rPos.x;
51 int nY = rPos.y;
52 int nWidth = rSize.x;
53 int nHeight = rSize.y;
54 SWP vSwp;
55
56 m_min = 0;
57 m_max = 100;
58 if (vId == -1)
59 m_windowId = NewControlId();
60 else
61 m_windowId = vId;
62 if (pParent)
63 {
64 m_backgroundColour = pParent->GetBackgroundColour();
65 m_foregroundColour = pParent->GetForegroundColour();
66 }
67 SetName(rsName);
68 SetParent(pParent);
69 m_windowStyle = lStyle;
70
71 //
72 // Get the right size for the control
73 //
74 if (nWidth <= 0 || nHeight <= 0 )
75 {
76 wxSize vSize = DoGetBestSize();
77
78 if (nWidth <= 0 )
79 nWidth = vSize.x;
80 if (nHeight <= 0 )
81 nHeight = vSize.y;
82 }
83 if (nX < 0 )
84 nX = 0;
85 if (nY < 0 )
86 nY = 0;
87
88 long lSstyle = 0L;
89
90 lSstyle = WS_VISIBLE |
91 WS_TABSTOP |
92 SPBS_MASTER | // We use only single field spin buttons
93 SPBS_NUMERICONLY; // We default to numeric data
94
95 if (m_windowStyle & wxCLIP_SIBLINGS )
96 lSstyle |= WS_CLIPSIBLINGS;
97
98 m_hWnd = (WXHWND)::WinCreateWindow( GetWinHwnd(pParent)
99 ,WC_SPINBUTTON
100 ,(PSZ)NULL
101 ,lSstyle
102 ,0L, 0L, 0L, 0L
103 ,GetWinHwnd(pParent)
104 ,HWND_TOP
105 ,(HMENU)vId
106 ,NULL
107 ,NULL
108 );
109 if (m_hWnd == 0)
110 {
111 return FALSE;
112 }
113 SetRange(m_min, m_max);
114 if(pParent)
115 pParent->AddChild((wxSpinButton *)this);
116
117 ::WinQueryWindowPos(m_hWnd, &vSwp);
118 SetXComp(vSwp.x);
119 SetYComp(vSwp.y-5); // compensate for the associated TextControl border
120
121 SetFont(*wxSMALL_FONT);
122 //
123 // For OS/2 we want to hide the text portion so we can substitute an
124 // independent text ctrl in its place.
125 // Therefore we must override any user given width with our best guess.
126 //
127 SetSize( nX - GetXComp()
128 ,nY - GetYComp()
129 ,nWidth
130 ,nHeight
131 );
132 wxAssociateWinWithHandle( m_hWnd
133 ,(wxWindowOS2*)this
134 );
135 #if 0
136 // FIXME:
137 // Apparently, this does not work, as it crashes in setvalue/setrange calls
138 // What's it supposed to do anyway?
139 ::WinSetWindowULong(GetHwnd(), QWL_USER, (LONG)this);
140 fnWndProcSpinCtrl = (WXFARPROC)::WinSubclassWindow(m_hWnd, (PFNWP)wxSpinCtrlWndProc);
141 #endif
142 return TRUE;
143 } // end of wxSpinButton::Create
144
145 wxSpinButton::~wxSpinButton()
146 {
147 } // end of wxSpinButton::~wxSpinButton
148
149 // ----------------------------------------------------------------------------
150 // size calculation
151 // ----------------------------------------------------------------------------
152
153 wxSize wxSpinButton::DoGetBestSize() const
154 {
155 //
156 // OS/2 PM does not really have system metrics so we'll just set it to
157 // a square based on its height.
158 //
159 RECTL vRect;
160 ::WinQueryWindowRect(GetHwnd(),&vRect);
161 return wxSize(vRect.yTop,vRect.yTop);
162 } // end of wxSpinButton::DoGetBestSize
163
164 // ----------------------------------------------------------------------------
165 // Attributes
166 // ----------------------------------------------------------------------------
167
168 int wxSpinButton::GetValue() const
169 {
170 long lVal = 0L;
171 char zVal[10];
172
173 ::WinSendMsg( GetHwnd()
174 ,SPBM_QUERYVALUE
175 ,MPFROMP(zVal)
176 ,MPFROM2SHORT( (USHORT)10
177 ,SPBQ_UPDATEIFVALID
178 )
179 );
180 lVal = atol(zVal);
181 return ((int)lVal);
182 } // end of wxSpinButton::GetValue
183
184 bool wxSpinButton::OS2OnScroll( int WXUNUSED(nOrientation),
185 WXWORD WXUNUSED(wParam),
186 WXWORD wPos,
187 WXHWND hControl )
188 {
189 wxCHECK_MSG(hControl, false, wxT("scrolling what?") );
190
191 wxSpinEvent vEvent( wxEVT_SCROLL_THUMBTRACK, m_windowId );
192 int nVal = (int)wPos; // cast is important for negative values!
193
194 vEvent.SetPosition(nVal);
195 vEvent.SetEventObject(this);
196 return(HandleWindowEvent(vEvent));
197 } // end of wxSpinButton::OS2OnScroll
198
199 bool wxSpinButton::OS2Command( WXUINT WXUNUSED(uCmd),
200 WXWORD WXUNUSED(wId) )
201 {
202 return false;
203 } // end of wxSpinButton::OS2Command
204
205 void wxSpinButton::SetRange(
206 int nMinVal
207 , int nMaxVal
208 )
209 {
210 m_min = nMinVal;
211 m_max = nMaxVal;
212
213 ::WinSendMsg( GetHwnd()
214 ,SPBM_SETLIMITS
215 ,MPFROMLONG(nMaxVal)
216 ,MPFROMLONG(nMinVal)
217 );
218 } // end of wxSpinButton::SetRange
219
220 void wxSpinButton::SetValue(
221 int nValue
222 )
223 {
224 ::WinSendMsg(GetHwnd(), SPBM_SETCURRENTVALUE, MPFROMLONG(nValue), MPARAM(0));
225 } // end of wxSpinButton::SetValue
226
227 #endif //wxUSE_SPINBTN