Initial TQt conversion

2 files changed, 71 insertions, 71 deletions

diff --git a/qtruby/bin/rbqtapi b/qtruby/bin/rbqtapi
index 4540b3c6..9f18841f 100755
--- a/qtruby/bin/rbqtapi
+++ b/qtruby/bin/rbqtapi
@@ -3,19 +3,19 @@
 # Note: this program is part of qtruby and makes use of its internal functions.
 #       You should not rely on those in your own programs.
 
-require 'getopts'
+retquire 'getopts'
 getopts('r:hvimp')
 
 case File.basename $0
 when "rbqtapi"
-   require 'Qt'
+   retquire 'Qt'
 when "rbkdeapi"
-   require 'Korundum'
+   retquire 'Korundum'
 end
 
 if $OPT_v
-    # TODO add and use version number #{Qt::VERSION}
-    print "qtruby using Qt-#{Qt::version}\n"
+    # TODO add and use version number #{TQt::VERSION}
+    print "qtruby using Qt-#{TQt::version}\n"
     exit 0 
 elsif $OPT_h
     print $usage
@@ -25,21 +25,21 @@ end
 if $OPT_m
     while 1
         line = STDIN.readline.chomp
-        line.gsub!(/^Q(?=[A-Z])/,'Qt::')
+        line.gsub!(/^Q(?=[A-Z])/,'TQt::')
         line.gsub!(/^K/,'KDE::') unless line =~ /^(KDE)|(KIO)|(KParts)|(KNS)/
-        classid = Qt::Internal::find_pclassid($_)
+        classid = TQt::Internal::find_pclassid($_)
         puts "__START__"
         if classid
-            a = Qt::Internal::findAllMethods(classid)
+            a = TQt::Internal::findAllMethods(classid)
             ids = (a.keys.sort.map{|k|a[k]}).flatten
-            candidates = Qt::dumpCandidates(ids)
+            candidates = TQt::dumpCandidates(ids)
             sup = []
-            Qt::Internal::getAllParents(classid, sup)
+            TQt::Internal::getAllParents(classid, sup)
             sup.each {
                 |sup_item|
-                a = Qt::Internal::findAllMethods(sup_item)
+                a = TQt::Internal::findAllMethods(sup_item)
                 ids = (a.keys.sort.map{|k|a[k]}).flatten
-                candidates << Qt::Internal::dumpCandidates(ids)
+                candidates << TQt::Internal::dumpCandidates(ids)
             }
             candidates.gsub("\t","") # erm. whats the "s" mean on s/\t//gs ?
             print candidates
@@ -49,10 +49,10 @@ if $OPT_m
 end
 
 search_string = ARGV[0] ? ARGV[0].dup : nil
-search_string.gsub!(/^Q(?=[A-Z])/,'Qt::') if search_string
+search_string.gsub!(/^Q(?=[A-Z])/,'TQt::') if search_string
 # search_string.gsub!(/^K(?=[^D][^E])/,'KDE::') if search_string
 search_string.gsub!(/^K/,'KDE::') unless search_string.nil? or search_string =~ /^(KDE)|(KIO)|(KParts)|(KNS)/
-classid = search_string ? Qt::Internal::find_pclassid(search_string) : 1
+classid = search_string ? TQt::Internal::find_pclassid(search_string) : 1
 if classid == 0
     puts "Class #{search_string} not found"
     exit 1
@@ -61,18 +61,18 @@ regexp = nil
 regexp = ( $OPT_i ? Regexp.new($OPT_r, Regexp::IGNORECASE) : Regexp.new($OPT_r) ) if $OPT_r
 candidates = ""
 while true
-    a = Qt::Internal::findAllMethods(classid)
+    a = TQt::Internal::findAllMethods(classid)
     break if a.nil? 
     ids = (a.keys.sort.map{|k|a[k]}).flatten
-    candidates = Qt::Internal::dumpCandidates(ids)
+    candidates = TQt::Internal::dumpCandidates(ids)
     if $OPT_p and !search_string.empty? and classid
 	sup = []
-        Qt::Internal::getAllParents(classid, sup)
+        TQt::Internal::getAllParents(classid, sup)
 	sup.each {
 	    |sup_item|
-            a = Qt::Internal::findAllMethods(sup_item)
+            a = TQt::Internal::findAllMethods(sup_item)
             ids = (a.keys.sort.map{|k|a[k]}).flatten
-            candidates << Qt::Internal::dumpCandidates(ids)
+            candidates << TQt::Internal::dumpCandidates(ids)
         }
     end
     if regexp
