Copy the KDE 3.5 branch to branches/trinity for new KDE 3.5 features.

BUG:215923


git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/kdebindings@1054174 283d02a7-25f6-0310-bc7c-ecb5cbfe19da

1 files changed, 47 insertions, 0 deletions

diff --git a/qtruby/rubylib/tutorial/t12/lcdrange.rb b/qtruby/rubylib/tutorial/t12/lcdrange.rb
new file mode 100644
index 00000000..ef5c849d
--- /dev/null
+++ b/qtruby/rubylib/tutorial/t12/lcdrange.rb
@@ -0,0 +1,47 @@
+require 'Qt'
+
+class LCDRange < Qt::VBox
+    signals 'valueChanged(int)'
+    slots 'setValue(int)', 'setRange(int, int)', 'setText(const char *)'
+
+    def initialize(s, parent, name)
+        super(parent, name)
+        init()
+        setText(s)
+    end
+    
+    def init()
+        lcd = Qt::LCDNumber.new(2, self, 'lcd')
+        @slider = Qt::Slider.new(Qt::VBox::Horizontal, self, 'slider')
+        @slider.setRange(0, 99)
+        @slider.setValue(0)
+        @label = Qt::Label.new( ' ', self, 'label'  )
+        @label.setAlignment( Qt::AlignCenter )    
+        connect(@slider, SIGNAL('valueChanged(int)'), lcd, SLOT('display(int)'))
+        connect(@slider, SIGNAL('valueChanged(int)'), SIGNAL('valueChanged(int)'))
+        setFocusProxy(@slider)
+    end
+
+    def value()
+        @slider.value()
+    end
+
+    def setValue( value )
+        @slider.setValue( value )
+    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
+    
+    def setText( s )
+        @label.setText( s )
+    end
+
+end