[wxWidgets.git] / samples / widgets / slider.cpp

/////////////////////////////////////////////////////////////////////////////
// Program:     wxWindows Widgets Sample
// Name:        slider.cpp
// Purpose:     Part of the widgets sample showing wxSlider
// Author:      Vadim Zeitlin
// Created:     16.04.01
// Id:          $Id$
// Copyright:   (c) 2001 Vadim Zeitlin
// License:     wxWindows license
/////////////////////////////////////////////////////////////////////////////

// ============================================================================
// declarations
// ============================================================================

// ----------------------------------------------------------------------------
// headers
// ----------------------------------------------------------------------------

// for compilers that support precompilation, includes "wx/wx.h".
#include "wx/wxprec.h"

#ifdef __BORLANDC__
    #pragma hdrstop
#endif

// for all others, include the necessary headers
#ifndef WX_PRECOMP
    #include "wx/log.h"

    #include "wx/bitmap.h"
    #include "wx/button.h"
    #include "wx/checkbox.h"
    #include "wx/radiobox.h"
    #include "wx/slider.h"
    #include "wx/statbox.h"
    #include "wx/textctrl.h"
#endif

#if wxUSE_TOOLTIPS
    #include "wx/tooltip.h"
#endif

#include "wx/sizer.h"

#include "widgets.h"
#if wxUSE_SLIDER
#include "icons/slider.xpm"

// ----------------------------------------------------------------------------
// constants
// ----------------------------------------------------------------------------

// control ids
enum
{
    SliderPage_Reset = wxID_HIGHEST,
    SliderPage_Clear,
    SliderPage_SetValue,
    SliderPage_SetMinAndMax,
    SliderPage_SetTickFreq,
    SliderPage_SetThumbLen,
    SliderPage_CurValueText,
    SliderPage_ValueText,
    SliderPage_MinText,
    SliderPage_MaxText,
    SliderPage_TickFreqText,
    SliderPage_ThumbLenText,
    SliderPage_RadioSides,
    SliderPage_BothSides,
    SliderPage_Slider
};

// sides radiobox values
enum
{
    StaticSides_Top,
    StaticSides_Bottom,
    StaticSides_Left,
    StaticSides_Right
};

// ----------------------------------------------------------------------------
// SliderWidgetsPage
// ----------------------------------------------------------------------------

class SliderWidgetsPage : public WidgetsPage
{
public:
    SliderWidgetsPage(wxNotebook *notebook, wxImageList *imaglist);
    virtual ~SliderWidgetsPage();

protected:
    // event handlers
    void OnButtonReset(wxCommandEvent& event);
    void OnButtonClear(wxCommandEvent& event);
    void OnButtonSetValue(wxCommandEvent& event);
    void OnButtonSetMinAndMax(wxCommandEvent& event);
    void OnButtonSetTickFreq(wxCommandEvent& event);
    void OnButtonSetThumbLen(wxCommandEvent& event);

    void OnCheckOrRadioBox(wxCommandEvent& event);

    void OnSlider(wxScrollEvent& event);

    void OnUpdateUIValueButton(wxUpdateUIEvent& event);
    void OnUpdateUIMinMaxButton(wxUpdateUIEvent& event);
    void OnUpdateUITickFreq(wxUpdateUIEvent& event);
    void OnUpdateUIThumbLen(wxUpdateUIEvent& event);
    void OnUpdateUIRadioSides(wxUpdateUIEvent& event);
    void OnUpdateUIBothSides(wxUpdateUIEvent& event);

    void OnUpdateUIResetButton(wxUpdateUIEvent& event);

    void OnUpdateUICurValueText(wxUpdateUIEvent& event);

    // reset the slider parameters
    void Reset();

    // (re)create the slider
    void CreateSlider();

    // set the tick frequency from the text field value
    void DoSetTickFreq();

    // set the thumb len from the text field value
    void DoSetThumbLen();

    // is this slider value in range?
    bool IsValidValue(int val) const
        { return (val >= m_min) && (val <= m_max); }

    // the slider range
    int m_min, m_max;

    // the controls
    // ------------

    // the check/radio boxes for styles
    wxCheckBox *m_chkLabels,
               *m_chkVert,
               *m_chkTicks,
               *m_chkBothSides;

    wxRadioBox *m_radioSides;

    // the slider itself and the sizer it is in
    wxSlider *m_slider;
    wxSizer *m_sizerSlider;

    // the text entries for set value/range
    wxTextCtrl *m_textValue,
               *m_textMin,
               *m_textMax,
               *m_textTickFreq,
               *m_textThumbLen;

private:
    DECLARE_EVENT_TABLE()
    DECLARE_WIDGETS_PAGE(SliderWidgetsPage)
};

// ----------------------------------------------------------------------------
// event tables
// ----------------------------------------------------------------------------

BEGIN_EVENT_TABLE(SliderWidgetsPage, WidgetsPage)
    EVT_BUTTON(SliderPage_Reset, SliderWidgetsPage::OnButtonReset)
    EVT_BUTTON(SliderPage_SetValue, SliderWidgetsPage::OnButtonSetValue)
    EVT_BUTTON(SliderPage_SetMinAndMax, SliderWidgetsPage::OnButtonSetMinAndMax)
    EVT_BUTTON(SliderPage_SetTickFreq, SliderWidgetsPage::OnButtonSetTickFreq)
    EVT_BUTTON(SliderPage_SetThumbLen, SliderWidgetsPage::OnButtonSetThumbLen)

    EVT_UPDATE_UI(SliderPage_SetValue, SliderWidgetsPage::OnUpdateUIValueButton)
    EVT_UPDATE_UI(SliderPage_SetMinAndMax, SliderWidgetsPage::OnUpdateUIMinMaxButton)
    EVT_UPDATE_UI(SliderPage_SetTickFreq, SliderWidgetsPage::OnUpdateUITickFreq)
    EVT_UPDATE_UI(SliderPage_SetThumbLen, SliderWidgetsPage::OnUpdateUIThumbLen)
    EVT_UPDATE_UI(SliderPage_TickFreqText, SliderWidgetsPage::OnUpdateUITickFreq)
    EVT_UPDATE_UI(SliderPage_RadioSides, SliderWidgetsPage::OnUpdateUIRadioSides)
    EVT_UPDATE_UI(SliderPage_BothSides, SliderWidgetsPage::OnUpdateUIBothSides)

    EVT_UPDATE_UI(SliderPage_Reset, SliderWidgetsPage::OnUpdateUIResetButton)

    EVT_UPDATE_UI(SliderPage_CurValueText, SliderWidgetsPage::OnUpdateUICurValueText)

    EVT_COMMAND_SCROLL(SliderPage_Slider, SliderWidgetsPage::OnSlider)

    EVT_CHECKBOX(-1, SliderWidgetsPage::OnCheckOrRadioBox)
    EVT_RADIOBOX(-1, SliderWidgetsPage::OnCheckOrRadioBox)
