qtbindings 4.8.6.2 → 4.8.6.3

data/examples/qdbus/remotecontrolledcar/car/main.rb

@@ -1,50 +1,50 @@
-=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 './car.rb'
-
-app = Qt::Application.new(ARGV)
-
-scene = Qt::GraphicsScene.new
-scene.setSceneRect(-500, -500, 1000, 1000)
-scene.itemIndexMethod = Qt::GraphicsScene::NoIndex
-
-car = Car.new
-scene.addItem(car)
-
-view = Qt::GraphicsView.new(scene)
-view.renderHint = Qt::Painter::Antialiasing
-view.backgroundBrush = Qt::Brush.new(Qt::darkGray)
-view.setWindowTitle(QT_TRANSLATE_NOOP(Qt::GraphicsView, "Qt DBus Controlled Car"))
-view.resize(400, 300)
-view.show()
-
-adaptor = CarAdaptor.new(car)
-connection = Qt::DBusConnection::sessionBus()
-connection.registerObject("/Car", adaptor, Qt::DBusConnection::ExportScriptableSlots)
-connection.registerService("com.trolltech.CarExample")
-
-app.exec
+=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 './car.rb'
+
+app = Qt::Application.new(ARGV)
+
+scene = Qt::GraphicsScene.new
+scene.setSceneRect(-500, -500, 1000, 1000)
+scene.itemIndexMethod = Qt::GraphicsScene::NoIndex
+
+car = Car.new
+scene.addItem(car)
+
+view = Qt::GraphicsView.new(scene)
+view.renderHint = Qt::Painter::Antialiasing
+view.backgroundBrush = Qt::Brush.new(Qt::darkGray)
+view.setWindowTitle(QT_TRANSLATE_NOOP(Qt::GraphicsView, "Qt DBus Controlled Car"))
+view.resize(400, 300)
+view.show()
+
+adaptor = CarAdaptor.new(car)
+connection = Qt::DBusConnection::sessionBus()
+connection.registerObject("/Car", adaptor, Qt::DBusConnection::ExportScriptableSlots)
+connection.registerService("com.trolltech.CarExample")
+
+app.exec

data/examples/qdbus/remotecontrolledcar/controller/controller.rb

@@ -1,66 +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 './ui_controller.rb'
-
-class Controller < Qt::Widget
-	
-	slots :on_accelerate_clicked, :on_decelerate_clicked,
-    		:on_left_clicked, :on_right_clicked
-	
-	def initialize(parent = nil)
-	    super(parent)
-		@ui = Ui_Controller.new
-	    @ui.setupUi(self)
-	    @car = Qt::DBusInterface.new("com.trolltech.CarExample", "/Car", 
-                                     "com.trolltech.Examples.CarInterface",
-	                                  Qt::DBusConnection::sessionBus(), self)
-	    startTimer(1000)
-	end
-	
-	def timerEvent(event)
-	    if @car.valid?
-	        @ui.label.text = "connected"
-	    else
-	        @ui.label.text = "disconnected"
-		end
-	end
-	
-	def on_accelerate_clicked
-	    @car.accelerate
-	end
-	
-	def on_decelerate_clicked
-	    @car.decelerate
-	end
-	
-	def on_left_clicked
-	    @car.turnLeft
-	end
-	
-	def on_right_clicked
-	    @car.turnRight
-	end
-end
+=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 './ui_controller.rb'
+
+class Controller < Qt::Widget
+	
+	slots :on_accelerate_clicked, :on_decelerate_clicked,
+    		:on_left_clicked, :on_right_clicked
+	
+	def initialize(parent = nil)
+	    super(parent)
+		@ui = Ui_Controller.new
+	    @ui.setupUi(self)
+	    @car = Qt::DBusInterface.new("com.trolltech.CarExample", "/Car", 
+                                     "com.trolltech.Examples.CarInterface",
+	                                  Qt::DBusConnection::sessionBus(), self)
+	    startTimer(1000)
+	end
+	
+	def timerEvent(event)
+	    if @car.valid?
+	        @ui.label.text = "connected"
+	    else
+	        @ui.label.text = "disconnected"
+		end
+	end
+	
+	def on_accelerate_clicked
+	    @car.accelerate
+	end
+	
+	def on_decelerate_clicked
+	    @car.decelerate
+	end
+	
+	def on_left_clicked
+	    @car.turnLeft
+	end
+	
+	def on_right_clicked
+	    @car.turnRight
+	end
+end

