qtruby4 2.1.0.b-mswin32 → 2.1.0-mswin32

data/examples/widgets/movie/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 'movieplayer.rb'
+
+app = Qt::Application.new(ARGV)
+player = MoviePlayer.new
+player.show
+app.exec

data/examples/widgets/movie/movieplayer.rb

@@ -0,0 +1,201 @@
+=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 MoviePlayer < Qt::Widget
+    
+    slots    'open()',
+            'goToFrame(int)',
+            'fitToWindow()',
+            'updateButtons()',
+            'updateFrameSlider()'
+    
+    
+    def initialize(parent = nil)
+        super(parent)
+        @movie = Qt::Movie.new(self)
+        @movie.cacheMode = Qt::Movie::CacheAll
+    
+        @movieLabel = Qt::Label.new(tr("No movie loaded")) do |m|
+            m.alignment = Qt::AlignCenter
+            m.setSizePolicy(Qt::SizePolicy::Ignored, Qt::SizePolicy::Ignored)
+            m.backgroundRole = Qt::Palette::Dark
+            m.autoFillBackground = true
+        end
+    
+        @currentMovieDirectory = "@movies"
+    
+        createControls()
+        createButtons()
+    
+        connect(@movie, SIGNAL('frameChanged(int)'), self, SLOT('updateFrameSlider()'))
+        connect(@movie, SIGNAL('stateChanged(QMovie::MovieState)'),
+                self, SLOT('updateButtons()'))
+        connect(@fitCheckBox, SIGNAL('clicked()'), self, SLOT('fitToWindow()'))
+        connect(@frameSlider, SIGNAL('valueChanged(int)'), self, SLOT('goToFrame(int)'))
+        connect(@speedSpinBox, SIGNAL('valueChanged(int)'),
+                @movie, SLOT('setSpeed(int)'))
+    
+        self.layout = Qt::VBoxLayout.new do |m|
+            m.addWidget(@movieLabel)
+            m.addLayout(@controlsLayout)
+            m.addLayout(@buttonsLayout)
+        end
+    
+        updateFrameSlider()
+        updateButtons()
+    
+        setWindowTitle(tr("Movie Player"))
+        resize(400, 400)
+    end
+    
+    def open()
+        fileName = Qt::FileDialog.getOpenFileName(self, tr("Open a Movie"),
+                                   @currentMovieDirectory)
+        if !fileName.empty?
+            @currentMovieDirectory = Qt::FileInfo.new(fileName).path()
+    
+            @movie.stop()
+            @movieLabel.movie = @movie
+            @movie.fileName = fileName
+            @movie.start()
+    
+            updateFrameSlider()
+            updateButtons()
+        end
+    end
+    
+    def goToFrame(frame)
+        @movie.jumpToFrame(frame)
+    end
+    
+    def fitToWindow()
+        @movieLabel.scaledContents = @fitCheckBox.checked?
+    end
+    
+    def updateFrameSlider()
+        hasFrames = (@movie.currentFrameNumber() >= 0)
+    
+        if hasFrames
+            if @movie.frameCount > 0
+                @frameSlider.maximum = @movie.frameCount - 1
+            else
+                if @movie.currentFrameNumber > @frameSlider.maximum
+                    @frameSlider.maximum = @movie.currentFrameNumber
+                end
+            end
+            @frameSlider.value = @movie.currentFrameNumber
+        else
+            @frameSlider.maximum = 0
+        end
+        @frameLabel.enabled = hasFrames
+        @frameSlider.enabled = hasFrames
+    end
+    
+    def updateButtons()
+        @playButton.enabled = @movie.valid? && @movie.frameCount != 1 &&
+                               @movie.state == Qt::Movie::NotRunning
+        @pauseButton.enabled = @movie.state != Qt::Movie::NotRunning
+        @pauseButton.checked = @movie.state == Qt::Movie::Paused
+        @stopButton.enabled = @movie.state != Qt::Movie::NotRunning
+    end
+    
+    def createControls()
+        @fitCheckBox = Qt::CheckBox.new(tr("Fit to Window"))
+    
+        @frameLabel = Qt::Label.new(tr("Current frame:"))
+    
+        @frameSlider = Qt::Slider.new(Qt::Horizontal) do |f|
+            f.tickPosition = Qt::Slider::TicksBelow
+            f.tickInterval = 10
+        end
+    
+        @speedLabel = Qt::Label.new(tr("Speed:"))
+    
+        @speedSpinBox = Qt::SpinBox.new do |s|
+            s.range = 1..9999
+            s.value = 100
+            s.suffix = tr("%")
+        end
+    
+        @controlsLayout = Qt::GridLayout.new do |c|
+            c.addWidget(@fitCheckBox, 0, 0, 1, 2)
+            c.addWidget(@frameLabel, 1, 0)
+            c.addWidget(@frameSlider, 1, 1, 1, 2)
+            c.addWidget(@speedLabel, 2, 0)
+            c.addWidget(@speedSpinBox, 2, 1)
+        end
+    end
+    
+    def createButtons()
+        iconSize = Qt::Size.new(36, 36)
+    
+        @openButton = Qt::ToolButton.new do |o|
+            o.icon = Qt::Icon.new("images/open.png")
+            o.iconSize = iconSize
+            o.toolTip = tr("Open File")
+        end
+        connect(@openButton, SIGNAL('clicked()'), self, SLOT('open()'))
+    
+        @playButton = Qt::ToolButton.new do |p|
+            p.icon = Qt::Icon.new("images/play.png")
+            p.iconSize = iconSize
+            p.toolTip = tr("Play")
+        end
+        connect(@playButton, SIGNAL('clicked()'), @movie, SLOT('start()'))
+    
+        @pauseButton = Qt::ToolButton.new do |p|
+            p.checkable = true
+            p.icon = Qt::Icon.new("images/pause.png")
+            p.iconSize = iconSize
+            p.toolTip = tr("Pause")
+        end
+        connect(@pauseButton, SIGNAL('clicked(bool)'), @movie, SLOT('setPaused(bool)'))
+    
+        @stopButton = Qt::ToolButton.new do |s|
+            s.icon = Qt::Icon.new("images/stop.png")
+            s.iconSize = iconSize
+            s.toolTip = tr("Stop")
+        end
+        connect(@stopButton, SIGNAL('clicked()'), @movie, SLOT('stop()'))
+    
+        @quitButton = Qt::ToolButton.new do |q|
+            q.icon = Qt::Icon.new("images/quit.png")
+            q.iconSize = iconSize
+            q.toolTip = tr("Quit")
+        end
+        connect(@quitButton, SIGNAL('clicked()'), self, SLOT('close()'))
+    
+        @buttonsLayout = Qt::HBoxLayout.new do |b|
+            b.addStretch()
+            b.addWidget(@openButton)
+            b.addWidget(@playButton)
+            b.addWidget(@pauseButton)
+            b.addWidget(@stopButton)
+            b.addWidget(@quitButton)
+            b.addStretch()
+        end
+    end
+end

