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
  36
  37 #include "wx/gauge.h"
  38 #include "wx/msw/private.h"
  39
  40 #if !(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(wxBORDER)
  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(wxFULL_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 , EMPTY_MACROVALUE , 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 // wxGauge95 implementation
 127 // ============================================================================
 128
 129 // ----------------------------------------------------------------------------
 130 // wxGauge95 creation
 131 // ----------------------------------------------------------------------------
 132
 133 bool wxGauge95::Create(wxWindow *parent,
 134                        wxWindowID id,
 135                        int range,
 136                        const wxPoint& pos,
 137                        const wxSize& size,
 138                        long style,
 139                        const wxValidator& validator,
 140                        const wxString& name)
 141 {
 142     if ( !CreateControl(parent, id, pos, size, style, validator, name) )
 143         return false;
 144
 145     if ( !MSWCreateControl(PROGRESS_CLASS, wxEmptyString, pos, size) )
 146         return false;
 147
 148     SetBackgroundColour(parent->GetBackgroundColour());
 149     SetForegroundColour(parent->GetForegroundColour());
 150
 151     SetRange(range);
 152
 153     return true;
 154 }
 155
 156 WXDWORD wxGauge95::MSWGetStyle(long style, WXDWORD *exstyle) const
 157 {
 158     WXDWORD msStyle = wxControl::MSWGetStyle(style, exstyle);
 159
 160     if ( style & wxGA_VERTICAL )
 161         msStyle |= PBS_VERTICAL;
 162
 163     if ( style & wxGA_SMOOTH )
 164         msStyle |= PBS_SMOOTH;
 165
 166     return msStyle;
 167 }
 168
 169 // ----------------------------------------------------------------------------
 170 // wxGauge95 geometry
 171 // ----------------------------------------------------------------------------
 172
 173 wxSize wxGauge95::DoGetBestSize() const
 174 {
 175     // VZ: no idea where does 28 come from, it was there before my changes and
 176     //     as nobody ever complained I guess we can leave it...
 177     if (HasFlag(wxGA_HORIZONTAL))
 178         return wxSize(100, 28);
 179     else
 180         return wxSize(28,100);
 181 }
 182
 183 // ----------------------------------------------------------------------------
 184 // wxGauge95 setters
 185 // ----------------------------------------------------------------------------
 186
 187 void wxGauge95::SetRange(int r)
 188 {
 189     m_rangeMax = r;
 190
 191 #ifdef PBM_SETRANGE32
 192     ::SendMessage(GetHwnd(), PBM_SETRANGE32, 0, r);
 193 #else // !PBM_SETRANGE32
 194     // fall back to PBM_SETRANGE (limited to 16 bits)
 195     ::SendMessage(GetHwnd(), PBM_SETRANGE, 0, MAKELPARAM(0, r));
 196 #endif // PBM_SETRANGE32/!PBM_SETRANGE32
 197 }
 198
 199 void wxGauge95::SetValue(int pos)
 200 {
 201     m_gaugePos = pos;
 202
 203     ::SendMessage(GetHwnd(), PBM_SETPOS, pos, 0);
 204 }
 205
 206 bool wxGauge95::SetForegroundColour(const wxColour& col)
 207 {
 208     if ( !wxControl::SetForegroundColour(col) )
 209         return false;
 210
 211     ::SendMessage(GetHwnd(), PBM_SETBARCOLOR, 0, (LPARAM)wxColourToRGB(col));
 212
 213     return true;
 214 }
 215
 216 bool wxGauge95::SetBackgroundColour(const wxColour& col)
 217 {
 218     if ( !wxControl::SetBackgroundColour(col) )
 219         return false;
 220
 221     ::SendMessage(GetHwnd(), PBM_SETBKCOLOR, 0, (LPARAM)wxColourToRGB(col));
 222
 223     return true;
 224 }
 225
 226 #endif // wxUSE_GAUGE
 227