data/examples/qdbus/remotecontrolledcar/controller/controller.ui

@@ -1,61 +1,61 @@
-<ui version="4.0" >
- <class>Controller</class>
- <widget class="QWidget" name="Controller" >
-  <property name="geometry" >
-   <rect>
-    <x>0</x>
-    <y>0</y>
-    <width>255</width>
-    <height>111</height>
-   </rect>
-  </property>
-  <layout class="QGridLayout" >
-   <property name="margin" >
-    <number>9</number>
-   </property>
-   <property name="spacing" >
-    <number>6</number>
-   </property>
-   <item row="1" column="1" >
-    <widget class="QLabel" name="label" >
-     <property name="text" >
-      <string>Controller</string>
-     </property>
-     <property name="alignment" >
-      <set>Qt::AlignCenter</set>
-     </property>
-    </widget>
-   </item>
-   <item row="2" column="1" >
-    <widget class="QPushButton" name="decelerate" >
-     <property name="text" >
-      <string>Decelerate</string>
-     </property>
-    </widget>
-   </item>
-   <item row="0" column="1" >
-    <widget class="QPushButton" name="accelerate" >
-     <property name="text" >
-      <string>Accelerate</string>
-     </property>
-    </widget>
-   </item>
-   <item row="1" column="2" >
-    <widget class="QPushButton" name="right" >
-     <property name="text" >
-      <string>Right</string>
-     </property>
-    </widget>
-   </item>
-   <item row="1" column="0" >
-    <widget class="QPushButton" name="left" >
-     <property name="text" >
-      <string>Left</string>
-     </property>
-    </widget>
-   </item>
-  </layout>
- </widget>
- <resources/>
- <connections/>
-</ui>
+<ui version="4.0" >
+ <class>Controller</class>
+ <widget class="QWidget" name="Controller" >
+  <property name="geometry" >
+   <rect>
+    <x>0</x>
+    <y>0</y>
+    <width>255</width>
+    <height>111</height>
+   </rect>
+  </property>
+  <layout class="QGridLayout" >
+   <property name="margin" >
+    <number>9</number>
+   </property>
+   <property name="spacing" >
+    <number>6</number>
+   </property>
+   <item row="1" column="1" >
+    <widget class="QLabel" name="label" >
+     <property name="text" >
+      <string>Controller</string>
+     </property>
+     <property name="alignment" >
+      <set>Qt::AlignCenter</set>
+     </property>
+    </widget>
+   </item>
+   <item row="2" column="1" >
+    <widget class="QPushButton" name="decelerate" >
+     <property name="text" >
+      <string>Decelerate</string>
+     </property>
+    </widget>
+   </item>
+   <item row="0" column="1" >
+    <widget class="QPushButton" name="accelerate" >
+     <property name="text" >
+      <string>Accelerate</string>
+     </property>
+    </widget>
+   </item>
+   <item row="1" column="2" >
+    <widget class="QPushButton" name="right" >
+     <property name="text" >
+      <string>Right</string>
+     </property>
+    </widget>
+   </item>
+   <item row="1" column="0" >
+    <widget class="QPushButton" name="left" >
+     <property name="text" >
+      <string>Left</string>
+     </property>
+    </widget>
+   </item>
+  </layout>
+ </widget>
+ <resources/>
+ <connections/>
+</ui>

data/examples/qdbus/remotecontrolledcar/controller/main.rb

@@ -1,32 +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 './controller.rb'
-
-app = Qt::Application.new(ARGV)
-controller = Controller.new
-controller.show
-app.exec
+=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 './controller.rb'
+
+app = Qt::Application.new(ARGV)
+controller = Controller.new
+controller.show
+app.exec

data/examples/qdbus/remotecontrolledcar/controller/makefile

@@ -1,2 +1,2 @@
-ui_controller.rb: controller.ui
-	rbuic4 controller.ui -o ui_controller.rb
+ui_controller.rb: controller.ui
+	rbuic4 controller.ui -o ui_controller.rb

