gtk3 2.2.4-x64-mingw32

data/sample/testgtk/check-n.xpm

@@ -0,0 +1,21 @@
+/* XPM */
+static char *openfile[] = {
+/* width height num_colors chars_per_pixel */
+"    10    9       5            1",
+/* colors */
+". c None",
+"# c #000000",
+"y c #666666",
+"i c #ff1f00",
+"# c #9f9f9f",
+/* pixels */
+"..........",
+"........yy",
+".......yy.",
+"......yy..",
+".yyy.yy...",
+"..yyyy....",
+"...yy.....",
+"..........",
+"..........",
+};

data/sample/testgtk/check-y.xpm

@@ -0,0 +1,21 @@
+/* XPM */
+static char *openfile[] = {
+/* width height num_colors chars_per_pixel */
+"    10    9       5            1",
+/* colors */
+". c None",
+"# c #000000",
+"i c #ff0fff",
+"y c #ff1f00",
+"# c #9f9f9f",
+/* pixels */
+"..........",
+"........yy",
+".......yy.",
+"......yy..",
+".yyy.yy...",
+"..yyyy....",
+"...yy.....",
+"..........",
+"..........",
+};

data/sample/testgtk/checkbutton.rb

@@ -0,0 +1,67 @@
+=begin header
+
+  checkbutton.rb - a part of testgtk.c rewritten in Ruby/GTK2
+
+  Copyright (C) 2002-2005 Ruby-GNOME2 Project Team
+  $Id: checkbutton.rb,v 1.6 2005/07/17 16:55:26 mutoh Exp $
+
+  Rewritten by Hiroshi IGARASHI <igarashi@ueda.info.waseda.ac.jp>
+  $Date: 2005/07/17 16:55:26 $
+  $Id: checkbutton.rb,v 1.6 2005/07/17 16:55:26 mutoh Exp $
+
+Original Copyright:
+ 
+  GTK - The GIMP Toolkit
+  Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
+ 
+  This library is free software; you can redistribute it and/or
+  modify it under the terms of the GNU Library General Public
+  License as published by the Free Software Foundation; either
+  version 2 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
+  Library General Public License for more details.
+ 
+  You should have received a copy of the GNU Library General Public
+  License along with this library; if not, write to the
+  Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+  Boston, MA 02111-1307, USA.
+
+=end
+
+require 'sample'
+
+class CheckButtonSample < SampleWindow
+  def initialize
+    super("check buttons")
+
+    box1 = Gtk::VBox.new
+    add(box1)
+
+    box2 = Gtk::VBox.new(false, 10)
+    box2.border_width = 10
+    box1.add(box2)
+
+    button = Gtk::CheckButton.new("button1")
+    box2.add(button)
+
+    button = Gtk::CheckButton.new("button2")
+    box2.add(button)
+
+    button = Gtk::CheckButton.new("button3")
+    box2.add(button)
+
+    box1.pack_start(Gtk::HSeparator.new)
+
+    box2 = Gtk::VBox.new(false, 10)
+    box2.border_width = 10
+    box1.add(box2)
+
+    button = Gtk::Button.new("close")
+    button.signal_connect("clicked"){destroy}
+
+    box2.add(button)
+  end
+end

data/sample/testgtk/circles.xbm

