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, 36 insertions, 0 deletions

diff --git a/qtruby/rubylib/tutorial/t9/lcdrange.rb b/qtruby/rubylib/tutorial/t9/lcdrange.rb
new file mode 100644
index 00000000..6eb2f732
--- /dev/null
+++ b/qtruby/rubylib/tutorial/t9/lcdrange.rb
@@ -0,0 +1,36 @@
+require 'Qt'
+
+class LCDRange < Qt::VBox
+	signals 'valueChanged(int)'
+	slots 'setValue(int)', 'setRange(int, int)'
+
+	def initialize(parent, name)
+		super
+		lcd = Qt::LCDNumber.new(2, self, 'lcd')
+	    @slider = Qt::Slider.new(Qt::VBox::Horizontal, self, 'slider')
+	    @slider.setRange(0, 99)
+	    @slider.setValue(0)
+		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
+      		printf( "LCDRange::setRange(%d,%d)\n" +
+               		"\tRange must be 0..99\n" +
+               		"\tand minVal must not be greater than maxVal",
+               		minVal, maxVal )
+			return
+		end
+		@slider.setRange( minVal, maxVal )
+	end
+end