clutter-gtk 2.2.4-x64-mingw32

data/sample/test-scroll.rb

@@ -0,0 +1,174 @@
+#!/usr/bin/env ruby
+#
+# This sample code is a port of clutter-gtk/examples/gtk-clutter-test-scroll.c.
+# It is licensed under the terms of the GNU Lesser General Public
+# License, version 2.1 or (at your option) later.
+#
+# Copyright (C) 2013  Ruby-GNOME2 Project Team
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+
+require "clutter-gtk"
+
+N_WIDGETS     = 5
+WINDOW_WIDTH  = 400
+WINDOW_HEIGHT = 400
+RADIUS        = 80
+
+do_rotate_p   = true
+
+window = Gtk::Window.new
+window.signal_connect("destroy") do
+  Gtk.main_quit
+end
+
+vbox = Gtk::Box.new(:vertical, 6)
+window.add(vbox)
+
+clutter = ClutterGtk::Embed.new
+clutter.set_size_request(WINDOW_WIDTH, WINDOW_HEIGHT)
+
+vbox.add(clutter)
+
+stage = clutter.stage
+
+button = Gtk::Button.new(:stock_id => Gtk::Stock::QUIT)
+button.signal_connect("clicked") do |_button|
+  window.destroy
+end
+vbox.pack_start(button, :expand => false, :fill => false, :padding => 0)
+
+# and its background color
+stage.background_color = Clutter::Color.new(0x61, 0x64, 0x8c, 0xff)
+
+widgets = []
+
+# create a new group to hold multiple actors in a group
+group = Clutter::Group.new
+
+create_gtk_actor = lambda do
+  gtk_actor = ClutterGtk::Actor.new
+  bin = gtk_actor.widget
+
+  scroll = Gtk::ScrolledWindow.new
+  scroll.set_policy(:never, :automatic)
+  bin.add(scroll)
+
+  vbox = Gtk::Box.new(:vertical, 6)
+  scroll.add_with_viewport(vbox)
+
+  button = Gtk::Button.new(:label => "A Button")
+  vbox.pack_start(button, :expand => false, :fill => false, :padding => 0)
+
+  button.signal_connect("clicked") do |_button|
+    puts("button clicked")
+    label = Gtk::Label.new("A new label")
+    label.show
+    vbox.pack_start(label, :expand => false, :fill => false, :padding => 0)
+  end
+
+  6.times do |i|
+    button = Gtk::CheckButton.new("Another button")
+    vbox.pack_start(button, :expand => false, :fill => false, :padding => 0)
+  end
+
+  entry = Gtk::Entry.new
+  vbox.pack_start(entry, :expand => false, :fill => false, :padding => 0)
+
+  bin.show_all
+
+  gtk_actor
+end
+
+N_WIDGETS.times do |i|
+  widget = create_gtk_actor.call
+  widgets[i] = widget
+
+  # Place around a circle
+  w = widgets.first.width
+  h = widgets.first.height
+
+  x = WINDOW_WIDTH / 2  +
+    RADIUS * Math.cos(i * 2 * Math::PI / (N_WIDGETS)) - w / 2
+  y = WINDOW_HEIGHT / 2 +
+    RADIUS * Math.sin(i * 2 * Math::PI / (N_WIDGETS)) - h / 2
+
+  widget.set_position(x, y)
+
+  # Add to our group group
+  group.add_actor(widget)
+end
+
+# Add the group to the stage
+stage.add_actor(group)
+stage.signal_connect("button-press-event") do |_stage, event|
+  x, y = event.coords
+
+  actor = _stage.get_actor_at_pos(:all, x, y)
+  puts("click at #{x}, #{y} -> #{actor.gtype.name}:#{actor}")
+  if !actor.is_a?(Clutter::Stage) and !actor.is_a?(Clutter::Group)
+    actor.hide
+  end
+end
+stage.signal_connect("key-release-event") do |_sage, event|
+  unichar = [event.key_unicode].pack("U*")
+  puts("*** key press event (key:#{unichar}) ***")
+
+  if event.key_symbol == Clutter::Keys::KEY_q
+    Gtk.main_quit
+  end
+end
+
+window.show_all
+
+# Only show the actors after parent show otherwise it will just be
+# unrealized when the clutter foreign window is set. widget_show
+# will call show on the stage.
+group.show_all
+
+# Create a timeline to manage animation
+timeline = Clutter::Timeline.new(6000)
+timeline.loop = true
+
+# fire a callback for frame change
+timeline.signal_connect("new-frame") do |_timeline, m_secs|
+  rotation = _timeline.progress * 360.0
+  if do_rotate_p
+    # Rotate everything clockwise about stage center
+    group.set_rotation(:z_axis,
+                       rotation,
+                       WINDOW_WIDTH / 2,
+                       WINDOW_HEIGHT / 2,
+                       0)
+
+    widgets.each do |widget|
+      # rotate each widget around its center
+      w = widget.width
+      h = widget.height
+
+      widget.set_rotation(:z_axis,
+                          -(2 * rotation),
+                          w / 2,
+                          h / 2,
+                          0)
+      widget.opacity = 50 * Math.sin(2 * Math::PI * rotation / 360) + (255 - 50)
+    end
+  end
+end
+
+# and start it
+timeline.start
+
+Gtk.main