diff --git a/qtruby/bin/rbqtsh b/qtruby/bin/rbqtsh
index 0ee674bd..90bf9cae 100755
--- a/qtruby/bin/rbqtsh
+++ b/qtruby/bin/rbqtsh
@@ -7,13 +7,13 @@
 # license: GNU Public License v2
 #
 
-require 'stringio'
+retquire 'stringio'
 
 case File.basename $0
 when "rbqtsh"
-   require 'Qt'
+   retquire 'Qt'
 when "rbkdesh"
-   require 'Korundum'
+   retquire 'Korundum'
 end
 
 include Qt
@@ -224,23 +224,23 @@ $image3_data =
 "QtQt.d#r#s#s#t#p.T.T.T#u#u.z#e#e#v.o.kQtQtQt"]
 
 
-class QtShellControl < Qt::MainWindow
+class QtShellControl < TQt::MainWindow
    attr_accessor :menubar, :fileMenu, :helpMenu, :toolBar, :fileName, :fileOpenAction
    attr_accessor :fileSaveAction, :fileSaveAsAction, :filePrintAction, :fileExitAction
    attr_accessor :helpExampleAction, :comboBox, :sessionLog, :executedLines, :printer
    slots 'fileOpen()', 'fileOpen()', 'fileSave()', 'fileSaveAs()'
    slots 'filePrint()', 'fileExit()', 'runSelection()', 'helpExample()'
-   signals 'fileNeedsEval(QString)', 'selection(QString)'
+   signals 'fileNeedsEval(TQString)', 'selection(TQString)'
 
     def initialize(*k)
         super(*k)
-        image0 = Qt::Pixmap.new($image0_data)
-        image1 = Qt::Pixmap.new($image1_data)
-        image2 = Qt::Pixmap.new($image2_data)
-        image3 = Qt::Pixmap.new($image3_data)
+        image0 = TQt::Pixmap.new($image0_data)
+        image1 = TQt::Pixmap.new($image1_data)
+        image2 = TQt::Pixmap.new($image2_data)
+        image3 = TQt::Pixmap.new($image3_data)
         box = VBox.new(self)
         @sessionLog = TextEdit.new(box, "sessionLog")
-        @sessionLog.setTextFormat(Qt::RichText)
+        @sessionLog.setTextFormat(TQt::RichText)
         @sessionLog.setReadOnly(true)
         @comboBox = ComboBox.new(box, "comboBox")
         @comboBox.setEditable(true)
@@ -252,50 +252,50 @@ class QtShellControl < Qt::MainWindow
         def trUtf8(k)
             return k
         end
-        @fileOpenAction = Qt::Action.new(self, "fileOpenAction")
-        @fileOpenAction.setIconSet(Qt::IconSet.new(image1))
+        @fileOpenAction = TQt::Action.new(self, "fileOpenAction")
+        @fileOpenAction.setIconSet(TQt::IconSet.new(image1))
         @fileOpenAction.setText(trUtf8("Open"))
         @fileOpenAction.setMenuText(trUtf8("&Open..."))
         @fileOpenAction.setAccel(KeySequence.new(trUtf8("Ctrl+O")))
-        @fileSaveAction = Qt::Action.new(self, "fileSaveAction")
-        @fileSaveAction.setIconSet(Qt::IconSet.new(image2))
+        @fileSaveAction = TQt::Action.new(self, "fileSaveAction")
+        @fileSaveAction.setIconSet(TQt::IconSet.new(image2))
         @fileSaveAction.setText(trUtf8("Save"))
         @fileSaveAction.setMenuText(trUtf8("&Save"))
         @fileSaveAction.setAccel(KeySequence.new(trUtf8("Ctrl+S")))
-        @fileSaveAsAction = Qt::Action.new(self, "fileSaveAsAction")
+        @fileSaveAsAction = TQt::Action.new(self, "fileSaveAsAction")
         @fileSaveAsAction.setText(trUtf8("Save As"))
         @fileSaveAsAction.setMenuText(trUtf8("Save &As..."))
         @fileSaveAsAction.setAccel(KeySequence.new(trUtf8("Ctrl+A")))
-        @filePrintAction = Qt::Action.new(self, "filePrintAction")
-        @filePrintAction.setIconSet(Qt::IconSet.new(image3))
+        @filePrintAction = TQt::Action.new(self, "filePrintAction")
+        @filePrintAction.setIconSet(TQt::IconSet.new(image3))
         @filePrintAction.setText(trUtf8("Print"))
         @filePrintAction.setMenuText(trUtf8("&Print..."))
         @filePrintAction.setAccel(KeySequence.new(trUtf8("Ctrl+P")))