END_EVENT_TABLE()

// ============================================================================
// implementation
// ============================================================================

IMPLEMENT_WIDGETS_PAGE(SliderWidgetsPage, _T("Slider"));

SliderWidgetsPage::SliderWidgetsPage(wxNotebook *notebook,
                                       wxImageList *imaglist)
                  : WidgetsPage(notebook)
{
    imaglist->Add(wxBitmap(slider_xpm));

    // init everything
    m_min = 0;
    m_max = 100;

    m_chkVert =
    m_chkTicks =
    m_chkLabels =
    m_chkBothSides = (wxCheckBox *)NULL;

    m_radioSides = (wxRadioBox *)NULL;

    m_slider = (wxSlider *)NULL;
    m_sizerSlider = (wxSizer *)NULL;

    wxSizer *sizerTop = new wxBoxSizer(wxHORIZONTAL);

    // left pane
    wxStaticBox *box = new wxStaticBox(this, -1, _T("&Set style"));
    wxSizer *sizerLeft = new wxStaticBoxSizer(box, wxVERTICAL);

    m_chkVert = CreateCheckBoxAndAddToSizer(sizerLeft, _T("&Vertical"));
    m_chkTicks = CreateCheckBoxAndAddToSizer(sizerLeft, _T("Show &ticks"));
    m_chkLabels = CreateCheckBoxAndAddToSizer(sizerLeft, _T("Show &labels"));
    static const wxString sides[] =
    {
        _T("top"),
        _T("bottom"),
        _T("left"),
        _T("right"),
    };
    m_radioSides = new wxRadioBox(this, SliderPage_RadioSides, _T("&Ticks/Labels"),
                                 wxDefaultPosition, wxDefaultSize,
                                 WXSIZEOF(sides), sides,
                                 1, wxRA_SPECIFY_COLS);
    sizerLeft->Add(m_radioSides, 0, wxGROW | wxALL, 5);
    m_chkBothSides = CreateCheckBoxAndAddToSizer
                     (sizerLeft, _T("&Both sides"), SliderPage_BothSides);
#if wxUSE_TOOLTIPS
    m_chkBothSides->SetToolTip( _T("\"Both sides\" is only supported \nin Win95 and Universal") );
#endif // wxUSE_TOOLTIPS

    sizerLeft->Add(5, 5, 0, wxGROW | wxALL, 5); // spacer

    wxButton *btn = new wxButton(this, SliderPage_Reset, _T("&Reset"));
    sizerLeft->Add(btn, 0, wxALIGN_CENTRE_HORIZONTAL | wxALL, 15);

    // middle pane
    wxStaticBox *box2 = new wxStaticBox(this, -1, _T("&Change slider value"));
    wxSizer *sizerMiddle = new wxStaticBoxSizer(box2, wxVERTICAL);

    wxTextCtrl *text;
    wxSizer *sizerRow = CreateSizerWithTextAndLabel(_T("Current value"),
                                                    SliderPage_CurValueText,
                                                    &text);
    text->SetEditable(FALSE);

    sizerMiddle->Add(sizerRow, 0, wxALL | wxGROW, 5);

    sizerRow = CreateSizerWithTextAndButton(SliderPage_SetValue,
                                            _T("Set &value"),
                                            SliderPage_ValueText,
                                            &m_textValue);
    sizerMiddle->Add(sizerRow, 0, wxALL | wxGROW, 5);

    sizerRow = CreateSizerWithTextAndButton(SliderPage_SetMinAndMax,
                                            _T("&Min and max"),
                                            SliderPage_MinText,
                                            &m_textMin);

    m_textMax = new wxTextCtrl(this, SliderPage_MaxText, _T(""));
    sizerRow->Add(m_textMax, 1, wxLEFT | wxALIGN_CENTRE_VERTICAL, 5);

    m_textMin->SetValue( wxString::Format(_T("%d"), m_min) );
    m_textMax->SetValue( wxString::Format(_T("%d"), m_max) );

    sizerMiddle->Add(sizerRow, 0, wxALL | wxGROW, 5);

    sizerRow = CreateSizerWithTextAndButton(SliderPage_SetTickFreq,
                                            _T("Tick &frequency"),
                                            SliderPage_TickFreqText,
                                            &m_textTickFreq);

    m_textTickFreq->SetValue(_T("10"));

    sizerMiddle->Add(sizerRow, 0, wxALL | wxGROW, 5);

    sizerRow = CreateSizerWithTextAndButton(SliderPage_SetThumbLen,
                                            _T("Thumb &lenght"),
                                            SliderPage_ThumbLenText,
                                            &m_textThumbLen);

    sizerMiddle->Add(sizerRow, 0, wxALL | wxGROW, 5);

    // right pane
    wxSizer *sizerRight = new wxBoxSizer(wxHORIZONTAL);
    sizerRight->SetMinSize(150, 40);
    m_sizerSlider = sizerRight; // save it to modify it later

    Reset();
    CreateSlider();

    // the 3 panes panes compose the window
    sizerTop->Add(sizerLeft, 0, wxGROW | (wxALL & ~wxLEFT), 10);
    sizerTop->Add(sizerMiddle, 0, wxGROW | wxALL, 10);
    sizerTop->Add(sizerRight, 1, wxGROW | (wxALL & ~wxRIGHT), 10);

    // final initializations
    SetAutoLayout(TRUE);
    SetSizer(sizerTop);

    sizerTop->Fit(this);
}

