qtruby4 2.1.0.b-mswin32 → 2.1.0-mswin32

data/examples/opengl/hellogl/window.rb

@@ -0,0 +1,66 @@
+=begin
+**
+** Copyright (C) 2004-2005 Trolltech AS. All rights reserved.
+**
+** This file is part of the example classes of the Qt Toolkit.
+**
+** This file may be used under the terms of the GNU General Public
+** License version 2.0 as published by the Free Software Foundation
+** and appearing in the file LICENSE.GPL included in the packaging of
+** this file.  Please review the following information to ensure GNU
+** General Public Licensing requirements will be met:
+** http://www.trolltech.com/products/qt/opensource.html
+**
+** If you are unsure which license is appropriate for your use, please
+** review the following information:
+** http://www.trolltech.com/products/qt/licensing.html or contact the
+** sales department at sales@trolltech.com.
+**
+** This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
+** WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+**
+
+** Translated to QtRuby by Richard Dale
+=end
+    
+require 'glwidget.rb'
+
+class Window < Qt::Widget
+    
+    def initialize(parent = nil)
+        super
+        @glWidget = GLWidget.new(self)
+    
+        @xSlider = createSlider(SIGNAL('xRotationChanged(int)'),
+                               SLOT('setXRotation(int)'))
+        @ySlider = createSlider(SIGNAL('yRotationChanged(int)'),
+                               SLOT('setYRotation(int)'))
+        @zSlider = createSlider(SIGNAL('zRotationChanged(int)'),
+                               SLOT('setZRotation(int)'))
+    
+        self.layout = Qt::HBoxLayout.new do |m|
+            m.addWidget(@glWidget)
+            m.addWidget(@xSlider)
+            m.addWidget(@ySlider)
+            m.addWidget(@zSlider)
+        end
+    
+        @xSlider.value = 15 * 16
+        @ySlider.value = 345 * 16
+        @zSlider.value = 0 * 16
+        self.windowTitle = tr("Hello GL")
+    end
+    
+    def createSlider(changedSignal, setterSlot)
+        slider = Qt::Slider.new(Qt::Vertical) do |s|
+            s.range = 0..(360 * 16)
+            s.singleStep = 16
+            s.pageStep = 15 * 16
+            s.tickInterval = 15 * 16
+            s.tickPosition = Qt::Slider::TicksRight
+        end
+        connect(slider, SIGNAL('valueChanged(int)'), @glWidget, setterSlot)
+        connect(@glWidget, changedSignal, slider, SLOT('setValue(int)'))
+        return slider
+    end
+end

data/examples/opengl/textures/glwidget.rb

