wxruby3 0.9.0 → 0.9.2

data/tests/test_menu.rb

@@ -0,0 +1,69 @@
+# Copyright (c) 2023 M.J.N. Corino, The Netherlands
+#
+# This software is released under the MIT license.
+
+require_relative './lib/wxframe_runner'
+
+class MenuTests < WxRuby::Test::GUITests
+
+  def setup
+    super
+    @menu = Wx::Menu.new
+    @menu.append(Wx::ID_HIGHEST+1, 'Item 1', 'Test menuitem 1')
+    @menu.append(Wx::ID_HIGHEST+2, 'Item 2', 'Test menuitem 2')
+    @menu.append_separator
+    @menu.append_check_item(Wx::ID_HIGHEST+3, 'Check 3', 'Test menuitem 3')
+    @menu.append_separator
+    @menu.append_radio_item(Wx::ID_HIGHEST+4, 'Radio 4', 'Test menuitem 4')
+    @menu.append_radio_item(Wx::ID_HIGHEST+5, 'Radio 5', 'Test menuitem 5')
+    @menu.append_radio_item(Wx::ID_HIGHEST+6, 'Radio 6', 'Test menuitem 6')
+    frame_win.menu_bar = Wx::MenuBar.new
+    frame_win.menu_bar.append(@menu, "&Test")
+  end
+
+  def cleanup
+    frame_win.menu_bar = nil
+    super
+  end
+
+  attr_reader :menu
+
+  def test_basic
+    assert_equal(8, menu.get_menu_item_count)
+    check, pos = menu.find_child_item(Wx::ID_HIGHEST+3)
+    assert_not_nil(check)
+    assert_equal(3, pos)
+    assert_equal('Check 3', check.item_label)
+    assert_false(check.checked?)
+    check.check
+    assert_true(check.checked?)
+    radio, pos = menu.find_child_item(Wx::ID_HIGHEST+5)
+    assert_not_nil(radio)
+    assert_equal(6, pos)
+    assert_equal('Radio 5', radio.item_label)
+    assert_false(radio.checked?)
+    radio.check
+    assert_true(radio.checked?)
+    radio, pos = menu.find_child_item(Wx::ID_HIGHEST+4)
+    assert_false(radio.checked?)
+    radio, pos = menu.find_child_item(Wx::ID_HIGHEST+6)
+    assert_false(radio.checked?)
+    radio.check
+    assert_true(radio.checked?)
+    radio, pos = menu.find_child_item(Wx::ID_HIGHEST+5)
+    assert_false(radio.checked?)
+  end
+
+  def test_enumerate
+    radio, pos = menu.find_child_item(Wx::ID_HIGHEST+4)
+    assert_true(radio.checked?) # first by default checked
+    menu.each_item do |mi|
+      mi.check if mi.id == (Wx::ID_HIGHEST+5)
+    end
+    radio, pos = menu.find_child_item(Wx::ID_HIGHEST+4)
+    assert_false(radio.checked?)
+    radio = menu.each_item.detect { |mi| mi.id == (Wx::ID_HIGHEST+5) }
+    assert_true(radio.checked?)
+  end
+
+end

data/tests/test_pg.rb

@@ -0,0 +1,27 @@
+# Copyright (c) 2023 M.J.N. Corino, The Netherlands
+#
+# This software is released under the MIT license.
+
+require_relative './lib/wxframe_runner'
+
+class PGChoicesTests < WxRuby::Test::GUITests
+
+  def test_enum_labels
+    texts = %w[Red Blue Green Yellow Black White]
+    choices = Wx::PG::PGChoices.new(texts)
+    choices.each_label { |lbl| assert_equal(texts.shift, lbl) }
+  end
+
+  def test_enum_entries
+    texts = %w[Flag1 Flag2 Flag3 Flag4]
+    choices = Wx::PG::PGChoices.new
+    texts.each_with_index do |s, i|
+      choices.add(s, 1 << i)
+    end
+    choices.each_entry.each_with_index do |entry, ix|
+      assert_equal(1 << ix, entry.value)
+      assert_equal(texts[ix], entry.get_text)
+    end
+  end
+
+end

data/tests/test_richtext.rb

@@ -67,6 +67,51 @@ class RichTextCtrlWriteTests < WxRuby::Test::GUITests
     assert_equal('Second Line', richtext.get_line_text(1))
   end
 
