qtruby4 2.1.0.b-mswin32 → 2.1.0-mswin32

data/examples/dialogs/configdialog/configdialog.rb

@@ -0,0 +1,109 @@
+=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 'pages.rb'
+
+class ConfigDialog < Qt::Dialog
+    
+    slots 'changePage(QListWidgetItem*, QListWidgetItem*)'
+    
+    def initialize()
+        super
+        @contentsWidget = Qt::ListWidget.new do |c|
+            c.viewMode = Qt::ListView::IconMode
+            c.iconSize = Qt::Size.new(96, 84)
+            c.movement = Qt::ListView::Static
+            c.maximumWidth = 128
+            c.spacing = 12
+        end
+    
+        @pagesWidget = Qt::StackedWidget.new do |p|
+            p.addWidget(ConfigurationPage.new)
+            p.addWidget(UpdatePage.new)
+            p.addWidget(QueryPage.new)
+        end
+    
+        closeButton = Qt::PushButton.new(tr("Close"))
+    
+        createIcons()
+        @contentsWidget.currentRow = 0
+    
+        connect(closeButton, SIGNAL('clicked()'), self, SLOT('close()'))
+    
+        horizontalLayout = Qt::HBoxLayout.new do |h|
+            h.addWidget(@contentsWidget)
+            h.addWidget(@pagesWidget, 1)
+        end
+    
+        buttonsLayout = Qt::HBoxLayout.new do |b|
+            b.addStretch(1)
+            b.addWidget(closeButton)
+        end
+    
+        self.layout = Qt::VBoxLayout.new do |m|
+            m.addLayout(horizontalLayout)
+            m.addStretch(1)
+            m.addSpacing(12)
+            m.addLayout(buttonsLayout)
+        end
+    
+        self.windowTitle = tr("Config Dialog")
+    end
+    
+    def createIcons
+        configButton = Qt::ListWidgetItem.new(@contentsWidget) do |c|
+            c.icon = Qt::Icon.new("images/config.png")
+            c.text = tr("Configuration")
+            c.textAlignment = Qt::AlignHCenter
+            c.flags = Qt::ItemIsSelectable | Qt::ItemIsEnabled
+        end
+
+        updateButton = Qt::ListWidgetItem.new(@contentsWidget) do |u|
+            u.icon = Qt::Icon.new("images/update.png")
+            u.text = tr("Update")
+            u.textAlignment = Qt::AlignHCenter
+            u.flags = Qt::ItemIsSelectable | Qt::ItemIsEnabled
+        end
+
+        queryButton = Qt::ListWidgetItem.new(@contentsWidget) do |q|
+            q.icon = Qt::Icon.new("images/query.png")
+            q.text = tr("Query")
+            q.textAlignment = Qt::AlignHCenter
+            q.flags = Qt::ItemIsSelectable | Qt::ItemIsEnabled
+        end
+    
+        connect(@contentsWidget,
+                SIGNAL('currentItemChanged(QListWidgetItem*, QListWidgetItem*)'),
+                self, SLOT('changePage(QListWidgetItem*, QListWidgetItem*)'))
+    end
+    
+    def changePage(current, previous)
+        if current.nil?
+            current = previous
+        end
+
+        @pagesWidget.currentIndex = @contentsWidget.row(current)
+    end
+end

data/examples/dialogs/configdialog/main.rb

@@ -0,0 +1,31 @@
+=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 'configdialog.rb'
+
+app = Qt::Application.new(ARGV)
+dialog = ConfigDialog.new
+dialog.exec

data/examples/dialogs/configdialog/pages.rb

