From 90825e2392b2d70e43c7a25b8a3752299a933894 Mon Sep 17 00:00:00 2001
From: toma <toma@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>
Date: Wed, 25 Nov 2009 17:56:58 +0000
Subject: 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
---
 qtruby/rubylib/tutorial/t8/cannon.rb   | 38 +++++++++++++++++++++++++++++
 qtruby/rubylib/tutorial/t8/lcdrange.rb | 35 +++++++++++++++++++++++++++
 qtruby/rubylib/tutorial/t8/t8.rb       | 44 ++++++++++++++++++++++++++++++++++
 3 files changed, 117 insertions(+)
 create mode 100644 qtruby/rubylib/tutorial/t8/cannon.rb
 create mode 100644 qtruby/rubylib/tutorial/t8/lcdrange.rb
 create mode 100755 qtruby/rubylib/tutorial/t8/t8.rb

(limited to 'qtruby/rubylib/tutorial/t8')

diff --git a/qtruby/rubylib/tutorial/t8/cannon.rb b/qtruby/rubylib/tutorial/t8/cannon.rb
new file mode 100644
index 00000000..b3202a93
--- /dev/null
+++ b/qtruby/rubylib/tutorial/t8/cannon.rb
@@ -0,0 +1,38 @@
+require 'Qt'
+
+class CannonField < Qt::Widget
+	signals 'angleChanged(int)'
+	slots 'setAngle(int)'
+	
+	def initialize(parent, name)
+		super
+		@ang = 45
+    	setPalette( Qt::Palette.new( Qt::Color.new( 250, 250, 200) ) )
+	end
+
+	def setAngle( degrees )
+		if degrees < 5
+			degrees = 5
+		elsif degrees > 70
+        	degrees = 70
+		end
+		if @ang == degrees
+			return
+		end
+		@ang = degrees
+		repaint()
+		emit angleChanged( @ang )
+	end
+
+	def paintEvent( event )
+		s = "Angle = #{@ang}"
+		p = Qt::Painter.new( self )
+		p.drawText( 200, 200, s )
+		p.end()
+	end
+
+
+	def sizePolicy()
+    	return Qt::SizePolicy.new( Qt::SizePolicy::Expanding, Qt::SizePolicy::Expanding )
+	end
+end
diff --git a/qtruby/rubylib/tutorial/t8/lcdrange.rb b/qtruby/rubylib/tutorial/t8/lcdrange.rb
new file mode 100644
index 00000000..011196fd
--- /dev/null
+++ b/qtruby/rubylib/tutorial/t8/lcdrange.rb
@@ -0,0 +1,35 @@
+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
+      		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
diff --git a/qtruby/rubylib/tutorial/t8/t8.rb b/qtruby/rubylib/tutorial/t8/t8.rb
new file mode 100755
index 00000000..881d15e7
--- /dev/null
+++ b/qtruby/rubylib/tutorial/t8/t8.rb
@@ -0,0 +1,44 @@
+#!/usr/bin/env ruby
+$VERBOSE = true; $:.unshift File.dirname($0)
+
+require 'Qt'
+require 'lcdrange.rb'
+require 'cannon.rb'
+
+class MyWidget < Qt::Widget
+	def initialize()
+		super
+    	quit = Qt::PushButton.new('Quit', self, 'quit')
+    	quit.setFont(Qt::Font.new('Times', 18, Qt::Font::Bold))
+    
+		connect(quit, SIGNAL('clicked()'), $qApp, SLOT('quit()'))
+    
+		angle = LCDRange.new( self, 'angle' )
+		angle.setRange( 5, 70 )
+
+		cannonField = CannonField.new( self, 'cannonField' )
+
+		connect( angle, SIGNAL('valueChanged(int)'),
+				cannonField, SLOT('setAngle(int)') )
+		connect( cannonField, SIGNAL('angleChanged(int)'),
+				angle, SLOT('setValue(int)') )
+		grid = Qt::GridLayout.new( self, 2, 2, 10 )
+		# 2x2, 10 pixel border
+
+		grid.addWidget( quit, 0, 0 )
+		grid.addWidget( angle, 1, 0, Qt.AlignTop )
+		grid.addWidget( cannonField, 1, 1 )
+		grid.setColStretch( 1, 10 )
+
+		angle.setValue( 60 )
+		angle.setFocus()
+	end
+end    
+
+a = Qt::Application.new(ARGV)
+
+w = MyWidget.new
+w.setGeometry( 100, 100, 500, 355 )
+a.setMainWidget(w)
+w.show
+a.exec
-- 
cgit v1.2.1