SliderWidgetsPage::~SliderWidgetsPage()
{
}

// ----------------------------------------------------------------------------
// operations
// ----------------------------------------------------------------------------

void SliderWidgetsPage::Reset()
{
    m_chkVert->SetValue(FALSE);
    m_chkTicks->SetValue(TRUE);
    m_chkLabels->SetValue(TRUE);
    m_chkBothSides->SetValue(FALSE);

    m_radioSides->SetSelection(StaticSides_Top);
}

void SliderWidgetsPage::CreateSlider()
{
    int flags = 0;

    bool isVert = m_chkVert->GetValue();
    if ( isVert )
        flags |= wxSL_VERTICAL;
    else
        flags |= wxSL_HORIZONTAL;

    if ( m_chkLabels->GetValue() )
    {
        flags |= wxSL_LABELS;
    }

    if ( m_chkTicks->GetValue() )
    {
        flags |= wxSL_AUTOTICKS;
    }

    switch ( m_radioSides->GetSelection() )
    {
        case StaticSides_Top:
            flags |= wxSL_TOP;
            break;
        case StaticSides_Left:
            flags |= wxSL_LEFT;
            break;
        case StaticSides_Bottom:
            flags |= wxSL_BOTTOM;
            break;
        case StaticSides_Right:
            flags |= wxSL_RIGHT;
            break;
        default:
            wxFAIL_MSG(_T("unexpected radiobox selection"));
            // fall through
    }

    if ( m_chkBothSides->GetValue() )
    {
        flags |= wxSL_BOTH;
    }

    int val = m_min;
    if ( m_slider )
    {
        int valOld = m_slider->GetValue();
        if ( !IsValidValue(valOld) )
        {
            val = valOld;
        }

        m_sizerSlider->Detach( m_slider );

        if ( m_sizerSlider->GetChildren().GetCount() )
        {
            // we have 2 spacers, remove them too
            m_sizerSlider->Remove( 0 );
            m_sizerSlider->Remove( 0 );
        }

        delete m_slider;
    }

    m_slider = new wxSlider(this, SliderPage_Slider,
                            val, m_min, m_max,
                            wxDefaultPosition, wxDefaultSize,
                            flags);

    if ( isVert )
    {
        m_sizerSlider->Add(0, 0, 1);
        m_sizerSlider->Add(m_slider, 0, wxGROW | wxALL, 5);
        m_sizerSlider->Add(0, 0, 1);
    }
    else
    {
        m_sizerSlider->Add(m_slider, 1, wxCENTRE | wxALL, 5);
    }

    if ( m_chkTicks->GetValue() )
    {
        DoSetTickFreq();
    }

    m_sizerSlider->Layout();
}

void SliderWidgetsPage::DoSetTickFreq()
{
    long freq;
    if ( !m_textTickFreq->GetValue().ToLong(&freq) )
    {
        wxLogWarning(_T("Invalid slider tick frequency"));

        return;
    }

    m_slider->SetTickFreq(freq, 0 /* unused */);
}

void SliderWidgetsPage::DoSetThumbLen()
{
    long len;
    if ( !m_textThumbLen->GetValue().ToLong(&len) )
    {
        wxLogWarning(_T("Invalid slider thumb lenght"));

        return;
    }

    m_slider->SetThumbLength(len);
}

// ----------------------------------------------------------------------------
// event handlers
// ----------------------------------------------------------------------------

void SliderWidgetsPage::OnButtonReset(wxCommandEvent& WXUNUSED(event))
{
    Reset();

    CreateSlider();
}

void SliderWidgetsPage::OnButtonSetTickFreq(wxCommandEvent& WXUNUSED(event))
{
    DoSetTickFreq();
}

void SliderWidgetsPage::OnButtonSetThumbLen(wxCommandEvent& WXUNUSED(event))
{
    DoSetThumbLen();
}

void SliderWidgetsPage::OnButtonSetMinAndMax(wxCommandEvent& WXUNUSED(event))
{
    long minNew,
         maxNew = 0; // init to suppress compiler warning
    if ( !m_textMin->GetValue().ToLong(&minNew) ||
         !m_textMax->GetValue().ToLong(&maxNew) ||
         minNew >= maxNew )
    {
        wxLogWarning(_T("Invalid min/max values for the slider."));

        return;
    }

    m_min = minNew;
    m_max = maxNew;

    m_slider->SetRange(minNew, maxNew);
}

void SliderWidgetsPage::OnButtonSetValue(wxCommandEvent& WXUNUSED(event))
{
    long val;
    if ( !m_textValue->GetValue().ToLong(&val) || !IsValidValue(val) )
    {
        wxLogWarning(_T("Invalid slider value."));

        return;
    }

    m_slider->SetValue(val);
}

void SliderWidgetsPage::OnUpdateUIValueButton(wxUpdateUIEvent& event)
{
    long val;
    event.Enable( m_textValue->GetValue().ToLong(&val) && IsValidValue(val) );
}

void SliderWidgetsPage::OnUpdateUITickFreq(wxUpdateUIEvent& event)
{
    long freq;
    event.Enable( m_chkTicks->GetValue() &&
                  m_textTickFreq->GetValue().ToLong(&freq) &&
                  (freq > 0) && (freq <= m_max - m_min) );
}

void SliderWidgetsPage::OnUpdateUIThumbLen(wxUpdateUIEvent& event)
{
    long val;
    event.Enable( m_textThumbLen->GetValue().ToLong(&val));
}