-        @fileExitAction = Qt::Action.new(self, "fileExitAction")
+        @fileExitAction = TQt::Action.new(self, "fileExitAction")
         @fileExitAction.setText(trUtf8("Exit"))
         @fileExitAction.setMenuText(trUtf8("E&xit"))
         @fileExitAction.setAccel(KeySequence.new(trUtf8("Ctrl+E")))
 
-        @runAction = Qt::Action.new(self, "runAction");
+        @runAction = TQt::Action.new(self, "runAction");
         @runAction.setText(trUtf8("Run Selection"));
         @runAction.setMenuText(trUtf8("&Run Selection"));
         @runAction.setAccel(KeySequence.new(trUtf8("Ctrl+R")));
 
-        @helpExampleAction = Qt::Action.new(self, "helpExampleAction");
+        @helpExampleAction = TQt::Action.new(self, "helpExampleAction");
         @helpExampleAction.setText(trUtf8("Example"));
         @helpExampleAction.setMenuText(trUtf8("Examp&le"));
         @helpExampleAction.setAccel(KeySequence.new(trUtf8("Ctrl+L")));
        
-        @toolBar = Qt::ToolBar.new("", self, DockTop)
+        @toolBar = TQt::ToolBar.new("", self, DockTop)
         @toolBar.setLabel(trUtf8("Tools"))
        
         @fileOpenAction.addTo(toolBar)
         @fileSaveAction.addTo(toolBar)
         @filePrintAction.addTo(toolBar)
        
-        @menubar= Qt::MenuBar.new(self, "menubar")
+        @menubar= TQt::MenuBar.new(self, "menubar")
        
-        @fileMenu= Qt::PopupMenu.new(self)
+        @fileMenu= TQt::PopupMenu.new(self)
         @fileOpenAction.addTo(fileMenu)
         @fileSaveAction.addTo(fileMenu)
         @fileSaveAsAction.addTo(fileMenu)
@@ -307,13 +307,13 @@ class QtShellControl < Qt::MainWindow
        
         @menubar.insertSeparator
 
-        @runMenu= Qt::PopupMenu.new(self)
+        @runMenu= TQt::PopupMenu.new(self)
         @runAction.addTo(@runMenu)
         @menubar.insertItem(trUtf8("Run"), @runMenu)
         
 		@menubar.insertSeparator
 
-        @helpMenu= Qt::PopupMenu.new(self)
+        @helpMenu= TQt::PopupMenu.new(self)
         @helpExampleAction.addTo(helpMenu)
         @menubar.insertItem(trUtf8("&Help"), helpMenu)
 
@@ -329,7 +329,7 @@ class QtShellControl < Qt::MainWindow
     end
 
     def fileOpen