@@ -0,0 +1,151 @@
+=begin
+**
+** Copyright (C) 2004-2005 Trolltech AS. All rights reserved.
+**
+** This file is part of the example classes of the Qt Toolkit.
+**
+** This file may be used under the terms of the GNU General Public
+** License version 2.0 as published by the Free Software Foundation
+** and appearing in the file LICENSE.GPL included in the packaging of
+** this file.  Please review the following information to ensure GNU
+** General Public Licensing requirements will be met:
+** http://www.trolltech.com/products/qt/opensource.html
+**
+** If you are unsure which license is appropriate for your use, please
+** review the following information:
+** http://www.trolltech.com/products/qt/licensing.html or contact the
+** sales department at sales@trolltech.com.
+**
+** This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
+** WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+**
+
+** Translated to QtRuby by Richard Dale
+=end
+	
+require 'opengl'
+	
+class GLWidget < Qt::GLWidget
+	
+	signals	'clicked()'
+	
+	def initialize(parent, shareWidget)
+	    super(parent, shareWidget)
+	    @clearColor = Qt::Color.new(Qt::black)
+		@lastPos = Qt::Point.new
+	    @xRot = 0
+	    @yRot = 0
+	    @zRot = 0
+		@refCount = 0
+		@sharedObject = nil
+	end
+	
+	def dispose()
+		@refCount -= 1
+	    if @refCount == 0
+	        makeCurrent()
+	        GL.DeleteLists(sharedObject, 1)
+	    end
+		super
+	end
+	
+	def minimumSizeHint()
+	    return Qt::Size.new(50, 50)
+	end
+	
+	def sizeHint()
+	    return Qt::Size.new(200, 200)
+	end
+	
+	def rotateBy(xAngle, yAngle, zAngle)
+	    @xRot += xAngle
+	    @yRot += yAngle
+	    @zRot += zAngle
+	    updateGL()
+	end
+	
+	def clearColor=(color)
+	    @clearColor = color
+	    updateGL()
+	end
+	
+	def initializeGL()
+	    if @sharedObject.nil?
+	        @sharedObject = makeObject()
+		end
+	    @refCount += 1
+	
+	    GL.Enable(GL::DEPTH_TEST)
+	    GL.Enable(GL::CULL_FACE)
+	    GL.Enable(GL::TEXTURE_2D)
+	end
+	
+	def paintGL()
+	    qglClearColor(@clearColor)
+	    GL.Clear(GL::COLOR_BUFFER_BIT | GL::DEPTH_BUFFER_BIT)
+	    GL.LoadIdentity()
+	    GL.Translated(0.0, 0.0, -10.0)
+	    GL.Rotated(@xRot / 16.0, 1.0, 0.0, 0.0)
+	    GL.Rotated(@yRot / 16.0, 0.0, 1.0, 0.0)
+	    GL.Rotated(@zRot / 16.0, 0.0, 0.0, 1.0)
+	    GL.CallList(@sharedObject)
+	end
+	
+	def resizeGL(width, height)
+	    side = [width, height].min
+	    GL.Viewport((width - side) / 2, (height - side) / 2, side, side)
+	
+	    GL.MatrixMode(GL::PROJECTION)
+	    GL.LoadIdentity()
+	    GL.Ortho(-0.5, +0.5, +0.5, -0.5, 4.0, 15.0)
+	    GL.MatrixMode(GL::MODELVIEW)
+	end
+	
+	def mousePressEvent(event)
+	    @lastPos = event.pos
+	end
+	
+	def mouseMoveEvent(event)
+	    dx = event.x - @lastPos.x
+	    dy = event.y - @lastPos.y
+	
+	    if event.buttons & Qt::LeftButton.to_i != 0
+	        rotateBy(8 * dy, 8 * dx, 0)
+	    elsif event.buttons & Qt::RightButton.to_i != 0
+	        rotateBy(8 * dy, 0, 8 * dx)
+	    end
+	    @lastPos = event.pos()
+	end
+	
+	def mouseReleaseEvent(event)
+	    emit clicked()
+	end
+	
+	def makeObject()
+	    coords = [
+	        [ [ +1, -1, -1 ], [ -1, -1, -1 ], [ -1, +1, -1 ], [ +1, +1, -1 ] ],
+	        [ [ +1, +1, -1 ], [ -1, +1, -1 ], [ -1, +1, +1 ], [ +1, +1, +1 ] ],
+	        [ [ +1, -1, +1 ], [ +1, -1, -1 ], [ +1, +1, -1 ], [ +1, +1, +1 ] ],
+	        [ [ -1, -1, -1 ], [ -1, -1, +1 ], [ -1, +1, +1 ], [ -1, +1, -1 ] ],
+	        [ [ +1, -1, +1 ], [ -1, -1, +1 ], [ -1, -1, -1 ], [ +1, -1, -1 ] ],
+	        [ [ -1, -1, +1 ], [ +1, -1, +1 ], [ +1, +1, +1 ], [ -1, +1, +1 ] ] ]
+	
+	    list = GL.GenLists(1)
+	    GL.NewList(list, GL::COMPILE)
+	
+		(0...6).each do |i|
+	        bindTexture(Qt::Pixmap.new("images/side%d.png" % (i + 1)))
+	
+	        GL.Begin(GL::QUADS)
+			(0...4).each do |j|
+	            GL.TexCoord2d(j == 0 || j == 3 ? 1.0 : 0.0, j == 0 || j == 1 ? 1.0 : 0.0)
+	            GL.Vertex3d(0.2 * coords[i][j][0], 0.2 * coords[i][j][1],
+	                       0.2 * coords[i][j][2])
+	        end
+	        GL.End()
+	    end
+	
+	    GL.EndList()
+	    return list
+	end
+end

data/examples/opengl/textures/main.rb

@@ -0,0 +1,32 @@
+=begin
+**
+** Copyright (C) 2004-2005 Trolltech AS. All rights reserved.
+**
+** This file is part of the example classes of the Qt Toolkit.
+**
+** This file may be used under the terms of the GNU General Public
+** License version 2.0 as published by the Free Software Foundation
+** and appearing in the file LICENSE.GPL included in the packaging of
+** this file.  Please review the following information to ensure GNU
+** General Public Licensing requirements will be met:
+** http://www.trolltech.com/products/qt/opensource.html
+**
+** If you are unsure which license is appropriate for your use, please
+** review the following information:
+** http://www.trolltech.com/products/qt/licensing.html or contact the
+** sales department at sales@trolltech.com.
+**
+** This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
+** WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+**
+
+** Translated to QtRuby by Richard Dale
+=end
+
+require 'Qt'
+require 'window.rb'
+
+app = Qt::Application.new(ARGV)
+window = Window.new
+window.show
+app.exec