void SliderWidgetsPage::OnUpdateUIMinMaxButton(wxUpdateUIEvent& event)
{
    long mn, mx;
    event.Enable( m_textMin->GetValue().ToLong(&mn) &&
                  m_textMax->GetValue().ToLong(&mx) &&
                  mn < mx);
}

void SliderWidgetsPage::OnUpdateUIResetButton(wxUpdateUIEvent& event)
{
    event.Enable( m_chkVert->GetValue() ||
                  !m_chkTicks->GetValue() ||
                  !m_chkLabels->GetValue() ||
                  m_chkBothSides->GetValue() );
}

void SliderWidgetsPage::OnCheckOrRadioBox(wxCommandEvent& WXUNUSED(event))
{
    CreateSlider();
}

void SliderWidgetsPage::OnUpdateUICurValueText(wxUpdateUIEvent& event)
{
    event.SetText( wxString::Format(_T("%d"), m_slider->GetValue()) );
}

void SliderWidgetsPage::OnUpdateUIRadioSides(wxUpdateUIEvent& event)
{
    event.Enable( m_chkLabels->GetValue() || m_chkTicks->GetValue() );
}

void SliderWidgetsPage::OnUpdateUIBothSides(wxUpdateUIEvent& event)
{
#if defined(__WIN95__) || defined(__WXUNIVERSAL__)
    event.Enable( m_chkTicks->GetValue() );
#else
    event.Enable( FALSE );
#endif // defined(__WIN95__) || defined(__WXUNIVERSAL__)
}

void SliderWidgetsPage::OnSlider(wxScrollEvent& event)
{
    wxASSERT_MSG( event.GetInt() == m_slider->GetValue(),
                  wxT("slider value should be the same") );

    wxEventType eventType = event.GetEventType();

    /*
        This array takes the EXACT order of the declarations in
        include/wx/event.h
        (section "wxScrollBar and wxSlider event identifiers")
    */
    static const wxChar *eventNames[] =
    {
        wxT("wxEVT_SCROLL_TOP"),
        wxT("wxEVT_SCROLL_BOTTOM"),
        wxT("wxEVT_SCROLL_LINEUP"),
        wxT("wxEVT_SCROLL_LINEDOWN"),
        wxT("wxEVT_SCROLL_PAGEUP"),
        wxT("wxEVT_SCROLL_PAGEDOWN"),
        wxT("wxEVT_SCROLL_THUMBTRACK"),
        wxT("wxEVT_SCROLL_THUMBRELEASE"),
        wxT("wxEVT_SCROLL_ENDSCROLL")
    };

    int index = eventType - wxEVT_SCROLL_TOP;

    /*
        If this assert is triggered, there is an unknown slider event which
        should be added to the above eventNames array.
    */
    wxASSERT_MSG(index >= 0 && (size_t)index < WXSIZEOF(eventNames),
                 wxT("Unknown slider event") );


    static int s_numSliderEvents = 0;

    wxLogMessage(wxT("Slider event #%d: %s (pos = %d)"),
                 s_numSliderEvents++,
                 eventNames[index],
                 event.GetPosition());
}

#endif
    // wxUSE_SLIDER
Commit	Line	Data
32b8ec41 VZ	1	/////////////////////////////////////////////////////////////////////////////
	2	// Program: wxWindows Widgets Sample
	3	// Name: slider.cpp
	4	// Purpose: Part of the widgets sample showing wxSlider
	5	// Author: Vadim Zeitlin
	6	// Created: 16.04.01
	7	// Id: $Id$
	8	// Copyright: (c) 2001 Vadim Zeitlin
	9	// License: wxWindows license
	10	/////////////////////////////////////////////////////////////////////////////
	11
	12	// ============================================================================
	13	// declarations
	14	// ============================================================================
	15
	16	// ----------------------------------------------------------------------------
	17	// headers
	18	// ----------------------------------------------------------------------------
	19
	20	// for compilers that support precompilation, includes "wx/wx.h".
	21	#include "wx/wxprec.h"
	22
	23	#ifdef __BORLANDC__
	24	#pragma hdrstop
	25	#endif
	26
	27	// for all others, include the necessary headers
	28	#ifndef WX_PRECOMP
	29	#include "wx/log.h"
	30
3bb70c40	31	#include "wx/bitmap.h"
32b8ec41 VZ	32	#include "wx/button.h"
	33	#include "wx/checkbox.h"
	34	#include "wx/radiobox.h"
	35	#include "wx/slider.h"
	36	#include "wx/statbox.h"
	37	#include "wx/textctrl.h"
	38	#endif
	39
53b98211 JS	40	#if wxUSE_TOOLTIPS
	41	#include "wx/tooltip.h"
	42	#endif
	43
32b8ec41 VZ	44	#include "wx/sizer.h"
	45
	46	#include "widgets.h"
8b611f0e	47	#if wxUSE_SLIDER
32b8ec41 VZ	48	#include "icons/slider.xpm"
	49
	50	// ----------------------------------------------------------------------------
	51	// constants
	52	// ----------------------------------------------------------------------------
	53
	54	// control ids
	55	enum
	56	{
d79b005a	57	SliderPage_Reset = wxID_HIGHEST,
32b8ec41 VZ	58	SliderPage_Clear,
	59	SliderPage_SetValue,
	60	SliderPage_SetMinAndMax,
	61	SliderPage_SetTickFreq,
53b98211	62	SliderPage_SetThumbLen,
32b8ec41 VZ	63	SliderPage_CurValueText,
	64	SliderPage_ValueText,
	65	SliderPage_MinText,
	66	SliderPage_MaxText,
	67	SliderPage_TickFreqText,
53b98211 JS	68	SliderPage_ThumbLenText,
	69	SliderPage_RadioSides,
	70	SliderPage_BothSides,
32b8ec41 VZ	71	SliderPage_Slider
	72	};
	73