+  def test_enumerate_lines
+    richtext.write_text <<~__HEREDOC
+      This is line 1.
+      This is line 2.
+      This is line 3.
+      __HEREDOC
+    assert_equal(4, richtext.get_number_of_lines)
+    richtext.each_line.each_with_index do |txt, lnr|
+      if lnr < 3
+        assert("This is line #{lnr+1}.", txt)
+      else
+        assert('', txt)
+      end
+    end
+    line_enum = richtext.each_line
+    txt = line_enum.detect { |l| l.index('2') }
+    assert_equal('This is line 2.', txt)
+    para = richtext.buffer.get_child_at_position(0)
+    assert_kind_of(Wx::RTC::RichTextParagraph, para)
+    assert_equal(1, para.get_lines.size)
+    para.each_line do |rtl|
+      txt = para.get_text_for_range(rtl.get_range)
+      assert("This is line 1.", txt)
+    end
+  end
+
+  def test_enumerate_children
+    richtext.write_text <<~__HEREDOC
+      This is line 1.
+      This is line 2.
+      This is line 3.
+      __HEREDOC
+    richtext.write_image(Wx.Bitmap(:wxruby, Wx::BitmapType::BITMAP_TYPE_PNG, art_section: 'test_art'))
+    assert_equal(4, richtext.buffer.get_child_count)
+    richtext.buffer.each_child.each_with_index do |c, i|
+      if i<3
+        assert_kind_of(Wx::RTC::RichTextParagraph, c)
+        assert_equal(1, c.get_lines.size)
+      else
+        assert_equal(1, c.get_child_count)
+        c.each_child { |cc| assert_kind_of(Wx::RTC::RichTextImage, cc) }
+      end
+    end
+  end
+
   def test_write_image
     assert_nothing_raised { richtext.write_image(Wx.Bitmap(:wxruby, Wx::BitmapType::BITMAP_TYPE_PNG, art_section: 'test_art')) }
     img_obj = richtext.buffer.get_leaf_object_at_position(0)

data/tests/test_sizer.rb

@@ -0,0 +1,59 @@
+# Copyright (c) 2023 M.J.N. Corino, The Netherlands
+#
+# This software is released under the MIT license.
+
+require_relative './lib/wxframe_runner'
+
+class SizerTests < WxRuby::Test::GUITests
+
+  def setup
+    super
+    frame_win.set_sizer(Wx::VBoxSizer.new)
+  end
+
+  def cleanup
+    super
+    GC.start
+  end
+
+  def test_detach
+    frame_win.get_sizer.add(Wx::HBoxSizer.new)
+    frame_win.get_sizer.add_spacer(5)
+    # detaches HBoxSizer transferring ownership to Ruby; should not cause segfaults at GC
+    frame_win.get_sizer.detach(0)
+  end
+
+  def test_sizer_item_detach_and_re_attach
+    frame_win.get_sizer.add(Wx::HBoxSizer.new)
+    frame_win.get_sizer.add_spacer(5)
+    # get and detach
+    szr_itm = frame_win.get_sizer.get_item(0)
+    assert_not_nil(szr_itm)
+    assert_true(szr_itm.is_sizer)
+    szr = szr_itm.get_sizer
+    assert_not_nil(szr)
+    szr_itm.detach_sizer
+    assert_nil(szr_itm.get_sizer)
+    # remove sizer item
+    assert_true(frame_win.get_sizer.remove(0))
+    # re-attach detached sizer (should not cause segfaults at close due to incorrect ownership transfers)
+    assert_not_nil(frame_win.get_sizer.prepend(szr))
+  end
+
+  def test_children
+    frame_win.get_sizer.add(Wx::HBoxSizer.new)
+    frame_win.get_sizer.add_spacer(5)
+    frame_win.get_sizer.add(Wx::VBoxSizer.new)
+
+    assert_equal(3, frame_win.sizer.item_count)
+    children = frame_win.sizer.get_children
+    assert_equal(3, children.size)
+    assert_true(children[0].sizer?)
+    assert_true(children[1].spacer?)
+    assert_true(children[2].sizer?)
+    frame_win.sizer.each_child do |si|
+      assert_equal(children.shift, si)
+    end
+  end
+
+end

data/tests/test_std_controls.rb

@@ -111,6 +111,34 @@ class TextCtrlTests < WxRuby::Test::GUITests
     assert_equal('', text.get_value)
   end
 
+  def test_stream_append
+    text << 'This is the number ' << 101 << '.'
+    assert_equal('This is the number 101.', text.get_value)
+  end
+
+  def test_enumerate_lines
+    text.destroy
+    @text = Wx::TextCtrl.new(frame_win, style: Wx::TE_MULTILINE, name: 'Text')
+    text << <<~__HEREDOC
+      This is line 1.
+      This is line 2.
+      This is line 3.
+      __HEREDOC
+    assert_equal(4, text.get_number_of_lines)
+    text.each_line.each_with_index do |txt, lnr|
+      if lnr < 3
+        assert("This is line #{lnr+1}.", txt)
+      else
+        assert('', txt)
+      end
+    end
+    txt = text.each_line { |l| break l if l.index('2')}
+    assert_equal('This is line 2.', txt)
+    line_enum = text.each_line
+    txt = line_enum.detect { |l| l.index('3') }
+    assert_equal('This is line 3.', txt)
+  end
+
   if has_ui_simulator?
   def test_max_length
     sim = get_ui_simulator
