gtk2 0.20.1 → 0.90.2

data/sample/misc/bindings.rb

@@ -0,0 +1,107 @@
+#!/usr/bin/env ruby
+=begin
+  bindings.rb - Ruby/GTK sample script.
+
+  Copyright (c) 2002-2006 Ruby-GNOME2 Project Team 
+  This program is licenced under the same licence as Ruby-GNOME2.
+
+  $Id: bindings.rb,v 1.7 2006/06/17 13:18:12 mutoh Exp $
+=end
+
+=begin
+Usage:
+  bindings.rb <filename>
+
+  Following key bindings are effective in the TextView area.
+  
+    <space>      : scroll down by one page
+    <backspace>  : scroll up by one page
+    j            : move cursor donw by one line
+    k            : move cursor up by one line
+
+  clicking buttons cause following effect
+
+    "space"      : same as pressing <space> in text view area.
+    "back_space" : same as pressing <backspace> in text view area.
+    "cancel j/k" : disable 'j' and 'k' binding
+=end
+require 'gtk2'
+
+class Pager < Gtk::TextView
+  type_register
+  
+  # widget's key binding can be defined like this
+  binding_set.add_signal(Gdk::Keyval::GDK_space, 0,
+                         "move_cursor", 
+                         Gtk::MOVEMENT_PAGES, 1, false)
+  binding_set.add_signal(Gdk::Keyval::GDK_BackSpace, 0,
+                         "move_cursor", 
+                         Gtk::MOVEMENT_PAGES, -1, false)
+
+  def initialize(path)
+    @path = path
+    super()
+    @buffer = self.buffer
+    load
+    set_editable(false)
+    set_size_request(400, 400)
+  end
+
+  def load
+    open(@path).read.each do |line|
+      @buffer.insert_at_cursor(line)
+    end
+    @buffer.place_cursor(@buffer.start_iter)
+  end
+end
+
+path = ARGV[0] || __FILE__ 
+
+window = Gtk::Window.new
+window.name = "pager_window"
+sw = Gtk::ScrolledWindow.new
+vbox = Gtk::VBox.new
+hbox = Gtk::HBox.new
+pager = Pager.new(path)
+
+hbox.add(button1 = Gtk::Button.new("space"))
+hbox.add(button2 = Gtk::Button.new("back_space"))
+hbox.add(button3 = Gtk::Button.new("cancel j/k"))
+
+button1.signal_connect("clicked") do
+  Pager.binding_set.activate(Gdk::Keyval::GDK_space, 0, pager)
+end
+button2.signal_connect("clicked") do
+  pager.bindings_activate(Gdk::Keyval::GDK_BackSpace, 0)
+end
+
+# Key bindings can be attached to any widget by 
+# Gtk::BindingSet#add_path
+# see RC Files section of GTK+ documentation for more detail.
+bset = Gtk::BindingSet.new("j_and_k")
+bset.add_signal(Gdk::Keyval::GDK_j, 0,
+                "move_cursor",
+                Gtk::MOVEMENT_DISPLAY_LINES, 1, false)
+bset.add_signal(Gdk::Keyval::GDK_k, 0,
+                "move_cursor",
+                Gtk::MOVEMENT_DISPLAY_LINES, -1, false)
+bset.add_path(Gtk::PathType::WIDGET, "pager_window.*.Pager", 
+                 Gtk::PathPriorityType::APPLICATION)
+
+button3.signal_connect("clicked") do
+  bset.entry_clear(Gdk::Keyval::GDK_j, 0)
+  bset.entry_clear(Gdk::Keyval::GDK_k, 0)
+end
+
+sw.add(pager)
+vbox.add(hbox).add(sw)
+window.add(vbox)
+window.show_all
+
+pager.grab_focus
+
+window.signal_connect("destroy") { Gtk.main_quit }
+
+Gtk.main
+
+

data/sample/misc/button.rb