53b98211 JS	74	// sides radiobox values
	75	enum
	76	{
	77	StaticSides_Top,
	78	StaticSides_Bottom,
	79	StaticSides_Left,
	80	StaticSides_Right
	81	};
	82
32b8ec41 VZ	83	// ----------------------------------------------------------------------------
	84	// SliderWidgetsPage
	85	// ----------------------------------------------------------------------------
	86
	87	class SliderWidgetsPage : public WidgetsPage
	88	{
	89	public:
	90	SliderWidgetsPage(wxNotebook notebook, wxImageList imaglist);
	91	virtual ~SliderWidgetsPage();
	92
	93	protected:
	94	// event handlers
	95	void OnButtonReset(wxCommandEvent& event);
	96	void OnButtonClear(wxCommandEvent& event);
	97	void OnButtonSetValue(wxCommandEvent& event);
	98	void OnButtonSetMinAndMax(wxCommandEvent& event);
	99	void OnButtonSetTickFreq(wxCommandEvent& event);
53b98211	100	void OnButtonSetThumbLen(wxCommandEvent& event);
32b8ec41 VZ	101
	102	void OnCheckOrRadioBox(wxCommandEvent& event);
	103
d79b005a	104	void OnSlider(wxScrollEvent& event);
32b8ec41	105
32b8ec41 VZ	106	void OnUpdateUIValueButton(wxUpdateUIEvent& event);
	107	void OnUpdateUIMinMaxButton(wxUpdateUIEvent& event);
	108	void OnUpdateUITickFreq(wxUpdateUIEvent& event);
53b98211 JS	109	void OnUpdateUIThumbLen(wxUpdateUIEvent& event);
	110	void OnUpdateUIRadioSides(wxUpdateUIEvent& event);
	111	void OnUpdateUIBothSides(wxUpdateUIEvent& event);
32b8ec41 VZ	112
	113	void OnUpdateUIResetButton(wxUpdateUIEvent& event);
	114
	115	void OnUpdateUICurValueText(wxUpdateUIEvent& event);
	116
	117	// reset the slider parameters
	118	void Reset();
	119
	120	// (re)create the slider
	121	void CreateSlider();
	122
	123	// set the tick frequency from the text field value
	124	void DoSetTickFreq();
	125
53b98211 JS	126	// set the thumb len from the text field value
	127	void DoSetThumbLen();
	128
32b8ec41 VZ	129	// is this slider value in range?
	130	bool IsValidValue(int val) const
	131	{ return (val >= m_min) && (val <= m_max); }
	132
	133	// the slider range
	134	int m_min, m_max;
	135
	136	// the controls
	137	// ------------
	138
	139	// the check/radio boxes for styles
	140	wxCheckBox *m_chkLabels,
32b8ec41	141	*m_chkVert,
53b98211 JS	142	*m_chkTicks,
	143	*m_chkBothSides;
	144
	145	wxRadioBox *m_radioSides;
32b8ec41 VZ	146
	147	// the slider itself and the sizer it is in
	148	wxSlider *m_slider;
	149	wxSizer *m_sizerSlider;
	150
	151	// the text entries for set value/range
	152	wxTextCtrl *m_textValue,
	153	*m_textMin,
	154	*m_textMax,
53b98211 JS	155	*m_textTickFreq,
53b98211 JS	156	*m_textThumbLen;
32b8ec41 VZ	157
32b8ec41 VZ	158	private:
5e173f35 GD	159	DECLARE_EVENT_TABLE()
5e173f35 GD	160	DECLARE_WIDGETS_PAGE(SliderWidgetsPage)
32b8ec41 VZ	161	};
	162
	163	// ----------------------------------------------------------------------------
	164	// event tables
	165	// ----------------------------------------------------------------------------
	166
	167	BEGIN_EVENT_TABLE(SliderWidgetsPage, WidgetsPage)
	168	EVT_BUTTON(SliderPage_Reset, SliderWidgetsPage::OnButtonReset)
	169	EVT_BUTTON(SliderPage_SetValue, SliderWidgetsPage::OnButtonSetValue)
	170	EVT_BUTTON(SliderPage_SetMinAndMax, SliderWidgetsPage::OnButtonSetMinAndMax)
	171	EVT_BUTTON(SliderPage_SetTickFreq, SliderWidgetsPage::OnButtonSetTickFreq)
53b98211	172	EVT_BUTTON(SliderPage_SetThumbLen, SliderWidgetsPage::OnButtonSetThumbLen)
32b8ec41 VZ	173
	174	EVT_UPDATE_UI(SliderPage_SetValue, SliderWidgetsPage::OnUpdateUIValueButton)
	175	EVT_UPDATE_UI(SliderPage_SetMinAndMax, SliderWidgetsPage::OnUpdateUIMinMaxButton)
	176	EVT_UPDATE_UI(SliderPage_SetTickFreq, SliderWidgetsPage::OnUpdateUITickFreq)
53b98211	177	EVT_UPDATE_UI(SliderPage_SetThumbLen, SliderWidgetsPage::OnUpdateUIThumbLen)
32b8ec41	178	EVT_UPDATE_UI(SliderPage_TickFreqText, SliderWidgetsPage::OnUpdateUITickFreq)
53b98211 JS	179	EVT_UPDATE_UI(SliderPage_RadioSides, SliderWidgetsPage::OnUpdateUIRadioSides)
53b98211 JS	180	EVT_UPDATE_UI(SliderPage_BothSides, SliderWidgetsPage::OnUpdateUIBothSides)
32b8ec41 VZ	181
	182	EVT_UPDATE_UI(SliderPage_Reset, SliderWidgetsPage::OnUpdateUIResetButton)
	183
	184	EVT_UPDATE_UI(SliderPage_CurValueText, SliderWidgetsPage::OnUpdateUICurValueText)
	185