@@ -165,7 +193,7 @@ class ComboBoxTests < WxRuby::Test::GUITests
   def setup
     super
     @combo = Wx::ComboBox.new(frame_win, name: 'ComboBox', choices: %w[One Two Three])
-    @combo.clear
+    @combo.value = '' # don't use #clear as that also clears the choices
   end
 
   def cleanup
@@ -180,6 +208,19 @@ class ComboBoxTests < WxRuby::Test::GUITests
     assert_equal('', combo.get_value)
   end
 
+  def test_enumerate
+    strings = combo.get_strings
+    combo.each_string.each_with_index do |str, ix|
+      assert_equal(strings[ix], str)
+    end
+    combo.each_string { |s| assert_equal(strings.shift, s)}
+    str_enum = combo.each_string
+    assert_kind_of(::Enumerator, str_enum)
+    assert_true(str_enum.any? { |s| s == 'Three'})
+    assert_true(combo.each_string.none? { |s| s == 'Four'})
+    assert_equal('BREAK', combo.each_string { |_| break 'BREAK' })
+  end
+
 end
 
 class CheckBoxTests < WxRuby::Test::GUITests
@@ -439,3 +480,39 @@ class GaugeTests < WxRuby::Test::GUITests
     assert_equal(100, gauge.value)
   end
 end
+
+class StaticBoxTests < WxRuby::Test::GUITests
+
+  def setup
+    super
+    @box = nil
+  end
+
+  def cleanup
+    @box.destroy if @box
+    super
+  end
+
+  attr_reader :box
+
+  def test_basic
+    @box = Wx::StaticBox.new(frame_win, label: 'Box')
+
+    txt = Wx::StaticText.new(box, Wx::ID_ANY, "This window is a child of the staticbox")
+    assert_equal(box, txt.parent)
+  end
+
+  unless Wx::PLATFORM == 'WXOSX'
+
+  def test_label_window
+    check = Wx::CheckBox.new(frame_win, Wx::ID_ANY, 'Enable')
+    @box = Wx::StaticBox.new(frame_win, label: check)
+
+    button = Wx::Button.new(box, label: 'Button')
+    box.enable(false)
+    assert_false(button.is_enabled)
+  end
+
+  end
+
+end

data/tests/test_styled_text_ctrl.rb

@@ -0,0 +1,46 @@
+# Copyright (c) 2023 M.J.N. Corino, The Netherlands
+#
+# This software is released under the MIT license.
+
+require_relative './lib/wxframe_runner'
+
+class StyledTextCtrlTests < WxRuby::Test::GUITests
+
+  def setup
+    super
+    @text = Wx::STC::StyledTextCtrl.new(frame_win, name: 'StyledText')
+  end
+
+  def cleanup
+    @text.destroy
+    super
+  end
+
+  attr_reader :text
+
+  def test_text
+    assert_equal('', text.get_value)
+  end
+
+  def test_enumerate_lines
+    text.write_text <<~__HEREDOC
+      This is line 1.
+      This is line 2.
+      This is line 3.
+      __HEREDOC
+    assert_equal(4, text.get_number_of_lines)
+    text.each_line.each_with_index do |txt, lnr|
+      if lnr < 3
+        assert("This is line #{lnr+1}.", txt)
+      else
+        assert('', txt)
+      end
+    end
+    txt = text.each_line { |l| break l if l.index('2')}
+    assert_equal('This is line 2.', txt)
+    line_enum = text.each_line
+    txt = line_enum.detect { |l| l.index('3') }
+    assert_equal('This is line 3.', txt)
+  end
+
+end

data/tests/test_tree_ctrl.rb

