wxruby3 0.9.0.pre.rc.2-x64-mingw-ucrt → 0.9.0-x64-mingw-ucrt

data/tests/test_config.rb

@@ -0,0 +1,150 @@
+# Copyright (c) 2023 M.J.N. Corino, The Netherlands
+#
+# This software is released under the MIT license.
+
+require_relative './lib/wxapp_runner'
+
+class TestConfig < Test::Unit::TestCase
+
+  DEMO_CONFIG = {
+    'RootEntry1' => 'This is a string value',
+    'RootEntry2' => true,
+    'RootEntry3' => 101,
+    'RootEntry4' => 3.14,
+    'Group1' => {
+      'Group1Entry' => 'Group1 string',
+      'Group1.1' => {
+        'Group1.1Integer' => 999,
+        'Group1.1Bignum' => 2**999,
+        'Group1.1Float' => (2**999)-0.1
+      }
+    },
+    'Group2' => {
+      'Group2.1' => {
+        'Group2.1.1' => {
+          'String' => 'hello'
+        },
+        'Group2.1.2' => {
+          'String' => 'world'
+        },
+        'Group2.1.3' => {
+          'True' => true,
+          'False' => false
+        }
+      }
+    }
+  }
+
+  def run_config_tests(cfg)
+    assert_equal(DEMO_CONFIG, cfg.to_h)
+
+    assert_equal(4, cfg.number_of_entries)
+    assert_equal(2, cfg.number_of_groups)
+    assert_equal(12, cfg.number_of_entries(recurse: true))
+    assert_equal(7, cfg.number_of_groups(recurse: true))
+
+    assert_true(cfg.has_entry?('/RootEntry2'))
+    assert_true(cfg.has_entry?('/Group1/Group1Entry'))
+    assert_true(cfg.has_entry?('/Group2/Group2.1/Group2.1.2/String'))
+
+    assert_false(cfg.has_entry?('/Group2/Group2.2/Group2.1.2/String'))
+
+    assert_true(cfg.has_group?('/Group2'))
+    assert_true(cfg.has_group?('/Group1/Group1.1'))
+    assert_true(cfg.has_group?('/Group2/Group2.1/Group2.1.2'))
+
+    assert_false(cfg.has_group?('/Group2/Group2.1/Group2.1.2/String'))
+
+    grp = cfg['/Group1/Group1.1']
+
+    assert_equal(DEMO_CONFIG['Group1']['Group1.1'], grp.to_h)
+
+    assert_equal(3, grp.number_of_entries)
+    assert_equal(0, grp.number_of_groups)
+
+    assert_true(grp.has_entry?('Group1.1Integer'))
+    assert_false(grp.has_entry?('Group1Entry'))
+    assert_true(grp.has_entry?('../Group1Entry'))
+
+    assert_true(grp.has_group?('/Group2/Group2.1/Group2.1.2'))
+
+    assert_equal('This is a string value', cfg['/RootEntry1'])
+    assert_equal(true, cfg['/RootEntry2'])
+    assert_equal(101, cfg['/RootEntry3'])
+    assert_equal(3.14, cfg['/RootEntry4'])
+
+    grp = cfg['/Group2/Group2.1/Group2.1.3']
+    assert_true(grp.get('True'))
+    assert_false(grp.get('False'))
+    assert_nil(grp.get('../Group2.1.2/String'))
+
+    assert_true(grp['True'])
+    assert_false(grp['False'])
+    assert_equal('world', grp['../Group2.1.2/String'])
+
+    cfg.set('RootEntry1', 'Altered string value')
+    assert_equal('Altered string value', cfg['RootEntry1'])
+    assert_equal('Altered string value', cfg['/RootEntry1'])
+    assert_equal('Altered string value', cfg.get('RootEntry1'))
+
+    cfg.set('RootEntry3', cfg.get('RootEntry3')+99)
+    assert_equal(200, cfg['/RootEntry3'])
+
+    cfg.set('Group1', { 'Group1.2' => { 'Integer' => 777 }})
+    assert_equal(777, cfg['/Group1/Group1.2/Integer'])
+
+    cfg['/Group1/Group1.2/Integer'] = 666
+    assert_equal(666, cfg['/Group1/Group1.2'].get('Integer'))
+
+    cfg['/Group1/Group1.2'] = { 'Float' => 0.3330 }
+    assert_equal(0.3330, cfg['/Group1/Group1.2'].get('Float'))
+  end
+
+  def test_basic
+    cfg = Wx::Config.new(DEMO_CONFIG)
+
+    run_config_tests(cfg)
+  end
+
+  def test_global
+    cfg = Wx::ConfigBase.create
+
+    cfg.replace(DEMO_CONFIG)
+
+    assert_equal(DEMO_CONFIG, cfg.to_h)
+    assert_equal(DEMO_CONFIG, Wx::ConfigBase.get(false).to_h)
+    assert_equal(cfg, Wx::ConfigBase.get(false))
+
+    run_config_tests(cfg)
+
+    cfg_old = Wx::ConfigBase.set(nil)
+
+    assert_equal(cfg, cfg_old)
+    assert_nil(Wx::ConfigBase.get(false))
+  end
+
+  def test_html_help
+    cfg = Wx::ConfigBase.create
+
+    assert_true(cfg.to_h.empty?)
+
+    hlp_ctrl = Wx::HTML::HtmlHelpController.new
+    hlp_ctrl.display_index # forces help window creation which in turn enables config reading/writing
+
+    hlp_cfg = Wx::Config.new({'htmlHelp' => {'hcNavigPanel' => true, 'hcSashPos' => 333, 'hcBaseFontSize' => 20}})
+    hlp_ctrl.read_customization(hlp_cfg, 'htmlHelp')
+    hlp_ctrl.write_customization(hlp_cfg, 'htmlHelpCopy')
+
+    assert_true(hlp_cfg['/htmlHelp/hcNavigPanel'])
+    assert_equal(333, hlp_cfg['/htmlHelp/hcSashPos'])
+
+    assert_true(hlp_cfg['/htmlHelpCopy/hcNavigPanel'])
+    assert_equal(333, hlp_cfg['/htmlHelpCopy/hcSashPos'])
+
+    assert_true(hlp_cfg.has_entry?('/htmlHelpCopy/hcX'))
+    assert_true(hlp_cfg.has_entry?('/htmlHelpCopy/hcY'))
+    assert_true(hlp_cfg.has_entry?('/htmlHelpCopy/hcW'))
+    assert_true(hlp_cfg.has_entry?('/htmlHelpCopy/hcH'))
+  end
+
+end