d79b005a	186	EVT_COMMAND_SCROLL(SliderPage_Slider, SliderWidgetsPage::OnSlider)
32b8ec41 VZ	187
	188	EVT_CHECKBOX(-1, SliderWidgetsPage::OnCheckOrRadioBox)
	189	EVT_RADIOBOX(-1, SliderWidgetsPage::OnCheckOrRadioBox)
	190	END_EVENT_TABLE()
	191
	192	// ============================================================================
	193	// implementation
	194	// ============================================================================
	195
	196	IMPLEMENT_WIDGETS_PAGE(SliderWidgetsPage, _T("Slider"));
	197
	198	SliderWidgetsPage::SliderWidgetsPage(wxNotebook *notebook,
	199	wxImageList *imaglist)
	200	: WidgetsPage(notebook)
	201	{
	202	imaglist->Add(wxBitmap(slider_xpm));
	203
	204	// init everything
	205	m_min = 0;
	206	m_max = 100;
	207
	208	m_chkVert =
	209	m_chkTicks =
	210	m_chkLabels =
53b98211 JS	211	m_chkBothSides = (wxCheckBox *)NULL;
	212
	213	m_radioSides = (wxRadioBox *)NULL;
32b8ec41 VZ	214
	215	m_slider = (wxSlider *)NULL;
	216	m_sizerSlider = (wxSizer *)NULL;
	217
	218	wxSizer *sizerTop = new wxBoxSizer(wxHORIZONTAL);
	219
	220	// left pane
	221	wxStaticBox *box = new wxStaticBox(this, -1, _T("&Set style"));
	222	wxSizer *sizerLeft = new wxStaticBoxSizer(box, wxVERTICAL);
	223
	224	m_chkVert = CreateCheckBoxAndAddToSizer(sizerLeft, _T("&Vertical"));
	225	m_chkTicks = CreateCheckBoxAndAddToSizer(sizerLeft, _T("Show &ticks"));
	226	m_chkLabels = CreateCheckBoxAndAddToSizer(sizerLeft, _T("Show &labels"));
53b98211 JS	227	static const wxString sides[] =
	228	{
	229	_T("top"),
	230	_T("bottom"),
	231	_T("left"),
	232	_T("right"),
	233	};
	234	m_radioSides = new wxRadioBox(this, SliderPage_RadioSides, _T("&Ticks/Labels"),
	235	wxDefaultPosition, wxDefaultSize,
	236	WXSIZEOF(sides), sides,
	237	1, wxRA_SPECIFY_COLS);
	238	sizerLeft->Add(m_radioSides, 0, wxGROW \| wxALL, 5);
	239	m_chkBothSides = CreateCheckBoxAndAddToSizer
	240	(sizerLeft, _T("&Both sides"), SliderPage_BothSides);
	241	#if wxUSE_TOOLTIPS
	242	m_chkBothSides->SetToolTip( _T("\"Both sides\" is only supported \nin Win95 and Universal") );
	243	#endif // wxUSE_TOOLTIPS
32b8ec41 VZ	244
	245	sizerLeft->Add(5, 5, 0, wxGROW \| wxALL, 5); // spacer
	246
	247	wxButton *btn = new wxButton(this, SliderPage_Reset, _T("&Reset"));
	248	sizerLeft->Add(btn, 0, wxALIGN_CENTRE_HORIZONTAL \| wxALL, 15);
	249
	250	// middle pane
	251	wxStaticBox *box2 = new wxStaticBox(this, -1, _T("&Change slider value"));
	252	wxSizer *sizerMiddle = new wxStaticBoxSizer(box2, wxVERTICAL);
	253
	254	wxTextCtrl *text;
	255	wxSizer *sizerRow = CreateSizerWithTextAndLabel(_T("Current value"),
	256	SliderPage_CurValueText,
	257	&text);
	258	text->SetEditable(FALSE);
	259
	260	sizerMiddle->Add(sizerRow, 0, wxALL \| wxGROW, 5);
	261
	262	sizerRow = CreateSizerWithTextAndButton(SliderPage_SetValue,
	263	_T("Set &value"),
	264	SliderPage_ValueText,
	265	&m_textValue);
	266	sizerMiddle->Add(sizerRow, 0, wxALL \| wxGROW, 5);
	267
	268	sizerRow = CreateSizerWithTextAndButton(SliderPage_SetMinAndMax,
	269	_T("&Min and max"),
	270	SliderPage_MinText,
	271	&m_textMin);
	272
	273	m_textMax = new wxTextCtrl(this, SliderPage_MaxText, _T(""));
	274	sizerRow->Add(m_textMax, 1, wxLEFT \| wxALIGN_CENTRE_VERTICAL, 5);
	275
aec18ff7 MB	276	m_textMin->SetValue( wxString::Format(_T("%d"), m_min) );
aec18ff7 MB	277	m_textMax->SetValue( wxString::Format(_T("%d"), m_max) );
32b8ec41 VZ	278
	279	sizerMiddle->Add(sizerRow, 0, wxALL \| wxGROW, 5);
	280
	281	sizerRow = CreateSizerWithTextAndButton(SliderPage_SetTickFreq,
	282	_T("Tick &frequency"),
	283	SliderPage_TickFreqText,
	284	&m_textTickFreq);
	285
	286	m_textTickFreq->SetValue(_T("10"));
	287
	288	sizerMiddle->Add(sizerRow, 0, wxALL \| wxGROW, 5);
	289
53b98211 JS	290	sizerRow = CreateSizerWithTextAndButton(SliderPage_SetThumbLen,
	291	_T("Thumb &lenght"),
	292	SliderPage_ThumbLenText,
	293	&m_textThumbLen);
	294
	295	sizerMiddle->Add(sizerRow, 0, wxALL \| wxGROW, 5);
	296
32b8ec41 VZ	297	// right pane
32b8ec41 VZ	298	wxSizer *sizerRight = new wxBoxSizer(wxHORIZONTAL);
53b98211	299	sizerRight->SetMinSize(150, 40);
32b8ec41 VZ	300	m_sizerSlider = sizerRight; // save it to modify it later
	301
	302	Reset();
	303	CreateSlider();
	304
	305	// the 3 panes panes compose the window
	306	sizerTop->Add(sizerLeft, 0, wxGROW \| (wxALL & ~wxLEFT), 10);
7b127900	307	sizerTop->Add(sizerMiddle, 0, wxGROW \| wxALL, 10);
32b8ec41 VZ	308	sizerTop->Add(sizerRight, 1, wxGROW \| (wxALL & ~wxRIGHT), 10);
	309
	310	// final initializations
	311	SetAutoLayout(TRUE);
	312	SetSizer(sizerTop);
	313
	314	sizerTop->Fit(this);
	315	}
	316
	317	SliderWidgetsPage::~SliderWidgetsPage()
	318	{
	319	}
	320
	321	// ----------------------------------------------------------------------------
	322	// operations
	323	// ----------------------------------------------------------------------------
	324
	325	void SliderWidgetsPage::Reset()
	326	{
32b8ec41	327	m_chkVert->SetValue(FALSE);
53b98211 JS	328	m_chkTicks->SetValue(TRUE);
	329	m_chkLabels->SetValue(TRUE);
	330	m_chkBothSides->SetValue(FALSE);
	331
	332	m_radioSides->SetSelection(StaticSides_Top);
32b8ec41 VZ	333	}
	334
	335	void SliderWidgetsPage::CreateSlider()
	336	{
	337	int flags = 0;
	338
	339	bool isVert = m_chkVert->GetValue();
	340	if ( isVert )
	341	flags \|= wxSL_VERTICAL;
	342	else
	343	flags \|= wxSL_HORIZONTAL;
	344
	345	if ( m_chkLabels->GetValue() )
	346	{
	347	flags \|= wxSL_LABELS;
32b8ec41 VZ	348	}
	349
	350	if ( m_chkTicks->GetValue() )
	351	{
	352	flags \|= wxSL_AUTOTICKS;
	353	}
	354
53b98211 JS	355	switch ( m_radioSides->GetSelection() )
	356	{
	357	case StaticSides_Top:
	358	flags \|= wxSL_TOP;
	359	break;
	360	case StaticSides_Left:
	361	flags \|= wxSL_LEFT;
	362	break;
	363	case StaticSides_Bottom:
	364	flags \|= wxSL_BOTTOM;
	365	break;
	366	case StaticSides_Right:
	367	flags \|= wxSL_RIGHT;
	368	break;
	369	default:
	370	wxFAIL_MSG(_T("unexpected radiobox selection"));
	371	// fall through
	372	}
	373
	374	if ( m_chkBothSides->GetValue() )
	375	{
	376	flags \|= wxSL_BOTH;
	377	}
	378
32b8ec41 VZ	379	int val = m_min;
	380	if ( m_slider )
	381	{
	382	int valOld = m_slider->GetValue();
	383	if ( !IsValidValue(valOld) )
	384	{
	385	val = valOld;
	386	}
	387
12a3f227	388	m_sizerSlider->Detach( m_slider );
32b8ec41 VZ	389
	390	if ( m_sizerSlider->GetChildren().GetCount() )
	391	{
	392	// we have 2 spacers, remove them too
9dd96c0f VZ	393	m_sizerSlider->Remove( 0 );
9dd96c0f VZ	394	m_sizerSlider->Remove( 0 );
32b8ec41 VZ	395	}
	396
	397	delete m_slider;
	398	}
	399
	400	m_slider = new wxSlider(this, SliderPage_Slider,
	401	val, m_min, m_max,
	402	wxDefaultPosition, wxDefaultSize,
	403	flags);
	404
	405	if ( isVert )
	406	{
	407	m_sizerSlider->Add(0, 0, 1);
	408	m_sizerSlider->Add(m_slider, 0, wxGROW \| wxALL, 5);
	409	m_sizerSlider->Add(0, 0, 1);
	410	}
	411	else
	412	{
	413	m_sizerSlider->Add(m_slider, 1, wxCENTRE \| wxALL, 5);
	414	}
	415
	416	if ( m_chkTicks->GetValue() )
	417	{
	418	DoSetTickFreq();
	419	}
	420
	421	m_sizerSlider->Layout();
	422	}
	423
	424	void SliderWidgetsPage::DoSetTickFreq()
	425	{
	426	long freq;
	427	if ( !m_textTickFreq->GetValue().ToLong(&freq) )
	428	{
	429	wxLogWarning(_T("Invalid slider tick frequency"));
	430
	431	return;
	432	}
	433
	434	m_slider->SetTickFreq(freq, 0 /* unused */);
	435	}
	436