data/examples/qtscribble/scribble.rb

@@ -1,270 +1,270 @@
-#!/usr/bin/env ruby -w
-
- #
- # A class that lets the user draw with the mouse. The
- # window knows how to redraw itself.
- #
-
-require 'Qt'
-	
-	class ScribbleArea < Qt::Widget
-	
-		slots "setColor(QColor)", "slotLoad(const QString&)", "slotSave(const QString&)", "slotClearArea()"
-
-		  #
-		  # The constructor. Initializes the member variables.
-		  #
-		def initialize(parent)
-			super(parent)
-			# initialize member variables
-			@_buffer = Qt::Pixmap.new()
-			@_last = Qt::Point.new()
-			@_currentcolor = Qt::black
-			
-			# don't blank the window before repainting
-			setAttribute( Qt::WA_NoBackground )
-			
-			# create a pop-up menu
-			@_popupmenu = Qt::Menu.new()
-			@_popupmenu.addAction( "&Clear", self, SLOT( "slotClearArea()" ) )
-		end
-		
-		  #
-		  # This slot sets the curren color for the scribble area. It will be
-		  # connected with the colorChanged( Qt::Color ) signal from the
-		  # ScribbleWindow.
-		  #
-		def setColor( new_color )
-			@_currentcolor = new_color
-		end
-		
-		 #
-		 # This slot clears the drawing area by filling the off-screen buffer with
-		 # white and copying it over to the window.
-		 #
-		def slotClearArea()
-			# fill the off screen buffer with plain white
-			@_buffer.fill( white )
-			
-			# and copy it over to the window
-			bitBlt( self, 0, 0, @_buffer )
-		end
-		
-		
-		  #
-		  # This method does the actual loading. It relies on Qt::Pixmap (and the
-		  # underlying I/O machinery) to determine the filetype.
-		  #
-		def slotLoad( filename )
-			if !@_buffer.load( filename )
-				Qt::MessageBox.warning( nil, "Load error", "Could not load file" )
-			end
-				
-			repaint()  # refresh the window
-		end
-		
-		
-		  #
-		 # This method does the actual saving. We hard-code the file type as
-		 # BMP. Unix users might want to replace this with something like XPM.
-		 #
-		def slotSave( filename )
-			if !@_buffer.save( filename, "BMP" )
-				Qt::MessageBox.warning( nil, "Save error", "Could not save file" )
-			end
-		end
-		
-		
-		  #
-		  # This method is called whenever the user presses the
-		  # mouse over the window. It just records the position of the mouse
-		  # at the time of the click.
-		  #
-		def mousePressEvent(event)
-			if event.button() == RightButton
-				@_popupmenu.exec( Qt::Cursor.pos() )
-			else
-				@_last = event.pos()	# retrieve the coordinates from the event
-			end
-		end
-		
-		
-		  #
-		  # The method is called whenever the usr moves the mouse
-		  # while the mouse button is pressed. If we had called
-		  # setMouseTracking(true) before, the method would also be called
-		  # when the mouse was moved with any button pressed. We know that
-		  # we haven't, and thus don't have to check whether any buttons are
-		  # pressed.
-		  #
-		def mouseMoveEvent(event)
-			# create a Qt::Painter object for drawing onto the window
-			windowpainter = Qt::Painter.new()
-			# and another Qt::Painter object for drawing int an off-screen pixmap
-			bufferpainter = Qt::Painter.new()
-			
-			# start painting
-			windowpainter.begin( self ) # This painter paints onto the window
-			bufferpainter.begin( @_buffer )  # and this one paints in the buffer
-		
-			# set a standard pen with the currently selected color
-			windowpainter.setPen( @_currentcolor )
-			bufferpainter.setPen( @_currentcolor )
-		
-			# draw a line in both the window and the buffer
-			windowpainter.drawLine( @_last, event.pos() )
-			bufferpainter.drawLine( @_last, event.pos() )
-		
-			# done with painting
-			windowpainter.end()
-			bufferpainter.end()
-		
-			# remember the current mouse position
-			@_last = event.pos()						
-		end
-		
-		  #
-		  # This method is called whenever the widget needs
-		  # painting, for example when it has been obscured and then revealed again.
-		  #
-		def paintEvent(event)
-			bitBlt(self, 0, 0, @_buffer)
-		end
-	
-		  #
-		  # This method get called whenever the widget needs
-		  # painting, for example, when it has been obscured and then revealed again.
-		  #
-		def resizeEvent(event)
-			save = Qt::Pixmap.new( @_buffer )
-			@_buffer = save.scaled(event.size.width, event.size.height)
-			@_buffer.fill( Qt::Color.new(Qt::white) )
-			drawPixmap( @_buffer, 0, 0, save )
-		end
-	end
-
-class ScribbleWindow < Qt::Widget
-
-	slots "slotAbout()", "slotAboutQt()", "slotColorMenu(int)", "slotLoad()", "slotSave()"
-	signals "colorChanged(QColor)", "load(const QString&)", "save(const QString&)"
-	
-	COLOR_MENU_ID_BLACK = 0
-	COLOR_MENU_ID_RED = 1
-	COLOR_MENU_ID_BLUE = 2
-	COLOR_MENU_ID_GREEN = 3
-	COLOR_MENU_ID_YELLOW = 4
-	
-	def initialize()
-		super
-		# The next lines build the menu bar. We first create the menus
-		# one by one, then add them to the menu bar. #
-		@_menubar = Qt::MenuBar.new( self )  # create a menu bar
-
-		@_filemenu = @_menubar.addMenu( "&File" )  # create a file menu
-		@_filemenu.addAction( "&Load", self, SLOT( "slotLoad()" ) )
-		@_filemenu.addAction( "&Save", self, SLOT( "slotSave()" ) )
-		@_filemenu.addSeparator()
-		@_filemenu.addAction( "&Quit", $qApp, SLOT( "quit()" ) )
-		
-		@_colormenu = @_menubar.addMenu( "&Color" ) # create a color menu
-#		@_colormenu.addAction( "B&lack", COLOR_MENU_ID_BLACK)
-#		@_colormenu.addAction( "&Red", COLOR_MENU_ID_RED)
-#		@_colormenu.addAction( "&Blue", COLOR_MENU_ID_BLUE)
-#		@_colormenu.addAction( "&Green", COLOR_MENU_ID_GREEN)
-#		@_colormenu.addAction( "&Yellow", COLOR_MENU_ID_YELLOW)
-#		Qt::Object.connect( @_colormenu, SIGNAL( "activated( int )" ),
-#						 self, SLOT( "slotColorMenu( int )" ) )
-						
-		@_helpmenu = @_menubar.addMenu( "&Help" )  # create a help menu
-		@_helpmenu.addAction( "&About QtScribble", self, SLOT( "slotAbout()" ) )
-		@_helpmenu.addAction( "&About Qt", self, SLOT( "slotAboutQt()" ) )
-		
-		 # We create a Qt::ScrollView and a ScribbleArea. The ScribbleArea will
-		 # be managed by the scroll view.#
-		@_scrollview = Qt::ScrollArea.new( self )
-		@_scrollview.setGeometry( 0, @_menubar.height(),
-		 							width(), height() - @_menubar.height() )
-		@_scribblearea = ScribbleArea.new( @_scrollview )
-		@_scribblearea.setGeometry( 0, 0, 1000, 1000 )
-#		@_scrollview.addChild( @_scribblearea )
-		Qt::Object.connect( self, SIGNAL( "colorChanged(QColor)" ),
-						 @_scribblearea, SLOT( "setColor(QColor)" ) )
-		Qt::Object.connect( self, SIGNAL( "save(const QString&)" ),
-						 @_scribblearea, SLOT( "slotSave(const QString&)" ) )
-		Qt::Object.connect( self, SIGNAL( "load(const QString&)" ),
-						 @_scribblearea, SLOT( "slotLoad(const QString&)" ) )
-	end
-	
-	def resizeEvent( event )
-		 # When the whole window is resized, we have to rearrange the geometry
-		 # in the ScribbleWindow as well. Note that the ScribbleArea does not need
-		 # to be changed.
-		 @_scrollview.setGeometry( 0, @_menubar.height(),
-		 							width(), height() - @_menubar.height() )
-	end
-
-	
-	
-	def slotAbout()
-		Qt::MessageBox.information( self, "About QtScribble 5",
-										"This is the Scribble 5 application\n" +
-										"Copyright 1998 by Mathias Kalle Dalheimer\n")
-	end
-	
-	def slotAboutQt()
-		Qt::MessageBox.aboutQt( self, "About Qt" )
-	end
-	
-	def slotColorMenu( item )
-		case item
-			when COLOR_MENU_ID_BLACK
-				emit colorChanged( black )
-			when COLOR_MENU_ID_RED
-				emit colorChanged( darkRed )
-			when COLOR_MENU_ID_BLUE
-				emit colorChanged( darkBlue )
-			when COLOR_MENU_ID_GREEN
-				emit colorChanged( darkGreen )
-			when COLOR_MENU_ID_YELLOW
-				emit colorChanged( yellow )
-		end
-	end
-	
-	
-	  #
-	  # This is the slot for the menu item File/Load. It opens a
-	  # Qt::FileDialog to ask the user for a filename, then emits a save()
-	  # signal with the filename as parameter.
-	  #
-	def slotLoad()
-		 # Open a file dialog for loading. The default directory is the
-		 # current directory, the filter *.bmp.
-		 #
-		filename = Qt::FileDialog.getOpenFileName( ".", "*.bmp", self )
-		if !filename.nil?
-			emit load( filename )
-		end
-	end
-	
-	  #
-	  # This is the slot for the menu item File/Load. It opens a
-	  # Qt::FileDialog to ask the user for a filename, then emits a save()
-	  # signal with the filename as parameter.
-	  #
-	def slotSave()
-		 # Open a file dialog for saving. The default directory is the
-		 # current directory, the filter *.bmp.
-		 #
-		filename = Qt::FileDialog.getSaveFileName( ".", "*.bmp", self )
-		if !filename.nil?
-			emit save( filename )
-		end
-	end
-end
-	
-myapp = Qt::Application.new(ARGV)
-mywidget = ScribbleWindow.new()
-mywidget.setGeometry(50, 500, 400, 400)
-
-mywidget.show()
-myapp.exec()
+#!/usr/bin/env ruby -w
+
+ #
+ # A class that lets the user draw with the mouse. The
+ # window knows how to redraw itself.
+ #
+
+require 'Qt'
+	
+	class ScribbleArea < Qt::Widget
+	
+		slots "setColor(QColor)", "slotLoad(const QString&)", "slotSave(const QString&)", "slotClearArea()"
+
+		  #
+		  # The constructor. Initializes the member variables.
+		  #
+		def initialize(parent)
+			super(parent)
+			# initialize member variables
+			@_buffer = Qt::Pixmap.new()
+			@_last = Qt::Point.new()
+			@_currentcolor = Qt::black
+			
+			# don't blank the window before repainting
+			setAttribute( Qt::WA_NoBackground )
+			
+			# create a pop-up menu
+			@_popupmenu = Qt::Menu.new()
+			@_popupmenu.addAction( "&Clear", self, SLOT( "slotClearArea()" ) )
+		end
+		
+		  #
+		  # This slot sets the curren color for the scribble area. It will be
+		  # connected with the colorChanged( Qt::Color ) signal from the
+		  # ScribbleWindow.
+		  #
+		def setColor( new_color )
+			@_currentcolor = new_color
+		end
+		
+		 #
+		 # This slot clears the drawing area by filling the off-screen buffer with
+		 # white and copying it over to the window.
+		 #
+		def slotClearArea()
+			# fill the off screen buffer with plain white
+			@_buffer.fill( white )
+			
+			# and copy it over to the window
+			bitBlt( self, 0, 0, @_buffer )
+		end
+		
+		
+		  #
+		  # This method does the actual loading. It relies on Qt::Pixmap (and the
+		  # underlying I/O machinery) to determine the filetype.
+		  #
+		def slotLoad( filename )
+			if !@_buffer.load( filename )
+				Qt::MessageBox.warning( nil, "Load error", "Could not load file" )
+			end
+				
+			repaint()  # refresh the window
+		end
+		
+		
+		  #
+		 # This method does the actual saving. We hard-code the file type as
+		 # BMP. Unix users might want to replace this with something like XPM.
+		 #
+		def slotSave( filename )
+			if !@_buffer.save( filename, "BMP" )
+				Qt::MessageBox.warning( nil, "Save error", "Could not save file" )
+			end
+		end
+		
+		
+		  #
+		  # This method is called whenever the user presses the
+		  # mouse over the window. It just records the position of the mouse
+		  # at the time of the click.
+		  #
+		def mousePressEvent(event)
+			if event.button() == RightButton
+				@_popupmenu.exec( Qt::Cursor.pos() )
+			else
+				@_last = event.pos()	# retrieve the coordinates from the event
+			end
+		end
+		
+		
+		  #
+		  # The method is called whenever the usr moves the mouse
+		  # while the mouse button is pressed. If we had called
+		  # setMouseTracking(true) before, the method would also be called
+		  # when the mouse was moved with any button pressed. We know that
+		  # we haven't, and thus don't have to check whether any buttons are
+		  # pressed.
+		  #
+		def mouseMoveEvent(event)
+			# create a Qt::Painter object for drawing onto the window
+			windowpainter = Qt::Painter.new()
+			# and another Qt::Painter object for drawing int an off-screen pixmap
+			bufferpainter = Qt::Painter.new()
+			
+			# start painting
+			windowpainter.begin( self ) # This painter paints onto the window
+			bufferpainter.begin( @_buffer )  # and this one paints in the buffer
+		
+			# set a standard pen with the currently selected color
+			windowpainter.setPen( @_currentcolor )
+			bufferpainter.setPen( @_currentcolor )
+		
+			# draw a line in both the window and the buffer
+			windowpainter.drawLine( @_last, event.pos() )
+			bufferpainter.drawLine( @_last, event.pos() )
+		
+			# done with painting
+			windowpainter.end()
+			bufferpainter.end()
+		
+			# remember the current mouse position
+			@_last = event.pos()						
+		end
+		
+		  #
+		  # This method is called whenever the widget needs
+		  # painting, for example when it has been obscured and then revealed again.
+		  #
+		def paintEvent(event)
+			bitBlt(self, 0, 0, @_buffer)
+		end
+	
+		  #
+		  # This method get called whenever the widget needs
+		  # painting, for example, when it has been obscured and then revealed again.
+		  #
+		def resizeEvent(event)
+			save = Qt::Pixmap.new( @_buffer )
+			@_buffer = save.scaled(event.size.width, event.size.height)
+			@_buffer.fill( Qt::Color.new(Qt::white) )
+			drawPixmap( @_buffer, 0, 0, save )
+		end
+	end
+
+class ScribbleWindow < Qt::Widget
+
+	slots "slotAbout()", "slotAboutQt()", "slotColorMenu(int)", "slotLoad()", "slotSave()"
+	signals "colorChanged(QColor)", "load(const QString&)", "save(const QString&)"
+	
+	COLOR_MENU_ID_BLACK = 0
+	COLOR_MENU_ID_RED = 1
+	COLOR_MENU_ID_BLUE = 2
+	COLOR_MENU_ID_GREEN = 3
+	COLOR_MENU_ID_YELLOW = 4
+	
+	def initialize()
+		super
+		# The next lines build the menu bar. We first create the menus
+		# one by one, then add them to the menu bar. #
+		@_menubar = Qt::MenuBar.new( self )  # create a menu bar
+
+		@_filemenu = @_menubar.addMenu( "&File" )  # create a file menu
+		@_filemenu.addAction( "&Load", self, SLOT( "slotLoad()" ) )
+		@_filemenu.addAction( "&Save", self, SLOT( "slotSave()" ) )
+		@_filemenu.addSeparator()
+		@_filemenu.addAction( "&Quit", $qApp, SLOT( "quit()" ) )
+		
+		@_colormenu = @_menubar.addMenu( "&Color" ) # create a color menu
+#		@_colormenu.addAction( "B&lack", COLOR_MENU_ID_BLACK)
+#		@_colormenu.addAction( "&Red", COLOR_MENU_ID_RED)
+#		@_colormenu.addAction( "&Blue", COLOR_MENU_ID_BLUE)
+#		@_colormenu.addAction( "&Green", COLOR_MENU_ID_GREEN)
+#		@_colormenu.addAction( "&Yellow", COLOR_MENU_ID_YELLOW)
+#		Qt::Object.connect( @_colormenu, SIGNAL( "activated( int )" ),
+#						 self, SLOT( "slotColorMenu( int )" ) )
+						
+		@_helpmenu = @_menubar.addMenu( "&Help" )  # create a help menu
+		@_helpmenu.addAction( "&About QtScribble", self, SLOT( "slotAbout()" ) )
+		@_helpmenu.addAction( "&About Qt", self, SLOT( "slotAboutQt()" ) )
+		
+		 # We create a Qt::ScrollView and a ScribbleArea. The ScribbleArea will
+		 # be managed by the scroll view.#
+		@_scrollview = Qt::ScrollArea.new( self )
+		@_scrollview.setGeometry( 0, @_menubar.height(),
+		 							width(), height() - @_menubar.height() )
+		@_scribblearea = ScribbleArea.new( @_scrollview )
+		@_scribblearea.setGeometry( 0, 0, 1000, 1000 )
+#		@_scrollview.addChild( @_scribblearea )
+		Qt::Object.connect( self, SIGNAL( "colorChanged(QColor)" ),
+						 @_scribblearea, SLOT( "setColor(QColor)" ) )
+		Qt::Object.connect( self, SIGNAL( "save(const QString&)" ),
+						 @_scribblearea, SLOT( "slotSave(const QString&)" ) )
+		Qt::Object.connect( self, SIGNAL( "load(const QString&)" ),
+						 @_scribblearea, SLOT( "slotLoad(const QString&)" ) )
+	end
+	
+	def resizeEvent( event )
+		 # When the whole window is resized, we have to rearrange the geometry
+		 # in the ScribbleWindow as well. Note that the ScribbleArea does not need
+		 # to be changed.
+		 @_scrollview.setGeometry( 0, @_menubar.height(),
+		 							width(), height() - @_menubar.height() )
+	end
+
+	
+	
+	def slotAbout()
+		Qt::MessageBox.information( self, "About QtScribble 5",
+										"This is the Scribble 5 application\n" +
+										"Copyright 1998 by Mathias Kalle Dalheimer\n")
+	end
+	
+	def slotAboutQt()
+		Qt::MessageBox.aboutQt( self, "About Qt" )
+	end
+	
+	def slotColorMenu( item )
+		case item
+			when COLOR_MENU_ID_BLACK
+				emit colorChanged( black )
+			when COLOR_MENU_ID_RED
+				emit colorChanged( darkRed )
+			when COLOR_MENU_ID_BLUE
+				emit colorChanged( darkBlue )
+			when COLOR_MENU_ID_GREEN
+				emit colorChanged( darkGreen )
+			when COLOR_MENU_ID_YELLOW
+				emit colorChanged( yellow )
+		end
+	end
+	
+	
+	  #
+	  # This is the slot for the menu item File/Load. It opens a
+	  # Qt::FileDialog to ask the user for a filename, then emits a save()
+	  # signal with the filename as parameter.
+	  #
+	def slotLoad()
+		 # Open a file dialog for loading. The default directory is the
+		 # current directory, the filter *.bmp.
+		 #
+		filename = Qt::FileDialog.getOpenFileName( ".", "*.bmp", self )
+		if !filename.nil?
+			emit load( filename )
+		end
+	end
+	
+	  #
+	  # This is the slot for the menu item File/Load. It opens a
+	  # Qt::FileDialog to ask the user for a filename, then emits a save()
+	  # signal with the filename as parameter.
+	  #
+	def slotSave()
+		 # Open a file dialog for saving. The default directory is the
+		 # current directory, the filter *.bmp.
+		 #
+		filename = Qt::FileDialog.getSaveFileName( ".", "*.bmp", self )
+		if !filename.nil?
+			emit save( filename )
+		end
+	end
+end
+	
+myapp = Qt::Application.new(ARGV)
+mywidget = ScribbleWindow.new()
+mywidget.setGeometry(50, 500, 400, 400)
+
+mywidget.show()
+myapp.exec()