gtk_paradise 0.9.120 → 0.11.19

data/lib/gtk_paradise/examples/gtk3/{070_bindings.rb → 083_bindings.rb}

@@ -3,6 +3,7 @@
 # frozen_string_literal: true
 # =========================================================================== #
 # Usage:
+#
 #   bindings.rb <filename>
 # 
 #   Following key bindings are effective in the TextView area.
@@ -17,6 +18,7 @@
 #     "Ctrl + l"          : same as pressing <Control> + l in text view area.
 #     "Ctrl + m"          : same as pressing <Control> + m in text view area.
 #     "cancel Ctrl +j/k"  : disable <Control> + j and <Control> + k bindings.
+#
 # =========================================================================== #
 require 'gtk3'
 
@@ -26,16 +28,20 @@ class Pager < Gtk::TextView
     super()
     load
     set_editable(false)
-    set_size_request(400, 400)
+    set_size_request(600, 600)
   end
 
   private
+  # ========================================================================= #
+  # === load
+  # ========================================================================= #
   def load
-    open(@path).read.each_line do |line|
+    open(@path).read.each_line { |line|
       buffer.insert_at_cursor(line)
     end
     buffer.place_cursor(buffer.start_iter)
-  end
+  }
+
 end
 
 file_path = ARGV.first || __FILE__
