gtk_paradise 0.9.120 → 0.11.19

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

data/lib/gtk_paradise/examples/gtk3/008_search_bar_example.rb

@@ -0,0 +1,91 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# This shows how to use the modern search-bar.
+# =========================================================================== #
+# require 'gtk_paradise/examples/gtk3/008_search_bar_example.rb'
+# Gtk::SearchBarExample.new
+# =========================================================================== #
+# $GTK_PARADISE/examples/gtk3/008_search_bar_example.rb
+# =========================================================================== #
+require 'gtk3'
+
+module Gtk
+
+class SearchBarExample < ::Gtk::Box
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize
+    super(:horizontal)
+    reset
+    run
+  end
+
+  # ========================================================================= #
+  # === searchbar?
+  # ========================================================================= #
+  def searchbar?
+    @searchbar
+  end
+
+  # ========================================================================= #
+  # === reset
+  # ========================================================================= #
+  def reset
+    @searchbar = ::Gtk::SearchBar.new
+  end
+
+  # ========================================================================= #
+  # === on_key_event
+  #
+  # Cause the searchbar to show up.
+  # ========================================================================= #
+  def on_key_event(widget, event)
+    shortcut = ::Gtk.accelerator_get_label(event.keyval, event.state)
+    # ======================================================================= #
+    # Get support for Ctrl+F next:
+    # ======================================================================= #
+    if ['Ctrl+F', 'Ctrl+Mod2+F'].include? shortcut
+      if @searchbar.search_mode?
+        @searchbar.set_search_mode(false)
+      else
+        @searchbar.set_search_mode(true)
+      end
+    end
+  end
+
+  # ========================================================================= #
+  # === run
+  # ========================================================================= #
+  def run
+    grid = ::Gtk::Grid.new
+    add(grid)
+
+    label = ::Gtk::Label.new('Press Control+F to initiate find')
+    grid.attach(label, 0, 0, 1, 1)
+    grid.attach(@searchbar, 0, 1, 1, 1)
+
+    @searchentry = ::Gtk::SearchEntry.new
+    @searchbar.connect_entry(@searchentry)
+    @searchbar.add(@searchentry)
+  end
+
+end; end
+
+if __FILE__ == $PROGRAM_NAME
+  window = Gtk::Window.new
+  search_bar_example = ::Gtk::SearchBarExample.new
+  window.add(search_bar_example)
+  window.set_title('SearchBar')
+  window.set_size_request(550, 500)
+  window.signal_connect(:destroy) { ::Gtk.main_quit }
+  window.show_all
+  window.signal_connect(:key_press_event) {|widget, event|
+    search_bar_example.on_key_event(widget, event)
+  }
+  window.move(0, 0)
+  Gtk.main
+end

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

@@ -8,6 +8,11 @@ require 'gtk3'
 
 alias e puts
 
+# =========================================================================== #
+# === TRY_TO_PLAY_VIDEO_FILE
+# =========================================================================== #
+TRY_TO_PLAY_VIDEO_FILE = false
+
 window = Gtk::Window.new
 window.set_size_request(800, 600)
 window.realize
@@ -16,9 +21,11 @@ window.realize
 # =========================================================================== #
 xid_value = window.window.xid.to_s
 e 'The windows xid is: '+xid_value
-_ = 'mpv --wid='+xid_value+' --start=280 /home/x/video/Realvids/224_Tremors.mp4'
-e _
-system _
+if TRY_TO_PLAY_VIDEO_FILE
+  _ = 'mpv --wid='+xid_value+' --start=280 /home/x/video/Realvids/224_Tremors.mp4'
+  e _
+  system _
+end
 
 box = Gtk::Box.new(:vertical)
 button = Gtk::Button.new(label: 'Run mplayer')
@@ -37,12 +44,13 @@ box.add(button)
 window.add(box)
 window.show_all
 # =========================================================================== #
-# Next we use three calls to .set_title(). The reason this was added was
-# mostly to find out whether a newly set title overrides an older title.
-# This is indeed the case.
+# Next we use several calls to .set_title(). The reason this was added
+# was mostly to find out whether a newly set title overrides an older
+# title. This is indeed the case.
 # =========================================================================== #
 window.set_title('A - 002_simple_window.rb')
 window.set_title('B - 002_simple_window.rb')
 window.set_title('C - 002_simple_window.rb')
+window.set_title('This is a test')
 window.move(0, 0)
 Gtk.main

data/lib/gtk_paradise/examples/gtk3/{025_switch_example.rb → 010_switch_example.rb}

@@ -2,12 +2,12 @@
 # Encoding: UTF-8
 # frozen_string_literal: true
 # =========================================================================== #