@@ -0,0 +1,69 @@
+#!/usr/bin/env ruby
+=begin
+  button.rb - Ruby/GTK sample script.
+
+  Copyright (c) 2002-2006 Ruby-GNOME2 Project Team 
+  This program is licenced under the same licence as Ruby-GNOME2.
+
+  $Id: button.rb,v 1.10 2006/06/17 13:18:12 mutoh Exp $
+=end
+
+require 'gtk2'
+
+window = Gtk::Window.new("buttons")
+window.border_width = 0
+
+box1 = Gtk::VBox.new(false, 0)
+window.add(box1)
+
+table = Gtk::Table.new(3, 3, false)
+table.set_row_spacings(5)
+table.set_column_spacings(5)
+table.set_border_width(10)
+box1.pack_start(table, true, true, 0)
+
+button = []
+0.upto(8) do |i|
+  button.push Gtk::Button.new("button"+(i+1).to_s)
+end
+0.upto(8) do |i|
+  button[i].signal_connect("clicked") do |w|
+    p [i]
+    j = (i + 1) % 9
+    if button[j].visible?
+      button[j].hide
+    else
+      button[j].show
+    end
+  end
+  button[i].show
+end
+table.attach(button[0], 0, 1, 0, 1, nil, nil, 0, 0)
+table.attach(button[1], 1, 2, 1, 2, nil, nil, 0, 0)
+table.attach(button[2], 2, 3, 2, 3, nil, nil, 0, 0)
+table.attach(button[3], 0, 1, 2, 3, nil, nil, 0, 0)
+table.attach(button[4], 2, 3, 0, 1, nil, nil, 0, 0)
+table.attach(button[5], 1, 2, 2, 3, nil, nil, 0, 0)
+table.attach(button[6], 1, 2, 0, 1, nil, nil, 0, 0)
+table.attach(button[7], 2, 3, 1, 2, nil, nil, 0, 0)
+table.attach(button[8], 0, 1, 1, 2, nil, nil, 0, 0)
+
+separator = Gtk::HSeparator.new
+box1.pack_start(separator, false, true, 0)
+
+box2 = Gtk::VBox.new(false, 10)
+box2.border_width = 10
+box1.pack_start(box2, false, true, 0)
+
+close = Gtk::Button.new("close")
+close.signal_connect("clicked") do
+  Gtk.main_quit
+end
+
+box2.pack_start(close, true, true, 0)
+close.can_default = true
+close.grab_default
+
+window.show_all
+
+Gtk.main

data/sample/misc/button2.rb

@@ -0,0 +1,28 @@
+#!/usr/local/bin/ruby
+=begin
+  button2.rb - Ruby/GTK2 sample script.
+
+  Copyright (c) 2002-2006 Ruby-GNOME2 Project Team
+  This program is licenced under the same licence as Ruby-GNOME2.
+
+  $Id: button2.rb,v 1.4 2006/06/17 13:18:12 mutoh Exp $
+=end
+
+require 'gtk2'
+
+window = Gtk::Window.new("Gtk::Button sample")
+
+button1 = Gtk::Button.new("_HELLO")
+button2 = Gtk::Button.new("_HELLO", false)
+button3 = Gtk::Button.new(Gtk::Stock::QUIT)  
+
+button3.signal_connect("clicked"){ Gtk.main_quit }
+
+box = Gtk::VBox.new
+box.add(button1)
+box.add(button2)
+box.add(button3)
+
+window.add(box).set_default_size(100,100).show_all
+
+Gtk.main

data/sample/misc/buttonbox.rb

