gtk_paradise 0.9.120 → 0.12.25

data/lib/gtk_paradise/examples/gir_ffi/003_gtk_application_example.rb

@@ -0,0 +1,30 @@
+# frozen_string_literal: true
+
+require "gir_ffi-gtk3"
+
+myapp = Gtk::Application.new("org.gtk.example", :handles_command_line)
+
+myapp.signal_connect "command-line" do |app, _command_line|
+  app.activate
+  0
+end
+
+myapp.signal_connect "activate" do |app|
+  win = Gtk::ApplicationWindow.new(app)
+  win.set_title("Gtk Application example")
+  win.set_default_size(200, 200)
+
+  button_box = Gtk::ButtonBox.new(:horizontal)
+  win.add(button_box)
+
+  button = Gtk::Button.new_with_label("Hello world")
+  button.signal_connect "clicked" do
+    puts "Hello World"
+    app.quit
+  end
+
+  button_box.add(button)
+  win.show_all
+end
+
+exit(myapp.run([$PROGRAM_NAME] + ARGV))

data/lib/gtk_paradise/examples/gir_ffi/004_treeview_example.rb

@@ -0,0 +1,64 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+require 'gir_ffi-gtk3'
+
+Gtk.init
+
+# ========================================================================= #
+# Add window.
+# ========================================================================= #
+win = Gtk::Window.new(:toplevel)
+win.resize(640, 480)
+win.signal_connect('destroy') { Gtk.main_quit }
+
+# ========================================================================= #
+# Add treeview.
+# ========================================================================= #
+tv = Gtk::TreeView.new
+
+# ========================================================================= #
+# Add store.
+# ========================================================================= #
+ls = Gtk::ListStore.new([GObject::TYPE_STRING])
+tv.set_model(ls)
+
+# ========================================================================= #
+# === Gtk.simple_text
+# ========================================================================= #
+module Gtk
+  def self.simple_text(i = '')
+    return Gtk::Label.new(i)
+  end
+end
+
+# lab = Gtk::Label.new('Name')
+lab = Gtk.simple_text('Name')
+rend = Gtk::CellRendererText.new
+
+# ========================================================================= #
+# Add column.
+# ========================================================================= #
+col = Gtk::TreeViewColumn.new
+col.set_widget(lab)
+col.pack_start(rend, true)
+col.add_attribute(rend, 'text', 0)
+
+lab.show
+
+tv.append_column(col)
+
+# Add rows.
+iter = ls.append
+ls.set_value(iter, 0, 'Kasper')
+
+iter = ls.append
+ls.set_value(iter, 0, 'Christina')
+
+win.add tv
+tv.show
+
+win.show
+
+Gtk.main

data/lib/gtk_paradise/examples/gir_ffi/005_complex_example.rb

