gtk_paradise 0.9.120

data/lib/gtk_paradise/examples/gtk3/004_small_paned_example.rb

@@ -0,0 +1,48 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# === Gtk::SmallPanedExample
+# =========================================================================== #
+# $GTK_PARADISE/examples/gtk3/004_small_paned_example.rb
+# =========================================================================== #
+require 'gtk3'
+
+module Gtk
+
+class SmallPanedExample < ::Gtk::Paned # === Gtk::SmallPanedExample
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize(
+      run_already = true
+    )
+    super(:horizontal)
+    run if run_already
+  end
+
+  # ========================================================================= #
+  # === run
+  # ========================================================================= #
+  def run
+    button1 = ::Gtk::Button.new(label: 'Resize')
+    button2 = ::Gtk::Button.new(label: 'Me!')
+    button1.signal_connect(:clicked) { puts 'button1 was clicked' }
+    button2.signal_connect(:clicked) { puts 'button2 was clicked' }
+    pack1(button1)
+    pack2(button2)
+    show_all
+  end
+
+end; end
+
+if __FILE__ == $PROGRAM_NAME
+  window = Gtk::Window.new
+  paned = ::Gtk::SmallPanedExample.new
+  window.add(paned)
+  window.set_size_request(225, 150)
+  window.show_all
+  window.move(0, 0)
+  Gtk.main
+end

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

@@ -0,0 +1,46 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# === Gtk::SpinnerExample
+# =========================================================================== #
+# require 'gtk_paradise/005_spinner_example.rb'
+# =========================================================================== #
+require 'gtk3'
+
+module Gtk
+
+class SpinnerExample < ::Gtk::Box
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize
+    super(:horizontal)
+    reset
+    add(@spinner)
+    show_all
+    Thread.new {
+      sleep 0.5 # Just to show how to activate it.
+      @spinner.set_active(true)
+    }
+  end
+
+  # ========================================================================= #
+  # === reset
+  # ========================================================================= #
+  def reset
+    @spinner = ::Gtk::Spinner.new
+    @spinner.set_active(false)
+  end
+
+end; end
+
+if __FILE__ == $PROGRAM_NAME
+  window = Gtk::Window.new
+  window.add(Gtk::SpinnerExample.new)
+  window.move(0, 0)
+  window.show_all
+  window.set_size_request(400, 100)
+  Gtk.main
+end

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

@@ -0,0 +1,45 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# This example shows a password-entry.
+# =========================================================================== #
+# $GTK_PARADISE/examples/gtk3/006_password_example.rb
+# =========================================================================== #
+require 'gtk3'
+
+module Gtk
+
+class PasswordExample < ::Gtk::Box
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize(
+      run_already = true
+    )
+    super(:horizontal)
+    set_border_width(20)
+    run if run_already
+  end
+
+  # ========================================================================= #
+  # === run
+  # ========================================================================= #
+  def run
+    password = ::Gtk::Entry.new
+    password.set_visibility(false)
+    password.invisible_char = 42 # This is '*' in Unicode.
+    pack_start(password, fill: false, expand: false)
+  end
+  
+end; end
+
+if __FILE__ == $PROGRAM_NAME
+  window = Gtk::Window.new
+  window.add(Gtk::PasswordExample.new)
+  window.show_all
+  window.set_size_request(500, -1)
+  window.move(0, 0)
+  Gtk.main  
+end

data/lib/gtk_paradise/examples/gtk3/007_progress_bar_example.rb