@@ -0,0 +1,93 @@
+#!/usr/bin/env ruby
+=begin
+  buttonbox.rb - Ruby/GTK2 sample script.
+
+  Copyright (c) 2002-2006 Ruby-GNOME2 Project Team
+  This program is licenced under the same licence as Ruby-GNOME2.
+
+  $Id: buttonbox.rb,v 1.9 2006/06/17 13:18:12 mutoh Exp $
+=end
+
+require 'gtk2'
+
+def create_bbox_window(horizontal, title, pos, spacing, layout)
+  window = Gtk::Window.new(title)
+  window.signal_connect("delete_event") do
+    window.destroy
+  end
+
+  box1 = Gtk::VBox.new(false, 0)
+  window.add(box1)
+
+  if horizontal
+    window.set_default_size(550, 60)
+    window.move(150, pos)
+    bbox = Gtk::HButtonBox.new
+  else
+    window.set_default_size(150, 400)
+    window.move(pos, 200)
+    bbox = Gtk::VButtonBox.new
+  end
+
+  bbox.layout_style = layout
+  bbox.spacing = spacing
+  box1.border_width = 25
+  box1.pack_start(bbox, true, true, 0)
+
+  button = Gtk::Button.new("OK")
+  bbox.add(button)
+  button.signal_connect("clicked") do
+    window.destroy
+  end
+
+  button = Gtk::Button.new("Cancel")
+  bbox.add(button)
+  button.signal_connect("clicked") do
+    window.destroy
+  end
+
+  button = Gtk::Button.new("Help")
+  bbox.add(button)
+  window.show_all
+end
+
+def test_hbbox
+  create_bbox_window(true, "Spread", 50, 40, Gtk::ButtonBox::SPREAD)
+  create_bbox_window(true, "Edge", 250, 40, Gtk::ButtonBox::EDGE)
+  create_bbox_window(true, "Start", 450, 40,  Gtk::ButtonBox::START)
+  create_bbox_window(true, "End", 650, 15, Gtk::ButtonBox::END)
+end
+
+def test_vbbox
+  create_bbox_window(false, "Spread", 50, 40, Gtk::ButtonBox::SPREAD)
+  create_bbox_window(false, "Edge", 250, 40,  Gtk::ButtonBox::EDGE)
+  create_bbox_window(false, "Start", 450, 40, Gtk::ButtonBox::START)
+  create_bbox_window(false, "End", 650, 15, Gtk::ButtonBox::END)
+end
+
+window = Gtk::Window.new("button box")
+window.signal_connect("delete_event") do
+  Gtk.main_quit
+end
+window.border_width = 20
+
+bbox = Gtk::HButtonBox.new
+window.add(bbox)
+
+button = Gtk::Button.new("Horizontal")
+
+button.signal_connect("clicked") do
+  test_hbbox
+end
+
+bbox.add(button)
+
+button = Gtk::Button.new("Vertical")
+button.signal_connect("clicked") do
+  test_vbbox
+end
+bbox.add(button)
+
+window.show_all
+
+Gtk.main

data/sample/misc/cairo-pong.rb