data/sample/test.rb

@@ -0,0 +1,169 @@
+#!/usr/bin/env ruby
+#
+# This sample code is a port of
+# clutter-gtk/examples/gtk-clutter-test.c. The image file used in
+# this sample code is copied from
+# clutter-gtk/examples/redhand.png. They are licensed under the terms
+# of the GNU Lesser General Public License, version 2.1 or (at your
+# option) later.
+#
+# Copyright (C) 2013  Ruby-GNOME2 Project Team
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+
+require "clutter-gtk"
+require "gdk_pixbuf2"
+
+N_HANDS       = 4
+WINDOW_WIDTH  = 400
+WINDOW_HEIGHT = 400
+RADIUS        = 150
+
+fade_p        = false
+fullscreen_p  = false
+
+pixbuf = Gdk::Pixbuf.new(File.expand_path("redhand.png", File.dirname(__FILE__)))
+
+window = Gtk::Window.new
+window.set_default_size(WINDOW_WIDTH, WINDOW_HEIGHT)
+window.title = "Clutter Embedding"
+window.signal_connect("destroy") do
+  Gtk.main_quit
+end
+
+vbox = Gtk::Grid.new
+vbox.orientation = :vertical
+vbox.hexpand = true
+vbox.vexpand = true
+window.add(vbox)
+
+clutter = ClutterGtk::Embed.new
+vbox.add(clutter)
+
+stage = clutter.stage
+stage.background_color = Clutter::Color.new(:sky_blue_light)
+
+label = Gtk::Label.new("This is a label")
+vbox.add(label)
+label.hexpand = true
+
+button = Gtk::Button.new(:label => "This is a button...clicky")
+button.signal_connect("clicked") do |_button|
+  fade_p = !fade_p
+end
+vbox.add(button)
+button.hexpand = true
+
+button = Gtk::Button.new(:label => "Fullscreen")
+button.image = Gtk::Image.new(:stock => Gtk::Stock::FULLSCREEN, :size => :button)
+button.signal_connect("clicked") do |_button|
+  if fullscreen_p
+    window.unfullscreen
+    fullscreen_p = false
+  else
+    window.fullscreen
+    fullscreen_p = true
+  end
+end
+vbox.add(button)
+button.hexpand = true
+
+button = Gtk::Button.new(:stock_id => Gtk::Stock::QUIT)
+button.signal_connect("clicked") do |_button|
+  _button.destroy
+end
+vbox.add(button)
+button.hexpand = true
+
+group = Clutter::Actor.new
+hands = []
+N_HANDS.times do |i|
+  if i.zero?
+    hands[i] = ClutterGtk::Texture.new
+    hands[i].set_from_pixbuf(pixbuf)
+  else
+    hands[i] = Clutter::Clone.new(hands[0])
+  end
+
+  # Place around a circle
+  w = hands[0].width
+  h = hands[0].height
+
+  x = WINDOW_WIDTH / 2  + RADIUS * Math.cos(i * Math::PI / (N_HANDS / 2)) - w / 2
+  y = WINDOW_HEIGHT / 2 + RADIUS * Math.sin(i * Math::PI / (N_HANDS / 2)) - h / 2
+
+  hands[i].set_position(x, y)
+
+  # Add to our group group
+  group.add_child(hands[i])
+end
+
+# Add the group to the stage
+stage.add_child(group)
+
+constraint = Clutter::AlignConstraint.new(stage, :x_axis, 0.5)
+group.add_constraint(constraint)
+constraint = Clutter::AlignConstraint.new(stage, :y_axis, 0.5)
+group.add_constraint(constraint)
+
+stage.signal_connect("button-press-event") do |_stage, event|
+  x, y = event.coords
+  actor = _stage.get_actor_at_pos(:all, x, y)
+  if actor.is_a?(ClutterGtk::Texture) or actor.is_a?(Clutter::Clone)
+    actor.hide
+  end
+
+  Clutter::Event::STOP
+end
+stage.signal_connect("key-release-event") do |_stage, event|
+  puts("*** key press event (key:#{[event.key_unicode].pack('U*')}) ***")
+  case event.key_symbol
+  when Clutter::Keys::KEY_q
+      Gtk.main_quit
+  when Clutter::Keys::KEY_r
+    N_HANDS.times do |i|
+      hands[i].show
+    end
+  end
+
+  Clutter::Event::STOP
+end
+
+window.show_all
+
+# Create a timeline to manage animation
+timeline = Clutter::Timeline.new(6000)
+timeline.repeat_count = -1
+
+# fire a callback for frame change
+timeline.signal_connect("new-frame") do |_timeline, msecs|
+  rotation = _timeline.progress * 360.0
+  group.set_rotation(:z_axis, rotation, WINDOW_WIDTH / 2, WINDOW_HEIGHT / 2, 0)
+  N_HANDS.times do |i|
+    hands[i].set_rotation(:z_axis,
+                          -(6.0 * rotation),
+                          hands[i].width / 2,
+                          hands[i].height / 2,
+                          0)
+    if fade_p
+      hands[i].opacity = (255 - (rotation % 255))
+    end
+  end
+end
+
+# and start it
+timeline.start
+
+Gtk.main

