studium 0.13.1

data/lib/studium/gui/gtk3/ask_exam_question/ask_exam_question.rb

@@ -0,0 +1,760 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# === Studium::GUI::Gtk::AskExamQuestion
+#
+# This widget is mildly deprecated.
+# =========================================================================== #
+# require 'studium/gui/shared_code/ask_exam_question/ask_exam_question_module.rb'
+# include ::Studium::GUI::Gtk::AskExamQuestionModule
+# =========================================================================== #
+require 'gtk_paradise/require_gtk3'
+
+module Studium
+
+module GUI
+
+module Gtk
+
+class AskExamQuestion < ::Gtk::Box # === Studium::GUI::Gtk::AskExamQuestion 
+
+  require 'studium/gui/shared_code/ask_exam_question/ask_exam_question_module.rb'
+  include ::Studium::GUI::Gtk::AskExamQuestionModule
+
+  require 'studium/gui/gtk3/control_panel/control_panel.rb'
+  require 'studium/gui/gtk3/expand_time_range/expand_time_range.rb'
+  require 'studium/gui/gtk3/show_upcoming_exams/show_upcoming_exams.rb'
+  require 'studium/gui/gtk3/curriculum_viewer/curriculum_viewer.rb'
+
+  require 'gtk_paradise/widgets/gtk3/editor/editor.rb'
+  require 'gtk_paradise/widgets/gtk3/emoji_toggle_widget/emoji_toggle_widget.rb'
+
+  begin
+    require 'roebe/gui/gtk3/show_ten_aliases/show_ten_aliases.rb'
+  rescue LoadError; end
+
+  # ========================================================================= #
+  # === HASH_DESIGNATED_KEY_COMBINATIONS
+  # ========================================================================= #
+  HASH_DESIGNATED_KEY_COMBINATIONS = {
+    'strg+s': 'save_the_buffer',
+    'alt+y':  'activate_the_third_textview'
+  }
+
+  # ========================================================================= #
+  # === initialize
+  #
+  # The first argument that is passed into this class may be a file
+  # that exists locally.
+  # ========================================================================= #
+  def initialize(
+      commandline_arguments = ARGV,
+      run_already           = true
+    )
+    super(:vertical)
+    reset
+    set_commandline_arguments(
+      commandline_arguments
+    )
+    run if run_already
+  end
+
+  # ========================================================================= #
+  # === reset                                                     (reset tag)
+  # ========================================================================= #
+  def reset
+    # ======================================================================= #
+    # === @configuration
+    # ======================================================================= #
+    @configuration = [true, __dir__, NAMESPACE]
+    reset_the_internal_variables :do_not_reset_the_configuration_variable
+    # ======================================================================= #
+    # === @answer_is
+    # ======================================================================= #
+    @answer_is = nil
+    # ======================================================================= #
+    # === @show_ten_aliases
+    # ======================================================================= #
+    @show_ten_aliases = nil
+    if Object.const_defined?(:Roebe)
+      begin
+        require 'roebe/gui/gtk3/show_ten_aliases/show_ten_aliases.rb'
+        @show_ten_aliases = ::Roebe::GUI::Gtk::ShowTenAliases.new
+      rescue LoadError; end
+    end
+    # ======================================================================= #
+    # === @prefer_emoji_or_images
+    #
+    # This variable can have two different states:
+    #
+    #   :emoji
+    #   :images
+    #
+    # If :emoji is active then we will use emojis to enhance the
+    # user interface. If :images is active then we will use different
+    # images from the main icon theme in use instead.
+    #
+    # The reason why this was added in May 2021 was because the host
+    # system may not support this or that emoji. If the emoji is
+    # not supported then the user will see only garbage, which isn't
+    # great. Thus, the default is now for :images since as of May
+    # 2021, but with the intended goal to retain support for emojis
+    # as well, should a user ever want to change this.
+    # ======================================================================= #
+    @prefer_emoji_or_images = :images
+    # ======================================================================= #
+    # === @colour_to_use_for_the_notebook_labels
+    # ======================================================================= #
+    @colour_to_use_for_the_notebook_labels = 'darkblue'
+    # ======================================================================= #
+    # === @title
+    # ======================================================================= #
+    @title = return_the_title_from_the_config_file
+    # ======================================================================= #
+    # === @use_this_editor
+    #
+    # This may be :bluefish or :internal usually.
+    # ======================================================================= #
+    @use_this_editor = :internal
+    infer_the_size_automatically
+  end
+
+  # ========================================================================= #
+  # === create_the_editor                                        (editor tag)
+  # ========================================================================= #
+  def create_the_editor
+    # ======================================================================= #
+    # === @gtk_editor
+    # ======================================================================= #
+    @gtk_editor = ::Gtk::Editor.new { :do_not_use_the_colour_box_widget }
+  end
+
+  # ========================================================================= #
+  # === allow_external_applications?
+  #
+  # This is mostly useful when the main application allows add-ons,
+  # such as the TenAliases widget. It is not so important for
+  # standalone widgets.
+  # ========================================================================= #
+  def allow_external_applications?
+    true
+  end
+
+  # ========================================================================= #
+  # === control_panel?
+  # ========================================================================= #
+  def control_panel?
+    @control_panel
+  end
+
+  # ========================================================================= #
+  # === instantiate_the_control_panel
+  # ========================================================================= #
+  def instantiate_the_control_panel
+    # ======================================================================= #
+    # === @control_panel
+    # ======================================================================= #
+    @control_panel = ::Studium::GUI::Gtk::ControlPanel.new(self)
+    @control_panel.use_this_font(main_font?)
+  end
+
+  # ========================================================================= #
+  # === change_to_a_happy_smiley_before_reverting_to_the_prior_default_again
+  #
+  # This method is used to turn the thinking-smiley to a happy-smiley,
+  # before reverting again to the prior default.
+  # ========================================================================= #
+  def change_to_a_happy_smiley_before_reverting_to_the_prior_default_again(
+      delay_to_use = 5_000 # This refers to 5 seconds.
+    )
+    @a_thinking_smiley_emoji.toggle
+    GLib::Timeout.add(delay_to_use) {
+      @a_thinking_smiley_emoji.revert_to_the_initial_state # This reverts to the initial state again.
+      false # Must end it.
+    }
+  end
+
+  # ========================================================================= #
+  # === create_the_emoji_toggle_widget
+  #
+  # Note that in order to use EmojiToggleWidget, we have to pull in
+  # the right file, either ruby-gtk3 or ruby-gtk2.
+  # ========================================================================= #
+  def create_the_emoji_toggle_widget
+    @a_thinking_smiley_emoji = ::Gtk::EmojiToggleWidget.new(
+      :use_two_smileys
+    )
+    @a_thinking_smiley_emoji.make_selectable
+  end
+
+  require 'studium/toplevel_methods/return_last_exam_question.rb'
+  # ========================================================================= #
+  # === update_the_label_containing_the_last_exam_question
+  # ========================================================================= #
+  def update_the_label_containing_the_last_exam_question
+    control_panel?.label_containing_the_last_exam_question?.set_text(
+      ::Studium.return_last_exam_question
+    )
+  end
+
+  # ========================================================================= #
+  # === notify_the_user_that_all_questions_have_been_answered_in_this_topic
+  # ========================================================================= #
+  def notify_the_user_that_all_questions_have_been_answered_in_this_topic(
+      this_topic  = current_exam_topic?,
+      this_widget = @button_reveal_the_answer
+    )
+    bold_popover_message = gtk_bold_label(
+      'All questions have been answered for '+this_topic+'. \o/'
+    )
+    popover_message(
+      bold_popover_message,
+      this_widget
+    ).popup
+  end
+
+  # ========================================================================= #
+  # === create_skeleton                                          (create tag)
+  # ========================================================================= #
+  def create_skeleton
+    create_the_editor
+    create_the_notebook_tab
+    create_the_emoji_toggle_widget
+    create_the_buttons
+    create_the_entries
+    create_the_checkbox # This must come after the entries were created.
+    create_the_combobox
+    create_the_labels
+    create_the_text_views_and_text_buffers
+    create_the_main_grid # This should come fairly late.
+    instantiate_the_control_panel
+    populate_the_notebook_tab # Must come after create_the_notebook_tab().
+  end
+
+  # ========================================================================= #
+  # === create_the_button_update_n_questions_were_answered
+  # ========================================================================= #
+  def create_the_button_update_n_questions_were_answered
+    # ======================================================================= #
+    # === The update-button is created next. It had the cat emoji, aka
+    #     🐈️, displayed in the past, but not every computer system has
+    #     access to such an emoji, so this was replaced via an image.
+    #     The old text was: '🐈️ Update ➡️ '
+    # ======================================================================= #
+    @button_update_n_questions_were_answered = gtk_bold_button('Update ➡️ ')
+    @button_update_n_questions_were_answered.lightblue
+    @button_update_n_questions_were_answered.hint = 'Click this '\
+      'button to update the entry to the right side.'
+    @button_update_n_questions_were_answered.on_clicked {
+      update_the_label_n_questions_were_answered
+    }
+  end
+
+  # ========================================================================= #
+  # === create_the_buttons                          (buttons tag, button tag)
+  # ========================================================================= #
+  def create_the_buttons
+    create_the_ask_the_exam_question_button
+    create_the_reveal_button
+    create_the_button_use_random_entry_from_the_ten_aliases
+    create_the_button_update_n_questions_were_answered
+    # ======================================================================= #
+    # === @button_solve_the_question
+    #
+    # Add the solved-question button. It has a small Unicode "checkmark"
+    # on the right side.
+    # ======================================================================= #
+    @button_solve_the_question = return_button_solve_the_question
+    @button_solve_the_question.on_clicked {
+      do_solve_the_exam_question
+      # ===================================================================== #
+      # And flip the smiley state of the label close to the top.
+      # ===================================================================== #
+      change_to_a_happy_smiley_before_reverting_to_the_prior_default_again
+      update_the_label_n_questions_were_answered
+      do_update_this_gtk_entry_with_that_exam_topic_for_its_percentage_value(
+        @entry_percentage, current_exam_topic?
+      )
+    }
+  end
+
+  # ========================================================================= #
+  # === connect_the_notebook_tab
+  # ========================================================================= #
+  def connect_the_notebook_tab
+    maximal(@notebook_tab, 0)
+  end
+
+  # ========================================================================= #
+  # === populate_the_notebook_tab                              (populate tag)
+  # ========================================================================= #
+  def populate_the_notebook_tab
+    # ======================================================================= #
+    # We could display a Curriculum. Unfortunately, in 2021, this
+    # is a bit wide, and makes the whole notebook appear too large,
+    # so it was disabled again, until we improve on it.
+    #
+    #   label4 = modify_bold_label('Curriculum Viewer',@colour_to_use_for_the_notebook_labels)
+    #   @notebook_tab.add_tab(::Studium::GUI::Gtk::CurriculumViewer.new, label4)
+    #
+    # ======================================================================= #
+    # ======================================================================= #
+    # === Add the first tab, containing the "Ask Exam Question" widget next
+    #
+    # This will be contained in @first_vbox, which in turn contains
+    # the @horizontal_pane variable.
+    # ======================================================================= #
+    label1 = modify_bold_label('Ask Exam Question', @colour_to_use_for_the_notebook_labels)
+    @notebook_tab.add_tab(
+      return_the_widget_for_the_first_notebook_tab,
+      label1
+    )
+
+    # ======================================================================= #
+    # === Add the second tab next, including the top-ten exam-topics as
+    #     well as the Control Panel
+    # ======================================================================= #
+    label2 = modify_bold_label('Control Panel', @colour_to_use_for_the_notebook_labels)
+    vbox_containing_the_control_panel = gtk_vbox
+    if Object.const_defined? :Roebe
+      @show_ten_aliases.set_parent_widget(self)
+      vbox_containing_the_control_panel.minimal(@show_ten_aliases, 10)
+    end
+    vbox_containing_the_control_panel.maximal(
+      @control_panel
+    )
+    @notebook_tab.add_tab(
+      gtk_scrolled_window(
+        vbox_containing_the_control_panel
+      ), label2
+    )
+    # ======================================================================= #
+    # === Add a modified variant of the editor-widget, so that we
+    #     can easily manipulate the content of the exam-questions.
+    # ======================================================================= #
+    label3 = modify_bold_label('File-Editor', @colour_to_use_for_the_notebook_labels)
+    # ======================================================================= #
+    # Keep a reference to the editor in use as well.
+    # ======================================================================= #
+    vbox_containing_the_editor = @gtk_editor
+    @notebook_tab.add_tab(
+      vbox_containing_the_editor, label3
+    )
+    @notebook_tab.set_tab_reorderable(vbox_containing_the_editor, true)
+    @notebook_tab.focus_on_the_first_tab
+    @notebook_tab.set_focus(0)
+  end
+
+  # ========================================================================= #
+  # === connect_skeleton                                        (connect tag)
+  # ========================================================================= #
+  def connect_skeleton
+    connect_the_notebook_tab
+  end
+
+  # ========================================================================= #
+  # === run                                                         (run tag)
+  # ========================================================================= #
+  def run
+    abort_on_exception
+    create_skeleton_then_connect_skeleton
+    do_style_all_buttons_uniformly
+    do_handle_the_click_event_for_the_ask_question_button
+    show_all
+  end
+
+  # ========================================================================= #
+  # === set_save_into_this_local_file
+  # ========================================================================= #
+  def set_save_into_this_local_file(i)
+    @gtk_editor.set_save_into_this_local_file(i.to_s)
+  end
+
+  # ========================================================================= #
+  # === scrolled_window_for_the_answer?
+  # ========================================================================= #
+  def scrolled_window_for_the_answer?
+    @scrolled_window_containing_the_textarea2
+  end
+
+  # ========================================================================= #
+  # === save_the_buffer
+  # ========================================================================= #
+  def save_the_buffer
+    @gtk_editor.save_the_buffer
+    # ======================================================================= #
+    # Check whether we use the internal editor or not.
+    # ======================================================================= #
+    if use_the_internal_editor? and is_on_roebe?
+      # ===================================================================== #
+      # In this case jump to the first tab.
+      # ===================================================================== #
+      @notebook_tab.focus_on_this_tab(0)
+      rinstall2
+    end
+  end
+
+  # ========================================================================= #
+  # === set_editor_buffer
+  # ========================================================================= #
+  def set_editor_buffer(i)
+    @gtk_editor.set_buffer(i.to_s)
+  end
+
+  # ========================================================================= #
+  # === return_the_widget_for_the_first_notebook_tab              (first tag)
+  # ========================================================================= #
+  def return_the_widget_for_the_first_notebook_tab
+    # ======================================================================= #
+    # === @first_vbox
+    # ======================================================================= #
+    @first_vbox = gtk_vbox
+    frame_containing_the_label_exam_topic = return_frame_containing_the_label_exam_topic
+    event_box_containing_the_frame_containing_the_label_exam_topic = gtk_eventbox(
+      frame_containing_the_label_exam_topic
+    )
+    event_box_containing_the_frame_containing_the_label_exam_topic.on_clicked {
+      do_jump_into_the_entry_containing_the_current_exam_topic
+    }
+    @grid.attach(event_box_containing_the_frame_containing_the_label_exam_topic, 0, 0, 1, 1)
+    @grid.attach(@entry_holding_all_exam_topics,   1, 0, 1, 1)
+
+    @grid.attach(@combo_box_available_exam_topics, 3, 0, 1, 1)
+    @grid.attach(@entry_percentage,                4, 0, 2, 1)
+
+    # ======================================================================= #
+    # The following vbox, contains the thumbs-up emoji as well as entries
+    # for n questions and n answers.
+    # ======================================================================= #
+    @hbox_containing_three_labels_and_three_entries = return_hbox_containing_three_labels_and_three_entries
+
+    # ======================================================================= #
+    # Add the thumbs-up emoji, but only if we use emojis.
+    # ======================================================================= #
+    if use_emoji?
+      event_box_for_the_thumbs_up_emoji = gtk_event_box(gtk_label(' 👍'))
+    else
+      event_box_for_the_thumbs_up_emoji = gtk_event_box(image_trophy_gold)
+    end
+    event_box_for_the_thumbs_up_emoji.on_clicked {
+      do_ask_a_new_exam_question
+    }
+    @hbox_containing_three_labels_and_three_entries.minimal(
+      event_box_for_the_thumbs_up_emoji, 5 # The thumbs-up emoji is actually an event-box.
+    )
+
+    event_box_for_image_view_refresh_symbolic_symbolic = return_event_box_for_asking_a_random_exam_topic
+    @hbox_containing_three_labels_and_three_entries.minimal(
+      event_box_for_image_view_refresh_symbolic_symbolic, 5
+    )
+    @grid.attach(@checkbox_shall_we_reveal_the_answer, 0, 1, 1, 1)
+    @grid.attach(@hbox_containing_three_labels_and_three_entries, 1, 1, 1, 1)
+
+    hbox_containing_the_smiling_emoji_and_the_entry_delay_to_use = gtk_hbox
+    hbox_containing_the_smiling_emoji_and_the_entry_delay_to_use.minimal(
+      gtk_label(:vertical_line)
+    )
+    hbox_containing_the_smiling_emoji_and_the_entry_delay_to_use.minimal(
+      @a_thinking_smiley_emoji
+    )
+    hbox_containing_the_smiling_emoji_and_the_entry_delay_to_use.minimal(
+      gtk_label(:vertical_line)
+    )
+    hbox_containing_the_smiling_emoji_and_the_entry_delay_to_use.minimal(
+      @entry_delay_to_use
+    )
+    hbox_containing_the_smiling_emoji_and_the_entry_delay_to_use.minimal(
+      @button_use_random_entry_from_the_ten_aliases, 4
+    )
+    @grid.attach(
+      hbox_containing_the_smiling_emoji_and_the_entry_delay_to_use,
+      3, 1, 1, 1
+    )
+
+    # ======================================================================= #
+    # Add the exam-question button next
+    # ======================================================================= #
+    if use_emoji?
+      @grid.attach(@button_ask_the_exam_question,  0, 2, 1, 1)
+    else
+      hbox_with_button_ask_the_exam_question_and_image = gtk_hbox
+      hbox_with_button_ask_the_exam_question_and_image.maximal(
+        @button_ask_the_exam_question
+      )
+      event_box_for_image_dialog_question = gtk_eventbox(
+        image_dialog_question
+      )
+      event_box_for_image_dialog_question.on_clicked {
+        do_ask_an_exam_question
+      }
+      hbox_with_button_ask_the_exam_question_and_image.minimal(
+        event_box_for_image_dialog_question
+      )
+      @grid.attach(hbox_with_button_ask_the_exam_question_and_image,  0, 2, 1, 1)
+    end
+
+    @grid.attach(@scrolled_window_containing_the_textarea1,  1, 2, 6, 1) # .attach(widget, left_pos, top_pos, width, height)
+
+    @grid.attach(@button_reveal_the_answer,  0, 3, 1, 1)
+
+    @grid.attach(@scrolled_window_containing_the_textarea2,  1, 3, 6, 1)
+
+    hbox_with_two_icons = return_hbox_containing_two_icons_and_instructions_what_to_do_with_the_free_form_textarea
+    @grid.attach(hbox_with_two_icons,  0, 4, 4, 1)
+    # .attach(child_widget, left_pos, top_pos, width, height)
+    @grid.attach(@scrolled_window_containing_the_textarea3, 0, 5, 6, 1)
+
+    # ======================================================================= #
+    # Add the widget that contains the solve-the-question-button and the 
+    # open-file button.
+    # ======================================================================= #
+    hbox_with_the_two_buttons_solve_the_question_and_open_exam_topic_file_and_wikipedia_entry = gtk_hbox
+    hbox_with_the_two_buttons_solve_the_question_and_open_exam_topic_file_and_wikipedia_entry.minimal(
+      @button_solve_the_question, 2
+    )
+    hbox_with_the_two_buttons_solve_the_question_and_open_exam_topic_file_and_wikipedia_entry.minimal(
+      return_button_open_exam_topic_file, 2
+    )
+    hbox_with_the_two_buttons_solve_the_question_and_open_exam_topic_file_and_wikipedia_entry.minimal(
+      return_wikipedia_entry, 2
+    )
+
+    # ======================================================================= #
+    # Next comes the hbox that contains, among other elements, the 
+    # "n exam questions are already answered" string.
+    # ======================================================================= #
+    hbox_containing_the_label = gtk_hbox
+    mini_hbox = gtk_hbox
+    event_box = gtk_event_box(image_applications_system_symbolic_symbolic)
+    event_box.on_clicked { update_the_label_n_questions_were_answered }
+    mini_hbox.minimal(event_box)
+    mini_hbox.minimal(@button_update_n_questions_were_answered)
+    hbox_containing_the_label.maximal(mini_hbox, 2)
+    hbox_containing_the_label.maximal(@label_n_questions_were_answered, 25)
+
+    gtk_hbox_containing_the_application_exit_image = gtk_hbox
+    gtk_hbox_containing_the_application_exit_image.minimal(
+      hbox_containing_the_label, 0
+    )
+    # ======================================================================= #
+    # Add an "exit" functionality next.
+    # ======================================================================= #
+    eventbox_for_application_exit_image = return_eventbox_with_an_image_to_exit_the_application
+    gtk_hbox_containing_the_application_exit_image.minimal(gtk_hseparator)
+    gtk_hbox_containing_the_application_exit_image.rpack(
+      eventbox_for_application_exit_image, 2
+    )
+
+    vbox_for_two_buttons = gtk_vbox
+    vbox_for_two_buttons.minimal(
+      hbox_with_the_two_buttons_solve_the_question_and_open_exam_topic_file_and_wikipedia_entry, 1
+    )
+    vbox_for_two_buttons.minimal(gtk_separator, 0)
+    @horizontal_pane = horizontal_pane(
+      vbox_for_two_buttons,
+      gtk_hbox_containing_the_application_exit_image
+    )
+    @first_vbox.minimal(@grid,            2)
+    @first_vbox.maximal(@horizontal_pane, 5)
+    return gtk_scrolled_window(@first_vbox) # We use a scrolled-window for convenience.
+  end
+
+  # ========================================================================= #
+  # === create_the_main_grid
+  # ========================================================================= #
+  def create_the_main_grid
+    # ======================================================================= #
+    # === @grid
+    # ======================================================================= #
+    @grid = gtk_grid # grid tag
+    @grid.set_column_spacing(5)
+    @grid.set_row_spacing(5)
+    @grid.set_size_request(
+      width?+20, height? / 1.3
+    )
+  end
+
+  # ========================================================================= #
+  # === do_interactively_change_the_font
+  #
+  # This does not work. :(
+  # ========================================================================= #
+  def do_interactively_change_the_font
+    require 'gtk_paradise/widgets/gtk3/text_entry_widget/text_entry_widget.rb'
+    require 'gtk_paradise/examples/gtk3/gtk_dialog_sample.rb'
+    _ = ::Gtk::TextEntryWidget.run
+    ::Gtk::DialogSample.new(_)
+    Gtk.main
+    e 'The selection was:'
+    pp _.selection?
+  end
+
+  # ========================================================================= #
+  # === enable_the_main_key_combinations
+  # ========================================================================= #
+  def enable_the_main_key_combinations(
+      use_this_hash = HASH_DESIGNATED_KEY_COMBINATIONS
+    )
+    enable_these_key_combinations(
+      use_this_hash
+    )
+  end
+
+  # ========================================================================= #
+  # === reveal_the_answer_to_the_exam_question
+  # ========================================================================= #
+  def reveal_the_answer_to_the_exam_question
+    do_reveal_the_answer_after_timeout(@answer_is,0)
+  end
+
+  # ========================================================================= #
+  # === ask_an_exam_question
+  # ========================================================================= #
+  def ask_an_exam_question
+    question_button?.signal_emit(:clicked)
+  end
+
+  # ========================================================================= #
+  # === do_ask_a_new_exam_question
+  # ========================================================================= #
+  def do_ask_a_new_exam_question
+    question_button?.signal_emit(:clicked)
+  end
+
+  # ========================================================================= #
+  # === create_the_notebook_tab
+  # ========================================================================= #
+  def create_the_notebook_tab
+    # ======================================================================= #
+    # === @notebook_tab
+    # ======================================================================= #
+    @notebook_tab = gtk_notebook { :make_it_scrollable }
+    @notebook_tab.css_class('notebook_for_ask_exam_question')
+    @notebook_tab.the_tabs_appear_on_top
+    @notebook_tab.do_show_the_tabs
+    @notebook_tab.do_show_the_border
+  end
+
+  # ========================================================================= #
+  # === Studium::GUI::Gtk::AskExamQuestion.run
+  # ========================================================================= #
+  def self.run(
+      i = ARGV
+    )
+    require 'gtk_paradise/run'
+    _ = ::Studium::GUI::Gtk::AskExamQuestion.new(i)
+    r = ::Gtk.run
+    r << _
+    _.enable_the_main_key_combinations
+    _.set_parent_widget(r)
+    r.automatic_size_then_automatic_title
+    r.top_left_then_run
+  end
+
+  # ========================================================================= #
+  # === create_the_text_views_and_text_buffers
+  # ========================================================================= #
+  def create_the_text_views_and_text_buffers
+    # ======================================================================= #
+    # === The text buffer for the question comes first
+    # ======================================================================= #
+    @text_buffer_for_the_question = gtk_text_buffer
+    @text_view_for_the_question = return_text_view_for_the_question(@text_buffer_for_the_question)
+    @scrolled_window_containing_the_textarea1 = return_scrolled_window_for_the_text_view_for_the_question(@text_view_for_the_question)
+    # ======================================================================= #
+    # === The text buffer, text view, and scrolled window for the
+    #     answer comes first.
+    # ======================================================================= #
+    @text_buffer_for_the_answer = gtk_text_buffer
+    # ======================================================================= #
+    # === @text_view_for_the_answer
+    # ======================================================================= #
+    @text_view_for_the_answer = return_text_view_for_the_answer(@text_buffer_for_the_answer)
+    @scrolled_window_containing_the_textarea2 = return_scrolled_window_containing_the_text_view_for_the_answer(
+      @text_view_for_the_answer
+    )
+    # ======================================================================= #
+    # Next comes the textarea for "free typing", where the user can
+    # simply write whatever he wants to.
+    # ======================================================================= #
+    @textarea3 = return_textarea_number_three
+    # ======================================================================= #
+    # === @scrolled_window_containing_the_textarea3
+    #
+    # This is the scrolled-window containing the free-form text the user
+    # can type.
+    # ======================================================================= #
+    @scrolled_window_containing_the_textarea3 = return_scrolled_window_containing_the_textarea3(@textarea3)
+    # ======================================================================= #
+    # The scrolled-window for the answer allows the user to click on 
+    # hyperlinks - or at the least this is the idea. It does not
+    # work 100% yet because we need to get the selection first
+    # rather than select the whole entry.
+    # ======================================================================= #
+    scrolled_window_for_the_answer?.on_button_release_event {
+      parse_for_URL(@text_view_for_the_answer.buffer.text)
+    }
+  end; alias create_text_buffer_and_associated_text_views create_the_text_views_and_text_buffers # === create_text_buffer_and_associated_text_views
+
+  # ========================================================================= #
+  # === do_solve_the_exam_question                               (solved tag)
+  # ========================================================================= #
+  def do_solve_the_exam_question
+    _ = Studium::Exams::Solved.new { :do_not_run_yet }
+    _.set_commandline
+    _.run
+    if is_on_roebe? and Object.const_defined?(:Roebe)
+      rinstall2
+    end
+    update_the_label_containing_the_last_exam_question
+  end; alias mark_the_exam_question_as_solved do_solve_the_exam_question # === mark_the_exam_question_as_solved
+
+  # ========================================================================= #
+  # === popup_pick_a_new_font
+  # ========================================================================= #
+  def popup_pick_a_new_font
+    _ = gtk_hbox
+    _.minimal(text(' → '))
+    file_chooser_widget = gtk_button('Choose font here')
+    file_chooser_widget.set_size_request(1200, 960)
+    file_chooser_widget.css_class('bblack2')
+    file_chooser_widget.set_size_request(500, 300)
+    file_chooser_widget.disallow_resizing
+    _.minimal(file_chooser_widget)
+    file_chooser_widget.on_click {
+      result = gtk_font_chooser_dialog
+      set_use_this_font(::Gtk.main_file?)
+      result.destroy
+    }
+    # ======================================================================= #
+    # Next create the popup for the font-choosing.
+    # ======================================================================= #
+    popup_widget = popup_over_this_widget(
+      text_view_for_the_question?,
+      '',
+      _
+    )
+    # popup_widget.no_arrow # ← This will only work on gtk4, I think.
+    popup_widget.popup
+  end
+
+  # ========================================================================= #
+  # === text_view_for_the_question?
+  # ========================================================================= #
+  def text_view_for_the_question?
+    @text_view_for_the_question
+  end
+
+  # ========================================================================= #
+  # === Studium::GUI::Gtk::AskExamQuestion[]
+  # ========================================================================= #
+  def self.[](i = '')
+    new(i)
+  end
+
+end; end; end; end
+
+if __FILE__ == $PROGRAM_NAME
+  Studium::GUI::Gtk::AskExamQuestion.run
+end