-# $GTK_PARADISE/examples/gtk3/switch_example.rb
+# $GTK_PARADISE/examples/gtk3/010_switch_example.rb
 # =========================================================================== #
 require 'gtk3'
 
 window = Gtk::Window.new
-window.set_size_request(150, 600)
+window.set_size_request(120, 600)
 window.title = 'Switch Widgets'
 window.border_width = 4
 vbox = Gtk::Box.new(:vertical)
@@ -37,16 +37,15 @@ def on_switch_activated(switch)
 end
 
 array_switches.each {|switch|
- switch.signal_connect('notify::active') { |entry|
-   on_switch_activated(entry)
- }
+  switch.signal_connect('notify::active') { |entry|
+    on_switch_activated(entry)
+  }
 }
 
-  
 array_switches.each {|switch|
   switch.set_hexpand(false)
   switch.set_vexpand(false)
-  switch.set_size_request(45, 18)
+  switch.set_size_request(42, 18)
 }
 
 window.add(vbox)

data/lib/gtk_paradise/examples/gtk3/011_colour_chooser_example.rb

@@ -0,0 +1,71 @@
+# =========================================================================== #
+# Adapted from:
+#
+#   https://github.com/ruby-gnome/ruby-gnome/blob/master/gtk3/sample/misc/colorchooser.rb
+#
+# Thus this file uses the very same licence as rubygnome and
+# that .rb file here.
+# =========================================================================== #
+require 'gtk3'
+
+class ColourChooserExample
+
+  alias e puts
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize
+    reset
+    # ======================================================================= #
+    # Create a new color-chooser widget.
+    # ======================================================================= #
+    @color_selection = Gtk::ColorChooserWidget.new
+    @color_selection.tooltip_text = 'Choose a colour here.'
+    @color_selection.use_alpha = true
+    # ======================================================================= #
+    # pp @color_selection.methods.sort
+pp ::Gtk::ColorChooserWidget.methods.sort
+    # ======================================================================= #
+    # @color_selection.signal_connect(:event) { |widget, event|
+    #   pp event.class
+    # }
+    # ======================================================================= #
+    @color_selection.signal_connect(:color_activated) { |widget, this_colour_was_chosen|
+      @selected_colour = this_colour_was_chosen # Keep track of the colour that was chosen here.
+      e 'The chosen colour was: '+
+        this_colour_was_chosen.to_s
+      e
+      e '  Red:   '+this_colour_was_chosen.red.to_s
+      e '  Green: '+this_colour_was_chosen.green.to_s
+      e '  Blue:  '+this_colour_was_chosen.blue.to_s
+      e
+      Gtk.main_quit
+    }
+    window = Gtk::Window.new
+    window.border_width = 18
+    button = Gtk::Button.new(label: 'Quit')
+    box = Gtk::Box.new(:vertical)
+    box.add(@color_selection)
+    box.add(button)
+    window.add(box)
+    window.show_all
+    window.signal_connect(:destroy) { Gtk.main_quit }
+    button.signal_connect(:clicked) {
+      Gtk.main_quit
+    }
+    Gtk.main
+  end
+
+  # ========================================================================= #
+  # === reset
+  # ========================================================================= #
+  def reset
+    @selected_colour = nil
+  end
+
+end
+
+if __FILE__ == $PROGRAM_NAME
+  ColourChooserExample.new  
+end

data/lib/gtk_paradise/examples/gtk3/012_show_the_xid_example.rb

@@ -0,0 +1,18 @@
+require 'gtk3'
+
+TITLE = 'Show the XID example'
+
+windows = Gtk::Window.new
+windows.set_size_request(500, 300)
+windows.move(0, 0)
+windows.signal_connect(:event) {|widget, event|
+  case event.to_s
+  when /Gdk::EventFocus/,
+       /EventFocus/
+    puts 'Windows XID: '+windows.window.xid.to_s
+    puts 'Size: '+windows.size.to_s
+  end
+}
+windows.title = TITLE
+windows.show_all
+Gtk.main

data/lib/gtk_paradise/examples/gtk3/013_grab_pointer_forcefully.rb

@@ -0,0 +1,31 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+require 'gtk3'
+window = Gtk::Window.new('Pointer grab/ungrab sample')
+
+watch_cursor = Gdk::Cursor.new(:watch)
+button1 = Gtk::Button.new(label: 'Grab Window!')
+button2 = Gtk::Button.new(label: 'Ungrab Window!')
+
+button1.signal_connect(:clicked) {
+  Gdk.pointer_grab(window.window, true, 
+    :button_press_mask, 
+    window.window, 
+    watch_cursor,
+    Gdk::CURRENT_TIME
+  )
+  p Gdk.pointer_is_grabbed?
+}
+
+button2.signal_connect(:clicked) {
+  Gdk.pointer_ungrab(Gdk::CURRENT_TIME)
+  p Gdk.pointer_is_grabbed?
+}
+
+window.add(Gtk::Box.new(:vertical).add(button1).add(button2))
+window.set_default_size(300, 150).show_all
+window.signal_connect(:destroy) { Gtk.main_quit }
+Gtk.main
+# $RUBY_GTK/pointer_grab.rb

