require 'Qt' class LCDRange < Qt::Widget signals 'valueChanged(int)' slots 'setValue(int)', 'setRange(int, int)' def initialize(parent = nil) super lcd = Qt::LCDNumber.new(2) @slider = Qt::Slider.new(Qt::Horizontal) @slider.range = 0..99 @slider.setValue(0) connect(@slider, SIGNAL('valueChanged(int)'), lcd, SLOT('display(int)')) connect(@slider, SIGNAL('valueChanged(int)'), SIGNAL('valueChanged(int)')) layout = Qt::VBoxLayout.new layout.addWidget(lcd) layout.addWidget(@slider) setLayout(layout) setFocusProxy(@slider) end def value() @slider.value() end def setValue(value) @slider.setValue(value) end def range=(r) setRange(r.begin, r.end) end def setRange(minVal, maxVal) if minVal < 0 || maxVal > 99 || minVal > maxVal qWarning("LCDRange::setRange(#{minVal},#{maxVal})\n" + "\tRange must be 0..99\n" + "\tand minVal must not be greater than maxVal") return end @slider.setRange(minVal, maxVal) end end