@@ -0,0 +1,104 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+require 'gir_ffi-gtk3'
+
+Gtk.init
+
+# ========================================================================= #
+# Do the gtk-specific requires after Gtk.init
+# ========================================================================= #
+require 'gtk_paradise/gtk_classes/style_context.rb'
+#require 'gtk_paradise/gtk_classes/tree_view.rb'
+
+# ========================================================================= #
+# === Gtk.simple_text
+# ========================================================================= #
+module Gtk
+  def self.simple_text(i = '')
+    return Gtk::Label.new(i)
+  end
+end
+
+# ========================================================================= #
+# Add window.
+# ========================================================================= #
+window = Gtk::Window.new(:toplevel)
+window.resize(640, 480)
+window.signal_connect('destroy') { Gtk.main_quit }
+
+# ========================================================================= #
+# Add treeview.
+# ========================================================================= #
+tree_view = Gtk::TreeView.new
+#tree_view.do_use_clickable_headers
+#tree_view.rubber_banding
+# pp tree_view.methods.sort
+
+# ========================================================================= #
+# Add store.
+# ========================================================================= #
+ls = Gtk::ListStore.new([GObject::TYPE_STRING])
+tree_view.set_model(ls)
+
+# lab = Gtk::Label.new('Name')
+lab = Gtk.simple_text('Name')
+lab.show
+rend = Gtk::CellRendererText.new
+
+# ========================================================================= #
+# Add column.
+# ========================================================================= #
+tree_view_column = Gtk::TreeViewColumn.new
+tree_view_column.set_widget(lab)
+tree_view_column.pack_start(rend, true)
+tree_view_column.add_attribute(rend, 'text', 0)
+tree_view.append_column(tree_view_column)
+# tree_view.add_mnemonic_label("T")
+tree_view.border_width = 120
+tree_view.enable_grid_lines = 1
+#tree_view.hadjustment = 0.5
+tree_view.halign = 0.5
+tree_view.headers_clickable = true
+tree_view.headers_visible = true
+tree_view.level_indentation = 3
+tree_view.margin = 15
+tree_view.rubber_banding = true
+tree_view.set_has_tooltip(true)
+tree_view.set_tooltip_text('This is just a tooltip example.')
+#pp tree_view.state_flags
+
+
+colour = Gdk::Color.new
+colour.green = 55
+colour.red = 55
+colour.blue = 55
+# width = tree_view.root_window.width
+# pp width
+
+# tree_view.override_background_color(:normal  , Gdk::Color.new(6400, 6400, 6440))
+# tree_view.override_background_color(:prelight,   Gdk::Color.new(6400, 3400, 6440))
+# tree_view.override_background_color(:active,  Gdk::Color.new(6400, 1400, 6440))
+
+# pp tree_view.events
+
+# pp ::Gtk::StyleProvider.constants.sort
+# pp '^^^'
+# style_context = Gtk.style_context_provider(:default, false)
+# pp style_context
+
+# ========================================================================= #
+# Add rows.
+# ========================================================================= #
+iter = ls.append
+ls.set_value(iter, 0, 'Kasper')
+
+iter = ls.append
+ls.set_value(iter, 0, 'Christina')
+iter = ls.append
+ls.set_value(iter, 0, 'Peter')
+window.add(tree_view)
+tree_view.show
+window.show
+Gtk.main

data/lib/gtk_paradise/examples/gir_ffi/README.md

@@ -0,0 +1,5 @@
+This directory contains code for gir_ffi-gtk.
+
+It is not clear whether the gtk_paradise gem will support
+these bindings, so treat this directory purely as a 
+case-study at this point in time.

data/lib/gtk_paradise/examples/gir_ffi/advanced/001_advanced_treeview_example.rb

@@ -0,0 +1,75 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+require 'gtk_paradise/require_gir_ffi_gtk3'
+
+alias e puts
+
+require 'gtk_paradise/gtk_classes/list_store.rb'
+
+# =========================================================================== #
+# Add window.
+# =========================================================================== #
+win = Gtk::Window.new(:toplevel)
+win.resize(640, 480)
+win.signal_connect('destroy') { Gtk.main_quit }
+win.move(0, 0)
+
+# =========================================================================== #
+# Add treeview.
+# =========================================================================== #
+tv = Gtk::TreeView.new
+
+# =========================================================================== #
+# Add store.
+# =========================================================================== #
+ls = Gtk::ListStore.new([GObject::TYPE_STRING])
+tv.set_model(ls)
+
+# =========================================================================== #
+# === Gtk.simple_text
+# =========================================================================== #
+module Gtk
+  def self.simple_text(i = '')
+    return Gtk::Label.new(i)
+  end
+end
+
+# lab = Gtk::Label.new('Name')
+lab = Gtk.simple_text('Name')
+rend = Gtk::CellRendererText.new
+
+# =========================================================================== #
+# Add column.
+# =========================================================================== #
+tree_view_column = Gtk::TreeViewColumn.new
+tree_view_column.set_widget(lab)
+tree_view_column.pack_start(rend, true)
+tree_view_column.add_attribute(rend, 'text', 0)
+
+lab.show
+
+tv.append_column(tree_view_column)
+
+# =========================================================================== #
+# Add rows next:
+# =========================================================================== #
+ls.append_this_string('Kasper')
+ls.append_this_string('Christina')
+ls.append_this_string('Karl')
+
+vbox = Gtk::Box.new(:vertical, 0)
+vbox.add(tv)
+button = Gtk::Button.new_with_label('OK')
+button.signal_connect('clicked') {
+  e 'OK'
+}
+vbox.add(button)
+vbox.show_all
+win.add(vbox)
+tv.show
+win.show
+win.move(0, 0)
+
+Gtk.main

