src/mac/carbon/gauge.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        gauge.cpp
   3 // Purpose:     wxGauge class
   4 // Author:      Stefan Csomor
   5 // Modified by:
   6 // Created:     1998-01-01
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Stefan Csomor
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13 #pragma implementation "gauge.h"
  14 #endif
  15
  16 #include "wx/gauge.h"
  17
  18 #if !USE_SHARED_LIBRARY
  19 IMPLEMENT_DYNAMIC_CLASS(wxGauge, wxControl)
  20 #endif
  21
  22 #include "wx/mac/uma.h"
  23
  24 bool wxGauge::Create(wxWindow *parent, wxWindowID id,
  25            int range,
  26            const wxPoint& pos,
  27            const wxSize& s,
  28            long style,
  29            const wxValidator& validator,
  30            const wxString& name)
  31 {
  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
  43         MacPreControlCreate( parent , id ,  "" , pos , size ,style & 0xE0FFFFFF /* no borders on mac */ , validator , name , &bounds , title ) ;
  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;
  51 }
  52
  53 void wxGauge::SetShadowWidth(int w)
  54 {
  55 }
  56
  57 void wxGauge::SetBezelFace(int w)
  58 {
  59 }
  60
  61 void wxGauge::SetRange(int r)
  62 {
  63     m_rangeMax = r;
  64     ::SetControl32BitMaximum( (ControlHandle) m_macControl , m_rangeMax ) ;
  65 }
  66
  67 void wxGauge::SetValue(int pos)
  68 {
  69     m_gaugePos = pos;
  70         ::SetControl32BitValue( (ControlHandle) m_macControl , m_gaugePos ) ;
  71 }
  72
  73 int wxGauge::GetShadowWidth() const
  74 {
  75     return 0;
  76 }
  77
  78 int wxGauge::GetBezelFace() const
  79 {
  80     return 0;
  81 }
  82
  83 int wxGauge::GetRange() const
  84 {
  85     return m_rangeMax;
  86 }
  87
  88 int wxGauge::GetValue() const
  89 {
  90     return m_gaugePos;
  91 }
  92