53b98211 JS	437	void SliderWidgetsPage::DoSetThumbLen()
	438	{
	439	long len;
	440	if ( !m_textThumbLen->GetValue().ToLong(&len) )
	441	{
	442	wxLogWarning(_T("Invalid slider thumb lenght"));
	443
	444	return;
	445	}
	446
	447	m_slider->SetThumbLength(len);
	448	}
	449
32b8ec41 VZ	450	// ----------------------------------------------------------------------------
	451	// event handlers
	452	// ----------------------------------------------------------------------------
	453
	454	void SliderWidgetsPage::OnButtonReset(wxCommandEvent& WXUNUSED(event))
	455	{
	456	Reset();
	457
	458	CreateSlider();
	459	}
	460
	461	void SliderWidgetsPage::OnButtonSetTickFreq(wxCommandEvent& WXUNUSED(event))
	462	{
	463	DoSetTickFreq();
	464	}
	465
53b98211 JS	466	void SliderWidgetsPage::OnButtonSetThumbLen(wxCommandEvent& WXUNUSED(event))
	467	{
	468	DoSetThumbLen();
	469	}
	470
32b8ec41 VZ	471	void SliderWidgetsPage::OnButtonSetMinAndMax(wxCommandEvent& WXUNUSED(event))
	472	{
	473	long minNew,
	474	maxNew = 0; // init to suppress compiler warning
	475	if ( !m_textMin->GetValue().ToLong(&minNew) \|\|
	476	!m_textMax->GetValue().ToLong(&maxNew) \|\|
	477	minNew >= maxNew )
	478	{
	479	wxLogWarning(_T("Invalid min/max values for the slider."));
	480
	481	return;
	482	}
	483
	484	m_min = minNew;
	485	m_max = maxNew;
	486
	487	m_slider->SetRange(minNew, maxNew);
	488	}
	489
	490	void SliderWidgetsPage::OnButtonSetValue(wxCommandEvent& WXUNUSED(event))
	491	{
	492	long val;
	493	if ( !m_textValue->GetValue().ToLong(&val) \|\| !IsValidValue(val) )
	494	{
	495	wxLogWarning(_T("Invalid slider value."));
	496
	497	return;
	498	}
	499
	500	m_slider->SetValue(val);
	501	}
	502
	503	void SliderWidgetsPage::OnUpdateUIValueButton(wxUpdateUIEvent& event)
	504	{
	505	long val;
	506	event.Enable( m_textValue->GetValue().ToLong(&val) && IsValidValue(val) );
	507	}
	508
	509	void SliderWidgetsPage::OnUpdateUITickFreq(wxUpdateUIEvent& event)
	510	{
	511	long freq;
	512	event.Enable( m_chkTicks->GetValue() &&
	513	m_textTickFreq->GetValue().ToLong(&freq) &&
	514	(freq > 0) && (freq <= m_max - m_min) );
	515	}
	516
