src/msw/gauge95.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/msw/gauge95.cpp
   3 // Purpose:     wxGauge95 class
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     01/02/97
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // ============================================================================
  13 // declarations
  14 // ============================================================================
  15
  16 // ----------------------------------------------------------------------------
  17 // headers
  18 // ----------------------------------------------------------------------------
  19
  20 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
  21     #pragma implementation "gauge95.h"
  22 #endif
  23
  24 // For compilers that support precompilation, includes "wx.h".
  25 #include "wx/wxprec.h"
  26
  27 #ifdef __BORLANDC__
  28 #pragma hdrstop
  29 #endif
  30
  31 #ifndef WX_PRECOMP
  32     #include "wx/defs.h"
  33 #endif
  34
  35 #if wxUSE_GAUGE && defined(__WIN95__)
  36
  37 #include "wx/msw/gauge95.h"
  38 #include "wx/msw/private.h"
  39
  40 #if defined(__WIN95__) && !(defined(__GNUWIN32_OLD__) && !defined(__CYGWIN10__))
  41     #include <commctrl.h>
  42 #endif
  43
  44 // ----------------------------------------------------------------------------
  45 // constants
  46 // ----------------------------------------------------------------------------
  47
  48 // old commctrl.h (< 4.71) don't have those
  49 #ifndef PBS_SMOOTH
  50     #define PBS_SMOOTH 0x01
  51 #endif
  52
  53 #ifndef PBS_VERTICAL
  54     #define PBS_VERTICAL 0x04
  55 #endif
  56
  57 #ifndef PBM_SETBARCOLOR
  58     #define PBM_SETBARCOLOR         (WM_USER+9)
  59 #endif
  60
  61 #ifndef PBM_SETBKCOLOR
  62     #define PBM_SETBKCOLOR          0x2001
  63 #endif
  64
  65 // ----------------------------------------------------------------------------
  66 // wxWin macros
  67 // ----------------------------------------------------------------------------
  68
  69 #if wxUSE_EXTENDED_RTTI
  70 IMPLEMENT_DYNAMIC_CLASS_XTI(wxGauge95, wxControl,"wx/gauge.h")
  71
  72 WX_BEGIN_PROPERTIES_TABLE(wxGauge95)
  73         WX_PROPERTY( Value , int , SetValue, GetValue, 0 )
  74         WX_PROPERTY( Range , int , SetRange, GetRange, 0 )
  75         WX_PROPERTY( ShadowWidth , int , SetShadowWidth, GetShadowWidth, 0 )
  76         WX_PROPERTY( BezelFace , int , SetBezelFace, GetBezelFace, 0 )
  77 /*
  78         TODO PROPERTIES
  79                 style wxGA_HORIZONTAL
  80 */
  81 WX_END_PROPERTIES_TABLE()
  82
  83 WX_BEGIN_HANDLERS_TABLE(wxGauge95)
  84 WX_END_HANDLERS_TABLE()
  85
  86 WX_CONSTRUCTOR_6( wxGauge95 , wxWindow* , Parent , wxWindowID , Id , int , Range , wxPoint , Position , wxSize , Size , long , WindowStyle )
  87 #else
  88 IMPLEMENT_DYNAMIC_CLASS(wxGauge95, wxControl)
  89 #endif
  90
  91 // ============================================================================
  92 // implementation
  93 // ============================================================================
  94
  95 bool wxGauge95::Create(wxWindow *parent, wxWindowID id,
  96            int range,
  97            const wxPoint& pos,
  98            const wxSize& size,
  99            long style,
 100            const wxValidator& validator,
 101            const wxString& name)
 102 {
 103   SetName(name);
 104 #if wxUSE_VALIDATORS
 105   SetValidator(validator);
 106 #endif // wxUSE_VALIDATORS
 107
 108   if (parent) parent->AddChild(this);
 109   m_rangeMax = range;
 110   m_gaugePos = 0;
 111
 112   m_windowStyle = style;
 113
 114   if ( id == -1 )
 115       m_windowId = (int)NewControlId();
 116   else
 117       m_windowId = id;
 118
 119   int x = pos.x;
 120   int y = pos.y;
 121   int width = size.x;
 122   int height = size.y;
 123
 124   WXDWORD exStyle = 0;
 125   long msFlags = MSWGetStyle(style, & exStyle) ;
 126
 127   if (m_windowStyle & wxGA_VERTICAL)
 128     msFlags |= PBS_VERTICAL;
 129
 130   if (m_windowStyle & wxGA_SMOOTH)
 131     msFlags |= PBS_SMOOTH;
 132
 133   HWND wx_button =
 134       CreateWindowEx(exStyle, PROGRESS_CLASS, NULL, msFlags,
 135                     0, 0, 0, 0, (HWND) parent->GetHWND(), (HMENU)m_windowId,
 136                     wxGetInstance(), NULL);
 137
 138   m_hWnd = (WXHWND)wx_button;
 139
 140   SetBackgroundColour(parent->GetBackgroundColour());
 141   SetForegroundColour(parent->GetForegroundColour());
 142
 143   // Subclass again for purposes of dialog editing mode
 144   SubclassWin((WXHWND) wx_button);
 145
 146   SendMessage((HWND) GetHWND(), PBM_SETRANGE, 0, MAKELPARAM(0, range));
 147
 148   SetFont(parent->GetFont());
 149
 150   if (width == -1)
 151     width = 50;
 152   if (height == -1)
 153     height = 28;
 154   SetSize(x, y, width, height);
 155
 156   ShowWindow((HWND) GetHWND(), SW_SHOW);
 157
 158   return TRUE;
 159 }
 160
 161 void wxGauge95::SetShadowWidth(int WXUNUSED(w))
 162 {
 163 }
 164
 165 void wxGauge95::SetBezelFace(int WXUNUSED(w))
 166 {
 167 }
 168
 169 void wxGauge95::SetRange(int r)
 170 {
 171   m_rangeMax = r;
 172
 173   SendMessage((HWND) GetHWND(), PBM_SETRANGE, 0, MAKELPARAM(0, r));
 174 }
 175
 176 void wxGauge95::SetValue(int pos)
 177 {
 178   m_gaugePos = pos;
 179
 180   SendMessage((HWND) GetHWND(), PBM_SETPOS, pos, 0);
 181 }
 182
 183 int wxGauge95::GetShadowWidth() const
 184 {
 185   return 0;
 186 }
 187
 188 int wxGauge95::GetBezelFace() const
 189 {
 190   return 0;
 191 }
 192
 193 int wxGauge95::GetRange() const
 194 {
 195   return m_rangeMax;
 196 }
 197
 198 int wxGauge95::GetValue() const
 199 {
 200   return m_gaugePos;
 201 }
 202
 203 bool wxGauge95::SetForegroundColour(const wxColour& col)
 204 {
 205     if ( !wxControl::SetForegroundColour(col) )
 206         return FALSE;
 207
 208     SendMessage(GetHwnd(), PBM_SETBARCOLOR, 0, (LPARAM)wxColourToRGB(col));
 209
 210     return TRUE;
 211 }
 212
 213 bool wxGauge95::SetBackgroundColour(const wxColour& col)
 214 {
 215     if ( !wxControl::SetBackgroundColour(col) )
 216         return FALSE;
 217
 218     SendMessage(GetHwnd(), PBM_SETBKCOLOR, 0, (LPARAM)wxColourToRGB(col));
 219
 220     return TRUE;
 221 }
 222
 223 #endif // wxUSE_GAUGE