@@ -0,0 +1,46 @@
+#define circles_width 64
+#define circles_height 64
+static unsigned char circles_bits[] = {
+   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xff,
+   0x1f, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0xff, 0xff, 0x00, 0x00, 0x00,
+   0x00, 0x00, 0xfc, 0xff, 0xff, 0x07, 0x00, 0x00, 0x00, 0x00, 0xff, 0xff,
+   0xff, 0x1f, 0x00, 0x00, 0x00, 0xc0, 0xff, 0xff, 0xff, 0x7f, 0x00, 0x00,
+   0x00, 0xe0, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0xf0, 0xff, 0xff,
+   0xff, 0xff, 0x01, 0x00, 0x00, 0xfc, 0xff, 0xff, 0xff, 0xff, 0x07, 0x00,
+   0x00, 0xfe, 0xff, 0x01, 0xf0, 0xff, 0x0f, 0x00, 0x00, 0xff, 0x3f, 0x00,
+   0x80, 0xff, 0x1f, 0x00, 0x80, 0xff, 0x0f, 0x00, 0x00, 0xfe, 0x3f, 0x00,
+   0x80, 0xff, 0x03, 0x00, 0x00, 0xf8, 0x3f, 0x00, 0xc0, 0xff, 0x01, 0x00,
+   0x00, 0xf0, 0x7f, 0x00, 0xe0, 0x7f, 0x00, 0x00, 0x00, 0xc0, 0xff, 0x00,
+   0xf0, 0x3f, 0x00, 0x00, 0x00, 0x80, 0xff, 0x01, 0xf0, 0x1f, 0x00, 0x00,
+   0x00, 0x00, 0xff, 0x01, 0xf8, 0x1f, 0x00, 0x20, 0x00, 0x00, 0xff, 0x03,
+   0xf8, 0x0f, 0x00, 0xff, 0x07, 0x00, 0xfe, 0x03, 0xfc, 0x07, 0xc0, 0xff,
+   0x1f, 0x00, 0xfc, 0x07, 0xfc, 0x07, 0xf0, 0xff, 0x7f, 0x00, 0xfc, 0x07,
+   0xfc, 0x03, 0xf8, 0xff, 0xff, 0x00, 0xf8, 0x07, 0xfe, 0x03, 0xfc, 0xff,
+   0xff, 0x01, 0xf8, 0x0f, 0xfe, 0x01, 0xfe, 0x8f, 0xff, 0x03, 0xf0, 0x0f,
+   0xfe, 0x01, 0xfe, 0x01, 0xfc, 0x03, 0xf0, 0x0f, 0xff, 0x01, 0xff, 0x00,
+   0xf8, 0x07, 0xf0, 0x1f, 0xff, 0x00, 0x7f, 0x00, 0xf0, 0x07, 0xe0, 0x1f,
+   0xff, 0x80, 0x3f, 0x00, 0xe0, 0x0f, 0xe0, 0x1f, 0xff, 0x80, 0x1f, 0x00,
+   0xc0, 0x0f, 0xe0, 0x1f, 0xff, 0x80, 0x1f, 0x00, 0xc0, 0x0f, 0xe0, 0x1f,
+   0xff, 0x80, 0x1f, 0x00, 0xc0, 0x0f, 0xe0, 0x1f, 0xff, 0x80, 0x0f, 0x00,
+   0x80, 0x0f, 0xe0, 0x1f, 0xff, 0xc0, 0x0f, 0x00, 0x80, 0x1f, 0xe0, 0x1f,
+   0xff, 0x80, 0x0f, 0x00, 0x80, 0x0f, 0xe0, 0x1f, 0xff, 0x80, 0x1f, 0x00,
+   0xc0, 0x0f, 0xe0, 0x1f, 0xff, 0x80, 0x1f, 0x00, 0xc0, 0x0f, 0xe0, 0x1f,
+   0xff, 0x80, 0x1f, 0x00, 0xc0, 0x0f, 0xe0, 0x1f, 0xff, 0x81, 0x3f, 0x00,
+   0xe0, 0x0f, 0xf0, 0x1f, 0xfe, 0x01, 0x7f, 0x00, 0xf0, 0x07, 0xf0, 0x0f,
+   0xfe, 0x01, 0xff, 0x00, 0xf8, 0x07, 0xf0, 0x0f, 0xfe, 0x03, 0xfe, 0x01,
+   0xfc, 0x03, 0xf8, 0x0f, 0xfc, 0x03, 0xfe, 0x8f, 0xff, 0x03, 0xf8, 0x07,
+   0xfc, 0x07, 0xfc, 0xff, 0xff, 0x01, 0xfc, 0x07, 0xfc, 0x07, 0xf8, 0xff,
+   0xff, 0x00, 0xfc, 0x07, 0xf8, 0x0f, 0xf0, 0xff, 0x7f, 0x00, 0xfe, 0x03,
+   0xf8, 0x1f, 0xc0, 0xff, 0x1f, 0x00, 0xff, 0x03, 0xf0, 0x1f, 0x00, 0xff,
+   0x07, 0x00, 0xff, 0x01, 0xf0, 0x3f, 0x00, 0x20, 0x00, 0x80, 0xff, 0x01,
+   0xe0, 0x7f, 0x00, 0x00, 0x00, 0xc0, 0xff, 0x00, 0xc0, 0xff, 0x01, 0x00,
+   0x00, 0xf0, 0x7f, 0x00, 0x80, 0xff, 0x03, 0x00, 0x00, 0xf8, 0x3f, 0x00,
+   0x80, 0xff, 0x0f, 0x00, 0x00, 0xfe, 0x3f, 0x00, 0x00, 0xff, 0x3f, 0x00,
+   0x80, 0xff, 0x1f, 0x00, 0x00, 0xfe, 0xff, 0x01, 0xf0, 0xff, 0x0f, 0x00,
+   0x00, 0xfc, 0xff, 0xff, 0xff, 0xff, 0x07, 0x00, 0x00, 0xf0, 0xff, 0xff,
+   0xff, 0xff, 0x01, 0x00, 0x00, 0xe0, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00,
+   0x00, 0xc0, 0xff, 0xff, 0xff, 0x7f, 0x00, 0x00, 0x00, 0x00, 0xff, 0xff,
+   0xff, 0x1f, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0xff, 0x07, 0x00, 0x00,
+   0x00, 0x00, 0xe0, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xff,
+   0x1f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
+   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00};