@@ -0,0 +1,140 @@
+=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 ConfigurationPage < Qt::Widget
+    
+    def initialize(parent = nil)
+        super(parent)
+        configGroup = Qt::GroupBox.new(tr("Server configuration"))
+    
+        serverLabel = Qt::Label.new(tr("Server:"))
+        serverCombo = Qt::ComboBox.new do |c|
+            c.addItem(tr("Trolltech (Australia)"))
+            c.addItem(tr("Trolltech (Norway)"))
+            c.addItem(tr("Trolltech (People's Republic of China)"))
+            c.addItem(tr("Trolltech (USA)"))
+        end
+    
+        serverLayout = Qt::HBoxLayout.new do |s|
+            s.addWidget(serverLabel)
+            s.addWidget(serverCombo)
+        end
+    
+        configGroup.layout = Qt::VBoxLayout.new do |c|
+            c.addLayout(serverLayout)
+        end
+    
+        self.layout = Qt::VBoxLayout.new do |m|
+            m.addWidget(configGroup)
+            m.addStretch(1)
+        end
+    end
+end
+
+class QueryPage < Qt::Widget
+    
+    def initialize(parent = nil)
+        super(parent)
+        updateGroup = Qt::GroupBox.new(tr("Package selection"))
+        systemCheckBox = Qt::CheckBox.new(tr("Update system"))
+        appsCheckBox = Qt::CheckBox.new(tr("Update applications"))
+        docsCheckBox = Qt::CheckBox.new(tr("Update documentation"))
+    
+        packageGroup = Qt::GroupBox.new(tr("Existing packages"))
+    
+        packageList = Qt::ListWidget.new
+        qtItem = Qt::ListWidgetItem.new(packageList)
+        qtItem.text = tr("Qt")
+        qsaItem = Qt::ListWidgetItem.new(packageList)
+        qsaItem.text = tr("QSA")
+        teamBuilderItem = Qt::ListWidgetItem.new(packageList)
+        teamBuilderItem.text = tr("Teambuilder")
+    
+        startUpdateButton = Qt::PushButton.new(tr("Start update"))
+    
+        updateGroup.layout = Qt::VBoxLayout.new do |u|
+            u.addWidget(systemCheckBox)
+            u.addWidget(appsCheckBox)
+            u.addWidget(docsCheckBox)
+        end
+    
+        packageGroup.layout = Qt::VBoxLayout.new do |p|
+            p.addWidget(packageList)
+        end
+    
+        self.layout = Qt::VBoxLayout.new do |m|
+            m.addWidget(updateGroup)
+            m.addWidget(packageGroup)
+            m.addSpacing(12)
+            m.addWidget(startUpdateButton)
+            m.addStretch(1)
+        end
+    end
+end
+
+class UpdatePage < Qt::Widget
+    
+    def initialize(parent = nil)
+        super(parent)
+        packagesGroup = Qt::GroupBox.new(tr("Look for packages"))
+    
+        nameLabel = Qt::Label.new(tr("Name:"))
+        nameEdit = Qt::LineEdit.new
+    
+        dateLabel = Qt::Label.new(tr("Released after:"))
+        dateEdit = Qt::DateTimeEdit.new(Qt::Date.currentDate())
+    
+        releasesCheckBox = Qt::CheckBox.new(tr("Releases"))
+        upgradesCheckBox = Qt::CheckBox.new(tr("Upgrades"))
+    
+        hitsSpinBox = Qt::SpinBox.new do |h|
+            h.prefix = tr("Return up to ")
+            h.suffix = tr(" results")
+            h.specialValueText = tr("Return only the first result")
+            h.minimum = 1
+            h.maximum = 100
+            h.singleStep = 10
+        end
+
+        startQueryButton = Qt::PushButton.new(tr("Start query"))
+    
+        packagesGroup.layout = Qt::GridLayout.new do |p|
+            p.addWidget(nameLabel, 0, 0)
+            p.addWidget(nameEdit, 0, 1)
+            p.addWidget(dateLabel, 1, 0)
+            p.addWidget(dateEdit, 1, 1)
+            p.addWidget(releasesCheckBox, 2, 0)
+            p.addWidget(upgradesCheckBox, 3, 0)
+            p.addWidget(hitsSpinBox, 4, 0, 1, 2)
+        end
+    
+        self.layout = Qt::VBoxLayout.new do |m|
+            m.addWidget(packagesGroup)
+            m.addSpacing(12)
+            m.addWidget(startQueryButton)
+            m.addStretch(1)
+        end
+    end
+end

data/examples/dialogs/extension/finddialog.rb

