/////////////////////////////////////////////////////////////////////////////
// Name: slider.cpp
// Purpose: wxSlider
-// Author: AUTHOR
+// Author: Stefan Csomor
// Modified by:
-// Created: ??/??/98
+// Created: 1998-01-01
// RCS-ID: $Id$
-// Copyright: (c) AUTHOR
-// Licence: wxWindows licence
+// Copyright: (c) Stefan Csomor
+// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
-#ifdef __GNUG__
-#pragma implementation "slider.h"
-#endif
+#include "wx/wxprec.h"
+
+#if wxUSE_SLIDER
#include "wx/slider.h"
#include "wx/mac/uma.h"
-#if !USE_SHARED_LIBRARY
IMPLEMENT_DYNAMIC_CLASS(wxSlider, wxControl)
BEGIN_EVENT_TABLE(wxSlider, wxControl)
END_EVENT_TABLE()
-#endif
+ // The dimensions of the different styles of sliders (from Aqua document)
+#define wxSLIDER_DIMENSIONACROSS 15
+#define wxSLIDER_DIMENSIONACROSS_WITHTICKMARKS 24
+#define wxSLIDER_DIMENSIONACROSS_ARROW 18
+
+// Distance between slider and text
+#define wxSLIDER_BORDERTEXT 5
+// NB: The default orientation for a slider is horizontal; however, if the user specifies
+// some slider styles but doesn't specify the orientation we have to assume he wants a
+// horizontal one. Therefore in this file when testing for the slider's orientation
+// vertical is tested for if this is not set then we use the horizontal one
+// e.g., if (GetWindowStyle() & wxSL_VERTICAL) {} else { horizontal case }.
-// Slider
wxSlider::wxSlider()
{
- m_pageSize = 1;
- m_lineSize = 1;
- m_rangeMax = 0;
- m_rangeMin = 0;
- m_tickFreq = 0;
+ m_pageSize = 1;
+ m_lineSize = 1;
+ m_rangeMax = 0;
+ m_rangeMin = 0;
+ m_tickFreq = 0;
+
+ m_macMinimumStatic = NULL;
+ m_macMaximumStatic = NULL;
+ m_macValueStatic = NULL;
}
-extern ControlActionUPP wxMacLiveScrollbarActionUPP ;
-
-bool wxSlider::Create(wxWindow *parent, wxWindowID id,
- int value, int minValue, int maxValue,
- const wxPoint& pos,
- const wxSize& size, long style,
- const wxValidator& validator,
- const wxString& name)
+bool wxSlider::Create(wxWindow *parent,
+ wxWindowID id,
+ int value, int minValue, int maxValue,
+ const wxPoint& pos,
+ const wxSize& size, long style,
+ const wxValidator& validator,
+ const wxString& name)
{
- Rect bounds ;
- Str255 title ;
- wxSize slsize;
- int maxtextwidth, textheight;
-
- // Is control horizontal or vertical (Can be ambigous if user selects
- // another style without also specifying horz or vert
- if (!(style & wxSL_HORIZONTAL) && !(style & wxSL_VERTICAL)) {
- // Default is horizontal so make it so
- style |= wxSL_HORIZONTAL;
- }
- slsize = size;
- // Check that size corresponds with users selection of vertical or
- // horizontal slider and insert suitable default values
- if (style & wxSL_HORIZONTAL)
- {
- slsize.y = 15; // Slider width
- if (slsize.x == -1) {
- slsize.x = 150; // Slider default length
- }
- }
- else
- {
- slsize.x = 15; // Slider width
- if (slsize.y == -1) {
- slsize.y = 150; // Slider default length
- }
- }
- /* Set the height and width for the slider control region. The actual
- * slider is set at 10 pixels across. If the slider has labels then the
- * control region must be large enough to contain these labels
- */
- if (style & wxSL_LABELS)
- {
- wxString text;
- int ht, wd;
-
- // Get maximum text label width and height
- text.Printf("%d", minValue);
- parent->GetTextExtent(text, &maxtextwidth, &textheight);
- text.Printf("%d", maxValue);
- parent->GetTextExtent(text, &wd, &ht);
- if(ht > textheight) {
- textheight = ht;
- }
- if (wd > maxtextwidth) {
- maxtextwidth = wd;
- }
-
- if (style & wxSL_VERTICAL) {
- slsize.x = (15 + maxtextwidth + 2); // Slider wd plus mac text width
- }
- if (style & wxSL_HORIZONTAL) {
- slsize.y = (15 + textheight); // Slider ht plus text ht.
- }
- }
-
- MacPreControlCreate( parent , id , "" , pos , slsize , style,
- validator , name , &bounds , title ) ;
-
- m_macMinimumStatic = NULL ;
- m_macMaximumStatic = NULL ;
- m_macValueStatic = NULL ;
-
- m_lineSize = 1;
- m_tickFreq = 0;
-
- m_rangeMax = maxValue;
- m_rangeMin = minValue;
-
- m_pageSize = (int)((maxValue-minValue)/10);
-
- // Must modify bounds to that of the slider dimensions from slider
- // dimensions plus text labels.
- if (style & wxSL_LABELS)
+ m_macIsUserPane = false;
+
+ m_macMinimumStatic = NULL;
+ m_macMaximumStatic = NULL;
+ m_macValueStatic = NULL;
+
+ m_lineSize = 1;
+ m_tickFreq = 0;
+
+ m_rangeMax = maxValue;
+ m_rangeMin = minValue;
+
+ m_pageSize = (int)((maxValue - minValue) / 10);
+
+ // our styles are redundant: wxSL_LEFT/RIGHT imply wxSL_VERTICAL and
+ // wxSL_TOP/BOTTOM imply wxSL_HORIZONTAL, but for backwards compatibility
+ // reasons we can't really change it, instead try to infer the orientation
+ // from the flags given to us here
+ switch ( style & (wxSL_LEFT | wxSL_RIGHT | wxSL_TOP | wxSL_BOTTOM) )
{
- if ( style & wxSL_HORIZONTAL )
- {
- bounds.bottom = bounds.top + 15;
- bounds.right -= (5 + maxtextwidth);
- }
- else // Vertical slider
- {
- bounds.right = bounds.left + 15;
- bounds.bottom -= (5 + textheight);
- }
+ case wxSL_LEFT:
+ case wxSL_RIGHT:
+ style |= wxSL_VERTICAL;
+ break;
+
+ case wxSL_TOP:
+ case wxSL_BOTTOM:
+ style |= wxSL_HORIZONTAL;
+ break;
+
+ case 0:
+ default:
+ // no specific direction, do we have at least the orientation?
+ if ( !(style & (wxSL_HORIZONTAL | wxSL_VERTICAL)) )
+ // no: choose default
+ style |= wxSL_BOTTOM | wxSL_HORIZONTAL;
+ break;
}
-
- m_macControl = UMANewControl( parent->GetMacRootWindow() , &bounds ,
- title , true , value , minValue , maxValue,
- kControlSliderProc + kControlSliderLiveFeedback + ( ( style & wxSL_AUTOTICKS ) ? kControlSliderHasTickMarks : 0 ) , (long) this ) ;
-
- wxASSERT_MSG( m_macControl != NULL , "No valid mac control" ) ;
-
- ::SetControlAction( m_macControl , wxMacLiveScrollbarActionUPP ) ;
-
- MacPostControlCreate() ;
-
- if ( style & wxSL_LABELS )
+
+ wxASSERT_MSG( !(style & wxSL_VERTICAL) || !(style & wxSL_HORIZONTAL),
+ wxT("incompatible slider direction and orientation") );
+
+ if ( !wxControl::Create(parent, id, pos, size, style, validator, name) )
+ return false;
+
+ Rect bounds = wxMacGetBoundsForControl( this , pos , size );
+
+ // NB: (RN) Ticks here are sometimes off in the GUI if there
+ // are not as many tick marks as there are values
+ //
+ int tickMarks = 0;
+ if ( style & wxSL_AUTOTICKS )
+ tickMarks = (maxValue - minValue) + 1; // +1 for the 0 value
+
+ // keep the number of tickmarks from becoming unwieldly, therefore below it is ok to cast
+ // it to a UInt16
+ while (tickMarks > 20)
+ tickMarks /= 5;
+
+ m_peer = new wxMacControl( this );
+ OSStatus err = CreateSliderControl(
+ MAC_WXHWND(parent->MacGetTopLevelWindowRef()), &bounds,
+ value, minValue, maxValue,
+ kControlSliderPointsDownOrRight,
+ (UInt16) tickMarks, true /* liveTracking */,
+ GetwxMacLiveScrollbarActionProc(),
+ m_peer->GetControlRefAddr() );
+ verify_noerr( err );
+
+ if (style & wxSL_VERTICAL)
+ // Forces SetSize to use the proper width
+ SetSizeHints(10, -1, 10, -1);
+ else
+ // Forces SetSize to use the proper height
+ SetSizeHints(-1, 10, -1, 10);
+
+ // NB: SetSizeHints is overloaded by wxSlider and will substitute 10 with the
+ // proper dimensions, it also means other people cannot bugger the slider with
+ // other values
+
+ if (style & wxSL_LABELS)
{
- if ( style & wxSL_HORIZONTAL )
- {
- wxPoint leftpos( 0 , 15 ) ;
- wxPoint rightpos( m_width - (maxtextwidth + 20) , 15 ) ;
- wxPoint valuepos( m_width - maxtextwidth , 0 ) ;
- wxString valuestring ;
-
- valuestring.Printf( "%d" , minValue ) ;
- m_macMinimumStatic = new wxStaticText( this , -1 , valuestring , leftpos ) ;
-
- valuestring.Printf( "%d" , maxValue ) ;
- m_macMinimumStatic = new wxStaticText( this , -1 , valuestring , rightpos ) ;
-
- valuestring.Printf( "%d" , value ) ;
- m_macMinimumStatic = new wxStaticText( this , -1 , valuestring , valuepos ) ;
- }
- else // Vertical slider
- {
- wxPoint toppos( 17 , 0 ) ;
- wxPoint bottompos( 17 , m_height - (textheight + 15) ) ;
- wxPoint valuepos( 0 , m_height - textheight ) ;
- wxString valuestring ;
-
- valuestring.Printf( "%d" , minValue ) ;
- m_macMinimumStatic = new wxStaticText( this , -1 , valuestring , bottompos ) ;
-
- valuestring.Printf( "%d" , maxValue ) ;
- m_macMinimumStatic = new wxStaticText( this , -1 , valuestring , toppos ) ;
-
- valuestring.Printf( "%d" , value ) ;
- m_macMinimumStatic = new wxStaticText( this , -1 , valuestring , valuepos ) ;
- }
+ m_macMinimumStatic = new wxStaticText( parent, wxID_ANY, wxEmptyString );
+ m_macMaximumStatic = new wxStaticText( parent, wxID_ANY, wxEmptyString );
+ m_macValueStatic = new wxStaticText( parent, wxID_ANY, wxEmptyString );
}
-
- return true;
+
+ SetRange(minValue, maxValue);
+ SetValue(value);
+
+ MacPostControlCreate(pos, size);
+
+ return true;
}
wxSlider::~wxSlider()
{
+ // this is a special case, as we had to add windows as siblings we are
+ // responsible for their disposal, but only if we are not part of a DestroyAllChildren
+ if ( m_parent && !m_parent->IsBeingDeleted() )
+ {
+ delete m_macMinimumStatic;
+ delete m_macMaximumStatic;
+ delete m_macValueStatic;
+ }
}
int wxSlider::GetValue() const
{
- return GetControlValue( m_macControl) ;
+ // We may need to invert the value returned by the widget
+ return ValueInvertOrNot( m_peer->GetValue() ) ;
}
void wxSlider::SetValue(int value)
{
- wxString valuestring ;
- valuestring.Printf( "%d" , value ) ;
- if ( m_macMinimumStatic )
- m_macMinimumStatic->SetLabel( valuestring ) ;
- SetControlValue( m_macControl , value ) ;
+ if ( m_macValueStatic )
+ {
+ wxString valuestring;
+ valuestring.Printf( wxT("%d"), value );
+ m_macValueStatic->SetLabel( valuestring );
+ }
+
+ // We only invert for the setting of the actual native widget
+ m_peer->SetValue( ValueInvertOrNot( value ) );
}
void wxSlider::SetRange(int minValue, int maxValue)
{
- wxString value;
-
- m_rangeMin = minValue;
- m_rangeMax = maxValue;
-
- // TODO
- SetControlMinimum(m_macControl, m_rangeMin);
- SetControlMaximum(m_macControl, m_rangeMax);
-
- if(m_macMinimumStatic) {
- value.Printf("%d", m_rangeMin);
- m_macMinimumStatic->SetLabel(value);
- }
- if(m_macMaximumStatic) {
- value.Printf("%d", m_rangeMax);
- m_macMaximumStatic->SetLabel(value);
- }
- SetValue(m_rangeMin);
+ wxString value;
+
+ m_rangeMin = minValue;
+ m_rangeMax = maxValue;
+
+ m_peer->SetMinimum( m_rangeMin );
+ m_peer->SetMaximum( m_rangeMax );
+
+ if (m_macMinimumStatic)
+ {
+ value.Printf( wxT("%d"), ValueInvertOrNot( m_rangeMin ) );
+ m_macMinimumStatic->SetLabel( value );
+ }
+
+ if (m_macMaximumStatic)
+ {
+ value.Printf( wxT("%d"), ValueInvertOrNot( m_rangeMax ) );
+ m_macMaximumStatic->SetLabel( value );
+ }
+
+ // If the range is out of bounds, set it to a
+ // value that is within bounds
+ // RN: Testing reveals OSX does its own
+ // bounding, perhaps this isn't needed?
+ int currentValue = GetValue();
+
+ if(currentValue < m_rangeMin)
+ SetValue(m_rangeMin);
+ else if(currentValue > m_rangeMax)
+ SetValue(m_rangeMax);
}
// For trackbars only
// TODO
}
-void wxSlider::Command (wxCommandEvent & event)
+void wxSlider::Command(wxCommandEvent &event)
+{
+ SetValue(event.GetInt());
+ ProcessCommand(event);
+}
+
+void wxSlider::MacHandleControlClick( WXWidget control, wxInt16 controlpart, bool mouseStillDown )
+{
+ // Whatever the native value is, we may need to invert it for calling
+ // SetValue and putting the possibly inverted value in the event
+ int value = ValueInvertOrNot( m_peer->GetValue() );
+
+ SetValue( value );
+
+ wxScrollEvent event( wxEVT_SCROLL_THUMBTRACK, m_windowId );
+ event.SetPosition( value );
+ event.SetEventObject( this );
+ GetEventHandler()->ProcessEvent( event );
+
+ wxCommandEvent cevent( wxEVT_COMMAND_SLIDER_UPDATED, m_windowId );
+ cevent.SetInt( value );
+ cevent.SetEventObject( this );
+ GetEventHandler()->ProcessEvent( cevent );
+}
+
+wxInt32 wxSlider::MacControlHit( WXEVENTHANDLERREF handler , WXEVENTREF mevent )
+{
+ // Whatever the native value is, we may need to invert it for calling
+ // SetValue and putting the possibly inverted value in the event
+ int value = ValueInvertOrNot( m_peer->GetValue() ) ;
+
+ SetValue( value ) ;
+
+ wxScrollEvent event( wxEVT_SCROLL_THUMBRELEASE, m_windowId );
+ event.SetPosition( value );
+ event.SetEventObject( this );
+ GetEventHandler()->ProcessEvent( event );
+
+ wxCommandEvent cevent( wxEVT_COMMAND_SLIDER_UPDATED, m_windowId );
+ cevent.SetInt( value );
+ cevent.SetEventObject( this );
+
+ GetEventHandler()->ProcessEvent( cevent );
+
+ return noErr;
+}
+
+// This is overloaded in wxSlider so that the proper width/height will always be used
+// for the slider different values would cause redrawing and mouse detection problems
+//
+void wxSlider::DoSetSizeHints( int minW, int minH,
+ int maxW, int maxH,
+ int incW, int incH )
+{
+ wxSize size = GetBestSize();
+
+ if (GetWindowStyle() & wxSL_VERTICAL)
+ wxWindow::DoSetSizeHints(size.x, minH, size.x, maxH, incW, incH);
+ else
+ wxWindow::DoSetSizeHints(minW, size.y, maxW, size.y, incW, incH);
+}
+
+wxSize wxSlider::DoGetBestSize() const
+{
+ wxSize size;
+ int textwidth, textheight;
+ int mintwidth, mintheight;
+ int maxtwidth, maxtheight;
+
+ textwidth = textheight = 0;
+ mintwidth = mintheight = 0;
+ maxtwidth = maxtheight = 0;
+
+ if (GetWindowStyle() & wxSL_LABELS)
+ {
+ wxString text;
+
+ // Get maximum text label width and height
+ text.Printf( wxT("%d"), ValueInvertOrNot( m_rangeMin ) );
+ GetTextExtent(text, &mintwidth, &mintheight);
+ text.Printf( wxT("%d"), ValueInvertOrNot( m_rangeMax ) );
+ GetTextExtent(text, &maxtwidth, &maxtheight);
+
+ if (maxtheight > mintheight)
+ textheight = maxtheight;
+ else
+ textheight = mintheight;
+
+ if (maxtwidth > mintwidth)
+ textwidth = maxtwidth;
+ else
+ textwidth = mintwidth;
+ }
+
+ if (GetWindowStyle() & wxSL_VERTICAL)
+ {
+ size.y = 150;
+
+ if (GetWindowStyle() & wxSL_AUTOTICKS)
+ size.x = wxSLIDER_DIMENSIONACROSS_WITHTICKMARKS;
+ else
+ size.x = wxSLIDER_DIMENSIONACROSS_ARROW;
+
+ if (GetWindowStyle() & wxSL_LABELS)
+ size.x += textwidth + wxSLIDER_BORDERTEXT;
+ }
+ else
+ {
+ size.x = 150;
+
+ if (GetWindowStyle() & wxSL_AUTOTICKS)
+ size.y = wxSLIDER_DIMENSIONACROSS_WITHTICKMARKS;
+ else
+ size.y = wxSLIDER_DIMENSIONACROSS_ARROW;
+
+ if (GetWindowStyle() & wxSL_LABELS)
+ {
+ size.y += textheight + wxSLIDER_BORDERTEXT;
+ size.x += (mintwidth / 2) + (maxtwidth / 2);
+ }
+ }
+
+ return size;
+}
+
+void wxSlider::DoSetSize(int x, int y, int w, int h, int sizeFlags)
{
- SetValue (event.GetInt());
- ProcessCommand (event);
+ int xborder, yborder;
+ int minValWidth, maxValWidth, textheight;
+ int sliderBreadth;
+ int width = w;
+
+ xborder = yborder = 0;
+
+ if (GetWindowStyle() & wxSL_LABELS)
+ {
+ wxString text;
+ int ht, valValWidth;
+
+ // Get maximum text label width and height
+ text.Printf(wxT("%d"), ValueInvertOrNot( m_rangeMin ) );
+ GetTextExtent(text, &minValWidth, &textheight);
+ text.Printf(wxT("%d"), ValueInvertOrNot( m_rangeMax ) );
+ GetTextExtent(text, &maxValWidth, &ht);
+
+ if (ht > textheight)
+ textheight = ht;
+
+ if (GetWindowStyle() & wxSL_HORIZONTAL)
+ {
+ if ( m_macMinimumStatic )
+ {
+ w -= minValWidth / 2;
+ x += minValWidth / 2;
+ }
+
+ if ( m_macMaximumStatic )
+ w -= maxValWidth / 2;
+ }
+
+ // Labels have this control's parent as their parent
+ // so if this control is not at 0,0 relative to the parent
+ // the labels need to know the position of this control
+ // relative to its parent in order to size properly, so
+ // move the control first so we can use GetPosition()
+ wxControl::DoSetSize( x, y, w, h, sizeFlags );
+
+ if (GetWindowStyle() & wxSL_VERTICAL)
+ // If vertical, use current value
+ text.Printf(wxT("%d"), (int)m_peer->GetValue());
+ else
+ // Use max so that the current value doesn't drift as centering would need to change
+ text.Printf(wxT("%d"), m_rangeMax);
+
+ GetTextExtent(text, &valValWidth, &ht);
+
+ yborder = textheight + wxSLIDER_BORDERTEXT;
+
+ // Get slider breadth
+ if (GetWindowStyle() & wxSL_AUTOTICKS)
+ sliderBreadth = wxSLIDER_DIMENSIONACROSS_WITHTICKMARKS;
+ else
+ sliderBreadth = wxSLIDER_DIMENSIONACROSS_ARROW;
+
+ if (GetWindowStyle() & wxSL_VERTICAL)
+ {
+ h = h - yborder;
+
+ if ( m_macMinimumStatic )
+ m_macMinimumStatic->Move(GetPosition().x + sliderBreadth + wxSLIDER_BORDERTEXT, GetPosition().y + h - yborder);
+ if ( m_macMaximumStatic )
+ m_macMaximumStatic->Move(GetPosition().x + sliderBreadth + wxSLIDER_BORDERTEXT, GetPosition().y + 0);
+ if ( m_macValueStatic )
+ m_macValueStatic->Move(GetPosition().x + sliderBreadth + wxSLIDER_BORDERTEXT, GetPosition().y + (h / 2) - (ht / 2));
+ }
+ else
+ {
+ if ( m_macMinimumStatic )
+ m_macMinimumStatic->Move(GetPosition().x, GetPosition().y + sliderBreadth + wxSLIDER_BORDERTEXT);
+ if ( m_macMaximumStatic )
+ m_macMaximumStatic->Move(GetPosition().x + w - maxValWidth, GetPosition().y + sliderBreadth + wxSLIDER_BORDERTEXT);
+ if ( m_macValueStatic )
+ m_macValueStatic->Move(GetPosition().x + (w / 2) - (valValWidth / 2), GetPosition().y + sliderBreadth + wxSLIDER_BORDERTEXT);
+ }
+ }
+
+ // yet another hack since this is a composite control
+ // when wxSlider has it's size hardcoded, we're not allowed to
+ // change the size. But when the control has labels, we DO need
+ // to resize the internal Mac control to accommodate the text labels.
+ // We need to trick the wxWidgets resize mechanism so that we can
+ // resize the slider part of the control ONLY.
+
+ // TODO: Can all of this code go in the conditional wxSL_LABELS block?
+
+ int minWidth = m_minWidth;
+
+ if (GetWindowStyle() & wxSL_LABELS)
+ {
+ // make sure we don't allow the entire control to be resized accidently
+ if (width == GetSize().x)
+ m_minWidth = -1;
+ }
+
+ // If the control has labels, we still need to call this again because
+ // the labels alter the control's w and h values.
+ wxControl::DoSetSize( x, y, w, h, sizeFlags );
+
+ m_minWidth = minWidth;
}
-bool wxSlider::Show( bool show )
+void wxSlider::DoMoveWindow(int x, int y, int width, int height)
{
- return wxWindow::Show( show ) ;
+ wxControl::DoMoveWindow( x, y, width, height );
}
-void wxSlider::MacHandleControlClick( ControlHandle control , SInt16 controlpart )
+// Common processing to invert slider values based on wxSL_INVERSE
+int wxSlider::ValueInvertOrNot(int value) const
{
- SInt16 value = ::GetControlValue( m_macControl ) ;
-
- SetValue( value ) ;
-
- wxScrollEvent event(wxEVT_SCROLL_THUMBTRACK, m_windowId);
- event.SetPosition(value);
- event.SetEventObject( this );
- GetEventHandler()->ProcessEvent(event);
-
- wxCommandEvent cevent( wxEVT_COMMAND_SLIDER_UPDATED, m_windowId );
- cevent.SetInt( value );
- cevent.SetEventObject( this );
-
- GetEventHandler()->ProcessEvent( cevent );
+ int result = 0;
+
+ if (m_windowStyle & wxSL_VERTICAL)
+ {
+ // The reason for the backwards logic is that Mac's vertical sliders are
+ // inverted compared to Windows and GTK, hence we want inversion to be the
+ // default, and if wxSL_INVERSE is set, then we do not invert (use native)
+ if (m_windowStyle & wxSL_INVERSE)
+ result = value;
+ else
+ result = (m_rangeMax + m_rangeMin) - value;
+ }
+ else // normal logic applies to HORIZONTAL sliders
+ {
+ result = wxSliderBase::ValueInvertOrNot(value);
+ }
+
+ return result;
}
+
+#endif // wxUSE_SLIDER
projects / wxWidgets.git / blobdiff