@@ -0,0 +1,215 @@
+#!/usr/bin/env ruby
+=begin
+  cairo-pong.rb - Ruby/GTK with cairo sample script.
+
+  Original: gtkcairo sample by Evan Martins.
+
+  Copyright (c) 2005,2006  Ruby-GNOME2 Project Team 
+  This program is licenced under the same licence as Ruby-GNOME2.
+
+  $Id: cairo-pong.rb,v 1.3 2006/06/17 13:18:12 mutoh Exp $
+=end
+
+require "gtk2"
+
+unless Gdk::Drawable.instance_methods.include?("create_cairo_context")
+  raise "GTK+ 2.8.0 or later and cairo support are required."
+end
+
+module Pong
+  class CenteredItem
+    attr_accessor :x, :y
+    attr_reader :width, :height
+    
+    def initialize(x, y, width, height)
+      @x = x
+      @y = y
+      @width = width
+      @height = height
+    end
+
+    def min_x
+      @x - @width / 2
+    end
+  
+    def max_x
+      @x + @width / 2
+    end
+  
+    def min_y
+      @y - @height / 2
+    end
+  
+    def max_y
+      @y + @height / 2
+    end
+  end
+
+  class CenteredCircle < CenteredItem
+    def draw(cr)
+      cr.translate(min_x, min_y)
+      cr.scale(@width, @height)
+      cr.arc(0.5, 0.5, 0.5, 0, 2 * Math::PI)
+      cr.fill
+    end
+  end
+  
+  class CenteredRect < CenteredItem
+    def draw(cr)
+      cr.translate(min_x, min_y)
+      cr.scale(@width, @height)
+      cr.rectangle(0, 0, 1, 1)
+      cr.fill
+    end
+  end
+  
+  class Ball < CenteredCircle
+    attr_accessor :dx, :dy
+    def initialize(dx=0.02, dy=0.02)
+      super(0.8, 0.5, 0.04, 0.04)
+      @dx = dx
+      @dy = dy
+    end
+    
+    def update
+      @x += @dx
+      @y += @dy
+
+      # ball bouncing
+      if max_y > 1
+        @y = 1 - (max_y - 1)
+        @dy *= -1
+      elsif min_y < 0
+        @y -= min_y
+        @dy *= -1
+      end
+      
+      if max_x > 1
+        @x = 1 - (max_x - 1)
+        @dx *= -1
+      elsif min_x < 0
+        @x -= min_x
+        @dx *= -1
+      end
+    end
+  end
+  
+  class Paddle < CenteredRect
+    def initialize(field, x, y)
+      super(x, y, 0.05, 0.3)
+      @field = field
+    end
+    
+    def update(ball)
+      # is the ball coming towards us?
+      if (ball.x < @x and ball.dx > 0) or
+          (ball.x > @x and ball.dx < 0)
+        # move to intercept it
+        @y = ball.y
+      end
+    end
+
+    def ball_hit?(ball)
+      ball.y > min_y and ball.y < max_y
+    end
+    
+    def update_ball(ball)
+      if ball_hit?(ball)
+        if ball.min_x < @x and ball.max_x > min_x # hit our left side
+          ball.x -= (ball.max_x - min_x)
+          ball.dx = -ball.dx
+        elsif ball.max_x > @x and ball.min_x < max_x # hit our right side
+          ball.x += (max_x - ball.min_x)
+          ball.dx = -ball.dx
+        end
+      end
+    end
+  end
+
+  class Field
+    attr_accessor :width, :height
+    
+    def initialize(margin=0.05)
+      @margin = margin
+      
+      @left_paddle = Paddle.new(self, @margin, 0.5)
+      @right_paddle = Paddle.new(self, 1 - @margin, 0.7)
+      @paddles = [@left_paddle, @right_paddle]
+      @ball = Ball.new
+    end
+    
+    def update
+      @paddles.each do |paddle|
+        paddle.update(@ball)
+      end
+      @ball.update
+      @paddles.each do |paddle|
+        paddle.update_ball(@ball)
+      end
+    end
+    
+    def draw(cr)
+      cr.set_source_rgba(1, 1, 1)
+      cr.rectangle(0, 0, 1, 1)
+      cr.fill
+
+      cr.save do
+        cr.set_source_rgba(0.8, 0.8, 0.8, 0.8)
+        cr.set_line_join(Cairo::LINE_JOIN_ROUND)
+        @paddles.each do |paddle|
+          cr.save {paddle.draw(cr)}
+        end
+      end
+      
+      cr.set_source_rgba(0, 0, 0)
+      cr.save {@ball.draw(cr)}
+    end
+  end
+
+  class Window < Gtk::Window
+    def initialize(speed=30)
+      super()
+      @speed = speed
+      
+      self.title = 'Pong Demonstration'
+      signal_connect('destroy') { Gtk.main_quit }
+      signal_connect("key_press_event") do |widget, event|
+        if event.state.control_mask? and event.keyval == Gdk::Keyval::GDK_q
+          destroy
+          true
+        else
+          false
+        end
+      end
+
+      set_default_size(260, 200)
+
+      @field = Field.new
+
+      @drawing_area = Gtk::DrawingArea.new
+      set_expose_event
+
+      vb = Gtk::VBox.new(false, 5)
+      vb.border_width = 10
+      vb.pack_start(@drawing_area, true, true, 0)
+      vb.show_all
+      add(vb)
+
+      Gtk.timeout_add(@speed) do
+        @field.update
+        @drawing_area.queue_draw unless @drawing_area.destroyed?
+      end
+    end
+
+    def set_expose_event
+      @drawing_area.signal_connect('expose_event') do |widget, event|
+        cr = widget.window.create_cairo_context
+        cr.scale(*widget.window.size)
+        @field.draw(cr)
+      end
+    end
+  end
+end
+
+Pong::Window.new.show_all
+Gtk.main