data/tests/test_dc.rb

@@ -1,3 +1,6 @@
+# Copyright (c) 2023 M.J.N. Corino, The Netherlands
+#
+# This software is released under the MIT license.
 
 require_relative './lib/wxapp_runner'
 

data/tests/test_dialog.rb

@@ -1,3 +1,6 @@
+# Copyright (c) 2023 M.J.N. Corino, The Netherlands
+#
+# This software is released under the MIT license.
 
 require_relative './lib/wxapp_runner'
 

data/tests/test_event_handling.rb

@@ -1,3 +1,6 @@
+# Copyright (c) 2023 M.J.N. Corino, The Netherlands
+#
+# This software is released under the MIT license.
 
 require_relative './lib/wxapp_runner'
 

data/tests/test_events.rb

@@ -1,3 +1,6 @@
+# Copyright (c) 2023 M.J.N. Corino, The Netherlands
+#
+# This software is released under the MIT license.
 
 require_relative './lib/wxapp_runner'
 

data/tests/test_ext_controls.rb

@@ -1,3 +1,6 @@
+# Copyright (c) 2023 M.J.N. Corino, The Netherlands
+#
+# This software is released under the MIT license.
 
 require_relative './lib/wxframe_runner'
 require_relative './lib/text_entry_tests'
@@ -8,13 +11,11 @@ class SearchCtrlTests < WxRuby::Test::GUITests
 
   def setup
     super
