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 WX_DEFINE_FLAGS( wxGaugeStyle )
  71
  72 wxBEGIN_FLAGS( wxGaugeStyle )
  73     // new style border flags, we put them first to
  74     // use them for streaming out
  75     wxFLAGS_MEMBER(wxBORDER_SIMPLE)
  76     wxFLAGS_MEMBER(wxBORDER_SUNKEN)
  77     wxFLAGS_MEMBER(wxBORDER_DOUBLE)
  78     wxFLAGS_MEMBER(wxBORDER_RAISED)
  79     wxFLAGS_MEMBER(wxBORDER_STATIC)
  80     wxFLAGS_MEMBER(wxBORDER_NONE)
  81
  82     // old style border flags
  83     wxFLAGS_MEMBER(wxSIMPLE_BORDER)
  84     wxFLAGS_MEMBER(wxSUNKEN_BORDER)
  85     wxFLAGS_MEMBER(wxDOUBLE_BORDER)
  86     wxFLAGS_MEMBER(wxRAISED_BORDER)
  87     wxFLAGS_MEMBER(wxSTATIC_BORDER)
  88     wxFLAGS_MEMBER(wxNO_BORDER)
  89
  90     // standard window styles
  91     wxFLAGS_MEMBER(wxTAB_TRAVERSAL)
  92     wxFLAGS_MEMBER(wxCLIP_CHILDREN)
  93     wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW)
  94     wxFLAGS_MEMBER(wxWANTS_CHARS)
  95     wxFLAGS_MEMBER(wxNO_FULL_REPAINT_ON_RESIZE)
  96     wxFLAGS_MEMBER(wxALWAYS_SHOW_SB )
  97     wxFLAGS_MEMBER(wxVSCROLL)
  98     wxFLAGS_MEMBER(wxHSCROLL)
  99
 100     wxFLAGS_MEMBER(wxGA_HORIZONTAL)
 101     wxFLAGS_MEMBER(wxGA_VERTICAL)
 102     wxFLAGS_MEMBER(wxGA_PROGRESSBAR)
 103     wxFLAGS_MEMBER(wxGA_SMOOTH)
 104
 105 wxEND_FLAGS( wxGaugeStyle )
 106
 107 IMPLEMENT_DYNAMIC_CLASS_XTI(wxGauge, wxControl,"wx/gauge.h")
 108
 109 wxBEGIN_PROPERTIES_TABLE(wxGauge95)
 110         wxPROPERTY( Value , int , SetValue, GetValue, 0 , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
 111         wxPROPERTY( Range , int , SetRange, GetRange, 0 , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
 112         wxPROPERTY( ShadowWidth , int , SetShadowWidth, GetShadowWidth, 0 , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
 113         wxPROPERTY( BezelFace , int , SetBezelFace, GetBezelFace, 0 , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
 114     wxPROPERTY_FLAGS( WindowStyle , wxGaugeStyle , long , SetWindowStyleFlag , GetWindowStyleFlag , , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style
 115 wxEND_PROPERTIES_TABLE()
 116
 117 wxBEGIN_HANDLERS_TABLE(wxGauge95)
 118 wxEND_HANDLERS_TABLE()
 119
 120 wxCONSTRUCTOR_6( wxGauge95 , wxWindow* , Parent , wxWindowID , Id , int , Range , wxPoint , Position , wxSize , Size , long , WindowStyle )
 121 #else
 122 IMPLEMENT_DYNAMIC_CLASS(wxGauge95, wxControl)
 123 #endif
 124
 125 // ============================================================================
 126 // implementation
 127 // ============================================================================
 128
 129 bool wxGauge95::Create(wxWindow *parent, wxWindowID id,
 130            int range,
 131            const wxPoint& pos,
 132            const wxSize& size,
 133            long style,
 134            const wxValidator& validator,
 135            const wxString& name)
 136 {
 137   SetName(name);
 138 #if wxUSE_VALIDATORS
 139   SetValidator(validator);
 140 #endif // wxUSE_VALIDATORS
 141
 142   if (parent) parent->AddChild(this);
 143   m_rangeMax = range;
 144   m_gaugePos = 0;
 145
 146   m_windowStyle = style;
 147
 148   if ( id == -1 )
 149       m_windowId = (int)NewControlId();
 150   else
 151       m_windowId = id;
 152
 153   int x = pos.x;
 154   int y = pos.y;
 155   int width = size.x;
 156   int height = size.y;
 157
 158   WXDWORD exStyle = 0;
 159   long msFlags = MSWGetStyle(style, & exStyle) ;
 160
 161   if (m_windowStyle & wxGA_VERTICAL)
 162     msFlags |= PBS_VERTICAL;
 163
 164   if (m_windowStyle & wxGA_SMOOTH)
 165     msFlags |= PBS_SMOOTH;
 166
 167   HWND wx_button =
 168       CreateWindowEx(exStyle, PROGRESS_CLASS, NULL, msFlags,
 169                     0, 0, 0, 0, (HWND) parent->GetHWND(), (HMENU)m_windowId,
 170                     wxGetInstance(), NULL);
 171
 172   m_hWnd = (WXHWND)wx_button;
 173
 174   SetBackgroundColour(parent->GetBackgroundColour());
 175   SetForegroundColour(parent->GetForegroundColour());
 176
 177   // Subclass again for purposes of dialog editing mode
 178   SubclassWin((WXHWND) wx_button);
 179
 180   SendMessage((HWND) GetHWND(), PBM_SETRANGE, 0, MAKELPARAM(0, range));
 181
 182   SetFont(parent->GetFont());
 183
 184   if (width == -1)
 185     width = 50;
 186   if (height == -1)
 187     height = 28;
 188   SetSize(x, y, width, height);
 189
 190   ShowWindow((HWND) GetHWND(), SW_SHOW);
 191
 192   return TRUE;
 193 }
 194
 195 void wxGauge95::SetShadowWidth(int WXUNUSED(w))
 196 {
 197 }
 198
 199 void wxGauge95::SetBezelFace(int WXUNUSED(w))
 200 {
 201 }
 202
 203 void wxGauge95::SetRange(int r)
 204 {
 205   m_rangeMax = r;
 206
 207   SendMessage((HWND) GetHWND(), PBM_SETRANGE, 0, MAKELPARAM(0, r));
 208 }
 209
 210 void wxGauge95::SetValue(int pos)
 211 {
 212   m_gaugePos = pos;
 213
 214   SendMessage((HWND) GetHWND(), PBM_SETPOS, pos, 0);
 215 }
 216
 217 int wxGauge95::GetShadowWidth() const
 218 {
 219   return 0;
 220 }
 221
 222 int wxGauge95::GetBezelFace() const
 223 {
 224   return 0;
 225 }
 226
 227 int wxGauge95::GetRange() const
 228 {
 229   return m_rangeMax;
 230 }
 231
 232 int wxGauge95::GetValue() const
 233 {
 234   return m_gaugePos;
 235 }
 236
 237 bool wxGauge95::SetForegroundColour(const wxColour& col)
 238 {
 239     if ( !wxControl::SetForegroundColour(col) )
 240         return FALSE;
 241
 242     SendMessage(GetHwnd(), PBM_SETBARCOLOR, 0, (LPARAM)wxColourToRGB(col));
 243
 244     return TRUE;
 245 }
 246
 247 bool wxGauge95::SetBackgroundColour(const wxColour& col)
 248 {
 249     if ( !wxControl::SetBackgroundColour(col) )
 250         return FALSE;
 251
 252     SendMessage(GetHwnd(), PBM_SETBKCOLOR, 0, (LPARAM)wxColourToRGB(col));
 253
 254     return TRUE;
 255 }
 256
 257 #endif // wxUSE_GAUGE