qtruby4 2.1.0.b-mswin32 → 2.1.0-mswin32

data/examples/tutorial/t14/t14.rb

@@ -0,0 +1,11 @@
+#!/usr/bin/env ruby
+$VERBOSE = true; $:.unshift File.dirname($0)
+
+require 'Qt'
+require 'gamebrd.rb'
+
+app = Qt::Application.new(ARGV)
+board = GameBoard.new
+board.setGeometry( 100, 100, 500, 355 )
+board.show
+app.exec

data/examples/tutorial/t2/t2.rb

@@ -0,0 +1,16 @@
+#!/usr/bin/env ruby
+$VERBOSE = true; $:.unshift File.dirname($0)
+
+require 'Qt';
+
+a = Qt::Application.new(ARGV)
+
+quit = Qt::PushButton.new('Quit', nil)
+quit.resize(75, 30)
+quit.setFont(Qt::Font.new('Times', 18, Qt::Font::Bold))
+
+Qt::Object.connect(quit, SIGNAL('clicked()'), a, SLOT('quit()'))
+
+quit.show
+a.exec
+exit

data/examples/tutorial/t3/t3.rb

@@ -0,0 +1,18 @@
+#!/usr/bin/env ruby
+$VERBOSE = true; $:.unshift File.dirname($0)
+
+require 'Qt'
+
+app = Qt::Application.new(ARGV)
+
+window = Qt::Widget.new
+window.resize(200, 120)
+
+quit = Qt::PushButton.new('Quit', window)
+quit.font = Qt::Font.new('Times', 18, Qt::Font::Bold)
+quit.setGeometry(10, 40, 180, 40)
+app.connect(quit, SIGNAL('clicked()'), app, SLOT('quit()'))
+
+window.show
+app.exec
+

data/examples/tutorial/t4/t4.rb

@@ -0,0 +1,25 @@
+#!/usr/bin/env ruby
+$VERBOSE = true; $:.unshift File.dirname($0)
+
+require 'Qt'
+
+class MyWidget < Qt::Widget
+
+def initialize(parent = nil)
+    super
+    setFixedSize(200, 120)
+
+    quit = Qt::PushButton.new('Quit', self)
+    quit.setGeometry(62, 40, 75, 30)
+    quit.setFont(Qt::Font.new('Times', 18, Qt::Font::Bold))
+
+    connect(quit, SIGNAL('clicked()'), $qApp, SLOT('quit()'))
+end
+
+end
+
+app = Qt::Application.new(ARGV)
+
+widget = MyWidget.new
+widget.show
+app.exec

data/examples/tutorial/t5/t5.rb

@@ -0,0 +1,37 @@
+#!/usr/bin/env ruby
+$VERBOSE = true; $:.unshift File.dirname($0)
+
+require 'Qt'
+
+class MyWidget < Qt::Widget
+
+def initialize()
+    super
+    quit = Qt::PushButton.new('Quit')
+    quit.setFont(Qt::Font.new('Times', 18, Qt::Font::Bold))
+    
+    connect(quit, SIGNAL('clicked()'), $qApp, SLOT('quit()'))
+    
+    lcd = Qt::LCDNumber.new(2)
+
+    slider = Qt::Slider.new(Qt::Horizontal)
+    slider.range = 0..99
+    slider.value = 0
+
+    connect(quit, SIGNAL('clicked()'), $qApp, SLOT('quit()'))
+    connect(slider, SIGNAL('valueChanged(int)'),
+            lcd, SLOT('display(int)'))
+
+    layout = Qt::VBoxLayout.new
+    layout.addWidget(quit)
+    layout.addWidget(lcd)
+    layout.addWidget(slider)
+    setLayout(layout)
+end
+
+end
+
+app = Qt::Application.new(ARGV)
+widget = MyWidget.new
+widget.show
+app.exec

data/examples/tutorial/t6/t6.rb