data/examples/opengl/textures/window.rb

@@ -0,0 +1,77 @@
+=begin
+**
+** Copyright (C) 2004-2005 Trolltech AS. All rights reserved.
+**
+** This file is part of the example classes of the Qt Toolkit.
+**
+** This file may be used under the terms of the GNU General Public
+** License version 2.0 as published by the Free Software Foundation
+** and appearing in the file LICENSE.GPL included in the packaging of
+** this file.  Please review the following information to ensure GNU
+** General Public Licensing requirements will be met:
+** http://www.trolltech.com/products/qt/opensource.html
+**
+** If you are unsure which license is appropriate for your use, please
+** review the following information:
+** http://www.trolltech.com/products/qt/licensing.html or contact the
+** sales department at sales@trolltech.com.
+**
+** This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
+** WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+**
+
+** Translated to QtRuby by Richard Dale
+=end
+
+require 'glwidget.rb'
+
+class Window < Qt::Widget
+	
+	slots   'currentGlWidget=()',
+    		'rotateOneStep()'
+	
+	NumRows = 2 
+    NumColumns = 3
+	
+	def initialize(parent = nil)
+		super
+	    mainLayout = Qt::GridLayout.new
+	
+	    @glWidgets = [[], []]
+
+		(0...NumRows).each do |i|
+			(0...NumColumns).each do |j|
+	            clearColor = Qt::Color.new
+	            clearColor.setHsv((i * NumColumns + j) * 255 / (NumRows * NumColumns - 1),
+	                              255, 63)
+	
+	            @glWidgets[i][j] = GLWidget.new(self, @glWidgets[0][0])
+	            @glWidgets[i][j].clearColor = clearColor
+	            @glWidgets[i][j].rotateBy(+42 * 16, +42 * 16, -21 * 16)
+	            mainLayout.addWidget(@glWidgets[i][j], i, j)
+
+	            connect(@glWidgets[i][j], SIGNAL('clicked()'),
+	                    self, SLOT('currentGlWidget=()'))
+	        end
+	    end
+	    setLayout(mainLayout)
+
+	    @currentGlWidget = @glWidgets[0][0]
+	
+	    timer = Qt::Timer.new(self)
+	    connect(timer, SIGNAL('timeout()'), self, SLOT('rotateOneStep()'))
+	    timer.start(20)
+	
+	    self.windowTitle = tr("Textures")
+	end
+	
+	def currentGlWidget=()
+	    @currentGlWidget = sender()
+	end
+	
+	def rotateOneStep()
+	    if !@currentGlWidget.nil?
+	        @currentGlWidget.rotateBy(+2 * 16, +2 * 16, -1 * 16)
+		end
+	end
+end

data/examples/painting/basicdrawing/main.rb

@@ -0,0 +1,32 @@
+=begin
+**
+** Copyright (C) 2004-2005 Trolltech AS. All rights reserved.
+**
+** This file is part of the example classes of the Qt Toolkit.
+**
+** This file may be used under the terms of the GNU General Public
+** License version 2.0 as published by the Free Software Foundation
+** and appearing in the file LICENSE.GPL included in the packaging of
+** this file.  Please review the following information to ensure GNU
+** General Public Licensing requirements will be met:
+** http://www.trolltech.com/products/qt/opensource.html
+**
+** If you are unsure which license is appropriate for your use, please
+** review the following information:
+** http://www.trolltech.com/products/qt/licensing.html or contact the
+** sales department at sales@trolltech.com.
+**
+** This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
+** WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+**
+
+** Translated to QtRuby by Richard Dale
+=end
+
+require 'Qt'
+require 'window.rb'
+
+app = Qt::Application.new(ARGV)
+window = Window.new
+window.show
+app.exec

data/examples/painting/basicdrawing/renderarea.rb