53b98211 JS	517	void SliderWidgetsPage::OnUpdateUIThumbLen(wxUpdateUIEvent& event)
	518	{
	519	long val;
	520	event.Enable( m_textThumbLen->GetValue().ToLong(&val));
	521	}
	522
32b8ec41 VZ	523	void SliderWidgetsPage::OnUpdateUIMinMaxButton(wxUpdateUIEvent& event)
	524	{
	525	long mn, mx;
	526	event.Enable( m_textMin->GetValue().ToLong(&mn) &&
	527	m_textMax->GetValue().ToLong(&mx) &&
	528	mn < mx);
	529	}
	530
	531	void SliderWidgetsPage::OnUpdateUIResetButton(wxUpdateUIEvent& event)
	532	{
	533	event.Enable( m_chkVert->GetValue() \|\|
53b98211	534	!m_chkTicks->GetValue() \|\|
32b8ec41	535	!m_chkLabels->GetValue() \|\|
53b98211	536	m_chkBothSides->GetValue() );
32b8ec41 VZ	537	}
32b8ec41 VZ	538
c02e5a31	539	void SliderWidgetsPage::OnCheckOrRadioBox(wxCommandEvent& WXUNUSED(event))
32b8ec41 VZ	540	{
	541	CreateSlider();
	542	}
	543
	544	void SliderWidgetsPage::OnUpdateUICurValueText(wxUpdateUIEvent& event)
	545	{
aec18ff7	546	event.SetText( wxString::Format(_T("%d"), m_slider->GetValue()) );
32b8ec41 VZ	547	}
32b8ec41 VZ	548
53b98211 JS	549	void SliderWidgetsPage::OnUpdateUIRadioSides(wxUpdateUIEvent& event)
	550	{
	551	event.Enable( m_chkLabels->GetValue() \|\| m_chkTicks->GetValue() );
	552	}
	553
	554	void SliderWidgetsPage::OnUpdateUIBothSides(wxUpdateUIEvent& event)
32b8ec41	555	{
53b98211 JS	556	#if defined(__WIN95__) \|\| defined(__WXUNIVERSAL__)
	557	event.Enable( m_chkTicks->GetValue() );
	558	#else
	559	event.Enable( FALSE );
	560	#endif // defined(__WIN95__) \|\| defined(__WXUNIVERSAL__)
32b8ec41 VZ	561	}
32b8ec41 VZ	562
d79b005a	563	void SliderWidgetsPage::OnSlider(wxScrollEvent& event)
32b8ec41	564	{
2b5f62a0 VZ	565	wxASSERT_MSG( event.GetInt() == m_slider->GetValue(),
2b5f62a0 VZ	566	wxT("slider value should be the same") );
32b8ec41	567
d79b005a VZ	568	wxEventType eventType = event.GetEventType();
	569
	570	/*
	571	This array takes the EXACT order of the declarations in
	572	include/wx/event.h
	573	(section "wxScrollBar and wxSlider event identifiers")
	574	*/
	575	static const wxChar *eventNames[] =
	576	{
	577	wxT("wxEVT_SCROLL_TOP"),
	578	wxT("wxEVT_SCROLL_BOTTOM"),
	579	wxT("wxEVT_SCROLL_LINEUP"),
	580	wxT("wxEVT_SCROLL_LINEDOWN"),
	581	wxT("wxEVT_SCROLL_PAGEUP"),
	582	wxT("wxEVT_SCROLL_PAGEDOWN"),
	583	wxT("wxEVT_SCROLL_THUMBTRACK"),
	584	wxT("wxEVT_SCROLL_THUMBRELEASE"),
	585	wxT("wxEVT_SCROLL_ENDSCROLL")
	586	};
	587
	588	int index = eventType - wxEVT_SCROLL_TOP;
	589
	590	/*
	591	If this assert is triggered, there is an unknown slider event which
	592	should be added to the above eventNames array.
	593	*/
8b1d8f36	594	wxASSERT_MSG(index >= 0 && (size_t)index < WXSIZEOF(eventNames),
d79b005a VZ	595	wxT("Unknown slider event") );
	596
	597
	598	static int s_numSliderEvents = 0;
	599
	600	wxLogMessage(wxT("Slider event #%d: %s (pos = %d)"),
580d78b3	601	s_numSliderEvents++,
d79b005a VZ	602	eventNames[index],
d79b005a VZ	603	event.GetPosition());
32b8ec41 VZ	604	}
32b8ec41 VZ	605
8b611f0e DE	606	#endif
8b611f0e DE	607	// wxUSE_SLIDER