data/sample/testgtk/colorselect.rb

@@ -0,0 +1,33 @@
+=begin
+
+  colorselect.rb - a part of testgtk.c rewritten in Ruby/GTK2
+
+  Copyright (C) 2002-2005 Ruby-GNOME2 Project
+  $Id: colorselect.rb,v 1.5 2005/07/17 16:55:27 mutoh Exp $
+=end
+
+require 'sample'
+
+class ColorSelectionSample < Gtk::ColorSelectionDialog
+  include Sample
+  extend SampleClass
+
+  def initialize
+    super(:title => "color selection dialog")
+    @destroyed = false
+    signal_connect("destroy"){destroy}
+
+    color_selection.set_has_opacity_control(true)
+    set_window_position(:mouse) # Gtk::Window::Position::MOUSE
+
+    color_selection.signal_connect("color_changed"){
+      color_selection.current_color
+    }
+    ok_button.signal_connect("clicked"){
+      puts color_selection.current_color
+      destroy
+    }
+    cancel_button.signal_connect("clicked"){destroy}
+  end
+end
+

data/sample/testgtk/dialog.rb

@@ -0,0 +1,48 @@
+=begin
+
+  dialog.rb - a part of testgtk.c rewritten in Ruby/GTK2
+
+  Copyright (C) 2002-2005 Ruby-GNOME2 Project Team
+  $Id: dialog.rb,v 1.6 2005/07/17 16:55:27 mutoh Exp $
+
+=end
+
+require 'sample'
+
+class DialogSample < SampleDialog
+
+  def initialize
+    super("Gtk::Dialog")
+    set_default_size(200, 100)
+
+    button = Gtk::Button.new("OK")
+    button.signal_connect("clicked"){destroy}
+    button.can_default = true
+
+    action_area.pack_start(button)
+    button.grab_default
+
+    button = Gtk::Button.new("Toggle")
+    button.signal_connect("clicked"){label_toggle}
+
+    button.can_default = true
+    action_area.pack_start(button)
+
+    @label = nil
+  end
+
+  private
+  def label_toggle
+    if @label == nil then
+      @label = Gtk::Label.new("Dialog Test")
+      @label.signal_connect("destroy"){@label = nil}
+      @label.set_padding(10, 10)
+
+      child.pack_start(@label)
+      @label.show
+    else
+      @label.destroy
+    end
+  end
+
+end

data/sample/testgtk/entry.rb