@@ -0,0 +1,166 @@
+=begin
+**
+** Copyright (C) 2004-2005 Trolltech AS. All rights reserved.
+**
+** This file is part of the example classes of the Qt Toolkit.
+**
+** This file may be used under the terms of the GNU General Public
+** License version 2.0 as published by the Free Software Foundation
+** and appearing in the file LICENSE.GPL included in the packaging of
+** this file.  Please review the following information to ensure GNU
+** General Public Licensing requirements will be met:
+** http://www.trolltech.com/products/qt/opensource.html
+**
+** If you are unsure which license is appropriate for your use, please
+** review the following information:
+** http://www.trolltech.com/products/qt/licensing.html or contact the
+** sales department at sales@trolltech.com.
+**
+** This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
+** WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+**
+
+** Translated to QtRuby by Richard Dale
+=end
+	
+	
+class RenderArea < Qt::Widget
+	
+	Line = 0
+	Points = 1
+	Polyline = 3
+	Polygon = 4
+	Rect = 5
+	RoundRect = 6
+	Ellipse = 7
+	Arc = 8
+	Chord = 9
+	Pie = 10
+	Path = 11
+	Text = 12
+	Pixmap = 13
+	
+	slots	'shape=(int)',
+    		'pen=(const QPen &)',
+    		'brush=(const QBrush &)',
+    		'antialiased=(bool)',
+    		'transformed=(bool)'
+	
+	def initialize(parent = nil)
+	    super(parent)
+	    @shape = Polygon
+	    @antialiased = false
+		@pen = Qt::Pen.new
+		@brush = Qt::Brush.new
+		@pixmap = Qt::Pixmap.new
+	    @pixmap.load("images/qt-logo.png")
+	
+	    setBackgroundRole(Qt::Palette::Base)
+	end
+	
+	def minimumSizeHint()
+	    return Qt::Size.new(100, 100)
+	end
+	
+	def sizeHint()
+	    return Qt::Size.new(400, 200)
+	end
+	
+	def shape=(shape)
+	    @shape = shape
+	    update()
+	end
+	
+	def pen=(pen)
+	    @pen = pen
+	    update()
+	end
+	
+	def brush=(brush)
+	    @brush = brush
+	    update()
+	end
+	
+	def antialiased=(antialiased)
+	    @antialiased = antialiased
+	    update()
+	end
+	
+	def transformed=(transformed)
+	    @transformed = transformed
+	    update()
+	end
+	
+	def paintEvent(event)
+	    points = Qt::Polygon.new([	Qt::Point.new(10, 80),
+	        						Qt::Point.new(20, 10),
+	        						Qt::Point.new(80, 30),
+	        						Qt::Point.new(90, 70) ])
+	
+	    rect = Qt::Rect.new(10, 20, 80, 60)
+	
+	    path = Qt::PainterPath.new
+	    path.moveTo(20, 80)
+	    path.lineTo(20, 30)
+	    path.cubicTo(80, 0, 50, 50, 80, 80)
+	
+	    startAngle = 30 * 16
+	    arcLength = 120 * 16
+	
+	    painter = Qt::Painter.new(self)
+	    painter.pen = @pen
+
+	    painter.brush = @brush
+	    if @antialiased
+	        painter.renderHint = Qt::Painter::Antialiasing
+		end
+	
+		x = 0
+		while x < width() do
+			y = 0
+			while y < height() do
+	            painter.save()
+	            painter.translate(x, y)
+	            if @transformed
+	                painter.translate(50, 50)
+	                painter.rotate(60.0)
+	                painter.scale(0.6, 0.9)
+	                painter.translate(-50, -50)
+	            end
+	
+	            case @shape
+	            when Line:
+	                painter.drawLine(rect.bottomLeft(), rect.topRight())
+	            when Points:
+	                painter.drawPoints(points)
+	            when Polyline:
+	                painter.drawPolyline(points)
+	            when Polygon:
+	                painter.drawPolygon(points)
+	            when Rect:
+	                painter.drawRect(rect)
+	            when RoundRect:
+	                painter.drawRoundRect(rect)
+	            when Ellipse:
+	                painter.drawEllipse(rect)
+	            when Arc:
+	                painter.drawArc(rect, startAngle, arcLength)
+	            when Chord:
+	                painter.drawChord(rect, startAngle, arcLength)
+	            when Pie:
+	                painter.drawPie(rect, startAngle, arcLength)
+	            when Path:
+	                painter.drawPath(path)
+	            when Text:
+	                painter.drawText(rect, Qt::AlignCenter, tr("Qt by\nTrolltech"))
+	            when Pixmap:
+	                painter.drawPixmap(10, 10, @pixmap)
+	            end
+	            painter.restore()
+				y += 100
+	        end
+			x += 100
+	    end
+		painter.end
+	end
+end