-    @search = Wx::SearchCtrl.new(test_frame, name: 'SearchCtrl')
-    Wx.get_app.yield
+    @search = Wx::SearchCtrl.new(frame_win, name: 'SearchCtrl')
   end
 
   def cleanup
     @search.destroy
-    Wx.get_app.yield
     super
   end
 
@@ -26,3 +27,285 @@ class SearchCtrlTests < WxRuby::Test::GUITests
   end
 
 end
+
+class CalendarCtrlTests < WxRuby::Test::GUITests
+
+  def setup
+    super
+    @cal = Wx::CalendarCtrl.new(frame_win, name: 'Calendar')
+  end
+
+  def cleanup
+    @cal.destroy
+    super
+  end
+
+  attr_reader :cal
+
+  def test_date
+    now = Time.now
+    dt = cal.get_date
+    assert_not_nil(dt)
+    assert((dt.to_i - now.to_i) < 10) # should only be a fraction of a second
+
+    now = Time.now
+    assert_nothing_raised { cal.set_date(Wx::DEFAULT_DATE_TIME) }
+    now = Time.now
+    dt = cal.get_date
+    assert_not_nil(dt)
+    assert((dt.to_i - now.to_i) < 10) # should only be a fraction of a second
+  end
+
+end
+
+class HyperlinkCtrlTests < WxRuby::Test::GUITests
+
+  def setup
+    super
+    @link = Wx::HyperlinkCtrl.new(frame_win, label: 'Hyperlink', url: 'https://mcorino.github.io/wxRuby3/Wx/HyperlinkCtrl.html', name: 'Hyperlink')
+  end
+
+  def cleanup
+    @link.destroy
+    super
+  end
+
+  attr_reader :link
+
+  def test_link
+    assert_equal('https://mcorino.github.io/wxRuby3/Wx/HyperlinkCtrl.html', link.get_url)
+  end
+
+end
+
+class BannerWindowTests < WxRuby::Test::GUITests
+
+  def setup
+    super
+    @banner = Wx::BannerWindow.new(frame_win, dir: Wx::Direction::TOP)
+  end
+
+  def cleanup
+    @banner.destroy
+    super
+  end
+
+  attr_reader :banner
+
+  def test_link
+    assert_nothing_raised { banner.bitmap = Wx.Bitmap(:sample3) }
+    assert_nothing_raised { banner.set_text('BannerWindow Test', 'Welcome to the BannerWindow test.') }
+  end
+
+end
+
+class InfoBarTests < WxRuby::Test::GUITests
+
+  def setup
+    super
+    @info = Wx::InfoBar.new(frame_win)
+  end
+
+  def cleanup
+    @info.destroy
+    super
+  end
+
+  attr_reader :info
+
+  def test_link
+    assert_nothing_raised { info.show_message('Welcome to the InfoBar test.') }
+    assert_nothing_raised { info.add_button(Wx::ID_HIGHEST+1000, 'Button1') }
+    assert_equal(1, info.button_count)
+    assert_equal(Wx::ID_HIGHEST+1000, info.button_id(0))
+    assert_true(info.has_button_id?(Wx::ID_HIGHEST+1000))
+  end
+
+end
+
+class CommandLinkButtonTests < WxRuby::Test::GUITests
+
+  def setup
+    super
+    @button = Wx::CommandLinkButton.new(frame_win, mainLabel: 'CommandLinkButton', note: 'Testing CommandLinkButton')
+  end
+
+  def cleanup
+    @button.destroy
+    super
+  end
+
+  attr_reader :button
+
+  def test_button
+    assert_equal('CommandLinkButton', button.main_label)
+    assert_equal('Testing CommandLinkButton', button.note)
+    button.label = 'button label'
+    assert_equal('button label', button.label)
+  end
+
+  if has_ui_simulator?
+
+    def test_click
+      count = count_events(button, :evt_button) do
+        sim = get_ui_simulator
+
+        # We move in to the middle of the widget, we need to yield
+        # after every Wx::UIActionSimulator action to keep everything working in GTK
+        sim.mouse_move(button.get_screen_position + (button.size / 2))
+
+        sim.mouse_click
+      end
+
+      assert_equal(1, count)
+    end
+
+    def test_disabled
+      button.disable
+      count = count_events(button, :evt_button) do
+        sim = get_ui_simulator
+
+        # We move in to the middle of the widget, we need to yield
+        # after every Wx::UIActionSimulator action to keep everything working in GTK
+        sim.mouse_move(button.get_screen_position + (button.size / 2))
+
+        sim.mouse_click
+      end
+
+      assert_equal(0, count)
+    end
+
+  end # has_ui_simulator?
+
+end
+
+class SpinCtrlTests < WxRuby::Test::GUITests
+
+  def setup
+    super
+    @spin = Wx::SpinCtrl.new(frame_win, name: 'SpinCtrl')
+  end
+
+  def cleanup
+    @spin.destroy
+    super
+  end
+
+  attr_reader :spin
+
+  def test_spin_control
+    assert_equal(0, spin.min)
+    assert_equal(100, spin.max)
+  end
+
+  if has_ui_simulator?
+
+    def test_arrows
+      spin.set_value(0)
+      spin.set_focus
+      Wx.get_app.yield
+      count = count_events(spin, :evt_spinctrl) do
+        sim = get_ui_simulator
+
+        sim.key_down(Wx::KeyCode::K_UP)
+        sim.key_up(Wx::KeyCode::K_UP)
+      end
+      assert_equal(1, count)
+      assert_equal(1, spin.value)
+    end
+
+  end
+
+end
+
+class SpinCtrlDoubleTests < WxRuby::Test::GUITests
+
+  def setup
+    super
+    @spin = Wx::SpinCtrlDouble.new(frame_win, name: 'SpinCtrlDouble')
+  end
+
+  def cleanup
+    @spin.destroy
+    super
+  end
+
+  attr_reader :spin
+
+  def test_spin_control
+    assert_equal(0.0, spin.min)
+    assert_equal(100.0, spin.max)
+    assert_equal(1.0, spin.increment)
+    spin.set_digits(10)
+    assert_equal(10, spin.digits)
+  end
+
+  if has_ui_simulator?
+
+    def test_arrows
+      spin.set_value(0.0)
+      spin.set_focus
+      Wx.get_app.yield
+      count = count_events(spin, :evt_spinctrldouble) do
+        sim = get_ui_simulator
+
+        sim.key_down(Wx::KeyCode::K_UP)
+        sim.key_up(Wx::KeyCode::K_UP)
+      end
+      assert_equal(1, count)
+      assert_equal(1.0, spin.value)
+    end
+
+  end
+
+end
+
+class RearrangeListTests < WxRuby::Test::GUITests
+
+  def setup
+    super
+    @list = Wx::RearrangeList.new(frame_win, items: %w[first second third], order: [~1, ~2, 0])
+  end
+
+  def cleanup
+    @list.destroy
+    super
+  end
+
+  attr_reader :list
+
+  def test_rearrange_list
+    assert_equal([~1, ~2, 0], list.get_current_order)
+    list.set_focus
+    list.set_selection(0)
+    Wx.get_app.yield
+    assert_true(list.move_current_down)
+    assert_equal([~2, ~1, 0], list.get_current_order)
+  end
+
+end
+
+class RearrangeCtrlTests < WxRuby::Test::GUITests
+
+  def setup
+    super
+    @ra_ctrl = Wx::RearrangeCtrl.new(frame_win, items: %w[first second third], order: [~1, ~2, 0])
+  end
+
+  def cleanup
+    @ra_ctrl.destroy
+    super
+  end
+
+  attr_reader :ra_ctrl
+
+  def test_rearrange_ctrl
+    assert_equal([~1, ~2, 0], ra_ctrl.list.get_current_order)
+    ra_ctrl.set_focus
+    ra_ctrl.list.set_selection(0)
+    Wx.get_app.yield
+    assert_true(ra_ctrl.list.move_current_down)
+    assert_equal([~2, ~1, 0], ra_ctrl.list.get_current_order)
+  end
+
+end