@@ -0,0 +1,73 @@
+=begin header
+
+  entry.rb - a part of testgtk.c rewritten in Ruby/GTK2
+
+  Copyright (C) 2002,2003 Ruby-GNOME2 Project Team
+
+  $Id: entry.rb,v 1.6 2005/07/17 16:55:27 mutoh Exp $
+
+=end
+
+require 'sample'
+
+class EntrySample < SampleWindow
+  def initialize
+    cbitems = [
+      "item0",
+      "item1 item1",
+      "item2 item2 item2",
+      "item3 item3 item3 item3",
+      "item4 item4 item4 item4 item4",
+      "item5 item5 item5 item5 item5 item5",
+      "item6 item6 item6 item6 item6",
+      "item7 item7 item7 item7",
+      "item8 item8 item8",
+      "item9 item9"
+    ]
+
+    super("entry")
+
+    box = Gtk::VBox.new(false, 5)
+    add(box)
+
+    entry = Gtk::Entry.new
+    entry.text = "hello world"
+    entry.select_region(0, 5)
+    box.add(entry)
+
+    cb = Gtk::Combo.new
+    cb.set_popdown_strings(cbitems)
+    cb.entry.text = "hello world"
+    cb.entry.select_region(0, -1)
+    box.add(cb)
+
+    editable_check = Gtk::CheckButton.new("Editable")
+    box.add(editable_check)
+    editable_check.signal_connect("toggled"){
+      entry.editable = editable_check.active?
+    }
+    editable_check.active = true
+
+    visible_check = Gtk::CheckButton.new("Visible")
+    box.add(visible_check)
+    visible_check.signal_connect("toggled"){
+      entry.visibility = visible_check.active?
+    }
+    visible_check.active = true
+
+    sensitive_check = Gtk::CheckButton.new("Sensitive")
+    box.add(sensitive_check)
+    sensitive_check.signal_connect("toggled"){
+      entry.sensitive = sensitive_check.active?
+    }
+    sensitive_check.active = true
+
+    box.pack_start(Gtk::HSeparator.new, false, true, 5)
+
+    button = Gtk::Button.new("close")
+    button.signal_connect("clicked"){ destroy }
+    
+    box.add(button)
+
+  end
+end

data/sample/testgtk/filesel.rb

@@ -0,0 +1,65 @@
+=begin header
+
+  filesel.rb - a part of testgtk.c rewritten in Ruby/GTK2
+
+  Copyright (C) 2002-2005 Ruby-GNOME2 Project Team
+
+  $Id: filesel.rb,v 1.6 2005/07/17 16:55:27 mutoh Exp $
+
+  Rewritten by TAKAHASHI Hitoshi <thitoshi@ne.scphys.kyoto-u.ac.jp>
+
+Original Copyright:
+ 
+  GTK - The GIMP Toolkit
+  Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
+ 
+  This library is free software; you can redistribute it and/or
+  modify it under the terms of the GNU Library General Public
+  License as published by the Free Software Foundation; either
+  version 2 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
+  Library General Public License for more details.
+ 
+  You should have received a copy of the GNU Library General Public
+  License along with this library; if not, write to the
+  Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+  Boston, MA 02111-1307, USA.
+
+=end
+
+require 'sample'
+
+class FileChooserSample < Gtk::FileChooserDialog
+  include Sample
+  extend SampleClass
+
+  def initialize
+    super(
+      :title => "file chooser dialog",
+      :buttons  => [
+# TODO
+#        [:cancel, :cancel], # Gtk::Stock::CANCEL,  Gtk::Dialog::ResponseType::CANCEL
+#        [:open,   :accept], # Gtk::Stock::OPEN,    Gtk::Dialog::ResponseType::ACCEPT
+        [Gtk::Stock::CANCEL,  Gtk::Dialog::ResponseType::CANCEL],
+        [Gtk::Stock::OPEN,    Gtk::Dialog::ResponseType::ACCEPT],
+      ]
+    )
+
+    @destroyed = false
+    signal_connect("destroy") do destroy end
+    signal_connect("response") do |widget, response_id|
+      case response_id
+      when Gtk::Dialog::ResponseType::ACCEPT # TODO
+        puts filename
+        destroy
+      when Gtk::Dialog::ResponseType::CANCEL # TODO
+        destroy
+      end
+    end
+
+    set_window_position(:mouse) # Gtk::Window::Position::MOUSE
+  end
+end

data/sample/testgtk/fontselection.rb