@@ -0,0 +1,200 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# === Gtk::ProgressBarWindow
+# =========================================================================== #
+# $GTK_PARADISE/examples/gtk3/007_progress_bar_example.rb
+# =========================================================================== #
+require 'gtk3'
+
+module Gtk
+
+class ProgressBarWindow < ::Gtk::Box
+
+  # ========================================================================= #
+  # === TITLE
+  # ========================================================================= #
+  TITLE = 'ProgressBar Example'
+
+  # ========================================================================= #
+  # === CSS_TO_USE
+  #
+  # Define all CSS rules here.
+  # ========================================================================= #
+  CSS_TO_USE = '
+
+@define-color progress_bg_color #37C8AB;
+
+progressbar {
+  color: rgba(204, 215, 212, 0.7);
+  font-feature-settings: "tnum";
+}
+
+#progressbar1 {
+  background-color: snow;
+  color: green;
+  border-color: tomato;
+  border-width: 35px;
+  background-image:
+    linear-gradient(
+      to bottom,
+      shade (@progress_bg_color, 1.3),
+      shade (@progress_bg_color, 1.08)
+    );
+  border: 5px solid shade (@progress_bg_color, 0.9);
+}
+
+#progressbar1.horizontal > trough {
+  min-width: 550px;
+}
+
+progressbar > trough {
+  border: none;
+  border-radius: 80px;
+  background-color: #101415;
+}
+
+
+'
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize
+    super(:vertical)
+    set_title(TITLE) if respond_to?(:set_title)
+    set_border_width(15)
+    set_size_request(800, 350)
+
+    # ======================================================================= #
+    # Put it all onto the vertical box next.
+    # ======================================================================= #
+    @vbox = ::Gtk::Box.new(:vertical, 6)
+    add(@vbox)
+
+    # in a class, using variables with @ character, is instance variable
+    # that means access it from everywhere in this class without 
+    @progressbar = ::Gtk::ProgressBar.new
+    @vbox.pack_start(@progressbar, expand: true, fill: false, padding: 0)
+
+    button = ::Gtk::CheckButton.new('Show text')
+    button.signal_connect(:toggled) {|button| on_show_text_toggled(button) }
+    @vbox.pack_start(button, expand: true, fill: true, padding: 0)
+
+    # The activity mode goes from left to right to left.
+    button = ::Gtk::CheckButton.new('Activity mode')
+    button.signal_connect(:toggled) {|button| on_activity_mode_toggled(button) }
+    @vbox.pack_start(button, expand: true, fill: true, padding: 0)
+
+    button = ::Gtk::CheckButton.new('Right to Left')
+    button.signal_connect(:toggled) {|button| on_right_to_left_toggled(button) }
+    @vbox.pack_start(button, expand: true, fill: true, padding: 0)
+
+    # ======================================================================= #
+    # Set the timeout next.
+    # ======================================================================= #
+    @timeout_id = GLib::Timeout.add(50) { on_timeout }
+    @activity_mode = false
+    create_and_add_another_progressbar
+    signal_connect(:destroy) { ::Gtk.main_quit }
+    run
+  end
+
+  # ========================================================================= #
+  # === on_show_text_toggled
+  # ========================================================================= #
+  def on_show_text_toggled(button)
+    show_text = button.active?
+    if show_text
+      text = 'some text'
+    else
+      text = nil
+    end
+    @progressbar.set_text(text)
+    @progressbar.set_show_text(show_text)
+  end
+
+  # ========================================================================= #
+  # === on_activity_mode_toggled
+  # ========================================================================= #
+  def on_activity_mode_toggled(button)
+    @activity_mode = button.active?
+    if @activity_mode
+      # ===================================================================== #
+      # This here is the pulsing-bar going left to right.
+      # Via set_pulse_step() we can set the pulse-step size.
+      # ===================================================================== #
+      @progressbar.set_pulse_step(0.001)
+      @progressbar.pulse
+    else
+      @progressbar.set_fraction(0.0)
+    end
+  end
+
+  # ========================================================================= #
+  # === on_right_to_left_toggled
+  # ========================================================================= #
+  def on_right_to_left_toggled(button)
+    value = button.active?
+    @progressbar.set_inverted(value) if @progressbar.respond_to? :set_inverted
+  end
+
+  # ========================================================================= #
+  # === on_timeout
+  # ========================================================================= #
+  def on_timeout
+    if @activity_mode
+      @progressbar.pulse
+    else
+      new_value = @progressbar.fraction + 0.01
+      if new_value > 1
+        new_value = 0
+      end
+      @progressbar.set_fraction(new_value)
+    end
+    return true
+  end
+
+  # ========================================================================= #
+  # === create_and_add_another_progressbar
+  #
+  # This second progress-bar is used as an indicator widget, so it won't
+  # change.
+  # ========================================================================= #
+  def create_and_add_another_progressbar
+    provider = ::Gtk::CssProvider.new
+    provider.load(data: CSS_TO_USE)
+    ::Gtk::StyleContext.add_provider_for_screen(
+      Gdk::Screen.default,
+      provider,
+      Gtk::StyleProvider::PRIORITY_APPLICATION
+    )
+
+    progress_bar = ::Gtk::ProgressBar.new
+    progress_bar.set_fraction(0.5) # 50%.
+    progress_bar.set_show_text(true)
+    progress_bar.style_context.add_class('GtkProgress')
+    progress_bar.set_text('Hello world!')
+    progress_bar.set_name('progressbar1')
+    @vbox.pack_start(progress_bar, expand: true, fill: true, padding: 0)
+  end
+
+  # ========================================================================= #
+  # === run
+  # ========================================================================= #
+  def run
+    show_all
+  end
+
+end; end
+
+if __FILE__ == $PROGRAM_NAME
+  _ = Gtk::ProgressBarWindow.new
+  window = ::Gtk::Window.new
+  window.add(_)
+  window.set_size_request(500, -1)
+  window.move(0, 0)
+  window.show_all
+  Gtk.main  
+end

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