data/tests/test_file_dialog.rb

@@ -0,0 +1,55 @@
+# Copyright (c) 2023 M.J.N. Corino, The Netherlands
+#
+# This software is released under the MIT license.
+
+require_relative './lib/wxapp_runner'
+
+class FileDialogTests < Test::Unit::TestCase
+
+  def dialog_tester(dlg, rc=Wx::ID_OK)
+    if Wx::PLATFORM == 'WXGTK'
+      timer = Wx::Timer.new(dlg)
+      dlg.evt_timer(timer) { dlg.end_modal(rc) }
+      timer.start_once(2000)
+      dlg.show_modal
+    else
+      rc
+    end
+  end
+
+  def test_file_dialog
+    dlg = Wx::FileDialog.new(nil, 'Select file')
+    assert_kind_of(Wx::FileDialog, dlg)
+    assert_kind_of(Wx::Dialog, dlg)
+    assert_kind_of(Wx::Window, dlg)
+    assert_equal(Wx::ID_OK, dialog_tester(dlg))
+  end
+
+  class FileDialogTestCustomization < Wx::FileDialogCustomizeHook
+
+    def initialize
+      super
+      @hooked = Wx::PLATFORM != 'WXGTK'
+    end
+
+    attr_reader :hooked
+
+    def add_custom_controls(customizer)
+      @hooked = true
+      btn_ctrl = customizer.add_button('Custom Button')
+    end
+
+  end
+
+  def test_customized_file_dialog
+    dlg = Wx::FileDialog.new(nil, 'Select file')
+    hook = FileDialogTestCustomization.new
+    dlg.set_customize_hook(hook)
+    GC.start
+    assert_equal(Wx::ID_OK, dialog_tester(dlg))
+    GC.start
+    assert_true(hook.hooked)
+    GC.start
+  end
+
+end