@@ -0,0 +1,89 @@
+=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 FindDialog < Qt::Dialog
+	
+	def initialize(parent = nil)
+	    super(parent)
+	    @label = Qt::Label.new(tr("Find &what:"))
+	    @lineEdit = Qt::LineEdit.new
+	    @label.buddy = @lineEdit
+	
+	    @caseCheckBox = Qt::CheckBox.new(tr("Match &case"))
+	    @fromStartCheckBox = Qt::CheckBox.new(tr("Search from &start"))
+	    @fromStartCheckBox.checked = true
+	
+	    @findButton = Qt::PushButton.new(tr("&Find"))
+	    @findButton.default = true
+	
+	    @closeButton = Qt::PushButton.new(tr("Close"))
+	
+	    @moreButton = Qt::PushButton.new(tr("&More"))
+	    @moreButton.checkable = true
+	    @moreButton.autoDefault = false
+	
+	    @extension = Qt::Widget.new
+	
+	    @wholeWordsCheckBox = Qt::CheckBox.new(tr("&Whole words"))
+	    @backwardCheckBox = Qt::CheckBox.new(tr("Search &backward"))
+	    @searchSelectionCheckBox = Qt::CheckBox.new(tr("Search se&lection"))
+	
+	    connect(@closeButton, SIGNAL('clicked()'), self, SLOT('close()'))
+	    connect(@moreButton, SIGNAL('toggled(bool)'), @extension, SLOT('setVisible(bool)'))
+	
+	    @extensionLayout = Qt::VBoxLayout.new
+	    @extensionLayout.margin = 0
+	    @extensionLayout.addWidget(@wholeWordsCheckBox)
+	    @extensionLayout.addWidget(@backwardCheckBox)
+	    @extensionLayout.addWidget(@searchSelectionCheckBox)
+	    @extension.layout = @extensionLayout
+	
+	    topLeftLayout = Qt::HBoxLayout.new
+	    topLeftLayout.addWidget(@label)
+	    topLeftLayout.addWidget(@lineEdit)
+	
+	    leftLayout = Qt::VBoxLayout.new
+	    leftLayout.addLayout(topLeftLayout)
+	    leftLayout.addWidget(@caseCheckBox)
+	    leftLayout.addWidget(@fromStartCheckBox)
+	    leftLayout.addStretch(1)
+	
+	    rightLayout = Qt::VBoxLayout.new
+	    rightLayout.addWidget(@findButton)
+	    rightLayout.addWidget(@closeButton)
+	    rightLayout.addWidget(@moreButton)
+	    rightLayout.addStretch(1)
+	
+	    mainLayout = Qt::GridLayout.new
+	    mainLayout.sizeConstraint = Qt::Layout::SetFixedSize
+	    mainLayout.addLayout(leftLayout, 0, 0)
+	    mainLayout.addLayout(rightLayout, 0, 1)
+	    mainLayout.addWidget(@extension, 1, 0, 1, 2)
+	    setLayout(mainLayout)
+	
+	    setWindowTitle(tr("Extension"))
+	    @extension.hide()
+	end
+end

data/examples/dialogs/extension/main.rb

@@ -0,0 +1,31 @@
+=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 'finddialog.rb'
+
+app = Qt::Application.new(ARGV)
+dialog = FindDialog.new
+dialog.exec

data/examples/dialogs/findfiles/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/dialogs/findfiles/window.rb