data/sample/window-test.rb

@@ -0,0 +1,113 @@
+#!/usr/bin/env ruby
+#
+# This sample code is a port of clutter-gtk/examples/gtk-clutter-window-test.c.
+# It is licensed under the terms of the GNU Lesser General Public
+# License, version 2.1 or (at your option) later.
+#
+# The original header:
+#   (c) 2009, Collabora Ltd.
+#
+#   Written by Davyd Madeley <davyd.madeley@collabora.co.uk>
+#
+# Copyright (C) 2013  Ruby-GNOME2 Project Team
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+
+require "clutter-gtk"
+require "gdk_pixbuf2"
+
+window = ClutterGtk::Window.new
+window.signal_connect("destroy") do
+  Gtk.main_quit
+end
+window.set_default_size(400, 300)
+
+NAME_COLUMN   = 0
+PIXBUF_COLUMN = 1
+store = Gtk::ListStore.new(String, Gdk::Pixbuf)
+theme = Gtk::IconTheme.default
+[
+  "devhelp",
+  "empathy",
+  "evince",
+  "gnome-panel",
+  "seahorse",
+  "sound-juicer",
+  "totem",
+].each do |icon_name|
+  pixbuf = theme.load_icon(icon_name, 48, 0)
+  iter = store.append
+  iter[0] = icon_name
+  iter[1] = pixbuf
+end
+
+icon_view = Gtk::IconView.new(store)
+icon_view.text_column = NAME_COLUMN
+icon_view.pixbuf_column = PIXBUF_COLUMN
+
+scrolled_window = Gtk::ScrolledWindow.new
+window.add(scrolled_window)
+scrolled_window.add(icon_view)
+scrolled_window.show_all
+
+# Widget 2 is a toolbar
+stage = window.stage
+
+toolbar = Gtk::Toolbar.new
+[
+  Gtk::Stock::ADD,
+  Gtk::Stock::BOLD,
+  Gtk::Stock::ITALIC,
+  Gtk::Stock::CANCEL,
+  Gtk::Stock::CDROM,
+  Gtk::Stock::CONVERT,
+].each do |stock_id|
+  item = Gtk::ToolButton.new(:stock_id => stock_id)
+  toolbar.insert(item, -1)
+end
+
+toolbar.show_all
+actor = ClutterGtk::Actor.new(toolbar)
+actor.add_constraint(Clutter::BindConstraint.new(stage, :width, 0.0))
+actor.signal_connect("enter-event") do |_actor, event|
+  _actor.save_easing_state do
+    _actor.easing_mode = :linear
+
+    _actor.opacity = 255
+    _actor.y = 0
+  end
+
+  Clutter::Event::STOP
+end
+
+actor.signal_connect("leave-event") do |_actor, event|
+  _actor.save_easing_state do
+    _actor.easing_mode = :linear
+
+    _actor.opacity = 128
+    _actor.y = _actor.height * -0.5
+  end
+
+  Clutter::Event::STOP
+end
+
+actor.y = actor.height * -0.5
+actor.opacity = 128
+actor.reactive = true
+stage.add_child(actor)
+
+window.show_all
+
+Gtk.main