-        fname = Qt::FileDialog::getOpenFileName(
+        fname = TQt::FileDialog::getOpenFileName(
                                     ".",
                                     "Rbqtsh Session (*.rbqts)",
                                     self,
@@ -340,7 +340,7 @@ class QtShellControl < Qt::MainWindow
     end
 
     def getFileName
-        @fileName = Qt::FileDialog::getSaveFileName(
+        @fileName = TQt::FileDialog::getSaveFileName(
                                         ".",
                                         "Rbqtsh Session (*.rbqts)",
                                         self,
@@ -356,12 +356,12 @@ class QtShellControl < Qt::MainWindow
         file = File.new(fname, "w")
         if file.nil
             # TODO fix ": unknown" to give a reason
-            Qt::MessageBox::critical( 
+            TQt::MessageBox::critical( 
                                  self, 
                                  "Error" , 
                                  "Couldn't open #{fname} for writing: unknown",  
-                                 Qt::MessageBox::Ok, 
-                                 Qt::MessageBox::NoButton )
+                                 TQt::MessageBox::Ok, 
+                                 TQt::MessageBox::NoButton )
             return
         end
         @executedLines.each {
@@ -388,16 +388,16 @@ class QtShellControl < Qt::MainWindow
         ret = nil
         if File.exists(fname)
             cond += 1
-            ret = Qt::MessageBox::warning(
+            ret = TQt::MessageBox::warning(
                                      self,
                                      "Warning" ,
                                      "File exists, overwrite ?",
-                                     Qt::MessageBox::Yes,
-                                     Qt::MessageBox::No )
+                                     TQt::MessageBox::Yes,
+                                     TQt::MessageBox::No )
         else
             cond = 0
         end
-        fileSaveAs(cond) if (cond == 0) and ret == Qt::MessageBox::No
+        fileSaveAs(cond) if (cond == 0) and ret == TQt::MessageBox::No
         save(fname)
     end
 
@@ -405,10 +405,10 @@ class QtShellControl < Qt::MainWindow
 		margin = 10
 		pageNo = 1
 		emptySession() and return
-		printer = Qt::Printer.new()
+		printer = TQt::Printer.new()
 		if printer.setup(self)
 			statusBar().message( "Printing..." )
-			p = Qt::Painter.new()
+			p = TQt::Painter.new()
 			if ! p.begin( printer )
 				statusBar().message( "An error occured..." )
 				return
@@ -417,7 +417,7 @@ class QtShellControl < Qt::MainWindow
 			p.setFont( sessionLog.font() )
 			yPos = 0
 			fm = p.fontMetrics
-			metrics = Qt::PaintDeviceMetrics.new( printer )
+			metrics = TQt::PaintDeviceMetrics.new( printer )
 			
 			for i in [email protected]
             	if  margin + yPos > metrics.height() - margin
@@ -454,13 +454,13 @@ class QtShellControl < Qt::MainWindow
     def confirmExit
         ret = 0
         return true if @executedLines.empty?
-        ret = Qt::MessageBox::warning(
+        ret = TQt::MessageBox::warning(
                                 self,
                                 "Warning" ,
                                 "A session is opened, quit anyway ?",
-                                 Qt::MessageBox::Yes,
-                                 Qt::MessageBox::No)
-        return ret != Qt::MessageBox::No
+                                 TQt::MessageBox::Yes,
+                                 TQt::MessageBox::No)
+        return ret != TQt::MessageBox::No
     end
 
     def emptySession
@@ -479,8 +479,8 @@ class QtShellControl < Qt::MainWindow
 
 end
 
-class QtShell < Qt::MainWindow
-    slots 'evalInput()', 'evalFile(QString)', 'evalSelection(QString)'
+class QtShell < TQt::MainWindow
+    slots 'evalInput()', 'evalFile(TQString)', 'evalSelection(TQString)'
     attr_accessor :shellWindow
     @@binding = binding
 def bind
@@ -502,8 +502,8 @@ def initialize(*k)
     @prompt = '<b><font color="blue">$&gt;</font></b>'
     self.setCaption("MainWindow - this")
     @shellWindow.sessionLog.setText("Ready.<br>")
-    connect(@shellWindow, SIGNAL('fileNeedsEval(QString)'), self, SLOT('evalFile(QString)'))
-    connect(@shellWindow, SIGNAL('selection(QString)'), self, SLOT('evalSelection(QString)'))
+    connect(@shellWindow, SIGNAL('fileNeedsEval(TQString)'), self, SLOT('evalFile(TQString)'))
+    connect(@shellWindow, SIGNAL('selection(TQString)'), self, SLOT('evalSelection(TQString)'))
 end
 
 def logAppend(str)
@@ -532,8 +532,8 @@ sub PRINT {
   $me->{widg}->setText( $me->{widg}->text . "<font color=\"$color\">$printed</font>" );
 }
 
-#tie *STDOUT, 'Qt::TextHandle', $shw->sessionLog, 'black';
-#tie *STDERR, 'Qt::TextHandle', $shw->sessionLog, 'red';
+#tie *STDOUT, 'TQt::TextHandle', $shw->sessionLog, 'black';
+#tie *STDERR, 'TQt::TextHandle', $shw->sessionLog, 'red';
 
 =end
 
@@ -579,12 +579,12 @@ def evalFile(fname)
         file = File.open(fname, "r")
         if file.nil?
             # TODO use $! -> error message!
-            Qt::MessageBox::warning(
+            TQt::MessageBox::warning(
                 self, 
                 "Error" , 
                 "Couldn't open @{$fn}: $!", 
-                Qt::MessageBox::Ok, 
-                Qt::MessageBox::NoButton)
+                TQt::MessageBox::Ok, 
+                TQt::MessageBox::NoButton)
             return
         end
         indata = file
@@ -602,7 +602,7 @@ end
 
 end
 
-app = Qt::Application.new(ARGV)
+app = TQt::Application.new(ARGV)
 w = QtShell.new(nil, "mainWindow")
 app.setMainWidget(w.shellWindow)
 app.exec
@@ -618,7 +618,7 @@ statusBar.message("Hello World !")
 self.setCentralWidget(vbox)
 self.resize(220,240)
 @vbox.show
-@sample = Qt::PopupMenu.new(self)
+@sample = TQt::PopupMenu.new(self)
 $ slots 'there()'
 @sample.insertItem("&There", self, SLOT('there()'))
 self.menuBar.insertItem("&Here", sample)