@@ -0,0 +1,52 @@
+#!/usr/bin/env ruby
+$VERBOSE = true; $:.unshift File.dirname($0)
+
+require 'Qt'
+
+class LCDRange < Qt::Widget
+
+def initialize(parent = nil)
+    super
+    lcd = Qt::LCDNumber.new(2)
+    slider = Qt::Slider.new(Qt::Horizontal)
+    slider.range = 0..99
+    slider.value = 0
+
+    lcd.connect(slider, SIGNAL('valueChanged(int)'), SLOT('display(int)'))
+
+    layout = Qt::VBoxLayout.new
+    layout.addWidget(lcd)
+    layout.addWidget(slider)
+    setLayout(layout)
+end
+
+end
+
+class MyWidget < Qt::Widget
+
+def initialize()
+    super
+    quit = Qt::PushButton.new('Quit')
+    quit.setFont(Qt::Font.new('Times', 18, Qt::Font::Bold))
+    connect(quit, SIGNAL('clicked()'), $qApp, SLOT('quit()'))
+
+    grid = Qt::GridLayout.new
+	
+    for row in 0..3
+        for column in 0..3
+            grid.addWidget(LCDRange.new, row, column)
+        end
+    end
+
+    layout = Qt::VBoxLayout.new
+    layout.addWidget(quit)
+    layout.addLayout(grid)
+    setLayout(layout)
+end
+
+end    
+
+app = Qt::Application.new(ARGV)
+widget = MyWidget.new
+widget.show
+app.exec

data/examples/tutorial/t7/lcdrange.rb

@@ -0,0 +1,32 @@
+#!/usr/bin/ruby -w
+require 'Qt'
+
+class LCDRange < Qt::Widget
+    signals 'valueChanged(int)'
+    slots 'setValue(int)'
+
+    def initialize(parent = nil)
+        super
+        lcd = Qt::LCDNumber.new(2)
+
+        @slider = Qt::Slider.new(Qt::Horizontal)
+        @slider.range = 0..99
+        @slider.value = 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)
+    end
+
+    def value()
+        @slider.value()
+    end
+
+    def setValue( value )
+        @slider.setValue( value )
+    end
+end

data/examples/tutorial/t7/t7.rb

@@ -0,0 +1,42 @@
+#!/usr/bin/env ruby
+$VERBOSE = true; $:.unshift File.dirname($0)
+
+require 'Qt'
+require 'lcdrange.rb'
+
+class MyWidget < Qt::Widget
+
+    def initialize(parent = nil)
+        super(parent)
+        quit = Qt::PushButton.new('Quit')
+        quit.setFont(Qt::Font.new('Times', 18, Qt::Font::Bold))
+    
+        connect(quit, SIGNAL('clicked()'), $qApp, SLOT('quit()'))
+
+        grid = Qt::GridLayout.new
+        previousRange = nil
+        for row in 0..3
+            for column in 0..3
+                lcdRange = LCDRange.new(self)
+                grid.addWidget(lcdRange, row, column)
+                if previousRange != nil
+                    connect( lcdRange, SIGNAL('valueChanged(int)'),
+                             previousRange, SLOT('setValue(int)') )
+                end
+                previousRange = lcdRange
+            end
+        end
+
+        layout = Qt::VBoxLayout.new
+        layout.addWidget(quit)
+        layout.addLayout(grid)
+        setLayout(layout)
+    end
+
+end    
+
+app = Qt::Application.new(ARGV)
+
+widget = MyWidget.new
+widget.show
+app.exec

data/examples/tutorial/t8/cannon.rb