@@ -0,0 +1,56 @@
+=begin header
+
+  fontselection.rb - a part of testgtk.c rewritten in Ruby/GTK2
+
+  Copyright (C) 2002-2005 Ruby-GNOME2 Project Team
+
+  $Id: fontselection.rb,v 1.6 2005/07/17 16:55:27 mutoh Exp $
+
+  Rewritten by Neil Conway <neilconway@rogers.com>
+
+Original Copyright:
+ 
+  GTK - The GIMP Toolkit
+  Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
+ 
+  This library is free software; you can redistribute it and/or
+  modify it under the terms of the GNU Library General Public
+  License as published by the Free Software Foundation; either
+  version 2 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
+  Library General Public License for more details.
+ 
+  You should have received a copy of the GNU Library General Public
+  License along with this library; if not, write to the
+  Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+  Boston, MA 02111-1307, USA.
+
+=end
+
+require 'sample'
+
+class FontSelectionSample < Gtk::FontSelectionDialog
+  include Sample
+  extend SampleClass
+
+  def initialize
+    super(:title => 'Font Selection Dialog')
+    set_window_position(:mouse) # Gtk::Window::Position::MOUSE
+    
+    signal_connect('destroy') {
+      destroy
+    }
+    
+    ok_button.signal_connect('clicked') {
+      puts font_name
+      destroy
+    }
+    
+    cancel_button.signal_connect('clicked') {
+      destroy
+    }
+  end
+end

data/sample/testgtk/labels.rb

@@ -0,0 +1,74 @@
+# -*- coding: utf-8 -*-
+=begin header
+
+  labels.rb - a part of testgtk.c rewritten in Ruby/GTK2
+
+  Copyright (C) 2002,2003 Ruby-GNOME2 Project Team
+
+  $Id: labels.rb,v 1.7 2005/07/17 16:55:27 mutoh Exp $
+
+=end
+
+require 'sample'
+
+class LabelSample < SampleWindow
+  def initialize
+    super("Gtk::Label")
+    set_border_width(5)
+
+    vbox = Gtk::VBox::new(false, 5)
+    hbox = Gtk::HBox::new(false, 5)
+    hbox.pack_start(vbox, false, false, 0)
+
+    create_frame("Normal Label",
+		 "This is a Normal label",
+		 vbox)
+    create_frame("Multi-line Label",
+		 "This is a Multi-line label.\nSecond line\nThird line",
+		 vbox)
+    create_frame("Left Justified Label",
+		 "This is a Left-Justified\nMulti-line label.\nThird      line",
+		 vbox) do |label|
+      label.justify = :left # Gtk::Justification::LEFT
+    end
+    create_frame("Right Justified Label",
+		 "This is a Right-Justified\nMulti-line label.\nFourth line, (j/k)",
+		 vbox) do |label|
+      label.justify = :right # Gtk::Justification::RIGHT
+    end
+
+    vbox = Gtk::VBox::new(false, 5)
+    hbox.pack_start(vbox, false, false, 0)
+
+    create_frame("Line wrapped label",
+		 "This is an example of a line-wrapped label.  It should not be taking up the entire             width allocated to it, but automatically wraps the words to fit.  The time has come, for all good men, to come to the aid of their party.  The sixth sheik's six sheep's sick.\n     It supports multiple paragraphs correctly, and  correctly   adds many          extra  spaces. ",
+		 vbox) do |label|
+      label.wrap = true
+    end
+    create_frame("Filled, wrapped label",
+		 "This is an example of a line-wrapped, filled label.  It should be taking up the entire              width allocated to it.  Here is a seneance to prove my point.  Here is another sentence. Here comes the sun, do de do de do.\n    This is a new paragraph.\n    This is another newer, longer, better paragraph.  It is coming to an end, unfortunately.",
+		 vbox) do |label|
+      label.justify = :fill # Gtk::Justification::FILL
+      label.wrap = true
+    end
+    create_frame("Underlined label",
+		 "This label is underlined!\nThis one is underlined in 日本語の入用quite a funky fashion",
+		 vbox) do |label|
+      label.justify = :left
+      label.pattern = "_________________________ _ _________ _ _____ _ __ __  ___ ____ _____"
+    end
+
+    add(hbox)
+  end
+
+  def create_frame(title, label_str, vbox)
+    frame = Gtk::Frame::new(title)
+    frame.show
+    label = Gtk::Label::new(label_str)
+    yield(label) if iterator?
+    frame.add(label)
+    vbox.pack_start(frame, false, false, 0)
+  end
+
+  private :create_frame
+end