data/lib/gtk_paradise/examples/gir_ffi/advanced/README.md

@@ -0,0 +1,2 @@
+The files in this directory will try to make use of code stored
+in the gtk_paradise gem. So these may be more advanced examples.

data/lib/gtk_paradise/examples/glib/parse_glib_settings.rb

@@ -45,4 +45,4 @@ p Gtk::Settings.rc_property_parse_color(spec, "{2222,44444,65535}").to_a
 p Gtk::Settings.rc_property_parse_enum(enum, 'watch')
 p Gtk::Settings.rc_property_parse_flags(flags, "(scroll-mask|structure-mask)")
 p Gtk::Settings.rc_property_parse_requisition(spec, "{100, 200}")
-p Gtk::Settings.rc_property_parse_border(spec, "{100, 200, 300, 400}").to_a
+p Gtk::Settings.rc_property_parse_border(spec, "{100, 200, 300, 400}").to_a

data/lib/gtk_paradise/examples/gtk2/008_list_store_example.rb

@@ -44,7 +44,7 @@ class ListStoreExample
     @window.show_all
     @window.title = 'ListStore'
     @window.signal_connect(:destroy) { Gtk.main_quit }
-    @window.set_default_size(1200, 600)
+    @window.set_default_size(1500, 800)
     @window.move(0, 0)
   end
   

data/lib/gtk_paradise/examples/gtk3/{061_gtk_entry.rb → 001_gtk_entry.rb}

@@ -53,20 +53,24 @@ entry2.set_icon_from_icon_name(Gtk::EntryIconPosition::PRIMARY, icon_name)
 box1.add(entry2)
 
 entry3 = Gtk::Entry.new
-entry3.set_text('Pulsing ... ')
-entry3.set_icon_from_icon_name(Gtk::EntryIconPosition::PRIMARY, icon_name)
+entry3.set_text('Showing an icon on the right side')
+icon_name = :contact_new
+entry3.set_icon_from_icon_name(Gtk::EntryIconPosition::SECONDARY, icon_name)
 box1.add(entry3)
 
 # =========================================================================== #
 # === do_pulse
 # =========================================================================== #
-def do_pulse(i)
+def do_pulse(i, return_value = true)
   i.progress_pulse
-  true
+  return_value
 end
 
+# =========================================================================== #
+# Attach a pulse to entry3 next:
+# =========================================================================== #
 entry3.set_progress_pulse_step(0.2)