data/lib/gtk_paradise/examples/gtk3/{083_bottom_left_placement.rb → 015_bottom_left_placement.rb}

@@ -31,7 +31,7 @@ class BottomLeftPlacement < ::Gtk::Box
     label = ::Gtk::Label.new('bottom-left')
     alignment.add(label)
     pack_start(alignment, expand: true, fill: true, padding: 10)
-    alignment = ::Gtk::Alignment.new(1, 1, 0, 0)
+    alignment = ::Gtk::Alignment.new(0.85, 1, 0, 0) # Place right.
     label = ::Gtk::Label.new('bottom-right')
     alignment.add(label)
     pack_start(alignment, expand: true, fill: true, padding: 10)
@@ -46,5 +46,7 @@ if __FILE__ == $PROGRAM_NAME
   window.move(0, 0)
   window.show_all
   window.set_size_request(400, 100)
+  window.set_title('Bottom left and (almost) bottom right placement')
+  window.signal_connect(:delete_event) { Gtk.main_quit }
   Gtk.main  
 end

data/lib/gtk_paradise/examples/gtk3/{082_scrolling_example.rb → 016_scrolling_example.rb}

@@ -23,14 +23,14 @@ hbox.add(eventbox)
 def msg_scroll_up
   pp caller()
   puts 'BEGIN-------'
-  puts 'You scrolled up.'
+  puts '  You scrolled up.'
   puts 'END---------'
 end
 
 def msg_scroll_down
   pp caller()
   puts 'BEGIN-------'
-  puts 'You scrolled down.'
+  puts '  You scrolled down.'
   puts 'END---------'
 end
 

data/lib/gtk_paradise/examples/gtk3/{080_extensive_markup_example.rb → 017_extensive_markup_example.rb}

@@ -33,17 +33,18 @@ splitted = MARKUP_TEXT_TO_USE.split("\n").reject {|line| line.strip.empty? }
 ::Gtk::Settings.default.gtk_font_name = 'Mono 22'
 
 box = Gtk::Box.new(:vertical)
-w = Gtk::Window.new
+window = Gtk::Window.new
 
 splitted.each {|entry|
   gtk_label = Gtk::Label.new(entry)
   gtk_label.set_markup(entry)
   box.add(gtk_label)
 }
-w.show_all
-w.add(box)
-w.show_all
-w.set_size_request(1500, 800)
-w.move(0, 0)
-
+window.show_all
+window.add(box)
+window.show_all
+window.set_size_request(1500, 800)
+window.move(50, 50)
+window.signal_connect(:delete_event) { Gtk.main_quit }
+window.title = 'This example shows how to use markup code in text (gtk-label)'
 Gtk.main

data/lib/gtk_paradise/examples/gtk3/{078_message_dialog_example.rb → 018_message_dialog_example.rb}

@@ -24,10 +24,12 @@ class MessageDialogExample < Gtk::Window
     }
     box.add(button_information)
 
+    # The error button:
     button_information = Gtk::Button.new(label: 'Error')
     button_information.signal_connect(:clicked) {
       on_info_clicked
     }
+
     box.add(button_information)
 
     button_special = Gtk::Button.new(label: 'Special widget')
@@ -89,14 +91,10 @@ end
 
 
 __END__
-
+# This was the python base
 
 class MessageDialogWindow(Gtk.Window):
 
-    button2 = Gtk.Button(label="Error")
-    button2.connect("clicked", self.on_error_clicked)
-    box.add(button2)
-
     button3 = Gtk.Button(label="Warning")
     button3.connect("clicked", self.on_warn_clicked)
     box.add(button3)

data/lib/gtk_paradise/examples/gtk3/{075_tiny_button_via_css.rb → 021_tiny_button_via_css.rb}

@@ -46,4 +46,5 @@ box.pack_start(button_box, fill: false, expand: false, padding: 0)
 window.add(box)
 window.show_all
 window.move(0, 0)
+window.set_border_width(25)
 Gtk.main

data/lib/gtk_paradise/examples/gtk3/{001_font_related_information.rb → 022_font_related_information.rb}

@@ -22,7 +22,7 @@ class FontRelatedInformation < ::Gtk::Window # === Gtk::FontRelatedInformation
   # ========================================================================= #
   # === USE_THIS_FONT
   # ========================================================================= #
-  USE_THIS_FONT = Pango::FontDescription.new('Hack 20')
+  USE_THIS_FONT = Pango::FontDescription.new('Hack 25')
 
   # ========================================================================= #
   # === initialize