@@ -0,0 +1,38 @@
+require 'Qt'
+
+class CannonField < Qt::Widget
+	signals 'angleChanged(int)'
+	slots 'setAngle(int)'
+	
+	def initialize(parent = nil)
+		super
+		@currentAngle = 45
+    	setPalette( Qt::Palette.new( Qt::Color.new( 250, 250, 200) ) )
+		setAutoFillBackground(true)
+	end
+
+	def setAngle( degrees )
+		if degrees < 5
+			degrees = 5
+		elsif degrees > 70
+        	degrees = 70
+		end
+		if @currentAngle == degrees
+			return
+		end
+		@currentAngle = degrees
+		repaint()
+		emit angleChanged( @currentAngle )
+	end
+
+	def paintEvent( event )
+		p = Qt::Painter.new( self )
+		p.drawText( 200, 200, "Angle = %d" % @currentAngle )
+		p.end()
+	end
+
+
+	def sizePolicy()
+    	return Qt::SizePolicy.new( Qt::SizePolicy::Expanding, Qt::SizePolicy::Expanding )
+	end
+end

data/examples/tutorial/t8/lcdrange.rb

@@ -0,0 +1,45 @@
+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.value = 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

data/examples/tutorial/t8/t8.rb

@@ -0,0 +1,43 @@
+#!/usr/bin/env ruby
+$VERBOSE = true; $:.unshift File.dirname($0)
+
+require 'Qt'
+require 'lcdrange.rb'
+require 'cannon.rb'
+
+class MyWidget < Qt::Widget
+    def initialize(parent = nil)
+        super
+        quit = Qt::PushButton.new('Quit')
+        quit.setFont(Qt::Font.new('Times', 18, Qt::Font::Bold))
+    
+        connect(quit, SIGNAL('clicked()'), $qApp, SLOT('quit()'))
+    
+        angle = LCDRange.new( self )
+        angle.range = 5..70
+
+        cannonField = CannonField.new( self )
+
+        connect( angle, SIGNAL('valueChanged(int)'),
+                cannonField, SLOT('setAngle(int)') )
+        connect( cannonField, SIGNAL('angleChanged(int)'),
+                angle, SLOT('setValue(int)') )
+
+        gridLayout = Qt::GridLayout.new
+        gridLayout.addWidget( quit, 0, 0 )
+        gridLayout.addWidget( angle, 1, 0 )
+        gridLayout.addWidget( cannonField, 1, 1, 2, 1 )
+        gridLayout.setColumnStretch( 1, 10 )
+        setLayout( gridLayout )
+
+        angle.setValue( 60 )
+        angle.setFocus()
+    end
+end    
+
+a = Qt::Application.new(ARGV)
+
+w = MyWidget.new
+w.setGeometry( 100, 100, 500, 355 )
+w.show
+a.exec

data/examples/tutorial/t9/cannon.rb

@@ -0,0 +1,45 @@
+require 'Qt'
+
+class CannonField < Qt::Widget
+    signals 'angleChanged(int)'
+    slots 'setAngle(int)'
+    
+    def initialize(parent = nil)
+        super
+        @currentAngle = 45
+        setPalette( Qt::Palette.new( Qt::Color.new( 250, 250, 200) ) )
+	setAutoFillBackground(true)
+    end
+
+    def setAngle( degrees )
+        if degrees < 5
+            degrees = 5
+        elsif degrees > 70
+            degrees = 70
+        end
+        if @currentAngle == degrees
+            return
+        end
+        @currentAngle = degrees
+        repaint()
+        emit angleChanged( @currentAngle )
+    end
+
+    def paintEvent( event )
+        painter = Qt::Painter.new( self )
+
+        painter.setPen( Qt::NoPen )
+        painter.setBrush( Qt::Brush.new(Qt::blue) )
+
+        painter.translate( 0, rect().bottom() )
+        painter.drawPie( Qt::Rect.new(-35, -35, 70, 70), 0, 90*16 )
+        painter.rotate( - @currentAngle )
+        painter.drawRect( Qt::Rect.new(33, -4, 15, 8) )
+        painter.end()
+    end
+
+
+    def sizePolicy()
+        return Qt::SizePolicy.new( Qt::SizePolicy::Expanding, Qt::SizePolicy::Expanding )
+    end
+end

data/examples/tutorial/t9/lcdrange.rb

@@ -0,0 +1,46 @@
+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
+              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