-_timeout_id = GLib::Timeout.add(100) {
+_timeout_id = GLib::Timeout.add(500) {
   do_pulse(entry3)
 }
 
@@ -81,11 +85,12 @@ box1.pack_start(entry2, expand: false, fill: false, padding: 20)
 
 entry3 = Gtk::Entry.new
 entry3.set_width_chars(10)
+# Set a ghost text
 entry3.set_placeholder_text('https://youtube.com/watch?v=...')
 box1.pack_start(entry3, expand: false, fill: false, padding: 20)
 
 window.add(box1)
 window.signal_connect(:destroy) { Gtk.main_quit }
-window.show_all.set_size_request(800, 200)
+window.show_all.set_size_request(400, 200)
 window.move(0, 0)
 Gtk.main

data/lib/gtk_paradise/examples/gtk3/{009_scrolled_window_example.rb → 002_scrolled_window_example.rb}

@@ -2,7 +2,7 @@
 # Encoding: UTF-8
 # frozen_string_literal: true
 # =========================================================================== #
-# $GTK_PARADISE/examples/gtk3/scrolled_window_example.rb
+# $GTK_PARADISE/examples/gtk3/002_scrolled_window_example.rb
 # =========================================================================== #
 require 'gtk3'
 
@@ -15,13 +15,13 @@ window = Gtk::Window.new
 @text_view = Gtk::TextView.new(@text_buffer)
 @text_view.set_editable(true)
 rgba = Gdk::RGBA.new
-rgba.parse(:silver)
+rgba.parse(:lightblue)
 
 @text_view.override_background_color(:normal, rgba)
 @text_view.cursor_visible = false # cursor is nit mehr zu sehen.
 @text_view.wrap_mode = :word
-@text_view.left_margin = 15
-@text_view.right_margin = 15
+@text_view.left_margin  = 25
+@text_view.right_margin = 25
 @text_view.set_cursor_visible(true)
 
 @scrolled_window = Gtk::ScrolledWindow.new
@@ -45,5 +45,7 @@ rgba.parse(:silver)
 window.add(@scrolled_window)
 window.show_all
 window.set_size_request(1200, 800)
+window.set_border_width(25)
 window.move(0, 0)
+window.signal_connect(:delete_event) { ::Gtk.main_quit }
 Gtk.main

data/lib/gtk_paradise/examples/gtk3/{062_toggle_button_example.rb → 003_toggle_button_example.rb}

@@ -2,13 +2,14 @@
 # Encoding: UTF-8
 # frozen_string_literal: true
 # =========================================================================== #
-# $GTK_PARADISE/examples/gtk3/toggle_button_example.rb
+# $GTK_PARADISE/examples/gtk3/003_toggle_button_example.rb
 # =========================================================================== #
 require 'gtk3'
 
 window = Gtk::Window.new
-window.title = 'Toggle Buttons'
+window.title = 'Showcasing Toggle Buttons'
 window.border_width = 10
+window.set_size_request(500, 250)
 vbox = Gtk::Box.new(:vertical)
 vbox.add(Gtk::ToggleButton.new(label: '1'))
 vbox.add(Gtk::ToggleButton.new(label: '2'))

data/lib/gtk_paradise/examples/gtk3/{081_simple_dialog_example.rb → 004_simple_dialog_example.rb}

@@ -2,10 +2,14 @@
 # Encoding: UTF-8
 # frozen_string_literal: true
 # =========================================================================== #
-# '081_simple_dialog_example.rb'
+# '004_simple_dialog_example.rb'
 # =========================================================================== #
 if ENV['IS_ROEBE'].to_i == 1
-  require 'gtk_paradise/require_gtk3' # This is for my home setup.
+  begin
+    require 'gtk_paradise/require_gtk3' # This is for my home setup.
+  rescue LoadError
+    require 'gtk3'
+  end
 else # regular users use this variant by default instead.
   require 'gtk3'
 end
@@ -16,21 +20,24 @@ dialog = Gtk::Dialog.new
 dialog.add_button(Gtk::Stock::YES, :yes)
 dialog.add_button(Gtk::Stock::NO,  :no)
 dialog.set_size_request(800, 800)
-
 label = Gtk::Label.new('Do you like GTK?')
 label.show
 dialog.child.pack_start(label)
 
 if ENV['IS_ROEBE'].to_i == 1
-  require 'gtk_paradise/widgets/gtk3/image_viewer/image_viewer.rb'
-  image_viewer = Gtk::ImageViewer.new
-  image_viewer.show_all
-  image_viewer.set_work_on_this_directory(
-    '/home/x/data/images/games/magic_the_gathering/the_dark/'
-  )
-  image_viewer.do_populate_with_all_discovered_images
-  dialog.child.pack_end(image_viewer)
-  dialog.child.show_all
+  # We add an ImageViewer on my home setup. Other users can
+  # ignore this just fine.
+  begin
+    require 'gtk_paradise/widgets/gtk3/image_viewer/image_viewer.rb'
+    image_viewer = Gtk::ImageViewer.new
+    image_viewer.show_all
+    image_viewer.set_work_on_this_directory(
+      '/home/x/data/images/games/magic_the_gathering/the_dark/'
+    )
+    image_viewer.do_populate_with_all_discovered_images
+    dialog.child.pack_end(image_viewer)
+    dialog.child.show_all
+  rescue LoadError; end
 end
 response = dialog.run
 dialog.destroy

data/lib/gtk_paradise/examples/gtk3/005_spinner_example.rb

@@ -10,30 +10,50 @@ require 'gtk3'
 
 module Gtk
 
-class SpinnerExample < ::Gtk::Box
+class SpinnerExample < ::Gtk::Box # === Gtk::SpinnerExample
 
   # ========================================================================= #
   # === initialize
   # ========================================================================= #
-  def initialize
+  def initialize(
+      run_already = true
+    )
     super(:horizontal)
     reset
-    add(@spinner)
-    show_all
-    Thread.new {
-      sleep 0.5 # Just to show how to activate it.
-      @spinner.set_active(true)
-    }
+    run if run_already
   end
 
   # ========================================================================= #
-  # === reset
+  # === title?
+  # ========================================================================= #
+  def title?
+    'Spinner Example'
+  end; alias title title? # === title
+
+  # ========================================================================= #
+  # === reset                                                     (reset tag)
   # ========================================================================= #
   def reset
+    # ======================================================================= #
+    # === @spinner
+    # ======================================================================= #
     @spinner = ::Gtk::Spinner.new
     @spinner.set_active(false)
   end
 
+  # ========================================================================= #
+  # === run
+  # ========================================================================= #
+  def run
+    show_all
+    Thread.new {
+      sleep 0.5 # Just to show how to activate it.
+      @spinner.set_active(true)
+    }
+    add(@spinner)
+    set_halign(:center)
+  end
+
 end; end
 
 if __FILE__ == $PROGRAM_NAME
@@ -41,6 +61,6 @@ if __FILE__ == $PROGRAM_NAME
   window.add(Gtk::SpinnerExample.new)
   window.move(0, 0)
   window.show_all
-  window.set_size_request(400, 100)
+  window.set_size_request(500, 150)
   Gtk.main
 end

data/lib/gtk_paradise/examples/gtk3/006_text_view_example.rb

@@ -0,0 +1,78 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# === TextViewExample
+# =========================================================================== #
+# $GTK_PARADISE/examples/gtk3/006_text_view_example.rb
+# =========================================================================== #
+require 'gtk3'
+
+class TextViewExample < ::Gtk::Box
+
+  alias e puts
+
+  # ========================================================================= #
+  # === FILE
+  #
+  # FILE = '/test_file.md'
+  # FILE = '/Depot/j/foo.md'
+  # ========================================================================= #
+  FILE = '/yo.yml'
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize(
+      run_already = true
+    )
+    super(:vertical)
+    run if run_already
+  end
+
+  # ========================================================================= #
+  # === run
+  # ========================================================================= #
+  def run
+    text_buffer = Gtk::TextBuffer.new
+    text_buffer.set_text(
+      "Hello world!\n"*100
+    )
+    # ======================================================================= #
+    # The next line is for debugging-purposes on my home setup.
+    # ======================================================================= #
+    if File.exist? FILE
+      text_buffer.set_text(File.read(FILE))
+    end
+    text_view = Gtk::TextView.new(text_buffer)
+    text_view.set_size_request(1200, 800)
+    scrolled_window = Gtk::ScrolledWindow.new
+    scrolled_window.add_with_viewport(text_view)
+    scrolled_window.show_all
+    scrolled_window.set_size_request(800, 600)
+    box = Gtk::Box.new(:vertical)
+    box.add(
+      Gtk::Label.new('Showing a TextView widget next:')
+    )
+    box.pack_start(
+      scrolled_window, fill: true, expand: true, padding: 8
+    )
+    box.add(
+      Gtk::Separator.new(:horizontal)
+    )
+    box.show_all
+    add(box)
+    show_all
+  end
+
+end
+
+window = Gtk::Window.new
+window.move(0, 0)
+window.show_all
+window.add(TextViewExample.new)
+this_font = 'Sans 22'
+_ = Pango::FontDescription.new(this_font)
+window.override_font(_)
+window.set_size_request(1400, 800)
+Gtk.main

data/lib/gtk_paradise/examples/gtk3/{079_two_windows_example.rb → 007_two_windows_example.rb}

@@ -8,6 +8,8 @@
 # windows, without depending on the default gtk-widgets, such as the
 # MessageDialog variants, whose API I really dislike.
 # =========================================================================== #
+# $GTK_PARADISE/examples/gtk3/007_two_windows_example.rb
+# =========================================================================== #
 require 'gtk3'
 
 alias e puts
@@ -27,4 +29,4 @@ w2.add(button)
 w2.set_size_request(800,800)
 w2.show_all
 
-Gtk.main
+Gtk.main