@@ -0,0 +1,138 @@
+# Copyright (c) 2023 M.J.N. Corino, The Netherlands
+#
+# This software is released under the MIT license.
+
+require_relative './lib/wxframe_runner'
+
+class TreeCtrlTests < WxRuby::Test::GUITests
+
+  def setup
+    super
+    @tree = Wx::TreeCtrl.new(frame_win, name: 'TreeCtrl')
+  end
+
+  def cleanup
+    @tree.destroy
+    super
+  end
+
+  attr_reader :tree
+
+  def tog_style(flag)
+    style = tree.get_window_style ^ flag
+
+    if Wx.has_feature?(:WXMSW)
+      # treectrl styles can't be changed on the fly using the native
+      # control and the tree must be recreated
+      tree.destroy
+      @tree = Wx::TreeCtrl.new(frame_win, style: style, name: 'TreeCtrl')
+    else
+      tree.set_window_style(style)
+    end
+  end
+  private :tog_style
+
+  ITEMS = [
+     ['Cat1', [
+      'Item1.1',
+      'Item1.2',
+      'Item1.3'
+      ]
+     ],
+     ['Cat2', [
+       ['Cat2.1', %w[Item2.1.1 Item2.1.2] ],
+      'Item2.2',
+      'Item2.3'
+      ]
+     ],
+    'Item3',
+    'Item4'
+  ]
+
+  def add_tree_items(parent, items)
+    items.each do |itm|
+      if ::Array === itm
+        cat = tree.append_item(parent, itm.first.to_s)
+        add_tree_items(cat, itm.last)
+      else
+        tree.append_item(parent, itm.to_s)
+      end
+    end
+  end
+  private :add_tree_items
+
+  def build_tree
+    root = tree.add_root('root')
+    add_tree_items(root, ITEMS)
+  end
+  private :build_tree
+
+  def test_tree
+    build_tree
+
+    assert_equal(4, tree.get_item_children(tree.get_root_item).size)
+    cat1 = tree.get_item_children(tree.get_root_item)[0]
+    assert_equal(3, tree.get_item_children(cat1).size)
+    cat2 = tree.get_item_children(tree.get_root_item)[1]
+    assert_equal(3, tree.get_item_children(cat2).size)
+    cat21 = tree.get_item_children(cat2)[0]
+    assert_equal(2, tree.get_item_children(cat21).size)
+  end
+
+  def test_hidden_root
+    tog_style(Wx::TR_HIDE_ROOT)
+    build_tree
+
+    assert_equal(4, tree.get_root_items.size)
+    cat1 = tree.get_root_items[0]
+    assert_equal(3, tree.get_item_children(cat1).size)
+    cat2 = tree.get_root_items[1]
+    assert_equal(3, tree.get_item_children(cat2).size)
+    cat21 = tree.get_item_children(cat2)[0]
+    assert_equal(2, tree.get_item_children(cat21).size)
+  end
+
+  def test_enumerable
+    build_tree
+
+    item211 = tree.detect { |itmid| tree.item_text(itmid) == 'Item2.1.1'}
+    assert_not_nil(item211)
+    assert_true(item211.ok?)
+  end
+
+  def test_enumerate
+    build_tree
+
+    tree.each_item_child(tree.get_root_item) do |itmid|
+      if tree.item_text(itmid) == 'Cat2'
+        tree.each_item_child(itmid) do |sub_itmid|
+          if tree.item_text(sub_itmid) == 'Cat2.1'
+            new_itm = tree.append_item(sub_itmid, 'Another Item')
+            assert_not_nil(new_itm)
+            assert_true(new_itm.ok?)
+          end
+        end
+      end
+    end
+    assert_equal(4, tree.get_item_children(tree.get_root_item).size)
+    cat1 = tree.get_item_children(tree.get_root_item)[0]
+    assert_equal(3, tree.get_item_children(cat1).size)
+    cat2 = tree.get_item_children(tree.get_root_item)[1]
+    assert_equal(3, tree.get_item_children(cat2).size)
+    cat21 = tree.get_item_children(cat2)[0]
+    assert_equal(3, tree.get_item_children(cat21).size)
+  end
+
+  def test_enumerator
+    build_tree
+
+    root_enum = tree.each_item_child(tree.get_root_item)
+    assert_kind_of(::Enumerator, root_enum)
+    cat2 = root_enum.detect { |itmid| tree.item_text(itmid) == 'Cat2' }
+    assert_not_nil(cat2)
+    assert_true(cat2.ok?)
+    cat2_enum = tree.each_item_child(cat2)
+    assert_equal(3, cat2_enum.to_a.size)
+  end
+
+end

data/tests/test_window.rb

@@ -229,6 +229,18 @@ class WindowTests < WxRuby::Test::GUITests
     assert_equal(child1, window.find_window_by_id(Wx::ID_HIGHEST + 1))
     assert_equal(child1, window.find_window_by_name("child1"))
 
+    child1 = Wx::Window.new(window, Wx::ID_HIGHEST + 2)
+
+    children = window.get_children
+    window.each_child do |child|
+      assert_equal(child, children.shift)
+    end
+
+    children = window.get_children
+    enum = window.each_child
+    assert_equal(children.first, enum.find { |c| c.get_id == Wx::ID_HIGHEST + 1})
+    assert_equal(children.last, enum.find { |c| c.get_id == Wx::ID_HIGHEST + 2})
+
     window.destroy_children
 
     assert_equal(0, window.get_children.count)

data/tests/testapp_noframe.rb

@@ -21,7 +21,7 @@ class TestApp < Test::Unit::TestCase
     o = AppReturnsFalseFromInit.new
     o.run
     assert(o.did_call_on_init, "didn't call on_init?")
-    assert_equal("wxruby", o.the_app_name)
+    assert_equal("testapp_noframe", o.the_app_name)
   end
   
 end