]> git.saurik.com Git - wxWidgets.git/blame - src/mac/carbon/gauge.cpp
added direct HICommand updating
[wxWidgets.git] / src / mac / carbon / gauge.cpp
CommitLineData
e9576ca5
SC
1/////////////////////////////////////////////////////////////////////////////
2// Name: gauge.cpp
3// Purpose: wxGauge class
a31a5f85 4// Author: Stefan Csomor
e9576ca5 5// Modified by:
a31a5f85 6// Created: 1998-01-01
e9576ca5 7// RCS-ID: $Id$
a31a5f85 8// Copyright: (c) Stefan Csomor
e40298d5 9// Licence: wxWindows licence
e9576ca5
SC
10/////////////////////////////////////////////////////////////////////////////
11
12#ifdef __GNUG__
13#pragma implementation "gauge.h"
14#endif
15
16#include "wx/gauge.h"
17
2f1ae414 18#if !USE_SHARED_LIBRARY
e9576ca5 19IMPLEMENT_DYNAMIC_CLASS(wxGauge, wxControl)
2f1ae414 20#endif
e9576ca5 21
d497dca4 22#include "wx/mac/uma.h"
519cb848 23
e9576ca5
SC
24bool wxGauge::Create(wxWindow *parent, wxWindowID id,
25 int range,
26 const wxPoint& pos,
519cb848 27 const wxSize& s,
e9576ca5
SC
28 long style,
29 const wxValidator& validator,
30 const wxString& name)
31{
e40298d5
JS
32 wxSize size = s ;
33 Rect bounds ;
34 Str255 title ;
35 m_rangeMax = range ;
36 m_gaugePos = 0 ;
37
38 if ( size.x == wxDefaultSize.x && size.y == wxDefaultSize.y)
39 {
40 size = wxSize( 200 , 16 ) ;
41 }
42
427ff662 43 MacPreControlCreate( parent , id , wxEmptyString , pos , size ,style & 0xE0FFFFFF /* no borders on mac */ , validator , name , &bounds , title ) ;
e40298d5
JS
44
45 m_macControl = ::NewControl( MAC_WXHWND(parent->MacGetRootWindow()) , &bounds , title , false , 0 , 0 , range,
46 kControlProgressBarProc , (long) this ) ;
47
48 MacPostControlCreate() ;
49
50 return TRUE;
e9576ca5
SC
51}
52
53void wxGauge::SetShadowWidth(int w)
54{
e9576ca5
SC
55}
56
57void wxGauge::SetBezelFace(int w)
58{
e9576ca5
SC
59}
60
61void wxGauge::SetRange(int r)
62{
63 m_rangeMax = r;
467e3168 64 ::SetControl32BitMaximum( (ControlHandle) m_macControl , m_rangeMax ) ;
e9576ca5
SC
65}
66
67void wxGauge::SetValue(int pos)
68{
69 m_gaugePos = pos;
e40298d5 70 ::SetControl32BitValue( (ControlHandle) m_macControl , m_gaugePos ) ;
e9576ca5
SC
71}
72
73int wxGauge::GetShadowWidth() const
74{
e9576ca5
SC
75 return 0;
76}
77
78int wxGauge::GetBezelFace() const
79{
e9576ca5
SC
80 return 0;
81}
82
83int wxGauge::GetRange() const
84{
85 return m_rangeMax;
86}
87
88int wxGauge::GetValue() const
89{
90 return m_gaugePos;
91}
92