Sophie

Sophie

distrib > Mandriva > 2008.1 > x86_64 > media > main-testing > by-pkgid > 09cef380cab976ef2429223a14de963d > files > 172

ruby-gtk2-0.16.0-4.1mdv2008.1.x86_64.rpm

=begin header

  rulers.rb - a part of testgtk.c rewritten in Ruby/GTK2

  Copyright (C) 2002-2005 Ruby-GNOME2 Project Team

  $Id: rulers.rb,v 1.9 2005/07/18 17:13:33 mutoh Exp $

=end

require 'sample'

class RulerSample < SampleWindow
  def initialize
    super("rulers")

    set_default_size(300, 300)

    set_events(Gdk::Event::POINTER_MOTION_MASK | 
	       Gdk::Event::POINTER_MOTION_HINT_MASK)

    table = Gtk::Table.new(2, 2, false)
    add(table)

    hruler = Gtk::HRuler.new
    hruler.metric = Gtk::CENTIMETERS
    hruler.set_range(100, 0, 0, 20)

    vruler = Gtk::VRuler.new
    vruler.set_range(5, 15, 0, 20)

    signal_connect("motion_notify_event"){ |w, e|
      vruler.signal_emit("motion_notify_event", e)
    }

    table.attach(hruler, 1, 2, 0, 1,
		 Gtk::EXPAND | Gtk::FILL, Gtk::FILL, 0, 0)

    signal_connect("motion_notify_event"){ |w, e|
       hruler.signal_emit("motion_notify_event", e)
    }

    table.attach(vruler, 0, 1, 1, 2,
		 Gtk::FILL, Gtk::EXPAND | Gtk::FILL, 0, 0)
  end
end