rock-qtbindings 4.8.6.5

data/examples/opengl/hellogl/glwidget.rb

@@ -0,0 +1,226 @@
+=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'
+include Math
+
+class GLWidget < Qt::GLWidget
+
+    slots   'setXRotation(int)',
+            'setYRotation(int)',
+            'setZRotation(int)'
+    
+    signals 'xRotationChanged(int)',
+            'yRotationChanged(int)',
+            'zRotationChanged(int)'
+    
+    NumSectors = 200
+    
+    def initialize(parent)
+        super(parent)
+        @object = 0
+        @xRot = 0
+        @yRot = 0
+        @zRot = 0
+    
+        @trolltechGreen = Qt::Color.fromCmykF(0.40, 0.0, 1.0, 0.0)
+        @trolltechPurple = Qt::Color.fromCmykF(0.39, 0.39, 0.0, 0.0)
+    end
+    
+    def dispose()
+        makeCurrent()
+        glDeleteLists(object, 1)
+        super
+    end
+
+    def xRotation() return @xRot end
+    def yRotation() return @yRot end
+    def zRotation() return @zRot end
+    
+    def minimumSizeHint()
+        return Qt::Size.new(50, 50)
+    end
+    
+    def sizeHint()
+        return Qt::Size.new(400, 400)
+    end
+    
+    def setXRotation(angle)
+        angle = normalizeAngle(angle)
+        if angle != @xRot
+            @xRot = angle
+            emit xRotationChanged(angle)
+            updateGL()
+        end
+    end
+    
+    def setYRotation(angle)
+        angle = normalizeAngle(angle)
+        if angle != @yRot
+            @yRot = angle
+            emit yRotationChanged(angle)
+            updateGL()
+        end
+    end
+    
+    def setZRotation(angle)
+        angle = normalizeAngle(angle)
+        if angle != @zRot
+            @zRot = angle
+            emit zRotationChanged(angle)
+            updateGL()
+        end
+    end
+    
+    def initializeGL()
+        qglClearColor(@trolltechPurple.dark)
+        @object = makeObject()
+        GL.ShadeModel(GL::FLAT)
+        GL.Enable(GL::DEPTH_TEST)
+        GL.Enable(GL::CULL_FACE)
+    end
+    
+    def paintGL()
+        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(@object)
+    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
+            setXRotation(@xRot + 8 * dy)
+            setYRotation(@yRot + 8 * dx)
+        elsif event.buttons & Qt::RightButton.to_i != 0
+            setXRotation(@xRot + 8 * dy)
+            setZRotation(@zRot + 8 * dx)
+        end
+        @lastPos = event.pos
+    end
+    
+    def makeObject()
+        list = GL.GenLists(1)
+        GL.NewList(list, GL::COMPILE)
+    
+        GL.Begin(GL::QUADS)
+    
+        x1 = +0.06
+        y1 = -0.14
+        x2 = +0.14
+        y2 = -0.06
+        x3 = +0.08
+        y3 = +0.00
+        x4 = +0.30
+        y4 = +0.22
+    
+        quad(x1, y1, x2, y2, y2, x2, y1, x1)
+        quad(x3, y3, x4, y4, y4, x4, y3, x3)
+    
+        extrude(x1, y1, x2, y2)
+        extrude(x2, y2, y2, x2)
+        extrude(y2, x2, y1, x1)
+        extrude(y1, x1, x1, y1)
+        extrude(x3, y3, x4, y4)
+        extrude(x4, y4, y4, x4)
+        extrude(y4, x4, y3, x3)
+    
+        (0...NumSectors).each do |i|
+            angle1 = (i * 2 * PI) / NumSectors
+            x5 = 0.30 * sin(angle1)
+            y5 = 0.30 * cos(angle1)
+            x6 = 0.20 * sin(angle1)
+            y6 = 0.20 * cos(angle1)
+    
+            angle2 = ((i + 1) * 2 * PI) / NumSectors
+            x7 = 0.20 * sin(angle2)
+            y7 = 0.20 * cos(angle2)
+            x8 = 0.30 * sin(angle2)
+            y8 = 0.30 * cos(angle2)
+    
+            quad(x5, y5, x6, y6, x7, y7, x8, y8)
+    
+            extrude(x6, y6, x7, y7)
+            extrude(x8, y8, x5, y5)
+        end
+    
+        GL.End()
+    
+        GL.EndList()
+        return list
+    end
+    
+    def quad(x1, y1, x2, y2, x3, y3, x4, y4)
+        qglColor(@trolltechGreen)
+    
+        GL.Vertex3d(x1, y1, -0.05)
+        GL.Vertex3d(x2, y2, -0.05)
+        GL.Vertex3d(x3, y3, -0.05)
+        GL.Vertex3d(x4, y4, -0.05)
+    
+        GL.Vertex3d(x4, y4, +0.05)
+        GL.Vertex3d(x3, y3, +0.05)
+        GL.Vertex3d(x2, y2, +0.05)
+        GL.Vertex3d(x1, y1, +0.05)
+    end
+    
+    def extrude(x1, y1, x2, y2)
+        qglColor(@trolltechGreen.dark(250 + (100 * x1)))
+    
+        GL.Vertex3d(x1, y1, +0.05)
+        GL.Vertex3d(x2, y2, +0.05)
+        GL.Vertex3d(x2, y2, -0.05)
+        GL.Vertex3d(x1, y1, -0.05)
+    end
+    
+    def normalizeAngle(angle)
+        while angle < 0 do
+            angle += 360 * 16
+        end
+        while angle > 360 * 16 do
+            angle -= 360 * 16
+        end
+        return angle
+    end
+end

data/examples/opengl/hellogl/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/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