data/tests/test_font.rb

@@ -1,3 +1,6 @@
+# Copyright (c) 2023 M.J.N. Corino, The Netherlands
+#
+# This software is released under the MIT license.
 
 require_relative './lib/wxapp_runner'
 
@@ -224,11 +227,11 @@ class FontTests < Test::Unit::TestCase
 
       puts "Font from font list: #{font1.get_native_font_info_user_desc}" unless is_ci_build?
 
-      if pt_sz.is_a?(Wx::Size)
-        assert(pt_sz.y >= font1.get_pixel_size.y)
-      else
-        assert_equal(pt_sz, font1.get_fractional_point_size) unless is_ci_build?
-      end
+      # if pt_sz.is_a?(Wx::Size)
+      #   assert(pt_sz.y >= font1.get_pixel_size.y)
+      # else
+      #   assert_equal(pt_sz, font1.get_fractional_point_size) unless is_ci_build?
+      # end
 
       # font 2 should be font1 from the font list "cache"
       font2 = Wx::TheFontList.find_or_create_font(info)

data/tests/test_gdi_object.rb

@@ -1,3 +1,6 @@
+# Copyright (c) 2023 M.J.N. Corino, The Netherlands
+#
+# This software is released under the MIT license.
 
 require_relative './lib/wxapp_runner'
 

data/tests/test_geometry.rb

@@ -1,3 +1,7 @@
+# Copyright (c) 2023 M.J.N. Corino, The Netherlands
+#
+# This software is released under the MIT license.
+
 require 'test/unit'
 require 'wx'