@@ -0,0 +1,96 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# $GTK_PARADISE/examples/gtk3/menubar_example.rb
+# =========================================================================== #
+require 'gtk3'
+
+module Gtk
+
+class MenubarExample < Gtk::Window
+
+  alias e puts
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize(
+      run_already = true
+    )
+    super()
+    reset
+    run if run_already
+  end
+
+  # ========================================================================= #
+  # === reset
+  # ========================================================================= #
+  def reset
+    set_title 'Simple menubar'
+    Gtk::Settings.default.gtk_font_name = 'DejaVu Sans Mono 19'
+  end
+
+  # ========================================================================= #
+  # === add_main_box
+  # ========================================================================= #
+  def add_main_box
+    vbox = Gtk::Box.new(:vertical, 2)
+    vbox.pack_start(
+      @menu_bar, expand: false, fill: false, padding: 0
+    )
+    add(vbox)
+  end
+
+  # ========================================================================= #
+  # === create_user_interface
+  # ========================================================================= #  
+  def create_user_interface
+    override_background_color(
+      :normal, 
+      Gdk::RGBA.new(0.999, 0.999, 0.999, 1)
+    )
+    # ======================================================================= #
+    # Create the menu-bar next.
+    # ======================================================================= #
+    @menu_bar = Gtk::MenuBar.new
+    filemenu = Gtk::Menu.new
+    filem = Gtk::MenuItem.new(label: 'File')
+    filem.set_submenu(filemenu)
+
+    button_hello_world = Gtk::MenuItem.new(label: 'Hello world')
+    button_hello_world.signal_connect(:activate) { e 'Hello world' }
+    filemenu.append(button_hello_world)
+
+    exit = Gtk::MenuItem.new(label: 'Exit')
+    exit.signal_connect(:activate) { Gtk.main_quit }
+    filemenu.append(exit)
+
+    @menu_bar.append(filem)
+    connect_skeleton
+  end
+
+  # ========================================================================= #
+  # === connect_skeleton
+  # ========================================================================= #
+  def connect_skeleton
+    add_main_box
+  end
+
+  # ========================================================================= #
+  # === run
+  # ========================================================================= #
+  def run
+    create_user_interface
+    signal_connect(:destroy) { Gtk.main_quit }
+    set_default_size(400, 300)
+    set_window_position :center
+    show_all
+    Gtk.main
+  end
+
+end; end
+
+if __FILE__ == $PROGRAM_NAME
+  Gtk::MenubarExample.new
+end