data/examples/widgets/screenshot/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 'screenshot.rb'
+
+app = Qt::Application.new(ARGV)
+screenshot = Screenshot.new
+screenshot.show
+app.exec

data/examples/widgets/screenshot/screenshot.rb

@@ -0,0 +1,155 @@
+=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 Screenshot < Qt::Widget
+
+	slots	'newScreenshot()',
+			'saveScreenshot()',
+			'shootScreen()',
+			'updateCheckBox()'
+
+	def initialize(parent = nil)
+		super(parent)
+		@screenshotLabel = Qt::Label.new
+		@screenshotLabel.setSizePolicy(Qt::SizePolicy::Expanding,
+									Qt::SizePolicy::Expanding)
+		@screenshotLabel.alignment = Qt::AlignCenter.to_i
+		@screenshotLabel.setMinimumSize(240, 160)
+	
+		createOptionsGroupBox()
+		createButtonsLayout()
+	
+		@mainLayout = Qt::VBoxLayout.new
+		@mainLayout.addWidget(@screenshotLabel)
+		@mainLayout.addWidget(@optionsGroupBox)
+		@mainLayout.addLayout(@buttonsLayout)
+		setLayout(@mainLayout)
+	
+		shootScreen()
+		@delaySpinBox.Value = 5
+	
+		setWindowTitle(tr("Screenshot"))
+		resize(300, 200)
+	end
+	
+	def resizeEvent(event)
+		scaledSize = @originalPixmap.size()
+		scaledSize.scale(@screenshotLabel.size(), Qt::KeepAspectRatio)
+		if @screenshotLabel.pixmap.nil? ||
+				scaledSize != @screenshotLabel.pixmap().size()
+			updateScreenshotLabel()
+		end
+	end
+	
+	def newScreenshot()
+		if @hideThisWindowCheckBox.checked?
+			hide()
+		end
+		@newScreenshotButton.disabled = true
+	
+		Qt::Timer.singleShot(@delaySpinBox.value() * 1000, self, SLOT('shootScreen()'))
+	end
+	
+	def saveScreenshot()
+		format = "png"
+		initialPath = Qt::Dir.currentPath() + tr("/untitled.") + format
+	
+		fileName = Qt::FileDialog.getSaveFileName(self, tr("Save As"),
+								initialPath,
+								tr("%s Files (*.%s);;All Files (*)" % 
+									[format.upcase, format] ) )
+		if !fileName.nil?
+			@originalPixmap.save(fileName, format)
+		end
+	end
+	
+	def shootScreen()
+		if @delaySpinBox.value != 0
+			$qApp.beep
+		end
+		@originalPixmap = Qt::Pixmap::grabWindow(Qt::Application::desktop().winId())
+		updateScreenshotLabel()
+	
+		@newScreenshotButton.disabled = false
+		if @hideThisWindowCheckBox.checked?
+			show()
+		end
+	end
+	
+	def updateCheckBox()
+		if @delaySpinBox.value == 0
+			@hideThisWindowCheckBox.disabled = true
+		else
+			@hideThisWindowCheckBox.disabled = false
+		end
+	end
+	
+	def createOptionsGroupBox()
+		@optionsGroupBox = Qt::GroupBox.new(tr("Options"))
+	
+		@delaySpinBox = Qt::SpinBox.new
+		@delaySpinBox.suffix = tr(" s")
+		@delaySpinBox.maximum = 60
+		connect(@delaySpinBox, SIGNAL('valueChanged(int)'), self, SLOT('updateCheckBox()'))
+	
+		@delaySpinBoxLabel = Qt::Label.new(tr("Screenshot Delay:"))
+	
+		@hideThisWindowCheckBox = Qt::CheckBox.new(tr("Hide This Window"))
+	
+		@optionsGroupBoxLayout = Qt::GridLayout.new
+		@optionsGroupBoxLayout.addWidget(@delaySpinBoxLabel, 0, 0)
+		@optionsGroupBoxLayout.addWidget(@delaySpinBox, 0, 1)
+		@optionsGroupBoxLayout.addWidget(@hideThisWindowCheckBox, 1, 0, 1, 2)
+		@optionsGroupBox.layout = @optionsGroupBoxLayout
+	end
+	
+	def createButtonsLayout()
+		@newScreenshotButton = createButton(tr("New Screenshot"),
+										self, SLOT('newScreenshot()'))
+	
+		@saveScreenshotButton = createButton(tr("Save Screenshot"),
+											self, SLOT('saveScreenshot()'))
+	
+		@quitScreenshotButton = createButton(tr("Quit"), self, SLOT('close()'))
+	
+		@buttonsLayout = Qt::HBoxLayout.new
+		@buttonsLayout.addStretch()
+		@buttonsLayout.addWidget(@newScreenshotButton)
+		@buttonsLayout.addWidget(@saveScreenshotButton)
+		@buttonsLayout.addWidget(@quitScreenshotButton)
+	end
+	
+	def createButton(text, receiver, member)
+		button = Qt::PushButton.new(text)
+		button.connect(button, SIGNAL('clicked()'), receiver, member)
+		return button
+	end
+	
+	def updateScreenshotLabel()
+		@screenshotLabel.pixmap = @originalPixmap.scaled(	@screenshotLabel.size,
+														    Qt::KeepAspectRatio,
+														    Qt::SmoothTransformation )
+	end
+end

data/examples/widgets/scribble/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 'mainwindow.rb'
+
+app = Qt::Application.new(ARGV)
+mainWin = MainWindow.new
+mainWin.show
+app.exec