@@ -0,0 +1,177 @@
+=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 Window < Qt::Widget
+
+    slots 'browse()', 'find()'
+    
+    def initialize(parent = nil)
+        super(parent)
+        @browseButton = createButton(tr("&Browse..."), SLOT('browse()'))
+        @findButton = createButton(tr("&Find"), SLOT('find()'))
+        @quitButton = createButton(tr("&Quit"), SLOT('close()'))
+    
+        @fileComboBox = createComboBox(tr("*"))
+        @textComboBox = createComboBox()
+        @directoryComboBox = createComboBox(Qt::Dir.currentPath())
+    
+        @fileLabel = Qt::Label.new(tr("Named:"))
+        @textLabel = Qt::Label.new(tr("Containing text:"))
+        @directoryLabel = Qt::Label.new(tr("In directory:"))
+        @filesFoundLabel = Qt::Label.new
+    
+        createFilesTable()
+    
+        buttonsLayout = Qt::HBoxLayout.new
+        buttonsLayout.addStretch()
+        buttonsLayout.addWidget(@findButton)
+        buttonsLayout.addWidget(@quitButton)
+    
+        mainLayout = Qt::GridLayout.new
+        mainLayout.addWidget(@fileLabel, 0, 0)
+        mainLayout.addWidget(@fileComboBox, 0, 1, 1, 2)
+        mainLayout.addWidget(@textLabel, 1, 0)
+        mainLayout.addWidget(@textComboBox, 1, 1, 1, 2)
+        mainLayout.addWidget(@directoryLabel, 2, 0)
+        mainLayout.addWidget(@directoryComboBox, 2, 1)
+        mainLayout.addWidget(@browseButton, 2, 2)
+        mainLayout.addWidget(@filesTable, 3, 0, 1, 3)
+        mainLayout.addWidget(@filesFoundLabel, 4, 0)
+        mainLayout.addLayout(buttonsLayout, 5, 0, 1, 3)
+        setLayout(mainLayout)
+    
+        setWindowTitle(tr("Find Files"))
+        resize(700, 300)
+    end
+    
+    def browse()
+        directory = Qt::FileDialog.getExistingDirectory(self,
+                                   tr("Find Files"), Qt::Dir.currentPath())
+        @directoryComboBox.addItem(directory)
+        @directoryComboBox.currentIndex += 1
+    end
+    
+    def find()
+        @filesTable.rowCount = 0
+    
+        fileName = @fileComboBox.currentText()
+        text = @textComboBox.currentText()
+        path = @directoryComboBox.currentText()
+    
+        directory = Qt::Dir.new(path)
+        if fileName.empty?
+            fileName = "*"
+        end
+        files = directory.entryList([fileName],
+                                    Qt::Dir::Files | Qt::Dir::NoSymLinks)
+    
+        if !text.empty?
+            files = findFiles(directory, files, text)
+        end
+        showFiles(directory, files)
+    end
+    
+    def findFiles(directory, files, text)
+        progressDialog = Qt::ProgressDialog.new(self) do |p|
+            p.cancelButtonText = tr("&Cancel")
+            p.range = 0..files.length
+            p.windowTitle = tr("Find Files")
+        end
+        foundFiles = []
+    
+        (0...files.length).each do |i|
+            progressDialog.value = i
+            progressDialog.labelText = tr("Searching file number %s of %s..." % [i, files.length])
+            $qApp.processEvents()
+    
+            if progressDialog.wasCanceled
+                break
+            end
+    
+            file = Qt::File.new(directory.absoluteFilePath(files[i]))
+    
+            if file.open(Qt::IODevice::ReadOnly.to_i)
+                inf = Qt::TextStream.new(file)
+                while !inf.atEnd()
+                    if progressDialog.wasCanceled()
+                        break
+                    end
+                    line = inf.readLine()
+                    if line.include?(text)
+                        foundFiles << files[i]
+                        break
+                    end
+                end
+            end
+        end
+
+        progressDialog.dispose
+        return foundFiles
+    end
+    
+    def showFiles(directory, files)
+        (0...files.length).each do |i|
+            file = Qt::File.new(directory.absoluteFilePath(files[i]))
+            size = Qt::FileInfo.new(file).size()
+    
+            fileNameItem = Qt::TableWidgetItem.new(files[i])
+            fileNameItem.flags = Qt::ItemIsEnabled.to_i
+            sizeItem = Qt::TableWidgetItem.new("%d KB" % ((size + 1023) / 1024))
+            sizeItem.textAlignment = Qt::AlignVCenter | Qt::AlignRight
+            sizeItem.flags = Qt::ItemIsEnabled.to_i
+    
+            row = @filesTable.rowCount()
+            @filesTable.insertRow(row)
+            @filesTable.setItem(row, 0, fileNameItem)
+            @filesTable.setItem(row, 1, sizeItem)
+        end
+        @filesFoundLabel.text = tr("%d file(s) found" % files.length())
+    end
+    
+    def createButton(text,  member)
+        button = Qt::PushButton.new(text)
+        connect(button, SIGNAL('clicked()'), self, member)
+        return button
+    end
+    
+    def createComboBox(text = "")
+        comboBox = Qt::ComboBox.new
+        comboBox.editable = true
+        comboBox.addItem(text)
+        comboBox.setSizePolicy(Qt::SizePolicy::Expanding, Qt::SizePolicy::Preferred)
+        return comboBox
+    end
+    
+    def createFilesTable()
+        @filesTable = Qt::TableWidget.new(0, 2)
+        labels = []
+        labels << tr("File Name") << tr("Size")
+        @filesTable.horizontalHeaderLabels = labels
+        @filesTable.horizontalHeader().setResizeMode(0, Qt::HeaderView::Stretch)
+        @filesTable.verticalHeader().hide()
+        @filesTable.showGrid = false
+    end
+    
+end