@@ -56,7 +62,7 @@ if Gtk::Version.or_later?(3, 20, 0)
   textview {
     caret-color: green;
     -GtkWidget-aspect-ratio: 1.0;
-    font: 20 Sans;
+    font: 20px Sans;
     color: #aaa;
     background-color: #333 ;
     -gtk-key-bindings: MoveCursor;
@@ -73,7 +79,7 @@ else
   GtkTextView {
     -GtkWidget-cursor-color: green;
     -GtkWidget-aspect-ratio: 1.0;
-    font: 20 Sans;
+    font: 20px Sans;
     color: #aaa;
     background-color: #333 ;
     gtk-key-bindings: MoveCursor;
@@ -83,9 +89,9 @@ end
 
 hbox = Gtk::Box.new(:horizontal)
 
-hbox.add(button1 = Gtk::Button.new(:label => "Ctrl + l"))
-hbox.add(button2 = Gtk::Button.new(:label => "Ctrl + m"))
-hbox.add(button3 = Gtk::Button.new(:label => "Cancel Ctrl + j/k"))
+hbox.add(button1 = Gtk::Button.new(label: 'Ctrl + l'))
+hbox.add(button2 = Gtk::Button.new(label: 'Ctrl + m'))
+hbox.add(button3 = Gtk::Button.new(label: 'Cancel Ctrl + j/k'))
 
 vbox = Gtk::Box.new(:vertical)
 sw = Gtk::ScrolledWindow.new

data/lib/gtk_paradise/examples/gtk3/{072_recent_chooser_dialog.rb → 084_recent_chooser_dialog.rb}

@@ -34,10 +34,10 @@ dialog.signal_connect(:response) { |_widget, response|
       e info.has_group?("web")
       e info.has_application?('gedit')
       e info.get_icon(64)
-      e info.short_name
       e info.age
       e info.local?
-      e info.exist?
+      e 'Does that file exist?: '+info.exist?.to_s
+      e 'The short name is: '+info.short_name
       Gtk.main_quit
     end
   else

data/lib/gtk_paradise/examples/gtk3/{073_showcase_the_cursors.rb → 085_showcase_the_cursors.rb}

@@ -4,9 +4,12 @@
 # =========================================================================== #
 require 'gtk3'
 
+Gtk::Settings.default.gtk_font_name = 'Hack 23'
+
 @window = Gtk::Window.new(:toplevel)
 @window.title = 'Cursors'
-@window.set_default_size(500, 500)
+WIDTH_AND_HEIGHT = 850
+@window.set_default_size(WIDTH_AND_HEIGHT, WIDTH_AND_HEIGHT)
 
 # =========================================================================== #
 # === toplevel_method_uses_this_cursor
@@ -56,9 +59,10 @@ AVAILABLE_CURSORS = %w(
   vertical-text
 
 )
-sw = Gtk::ScrolledWindow.new(nil, nil)
-sw.set_policy(:never, :automatic)
-@window.add(sw)
+# Add a scrolled window next:
+scrolled_window = Gtk::ScrolledWindow.new(nil, nil)
+scrolled_window.set_policy(:never, :automatic)
+@window.add(scrolled_window)
 box = Gtk::Box.new(:vertical, 0)
 box.margin_start = 20
 box.margin_end = 20
@@ -88,7 +92,28 @@ AVAILABLE_CURSORS.each {|this_cursor|
   section.add(image)
 }
 box.add(section)
-sw.add(box)
+outer_box = Gtk::Box.new(:horizontal)
+box1 = Gtk::Box.new(:horizontal)
+box1.add(Gtk::Label.new('Box1 '))
+box2 = Gtk::Box.new(:horizontal)
+box2.add(Gtk::Label.new('Box2 '))
+box3 = Gtk::Box.new(:horizontal)
+box3.add(Gtk::Label.new('Box3 '))
+box4 = Gtk::EventBox.new
+box4.add(Gtk::Label.new('Box4'))
+box4.signal_connect(:event) {|widget, event|
+  pp event
+  pp event.class
+}
+
+outer_box.add(box1)
+outer_box.add(box2)
+outer_box.add(box3)
+outer_box.add(box4)
+box.add(outer_box)
+scrolled_window.add(box)
 @window.show_all
 @window.move(0, 0)
+@window.signal_connect(:delete_event) { Gtk.main_quit }
+#@window.window.set_cursor(Gdk::Cursor.new(:watch))
 Gtk.main

data/lib/gtk_paradise/examples/gtk3/{074_app_chooser_button_example.rb → 086_app_chooser_button_example.rb}

@@ -24,4 +24,5 @@ box.add(picker)
 window.add(box)
 window.show_all
 window.move(0, 0)
+window.signal_connect(:delete_event) { Gtk.main_quit }
 Gtk.main

data/lib/gtk_paradise/examples/gtk3/087_calendar_example.rb

@@ -0,0 +1,41 @@
+require 'gtk3'
+
+module Gtk
+
+class CalendarExample < ::Gtk::Box
+
+  ::Gtk::Settings.default.gtk_font_name = 'Sans 25'
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize
+    super(:horizontal)
+    reset
+    @date = Time.new
+    calendar = ::Gtk::Calendar.new
+    calendar.select_month(@date.month, @date.year)
+    calendar.select_day(@date.day)
+    calendar.mark_day(@date.day)
+    add(calendar)
+    show_all
+  end
+
+  # ========================================================================= #
+  # === reset
+  # ========================================================================= #
+  def reset
+    set_border_width(12)
+  end
+
+end; end
+
+if __FILE__ == $PROGRAM_NAME
+  window = Gtk::Window.new
+  window.add(Gtk::CalendarExample.new)
+  window.show_all
+  window.set_size_request(600, -1)
+  window.move(0, 0)
+  window.signal_connect(:delete_event) { Gtk.main_quit }
+  Gtk.main  
+end

data/lib/gtk_paradise/examples/gtk4/001_gtk_entry.rb

@@ -0,0 +1,88 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+require 'gtk4'
+
+application = Gtk::Application.new('org.gtk.gtk_entry_example2', :flags_none)
+
+application.signal_connect(:activate) { |app|
+  win = Gtk::ApplicationWindow.new(app)
+  win.title = 'A gtk-entry example' 
+  win.set_default_size(1220, 600)
+
+  box1 = Gtk::Box.new(:vertical, 15)
+  entry = Gtk::Entry.new
+  icon_name = 'system-search-symbolic'
+  entry.set_primary_icon_name(icon_name)
+  entry.text = 'This is a long example sentence, just '\
+               'demonstrating an instance of Gtk::Entry.'
+  #entry.inner_border = Gtk::Border.new(30, 1, 50, 5)
+  # entry.select_region(0, 1)
+  # entry.set_events(Gdk::EventMask::SCROLL_MASK) # Enable scroll-events here.
+  # entry.signal_connect(:scroll_event) {|widget, event|
+  # puts 'Yes some scrolling happened. '
+  # _ = event.event_type.name
+  # case _
+  # when 'GDK_SCROLL'
+  #   case event.direction
+  #   when Gdk::ScrollDirection::UP   # Scroll-up event.
+  #     e 'We scrolled up!'
+  #   when Gdk::ScrollDirection::DOWN # Scroll-down event.
+  #     e 'We scrolled down!'
+  #   end
+  # end
+  # }
+
+  e "The parent is: #{entry.parent}" if entry.parent
+  box1.append(entry)
+  box1.append(Gtk::Separator.new(:horizontal))
+
+  entry2 = Gtk::Entry.new
+  entry2.set_text('Another example')
+  icon_name = :system_search_symbolic
+  entry2.set_icon_from_icon_name(Gtk::EntryIconPosition::PRIMARY, icon_name)
+  box1.append(entry2)
+
+  entry3 = Gtk::Entry.new
+  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.append(entry3)
+
+  # =========================================================================== #
+  # === do_pulse
+  # =========================================================================== #
+  def do_pulse(i, return_value = true)
+    i.progress_pulse
+    return_value
+  end
+
+  # =========================================================================== #
+  # Attach a pulse to entry3 next:
+  # =========================================================================== #
+  entry3.set_progress_pulse_step(0.2)
+  _timeout_id = GLib::Timeout.add(500) {
+    do_pulse(entry3)
+  }
+
+  button = Gtk::Button.new(label: 'close')
+  button.signal_connect(:clicked) { win.destroy }
+  box1.append(button)
+
+  entry4 = Gtk::Entry.new
+  entry4.text = 'Test 2'
+  entry4.set_width_chars(10)
+  box1.append(entry4)
+
+  entry5 = Gtk::Entry.new
+  entry5.set_width_chars(10)
+  # Set a ghost text
+  entry5.set_placeholder_text('https://youtube.com/watch?v=...')
+  box1.append(entry5)
+
+  win.set_child(box1)
+  win.show
+}
+
+application.run

data/lib/gtk_paradise/examples/gtk4/002_scrolled_window_example.rb

@@ -0,0 +1,62 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# $GTK_PARADISE/examples/gtk3/002_scrolled_window_example.rb
+# =========================================================================== #
+require 'gtk4'
+
+alias e puts
+
+window = Gtk::Window.new
+
+@text_buffer = Gtk::TextBuffer.new
+
+@text_view = Gtk::TextView.new(@text_buffer)
+@text_view.set_editable(true)
+
+@text_view.cursor_visible = false
+@text_view.wrap_mode = :word
+@text_view.left_margin  = 25
+@text_view.right_margin = 25
+@text_view.set_cursor_visible(true)
+
+@scrolled_window = Gtk::ScrolledWindow.new
+@scrolled_window.set_child(@text_view)
+@scrolled_window.set_policy(:always, :always)
+# GtkEventControllerScroll
+pp @scrolled_window.signal_connect(:event_controllers)
+
+# controller = Gtk::GestureClick.new()
+# controller.signal_connect(:pressed) { e 'Hello world!' }
+# widget.add(controller)
+#                            G_CALLBACK (click_cb), NULL);
+# gtk_widget_add_controller (widget, controller);
+#@scrolled_window.signal_connect(:controller_scroll) {|widget, event|
+#e 'SCROLLING'
+#}
+#   _ = event.event_type.name.to_s
+#   case _
+#   when 'GDK_SCROLL' # Respond to scroll-events next.
+#     e 'The widget received a scroll-event (:scroll_event).'
+#     value = widget.vadjustment
+#     e value
+#     # vadj.set_value(ypos-80) 
+#     # self.scrolled_window.set_vadjustment(vadj)
+#   when 'GDK_BUTTON_PRESS'
+#     e 'The left mouse-button was clicked! Selecting everything next.'
+#     @text_view.signal_emit(:select_all, event)
+#   end
+# }
+
+window.set_size_request(1200, 800)
+
+application = Gtk::Application.new('org.gtk.example2', :flags_none)
+application.signal_connect(:activate) { |app|
+  win = Gtk::ApplicationWindow.new(app)
+  win.title = 'A gtk-scrolling example' 
+  win.set_default_size(1220, 600)
+  win.set_child(@scrolled_window)
+  win.show
+}
+application.run

data/lib/gtk_paradise/examples/gtk4/003_toggle_button_example.rb

@@ -0,0 +1,23 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+require 'gtk4'
+
+application = Gtk::Application.new('org.gtk.text_view_example', :flags_none)
+
+application.signal_connect(:activate) { |app|
+  win = Gtk::ApplicationWindow.new(app)
+  win.title = 'Showcasing Toggle Buttons' 
+  win.set_default_size(420, 600)
+  
+  vbox = Gtk::Box.new(:vertical)
+  vbox.append(Gtk::ToggleButton.new(label: '1'))
+  vbox.append(Gtk::ToggleButton.new(label: '2'))
+  vbox.append(Gtk::ToggleButton.new(label: '3'))
+
+  win.set_child(vbox)
+  win.show
+}
+
+application.run

data/lib/gtk_paradise/examples/gtk4/004_simple_dialog_example.rb

@@ -0,0 +1,41 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+require 'gtk4'
+
+alias e puts
+
+application = Gtk::Application.new('org.gtk.simple_dialog_example', :flags_none)
+application.signal_connect(:activate) { |app|
+  win = Gtk::ApplicationWindow.new(app)
+  win.title = 'Showcasing Gtk Dialog' 
+  win.set_default_size(420, 600)
+
+  dialog = Gtk::Dialog.new
+
+  dialog.add_button(
+    Gtk::Image.new(path: '/home/x/data/images/misc/INDEX_FAVICON.png'), :yes
+  )
+  dialog.add_button(
+    Gtk::Image.new(path: '/home/x/data/images/misc/LINKS_FAVICON.png'),  :no
+  )
+  dialog.set_size_request(800, 800)
+  label = Gtk::Label.new('Do you like GTK?')
+  label.show
+  dialog.child.pack_start(label)
+  response = dialog.run
+  dialog.destroy
+  case response
+  when Gtk::ResponseType::YES
+    e 'The user selected yes.'
+  when Gtk::ResponseType::NO
+    e 'The user selected no.'
+  else
+    e 'The user selected something else.'
+  end
+  #win.set_child(dialog)
+  win.show
+}
+
+application.run

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

@@ -0,0 +1,64 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+require 'gtk4'
+
+alias e puts
+
+module Gtk
+
+class SpinnerExample < ::Gtk::Box # === Gtk::SpinnerExample
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize(
+      run_already = true
+    )
+    super(:horizontal)
+    reset
+    run if run_already
+  end
+
+  # ========================================================================= #
+  # === title?
+  # ========================================================================= #
+  def title?
+    'Spinner Example'
+  end; alias title title? # === title
+
+  # ========================================================================= #
+  # === reset                                                     (reset tag)
+  # ========================================================================= #
+  def reset
+    # ======================================================================= #
+    # === @spinner
+    # ======================================================================= #
+    @spinner = ::Gtk::Spinner.new
+    @spinner.set_spinning(false)
+  end
+
+  # ========================================================================= #
+  # === run
+  # ========================================================================= #
+  def run
+    Thread.new {
+      sleep 0.5 # Just to show how to activate it, via a slight delay.
+      @spinner.set_spinning(true)
+    }
+    append(@spinner)
+    set_halign(:center)
+  end
+
+end; end
+
+application = Gtk::Application.new('org.gtk.spinner_example', :flags_none)
+application.signal_connect(:activate) { |app|
+  win = Gtk::ApplicationWindow.new(app)
+  win.title = 'Showcasing Spinner Example' 
+  win.set_default_size(100, 100)
+  win.set_child(Gtk::SpinnerExample.new)
+  win.show
+}
+application.run

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

@@ -0,0 +1,77 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# === Gtk::TextViewExample
+# =========================================================================== #
+# $GTK_PARADISE/examples/gtk4/006_text_view_example.rb
+# =========================================================================== #
+require 'gtk4'
+
+alias e puts
+
+module Gtk
+
+class TextViewExample < ::Gtk::Box # === Gtk::TextViewExample
+
+  alias e puts
+
+  # ========================================================================= #
+  # === FILE
+  #
+  # FILE = '/test_file.md'
+  # FILE = '/Depot/j/foo.md'
+  # ========================================================================= #
+  FILE = '/yo.yml'
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize
+    super(:vertical)
+    run
+  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.set_child(text_view)
+    scrolled_window.set_size_request(800, 600)
+    box = ::Gtk::Box.new(:vertical)
+    box.append(
+      ::Gtk::Label.new('Showing a TextView widget next:')
+    )
+    box.prepend(
+      scrolled_window
+    )
+    box.append(
+      ::Gtk::Separator.new(:horizontal)
+    )
+    append(box)
+  end
+
+end; end
+
+application = Gtk::Application.new('org.gtk.tree_view_example', :flags_none)
+application.signal_connect(:activate) { |app|
+  win = ::Gtk::ApplicationWindow.new(app)
+  win.title = 'Showcasing Text View Example' 
+  win.set_default_size(100, 100)
+  win.set_child(Gtk::TextViewExample.new)
+  win.show
+}
+application.run

data/lib/gtk_paradise/examples/gtk4/007_two_windows_example.rb

@@ -0,0 +1,55 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# === Gtk::TwoWindowsExample
+#
+# This does not work right now. Need to look at a later time how to
+# use multiple windows in gtk4.
+# =========================================================================== #
+# $GTK_PARADISE/examples/gtk4/007_two_windows_example.rb
+# =========================================================================== #
+require 'gtk4'
+
+alias e puts
+
+module Gtk
+
+class TwoWindowsExample < ::Gtk::Box # === Gtk::TwoWindowsExample
+
+  alias e puts
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize
+    super(:vertical)
+    run
+  end
+
+  # ========================================================================= #
+  # === run
+  # ========================================================================= #
+  def run
+    w1 = Gtk::Window.new
+    w2 = Gtk::Window.new
+    w1.set_child(Gtk::Label.new('OK'))
+    button = Gtk::Button.new(label: 'Destroy')
+    button.signal_connect(:clicked) {
+      w2.destroy
+    }
+    w2.set_child(button)
+    w2.set_size_request(800,800)
+  end
+
+end; end
+
+application = Gtk::Application.new('org.gtk.two_windows_example', :flags_none)
+application.signal_connect(:activate) { |app|
+  win = ::Gtk::ApplicationWindow.new(app)
+  win.title = 'Showcasing Two Windows Example' 
+  win.set_default_size(800, 800)
+  win.set_child(Gtk::TwoWindowsExample.new)
+  win.show
+}
+application.run

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

@@ -0,0 +1,88 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# === Gtk::SearchBarExample
+#
+# This shows how to use the modern search-bar. This also currently does
+# not work; it works in ruby-gtk3 though.
+# =========================================================================== #
+# require 'gtk_paradise/examples/gtk4/008_search_bar_example.rb'
+# Gtk::SearchBarExample.new
+# =========================================================================== #
+# $GTK_PARADISE/examples/gtk4/008_search_bar_example.rb
+# =========================================================================== #
+require 'gtk4'
+
+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
+    label = ::Gtk::Label.new('Press Control+F to initiate find')
+    grid = ::Gtk::Grid.new
+    grid.attach(label, 0, 0, 1, 1)
+    grid.attach(@searchbar, 0, 1, 1, 1)
+
+    @searchentry = ::Gtk::SearchEntry.new
+    @searchbar.connect_entry(@searchentry)
+    @searchbar.set_child(@searchentry)
+    append(grid)
+  end
+
+end; end
+
+application = Gtk::Application.new('org.gtk.search_bar_example', :flags_none)
+application.signal_connect(:activate) { |app|
+  win = ::Gtk::ApplicationWindow.new(app)
+  win.title = 'Search Bar Example' 
+  win.set_default_size(800, 800)
+  win.set_child(Gtk::SearchBarExample.new)
+  win.show
+}
+application.run