Improve widget part caching

[libs/gltk.git] / source / slider.cpp

diff --git a/source/slider.cpp b/source/slider.cpp
index e7f67c111016cd87b3eb348883e4788292b1bb97..7123458c0e41b7268ce44b7c556543dfd2af9aa1 100644 (file)
--- a/source/slider.cpp
+++ b/source/slider.cpp
@@ -3,26 +3,76 @@
 namespace Msp {
 namespace GLtk {
 
-Slider::Slider(const Resources &r):
-       Widget(r),
+Slider::Slider():
        min(0),
        max(1),
        value(0),
-       step(0.1)
-{
-}
+       step(0.1),
+       dragging(false),
+       drag_area_size(0)
+{ }
 
 void Slider::set_value(double v)
 {
+       double old_value = value;
+
        if(v<min)
-               value=min;
+               value = min;
        else if(v>max)
-               value=max;
+               value = max;
        else
        {
-               unsigned steps=static_cast<unsigned>((v-min)/step+0.5);
-               value=min+steps*step;
+               unsigned steps = static_cast<unsigned>((v-min)/step+0.5);
+               value = min+steps*step;
        }
+
+       if(value!=old_value)
+       {
+               signal_value_changed.emit(value);
+               rebuild();
+       }
+}
+
+void Slider::set_range(double a, double b)
+{
+       min = a;
+       max = b;
+       set_value(value);
+}
+
+void Slider::set_step(double s)
+{
+       step = s;
+       set_value(value);
+}
+
+void Slider::start_drag(int p)
+{
+       dragging = true;
+       drag_start_pos = p;
+       drag_start_value = value;
+       set_state(ACTIVE);
+}
+
+void Slider::drag(int p)
+{
+       if(max>min)
+               set_value(drag_start_value+(p-drag_start_pos)*(max-min)/drag_area_size);
+}
+
+void Slider::end_drag()
+{
+       dragging = false;
+       clear_state(ACTIVE);
+}
+
+
+Slider::Loader::Loader(Slider &s):
+       DataFile::DerivedObjectLoader<Slider, Widget::Loader>(s)
+{
+       add("range", &Slider::min, &Slider::max);
+       add("step",  &Slider::step);
+       add("value", &Slider::value);
 }
 
 } // namespace GLtk