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/t10/cannon.rb   | 71 +++++++++++++++++++++++++++++++++
 qtruby/rubylib/tutorial/t10/lcdrange.rb | 35 ++++++++++++++++
 qtruby/rubylib/tutorial/t10/t10.rb      | 57 ++++++++++++++++++++++++++
 3 files changed, 163 insertions(+)
 create mode 100644 qtruby/rubylib/tutorial/t10/cannon.rb
 create mode 100644 qtruby/rubylib/tutorial/t10/lcdrange.rb
 create mode 100755 qtruby/rubylib/tutorial/t10/t10.rb

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

diff --git a/qtruby/rubylib/tutorial/t10/cannon.rb b/qtruby/rubylib/tutorial/t10/cannon.rb
new file mode 100644
index 00000000..3c02f8ff
--- /dev/null
+++ b/qtruby/rubylib/tutorial/t10/cannon.rb
@@ -0,0 +1,71 @@
+require 'Qt'
+
+class CannonField < Qt::Widget
+    signals 'angleChanged(int)', 'forceChanged(int)'
+    slots 'setAngle(int)', 'setForce(int)'
+    
+    def initialize(parent, name)
+        super
+        @ang = 45
+        @f = 0
+        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 setForce( newton )
+        if newton < 0
+            newton = 0
+        end
+        if @f == newton
+            return
+        end
+        @f = newton
+        emit forceChanged( @f )
+    end
+
+    def paintEvent( e )
+        if !e.rect().intersects( cannonRect() )
+            return
+        end
+
+        cr = cannonRect()
+        pix = Qt::Pixmap.new( cr.size() )
+        pix.fill( self, cr.topLeft() )
+        
+        p = Qt::Painter.new( pix )
+        p.setBrush( blue )
+        p.setPen( Qt::NoPen )
+        p.translate( 0, pix.height() - 1 )
+        p.drawPie( Qt::Rect.new(-35, -35, 70, 70), 0, 90*16 )
+        p.rotate( - @ang )
+        p.drawRect( Qt::Rect.new(33, -4, 15, 8) )
+        p.end()
+        
+        p.begin(self)
+        p.drawPixmap(cr.topLeft(), pix )
+        p.end()        
+    end
+
+    def cannonRect()
+        r = Qt::Rect.new( 0, 0, 50, 50)
+        r.moveBottomLeft( rect().bottomLeft() )
+        return r
+    end
+    
+    def sizePolicy()
+        return Qt::SizePolicy.new( Qt::SizePolicy::Expanding, Qt::SizePolicy::Expanding )
+    end
+end
diff --git a/qtruby/rubylib/tutorial/t10/lcdrange.rb b/qtruby/rubylib/tutorial/t10/lcdrange.rb
new file mode 100644
index 00000000..a0adc842
--- /dev/null
+++ b/qtruby/rubylib/tutorial/t10/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/t10/t10.rb b/qtruby/rubylib/tutorial/t10/t10.rb
new file mode 100755
index 00000000..4168d507
--- /dev/null
+++ b/qtruby/rubylib/tutorial/t10/t10.rb
@@ -0,0 +1,57 @@
+#!/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 )
+        
+        force  = LCDRange.new( self, 'force' )
+        force.setRange( 10, 50 )
+        
+        cannonField = CannonField.new( self, 'cannonField' )
+
+        connect( angle, SIGNAL('valueChanged(int)'),
+                cannonField, SLOT('setAngle(int)') )
+        connect( cannonField, SIGNAL('angleChanged(int)'),
+                angle, SLOT('setValue(int)') )
+
+        connect( force, SIGNAL('valueChanged(int)'),
+                cannonField, SLOT('setForce(int)') )
+        connect( cannonField, SIGNAL('forceChanged(int)'),
+                force, SLOT('setValue(int)') )
+        
+        grid = Qt::GridLayout.new( self, 2, 2, 10 )
+        grid.addWidget( quit, 0, 0 )
+        grid.addWidget( cannonField, 1, 1 )
+        grid.setColStretch( 1, 10 )
+
+        leftBox = Qt::VBoxLayout.new()
+        grid.addLayout( leftBox, 1, 0 )
+        leftBox.addWidget( angle )
+        leftBox.addWidget( force )
+    
+        angle.setValue( 60 )
+        force.setValue( 25 )
+        angle.setFocus()
+    end
+end    
+
+Qt::Application.setColorSpec( Qt::Application::CustomColor )
+a = Qt::Application.new(ARGV)
+
+w = MyWidget.new
+w.setGeometry( 100, 100, 500, 355 )
+a.setMainWidget(w)
+w.show
+a.exec
-- 
cgit v1.2.3