data/lib/gtk_paradise/examples/gtk3/009_scrolled_window_example.rb

@@ -0,0 +1,49 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# $GTK_PARADISE/examples/gtk3/scrolled_window_example.rb
+# =========================================================================== #
+require 'gtk3'
+
+alias e puts
+
+window = Gtk::Window.new
+
+@text_buffer = Gtk::TextBuffer.new
+
+@text_view = Gtk::TextView.new(@text_buffer)
+@text_view.set_editable(true)
+rgba = Gdk::RGBA.new
+rgba.parse(:silver)
+
+@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.set_cursor_visible(true)
+
+@scrolled_window = Gtk::ScrolledWindow.new
+@scrolled_window.add_with_viewport(@text_view)
+@scrolled_window.set_policy(:always, :always)
+@scrolled_window.signal_connect(:event) {|widget, event|
+  _ = 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.add(@scrolled_window)
+window.show_all
+window.set_size_request(1200, 800)
+window.move(0, 0)
+Gtk.main

data/lib/gtk_paradise/examples/gtk3/010_paned_widget_example.rb

@@ -0,0 +1,186 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# === Paned Widget Example
+#
+# The Gtk::HPaned and Gtk::VPaned Widgets divide their content area into 
+# two panes with a divider in between that the user can adjust. A 
+# separate child is placed into each pane.
+#
+# There are a number of options that can be set for each pane.
+#
+# This example code here contains both a horizontal (HPaned) and a vertical
+# (VPaned) widget together, and allows you to adjust the options for each
+# side of each of these widgets.
+# =========================================================================== #
+# === Gtk::PanedWidgetExample
+# $GTK_PARADISE/examples/gtk3/010_paned_widget_example.rb
+# =========================================================================== #
+require 'gtk3'
+
+module Gtk
+
+class PanedWidgetExample < ::Gtk::Box
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize
+    super(:vertical)
+    self.border_width = 0
+    vbox = ::Gtk::Box.new(:vertical, 0)
+    add(vbox)
+    # ======================================================================= #
+    # Add a VPaned widget next:
+    # ======================================================================= #
+    vpaned = ::Gtk::Paned.new(:vertical)
+    vbox.pack_start(vpaned, expand: true, fill: true, padding: 0)
+    vpaned.border_width = 5
+    # ======================================================================= #
+    # Add a HPaned widget next:
+    # ======================================================================= #
+    hpaned = ::Gtk::Paned.new(:horizontal)
+    vpaned.add1(hpaned)
+    frame = ::Gtk::Frame.new
+    frame.shadow_type = :in
+    frame.set_size_request(60, 60)
+    hpaned.add1(frame)
+    # ======================================================================= #
+    # Add a simple button next, into a Gtk::Frame.
+    # ======================================================================= #
+    button = ::Gtk::Button.new(label: '_Hi there', use_underline: true)
+    frame.add(button)
+    frame = ::Gtk::Frame.new
+    frame.shadow_type = :in
+    frame.set_size_request(80, 60)
+    hpaned.add2(frame)
+    frame = ::Gtk::Frame.new
+    frame.shadow_type = :in
+    frame.set_size_request(60, 80)
+    vpaned.add2(frame)
+    # ======================================================================= #
+    # Now create toggle buttons to control sizing. Three labels will be
+    # supplied as well.
+    # ======================================================================= #
+    vbox.pack_start(create_pane_options(hpaned,
+      'Horizontal', 'Left', 'Right'),
+      expand: false, fill: false, padding: 0
+    )
+    vbox.pack_start(create_pane_options(vpaned,
+      'Vertical', 'Top', 'Bottom'),
+      expand: false, fill: false, padding: 0
+    )
+  end
+
+  # ========================================================================= #
+  # === create_pane_options
+  #
+  # This method will embed widgets into a Gtk::Frame.
+  # ========================================================================= #
+  def create_pane_options(paned, frame_label, label1, label2)
+    frame = ::Gtk::Frame.new(frame_label)
+    frame.border_width = 4
+
+    table = ::Gtk::Table.new(3, 2, true)
+    frame.add(table)
+
+    label = ::Gtk::Label.new(label1)
+    table.attach_defaults(label, 0, 1, 0, 1)
+
+    check_button = ::Gtk::CheckButton.new('_Resize')
+    table.attach_defaults(check_button, 0, 1, 1, 2)
+    check_button.signal_connect(:toggled) {
+      toggle_resize(paned.child1)
+    }
+
+    check_button = ::Gtk::CheckButton.new('_Shrink')
+    table.attach_defaults(check_button, 0, 1, 2, 3)
+    check_button.active = true
+    check_button.signal_connect(:toggled) {
+      toggle_shrink(paned.child1)
+    }
+
+    label = ::Gtk::Label.new(label2)
+    table.attach_defaults(label, 1, 2, 0, 1)
+
+    check_button = ::Gtk::CheckButton.new('_Resize')
+    table.attach_defaults(check_button, 1, 2, 1, 2)
+    check_button.active = true
+    check_button.signal_connect(:toggled) {
+      toggle_resize(paned.child2)
+    }
+
+    check_button = ::Gtk::CheckButton.new('_Shrink')
+    table.attach_defaults(check_button, 1, 2, 2, 3)
+    check_button.active = true
+    check_button.signal_connect(:toggled) {
+      toggle_shrink(paned.child2)
+    }
+    return frame
+  end
+
+  # ========================================================================= #
+  # === toggle_resize
+  # ========================================================================= #
+  def toggle_resize(child)
+    paned = child.parent # This is Gtk::Paned.
+
+    is_child1 = (child == paned.child1)
+    resize = if is_child1
+      paned.child1_resize?
+    else
+      paned.child2_resize?
+    end
+
+    shrink = if is_child1
+      paned.child1_shrink?
+    else
+      paned.child2_shrink?
+    end
+
+    child.parent.remove(child)
+    if is_child1
+      paned.pack1(child, !resize, shrink)
+    else
+      paned.pack2(child, resize: !resize, shrine: shrink)
+    end
+  end
+
+  # ========================================================================= #
+  # === toggle_shrink
+  # ========================================================================= #
+  def toggle_shrink(child)
+    paned = child.parent
+    is_child1 = (child == paned.child1)
+
+    resize = if is_child1
+      paned.child1_resize?
+    else
+      paned.child2_resize?
+    end
+
+    shrink = if is_child1
+      paned.child1_shrink?
+    else
+      paned.child2_shrink?
+    end
+    child.parent.remove(child)
+    if is_child1
+      paned.pack1(child, resize: resize, shrink: !shrink)
+    else
+      paned.pack2(child, resize: resize, shrink: !shrink)
+    end
+  end
+
+end; end
+
+if __FILE__ == $PROGRAM_NAME
+  window = Gtk::Window.new
+  window.set_title('PanedWidgets')
+  window.add(Gtk::PanedWidgetExample.new)
+  window.set_size_request(1000, 500)
+  window.move(0, 0)
+  window.show_all
+  Gtk.main  
+end

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

@@ -0,0 +1,19 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# $GTK_PARADISE/examples/gtk3/sockets.rb
+# =========================================================================== #
+require 'gtk2'
+
+socket = Gtk::Socket.new
+socket.show
+window = Gtk::Window.new
+window.add(socket)
+window.move(0, 0)
+# The following call is only necessary if one of
+# the ancestors of the socket is not yet visible.
+socket.realize
+puts
+puts "The ID of the sockets window is #{socket.id}"
+puts