]> git.saurik.com Git - wxWidgets.git/blame - src/msw/gauge95.cpp
Better fix
[wxWidgets.git] / src / msw / gauge95.cpp
CommitLineData
da87a1ca 1/////////////////////////////////////////////////////////////////////////////
f6bcfd97 2// Name: src/msw/gauge95.cpp
da87a1ca
JS
3// Purpose: wxGauge95 class
4// Author: Julian Smart
5// Modified by:
6// Created: 01/02/97
7// RCS-ID: $Id$
6c9a19aa 8// Copyright: (c) Julian Smart
65571936 9// Licence: wxWindows licence
da87a1ca
JS
10/////////////////////////////////////////////////////////////////////////////
11
f6bcfd97
BP
12// ============================================================================
13// declarations
14// ============================================================================
15
16// ----------------------------------------------------------------------------
17// headers
18// ----------------------------------------------------------------------------
19
da87a1ca
JS
20// For compilers that support precompilation, includes "wx.h".
21#include "wx/wxprec.h"
22
23#ifdef __BORLANDC__
da0f19f8 24 #pragma hdrstop
da87a1ca
JS
25#endif
26
7520f3da
WS
27#if wxUSE_GAUGE
28
9d2c19f1
WS
29#include "wx/gauge.h"
30
da87a1ca 31#ifndef WX_PRECOMP
da162534
VZ
32 #include "wx/app.h"
33
57bd4c60 34 #include "wx/msw/wrapcctl.h" // include <commctrl.h> "properly"
da87a1ca
JS
35#endif
36
da87a1ca
JS
37#include "wx/msw/private.h"
38
f6bcfd97
BP
39// ----------------------------------------------------------------------------
40// constants
41// ----------------------------------------------------------------------------
42
43// old commctrl.h (< 4.71) don't have those
44#ifndef PBS_SMOOTH
45 #define PBS_SMOOTH 0x01
46#endif
47
48#ifndef PBS_VERTICAL
49 #define PBS_VERTICAL 0x04
50#endif
51
52#ifndef PBM_SETBARCOLOR
53 #define PBM_SETBARCOLOR (WM_USER+9)
54#endif
55
56#ifndef PBM_SETBKCOLOR
57 #define PBM_SETBKCOLOR 0x2001
58#endif
59
fe8635a7
RR
60#ifndef PBS_MARQUEE
61 #define PBS_MARQUEE 0x08
62#endif
63
64#ifndef PBM_SETMARQUEE
65 #define PBM_SETMARQUEE (WM_USER+10)
66#endif
67
f6bcfd97
BP
68// ----------------------------------------------------------------------------
69// wxWin macros
70// ----------------------------------------------------------------------------
71
51741307 72#if wxUSE_EXTENDED_RTTI
bc9fb572
JS
73WX_DEFINE_FLAGS( wxGaugeStyle )
74
3ff066a4 75wxBEGIN_FLAGS( wxGaugeStyle )
bc9fb572
JS
76 // new style border flags, we put them first to
77 // use them for streaming out
3ff066a4
SC
78 wxFLAGS_MEMBER(wxBORDER_SIMPLE)
79 wxFLAGS_MEMBER(wxBORDER_SUNKEN)
80 wxFLAGS_MEMBER(wxBORDER_DOUBLE)
81 wxFLAGS_MEMBER(wxBORDER_RAISED)
82 wxFLAGS_MEMBER(wxBORDER_STATIC)
83 wxFLAGS_MEMBER(wxBORDER_NONE)
213ceb3f 84
bc9fb572 85 // old style border flags
3ff066a4
SC
86 wxFLAGS_MEMBER(wxSIMPLE_BORDER)
87 wxFLAGS_MEMBER(wxSUNKEN_BORDER)
88 wxFLAGS_MEMBER(wxDOUBLE_BORDER)
89 wxFLAGS_MEMBER(wxRAISED_BORDER)
90 wxFLAGS_MEMBER(wxSTATIC_BORDER)
cb0afb26 91 wxFLAGS_MEMBER(wxBORDER)
bc9fb572
JS
92
93 // standard window styles
3ff066a4
SC
94 wxFLAGS_MEMBER(wxTAB_TRAVERSAL)
95 wxFLAGS_MEMBER(wxCLIP_CHILDREN)
96 wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW)
97 wxFLAGS_MEMBER(wxWANTS_CHARS)
cb0afb26 98 wxFLAGS_MEMBER(wxFULL_REPAINT_ON_RESIZE)
3ff066a4
SC
99 wxFLAGS_MEMBER(wxALWAYS_SHOW_SB )
100 wxFLAGS_MEMBER(wxVSCROLL)
101 wxFLAGS_MEMBER(wxHSCROLL)
102
103 wxFLAGS_MEMBER(wxGA_HORIZONTAL)
104 wxFLAGS_MEMBER(wxGA_VERTICAL)
40ff126a 105#if WXWIN_COMPATIBILITY_2_6
3ff066a4 106 wxFLAGS_MEMBER(wxGA_PROGRESSBAR)
40ff126a 107#endif // WXWIN_COMPATIBILITY_2_6
3ff066a4
SC
108 wxFLAGS_MEMBER(wxGA_SMOOTH)
109
110wxEND_FLAGS( wxGaugeStyle )
bc9fb572 111
f0a126fe 112IMPLEMENT_DYNAMIC_CLASS_XTI(wxGauge, wxControl,"wx/gauge.h")
51741307 113
3ff066a4 114wxBEGIN_PROPERTIES_TABLE(wxGauge95)
da0f19f8
VZ
115 wxPROPERTY( Value , int , SetValue, GetValue, 0 , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
116 wxPROPERTY( Range , int , SetRange, GetRange, 0 , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
117 wxPROPERTY( ShadowWidth , int , SetShadowWidth, GetShadowWidth, 0 , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
118 wxPROPERTY( BezelFace , int , SetBezelFace, GetBezelFace, 0 , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
af498247 119 wxPROPERTY_FLAGS( WindowStyle , wxGaugeStyle , long , SetWindowStyleFlag , GetWindowStyleFlag , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style
3ff066a4 120wxEND_PROPERTIES_TABLE()
51741307 121
3ff066a4
SC
122wxBEGIN_HANDLERS_TABLE(wxGauge95)
123wxEND_HANDLERS_TABLE()
51741307 124
213ceb3f 125wxCONSTRUCTOR_6( wxGauge95 , wxWindow* , Parent , wxWindowID , Id , int , Range , wxPoint , Position , wxSize , Size , long , WindowStyle )
51741307
SC
126#else
127IMPLEMENT_DYNAMIC_CLASS(wxGauge95, wxControl)
128#endif
066f1b7a 129
f6bcfd97 130// ============================================================================
da0f19f8 131// wxGauge95 implementation
f6bcfd97
BP
132// ============================================================================
133
da0f19f8
VZ
134// ----------------------------------------------------------------------------
135// wxGauge95 creation
136// ----------------------------------------------------------------------------
da87a1ca 137
da0f19f8
VZ
138bool wxGauge95::Create(wxWindow *parent,
139 wxWindowID id,
140 int range,
141 const wxPoint& pos,
142 const wxSize& size,
143 long style,
144 const wxValidator& validator,
145 const wxString& name)
146{
147 if ( !CreateControl(parent, id, pos, size, style, validator, name) )
148 return false;
da87a1ca 149
da0f19f8
VZ
150 if ( !MSWCreateControl(PROGRESS_CLASS, wxEmptyString, pos, size) )
151 return false;
da87a1ca 152
da0f19f8 153 SetRange(range);
da87a1ca 154
fe8635a7
RR
155 // in case we need to emulate indeterminate mode...
156 m_nDirection = wxRIGHT;
157
da0f19f8
VZ
158 return true;
159}
da87a1ca 160
da0f19f8
VZ
161WXDWORD wxGauge95::MSWGetStyle(long style, WXDWORD *exstyle) const
162{
163 WXDWORD msStyle = wxControl::MSWGetStyle(style, exstyle);
da87a1ca 164
da0f19f8
VZ
165 if ( style & wxGA_VERTICAL )
166 msStyle |= PBS_VERTICAL;
da87a1ca 167
da0f19f8
VZ
168 if ( style & wxGA_SMOOTH )
169 msStyle |= PBS_SMOOTH;
da87a1ca 170
da0f19f8 171 return msStyle;
da87a1ca
JS
172}
173
da0f19f8
VZ
174// ----------------------------------------------------------------------------
175// wxGauge95 geometry
176// ----------------------------------------------------------------------------
da87a1ca 177
da0f19f8 178wxSize wxGauge95::DoGetBestSize() const
da87a1ca 179{
da0f19f8
VZ
180 // VZ: no idea where does 28 come from, it was there before my changes and
181 // as nobody ever complained I guess we can leave it...
a04f431b
DS
182 if (HasFlag(wxGA_VERTICAL))
183 return wxSize(28, 100);
7bdfb981 184 else
a04f431b 185 return wxSize(100, 28);
da87a1ca
JS
186}
187
da0f19f8
VZ
188// ----------------------------------------------------------------------------
189// wxGauge95 setters
190// ----------------------------------------------------------------------------
191
debe6624 192void wxGauge95::SetRange(int r)
da87a1ca 193{
fe8635a7
RR
194 // switch to determinate mode if required
195 SetDeterminateMode();
196
da0f19f8 197 m_rangeMax = r;
da87a1ca 198
9a78988f 199#ifdef PBM_SETRANGE32
da0f19f8 200 ::SendMessage(GetHwnd(), PBM_SETRANGE32, 0, r);
9a78988f 201#else // !PBM_SETRANGE32
da0f19f8
VZ
202 // fall back to PBM_SETRANGE (limited to 16 bits)
203 ::SendMessage(GetHwnd(), PBM_SETRANGE, 0, MAKELPARAM(0, r));
9a78988f 204#endif // PBM_SETRANGE32/!PBM_SETRANGE32
da87a1ca
JS
205}
206
debe6624 207void wxGauge95::SetValue(int pos)
da87a1ca 208{
fe8635a7
RR
209 // switch to determinate mode if required
210 SetDeterminateMode();
211
da0f19f8 212 m_gaugePos = pos;
da87a1ca 213
da0f19f8 214 ::SendMessage(GetHwnd(), PBM_SETPOS, pos, 0);
da87a1ca
JS
215}
216
cc2b7472 217bool wxGauge95::SetForegroundColour(const wxColour& col)
da87a1ca 218{
cc2b7472 219 if ( !wxControl::SetForegroundColour(col) )
da0f19f8 220 return false;
cc2b7472 221
da0f19f8 222 ::SendMessage(GetHwnd(), PBM_SETBARCOLOR, 0, (LPARAM)wxColourToRGB(col));
cc2b7472 223
da0f19f8 224 return true;
da87a1ca
JS
225}
226
cc2b7472 227bool wxGauge95::SetBackgroundColour(const wxColour& col)
da87a1ca 228{
cc2b7472 229 if ( !wxControl::SetBackgroundColour(col) )
da0f19f8 230 return false;
cc2b7472 231
da0f19f8 232 ::SendMessage(GetHwnd(), PBM_SETBKCOLOR, 0, (LPARAM)wxColourToRGB(col));
cc2b7472 233
da0f19f8 234 return true;
da87a1ca
JS
235}
236
fe8635a7
RR
237void wxGauge95::SetIndeterminateMode()
238{
239 // add the PBS_MARQUEE style to the progress bar
240 LONG style = ::GetWindowLong(GetHwnd(), GWL_STYLE);
241 if ((style & PBS_MARQUEE) == 0)
242 ::SetWindowLong(GetHwnd(), GWL_STYLE, style|PBS_MARQUEE);
243
244 // now the control can only run in indeterminate mode
245}
246
247void wxGauge95::SetDeterminateMode()
248{
249 // remove the PBS_MARQUEE style to the progress bar
250 LONG style = ::GetWindowLong(GetHwnd(), GWL_STYLE);
251 if ((style & PBS_MARQUEE) != 0)
252 ::SetWindowLong(GetHwnd(), GWL_STYLE, style & ~PBS_MARQUEE);
253
254 // now the control can only run in determinate mode
255}
256
257void wxGauge95::Pulse()
258{
259 if (wxApp::GetComCtl32Version() >= 600)
260 {
261 // switch to indeterminate mode if required
262 SetIndeterminateMode();
263
264 // NOTE: when in indeterminate mode, the PBM_SETPOS message will just make
265 // the bar's blocks move a bit and the WPARAM value is just ignored
266 // so that we can safely use zero
267 SendMessage(GetHwnd(), (UINT) PBM_SETPOS, (WPARAM)0, (LPARAM)0);
268 }
269 else
270 {
271 // emulate indeterminate mode
272 wxGaugeBase::Pulse();
273 }
274}
275
47d67540 276#endif // wxUSE_GAUGE