/////////////////////////////////////////////////////////////////////////////
-// Name: slider.cpp
+// Name: src/gtk1/slider.cpp
// Purpose:
// Author: Robert Roebling
-// Created: 01/02/97
-// Id:
-// Copyright: (c) 1998 Robert Roebling, Julian Smart and Markus Holzem
-// Licence: wxWindows licence
+// Id: $Id$
+// Copyright: (c) 1998 Robert Roebling
+// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
+// For compilers that support precompilation, includes "wx.h".
+#include "wx/wxprec.h"
-#ifdef __GNUG__
-#pragma implementation "slider.h"
-#endif
+#if wxUSE_SLIDER
#include "wx/slider.h"
-#include "wx/utils.h"
+
+#ifndef WX_PRECOMP
+ #include "wx/utils.h"
+ #include "wx/math.h"
+#endif
+
+#include "wx/gtk1/private.h"
//-----------------------------------------------------------------------------
-// wxSlider
+// idle system
//-----------------------------------------------------------------------------
-void gtk_slider_callback( GtkWidget *WXUNUSED(widget), wxSlider *win )
-{
-/*
- printf( "OnScroll from " );
- if (win->GetClassInfo() && win->GetClassInfo()->GetClassName())
- printf( win->GetClassInfo()->GetClassName() );
- printf( ".\n" );
-*/
-
- if (!win->HasVMT()) return;
-
- float diff = win->m_adjust->value - win->m_oldPos;
- if (fabs(diff) < 0.2) return;
-
- wxEventType command = wxEVT_NULL;
-
- float line_step = win->m_adjust->step_increment;
- float page_step = win->m_adjust->page_increment;
-
- if (fabs(diff-line_step) < 0.2) command = wxEVT_SCROLL_LINEDOWN;
- else if (fabs(diff+line_step) < 0.2) command = wxEVT_SCROLL_LINEUP;
- else if (fabs(diff-page_step) < 0.2) command = wxEVT_SCROLL_PAGEDOWN;
- else if (fabs(diff+page_step) < 0.2) command = wxEVT_SCROLL_PAGEUP;
- else command = wxEVT_SCROLL_THUMBTRACK;
-
- int value = (int)(win->m_adjust->value+0.5);
-
- int orient = wxHORIZONTAL;
- if (win->GetWindowStyleFlag() & wxSB_VERTICAL == wxSB_VERTICAL) orient = wxHORIZONTAL;
-
- wxScrollEvent event( command, win->GetId(), value, orient );
- event.SetEventObject( win );
- win->ProcessEvent( event );
-
- wxCommandEvent cevent( wxEVT_COMMAND_SLIDER_UPDATED, win->GetId() );
- cevent.SetEventObject( win );
- win->ProcessEvent( cevent );
-};
+extern void wxapp_install_idle_handler();
+extern bool g_isIdle;
-IMPLEMENT_DYNAMIC_CLASS(wxSlider,wxControl)
+//-----------------------------------------------------------------------------
+// data
+//-----------------------------------------------------------------------------
+
+extern bool g_blockEventsOnDrag;
-wxSlider::wxSlider(void)
+// ----------------------------------------------------------------------------
+// helper functions
+// ----------------------------------------------------------------------------
+
+// compare 2 adjustment values up to some (hardcoded) precision
+static inline bool AreSameAdjustValues(double x, double y)
{
-};
+ return fabs(x - y) < 0.02;
+}
-wxSlider::wxSlider( wxWindow *parent, const wxWindowID id,
- const int value, const int minValue, const int maxValue,
- const wxPoint& pos, const wxSize& size,
- const long style,
-/* const wxValidator& validator = wxDefaultValidator, */
- const wxString& name )
+// process a scroll event
+static void
+ProcessScrollEvent(wxSlider *win, wxEventType evtType, double dvalue)
{
- Create( parent, id, value, minValue, maxValue,
- pos, size, style, name );
-};
+ int orient = win->GetWindowStyleFlag() & wxSL_VERTICAL ? wxVERTICAL
+ : wxHORIZONTAL;
+
+ int value = (int)(dvalue < 0 ? dvalue - 0.5 : dvalue + 0.5);
+ wxScrollEvent event( evtType, win->GetId(), value, orient );
+ event.SetEventObject( win );
+ win->HandleWindowEvent( event );
+
+ if ( evtType != wxEVT_SCROLL_THUMBTRACK )
+ {
+ wxScrollEvent event2(wxEVT_SCROLL_CHANGED, win->GetId(), value, orient);
+ event2.SetEventObject( win );
+ win->HandleWindowEvent( event2 );
+ }
+
+ wxCommandEvent cevent( wxEVT_COMMAND_SLIDER_UPDATED, win->GetId() );
+ cevent.SetEventObject( win );
+ cevent.SetInt( value );
+ win->HandleWindowEvent( cevent );
+}
+
+//-----------------------------------------------------------------------------
+// "value_changed"
+//-----------------------------------------------------------------------------
-wxSlider::~wxSlider(void)
+extern "C" {
+static void gtk_slider_callback( GtkAdjustment *adjust,
+ SCROLLBAR_CBACK_ARG
+ wxSlider *win )
{
-};
+ if (g_isIdle) wxapp_install_idle_handler();
-bool wxSlider::Create(wxWindow *parent, const wxWindowID id,
- const int value, const int minValue, const int maxValue,
- const wxPoint& pos, const wxSize& size,
- const long style,
-/* const wxValidator& validator = wxDefaultValidator, */
- const wxString& name )
-{
- m_needParent = TRUE;
-
- PreCreation( parent, id, pos, size, style, name );
-
- m_oldPos = 0.0;
+ if (!win->m_hasVMT) return;
+ if (g_blockEventsOnDrag) return;
- if (style & wxSL_VERTICAL == wxSL_VERTICAL)
- m_widget = gtk_hscale_new( NULL );
- else
- m_widget = gtk_vscale_new( NULL );
-
- m_adjust = gtk_range_get_adjustment( GTK_RANGE(m_widget) );
-
- gtk_signal_connect (GTK_OBJECT (m_adjust), "value_changed",
- (GtkSignalFunc) gtk_slider_callback, (gpointer) this );
- SetRange( minValue, maxValue );
- SetValue( value );
-
- PostCreation();
-
- Show( TRUE );
-
- return TRUE;
-};
+ const double dvalue = adjust->value;
+ const double diff = dvalue - win->m_oldPos;
+ if ( AreSameAdjustValues(diff, 0) )
+ return;
-int wxSlider::GetValue(void) const
-{
- return (int)(m_adjust->value+0.5);
-};
+ wxEventType evtType;
+ evtType = GtkScrollTypeToWx(GET_SCROLL_TYPE(win->m_widget));
-void wxSlider::SetValue( const int value )
-{
- float fpos = (float)value;
- m_oldPos = fpos;
- if (fabs(fpos-m_adjust->value) < 0.2) return;
- m_adjust->value = fpos;
-
- gtk_signal_emit_by_name( GTK_OBJECT(m_adjust), "value_changed" );
-};
+ ProcessScrollEvent(win, evtType, dvalue);
+
+ win->m_oldPos = dvalue;
+}
-void wxSlider::SetRange( const int minValue, const int maxValue )
+static gint gtk_slider_button_press_callback( GtkWidget * /* widget */,
+ GdkEventButton * /* gdk_event */,
+ wxWindowGTK *win)
{
- float fmin = (float)minValue;
- float fmax = (float)maxValue;
-
- if ((fabs(fmin-m_adjust->lower) < 0.2) &&
- (fabs(fmax-m_adjust->upper) < 0.2))
- return;
-
- m_adjust->lower = fmin;
- m_adjust->upper = fmax;
+ // indicate that the thumb is being dragged with the mouse
+ win->m_isScrolling = true;
- gtk_signal_emit_by_name( GTK_OBJECT(m_adjust), "changed" );
-};
+ return FALSE;
+}
-int wxSlider::GetMin(void) const
+static gint gtk_slider_button_release_callback( GtkWidget *scale,
+ GdkEventButton * /* gdk_event */,
+ wxSlider *win)
{
- return (int)(m_adjust->lower+0.5);
-};
+ // not scrolling any longer
+ win->m_isScrolling = false;
-int wxSlider::GetMax(void) const
-{
- return (int)(m_adjust->upper+0.5);
-};
+ ProcessScrollEvent(win, wxEVT_SCROLL_THUMBRELEASE,
+ GTK_RANGE(scale)->adjustment->value);
-void wxSlider::SetPageSize( const int pageSize )
-{
- float fpage = (float)pageSize;
-
- if (fabs(fpage-m_adjust->page_increment) < 0.2) return;
-
- m_adjust->page_increment = fpage;
+ return FALSE;
+}
+
+}
- gtk_signal_emit_by_name( GTK_OBJECT(m_adjust), "changed" );
-};
+//-----------------------------------------------------------------------------
+// wxSlider
+//-----------------------------------------------------------------------------
-int wxSlider::GetPageSize(void) const
+IMPLEMENT_DYNAMIC_CLASS(wxSlider,wxControl)
+
+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 )
{
- return (int)(m_adjust->page_increment+0.5);
-};
+ m_acceptsFocus = true;
+ m_needParent = true;
+
+ if (!PreCreation( parent, pos, size ) ||
+ !CreateBase( parent, id, pos, size, style, validator, name ))
+ {
+ wxFAIL_MSG( wxT("wxSlider creation failed") );
+ return false;
+ }
+
+ m_oldPos = 0.0;
+
+ if (style & wxSL_VERTICAL)
+ m_widget = gtk_vscale_new( NULL );
+ else
+ m_widget = gtk_hscale_new( NULL );
+
+ if (style & wxSL_LABELS)
+ {
+ gtk_scale_set_draw_value( GTK_SCALE( m_widget ), TRUE );
+ gtk_scale_set_digits( GTK_SCALE( m_widget ), 0 );
+
+ /* labels need more space and too small window will
+ cause junk to appear on the dialog */
+ if (style & wxSL_VERTICAL)
+ {
+ wxSize sz( size );
+ if (sz.x < 35)
+ {
+ sz.x = 35;
+ SetSize( sz );
+ }
+ }
+ else
+ {
+ wxSize sz( size );
+ if (sz.y < 35)
+ {
+ sz.y = 35;
+ SetSize( sz );
+ }
+ }
+ }
+ else
+ gtk_scale_set_draw_value( GTK_SCALE( m_widget ), FALSE );
+
+ m_adjust = gtk_range_get_adjustment( GTK_RANGE(m_widget) );
+
+ GtkEnableEvents();
+ gtk_signal_connect( GTK_OBJECT(m_widget),
+ "button_press_event",
+ (GtkSignalFunc)gtk_slider_button_press_callback,
+ (gpointer) this );
+ gtk_signal_connect( GTK_OBJECT(m_widget),
+ "button_release_event",
+ (GtkSignalFunc)gtk_slider_button_release_callback,
+ (gpointer) this );
+
+ SetRange( minValue, maxValue );
+ SetValue( value );
+
+ m_parent->DoAddChild( this );
+
+ PostCreation(size);
+
+ return true;
+}
+
+int wxSlider::GetValue() const
+{
+ return wxRound(m_adjust->value);
+}
-void wxSlider::SetThumbLength( const int len )
+void wxSlider::SetValue( int value )
{
- float flen = (float)len;
-
- if (fabs(flen-m_adjust->page_size) < 0.2) return;
-
- m_adjust->page_size = flen;
+ double fpos = (double)value;
+ m_oldPos = fpos;
+ if ( AreSameAdjustValues(fpos, m_adjust->value) )
+ return;
- gtk_signal_emit_by_name( GTK_OBJECT(m_adjust), "changed" );
-};
+ m_adjust->value = fpos;
-int wxSlider::GetThumbLength(void) const
-{
- return (int)(m_adjust->page_size+0.5);
-};
+ GtkDisableEvents();
-void wxSlider::SetLineSize( const int WXUNUSED(lineSize) )
-{
-};
+ gtk_signal_emit_by_name( GTK_OBJECT(m_adjust), "value_changed" );
-int wxSlider::GetLineSize(void) const
+ GtkEnableEvents();
+}
+
+void wxSlider::SetRange( int minValue, int maxValue )
{
- return 0;
-};
+ double fmin = (double)minValue;
+ double fmax = (double)maxValue;
-// not supported in wxGTK (and GTK)
+ if ((fabs(fmin-m_adjust->lower) < 0.2) &&
+ (fabs(fmax-m_adjust->upper) < 0.2))
+ {
+ return;
+ }
-void wxSlider::GetSize( int *x, int *y ) const
-{
- wxWindow::GetSize( x, y );
-};
+ m_adjust->lower = fmin;
+ m_adjust->upper = fmax;
+ m_adjust->step_increment = 1.0;
+ m_adjust->page_increment = ceil((fmax-fmin) / 10.0);
+
+ GtkDisableEvents();
-void wxSlider::SetSize( const int x, const int y, const int width, const int height, const int sizeFlags )
+ gtk_signal_emit_by_name( GTK_OBJECT(m_adjust), "changed" );
+
+ GtkEnableEvents();
+}
+
+int wxSlider::GetMin() const
{
- wxWindow::SetSize( x, y, width, height, sizeFlags );
-};
+ return (int)ceil(m_adjust->lower);
+}
-void wxSlider::GetPosition( int *x, int *y ) const
+int wxSlider::GetMax() const
{
- wxWindow::GetPosition( x, y );
-};
+ return (int)ceil(m_adjust->upper);
+}
-void wxSlider::SetTick( const int WXUNUSED(tickPos) )
+void wxSlider::SetPageSize( int pageSize )
{
-};
+ double fpage = (double)pageSize;
+
+ if (fabs(fpage-m_adjust->page_increment) < 0.2) return;
-void wxSlider::SetTickFreq( const int WXUNUSED(n), const int WXUNUSED(pos) )
+ m_adjust->page_increment = fpage;
+
+ GtkDisableEvents();
+
+ gtk_signal_emit_by_name( GTK_OBJECT(m_adjust), "changed" );
+
+ GtkEnableEvents();
+}
+
+int wxSlider::GetPageSize() const
{
-};
+ return (int)ceil(m_adjust->page_increment);
+}
-int wxSlider::GetTickFreq(void) const
+void wxSlider::SetThumbLength( int len )
{
- return 0;
-};
+ double flen = (double)len;
+
+ if (fabs(flen-m_adjust->page_size) < 0.2) return;
+
+ m_adjust->page_size = flen;
-void wxSlider::ClearTicks(void)
+ GtkDisableEvents();
+
+ gtk_signal_emit_by_name( GTK_OBJECT(m_adjust), "changed" );
+
+ GtkEnableEvents();
+}
+
+int wxSlider::GetThumbLength() const
{
-};
+ return (int)ceil(m_adjust->page_size);
+}
-void wxSlider::SetSelection( const int WXUNUSED(minPos), const int WXUNUSED(maxPos) )
+void wxSlider::SetLineSize( int WXUNUSED(lineSize) )
{
-};
+}
-int wxSlider::GetSelEnd(void) const
+int wxSlider::GetLineSize() const
{
- return 0;
-};
+ return 0;
+}
-int wxSlider::GetSelStart(void) const
+bool wxSlider::IsOwnGtkWindow( GdkWindow *window )
{
- return 0;
-};
+ GtkRange *range = GTK_RANGE(m_widget);
+ return ( (window == GTK_WIDGET(range)->window)
+ || (window == range->trough)
+ || (window == range->slider)
+ || (window == range->step_forw)
+ || (window == range->step_back) );
+}
+
+void wxSlider::GtkDisableEvents()
+{
+ gtk_signal_disconnect_by_func( GTK_OBJECT(m_adjust),
+ GTK_SIGNAL_FUNC(gtk_slider_callback),
+ (gpointer) this );
+}
-void wxSlider::ClearSel(void)
+void wxSlider::GtkEnableEvents()
+{
+ gtk_signal_connect( GTK_OBJECT (m_adjust),
+ "value_changed",
+ GTK_SIGNAL_FUNC(gtk_slider_callback),
+ (gpointer) this );
+}
+
+// static
+wxVisualAttributes
+wxSlider::GetClassDefaultAttributes(wxWindowVariant WXUNUSED(variant))
{
-};
+ return GetDefaultAttributesFromGTKWidget(gtk_vscale_new);
+}
+#endif // wxUSE_SLIDER