wxruby3 0.9.2-x64-mingw-ucrt → 0.9.4-x64-mingw-ucrt

data/samples/bigdemo/wxToolBar.rbw

@@ -1,131 +0,0 @@
-#!/usr/bin/env ruby
-# wxRuby2 Sample Code. Copyright (c) 2004-2008 wxRuby development team
-# Freely reusable code: see SAMPLES-LICENSE.TXT for details
-begin
-  require 'rubygems' 
-rescue LoadError
-end
-require 'wx'
-
-
-
-class TestToolBar < Wx::Frame
-    # returns a Bitmap icon object
-    def xpm_bitmap(base_name)
-
-      xpm_file = File.join( File.dirname(__FILE__), 'icons', base_name )
-      Wx::Bitmap.new(xpm_file, Wx::BITMAP_TYPE_XPM)
-    end
-
-    def initialize(parent, log)
-        super(parent, -1, "Test ToolBar", Wx::DEFAULT_POSITION, Wx::Size.new(500,300))
-        @log = log
-        @timer = nil
-        evt_close {|event| on_close_window(event)}
-        
-        Wx::Window.new(self, -1).set_background_colour(Wx::WHITE)
-        
-        tb = create_tool_bar(Wx::TB_HORIZONTAL | Wx::NO_BORDER | Wx::TB_FLAT | Wx::TB_TEXT)
-        
-        create_status_bar
-        tb.add_tool(10, "New", xpm_bitmap('new.xpm'), "Long help for New")
-        evt_tool(10) {|event| on_tool_click(event)}
-        evt_tool_rclicked(10) {|event| on_tool_rclick(event)}
-        
-        tb.add_tool(20, "Open", xpm_bitmap('open.xpm'), "Long help for Open")
-        evt_tool(20) {|event| on_tool_click(event)}
-        evt_tool_rclicked(20) {|event| on_tool_rclick(event)}
-        
-        tb.add_separator
-        
-        tb.add_tool(30, "Copy", xpm_bitmap('copy.xpm'), "Long help for Copy")
-        evt_tool(30) {|event| on_tool_click(event)}
-        evt_tool_rclicked(30) {|event| on_tool_rclick(event)}
-        
-        tb.add_tool(40, "Paste", xpm_bitmap('paste.xpm'), "Long help for Paste")
-        evt_tool(40) {|event| on_tool_click(event)}
-        evt_tool_rclicked(40) {|event| on_tool_rclick(event)}
-        
-        tb.add_separator
-        
-        tb.add_check_tool(50, "", xpm_bitmap('tog1.xpm'),
-                          Wx::NULL_BITMAP, "Toggle this")
-        evt_tool(50) {|event| on_tool_click(event)}
-        
-        evt_tool_enter(-1) {|event| on_tool_enter(event)}
-        evt_tool_rclicked(-1) {|event| on_tool_rclick(event)}
-        evt_timer(5000) {|event| on_clear_sb(event)}
-        
-        tb.add_separator
-        cbID = 5000
-        choices = ["", "This", "is a", "wxComboBox"] 
-        
-        tb.add_control(Wx::ComboBox.new(tb, cbID, "", Wx::DEFAULT_POSITION, Wx::Size.new(150,-1), choices, 
-                        Wx::CB_DROPDOWN))
-        evt_combobox(cbID) {|event| on_combo(event)}
-        tb.add_control(Wx::TextCtrl.new(tb, -1, "ToolBar controls!!", Wx::DEFAULT_POSITION, Wx::Size.new(150,-1)))
-        
-        tb.realize
-    end
-    
-    def on_tool_click(event)
-        @log.write_text("tool " + event.get_id.to_s + " clicked")
-        tb = get_tool_bar
-        tb.enable_tool(10, tb.get_tool_enabled(10) ? false : true)
-    end
-    
-    def on_tool_rclick(event)
-        @log.write_text("tool " + event.get_id.to_s + " right-clicked")
-    end
-    
-    def on_combo(event)
-        @log.write_text("combobox item selected " + event.get_string)
-    end
-    
-    def on_tool_enter(event)
-        @log.write_text("on_tool_enter: " + event.get_id.to_s + ", " + event.get_int.to_s)
-        if @timer == nil
-            @timer = Wx::Timer.new(self, 5000)
-        end
-        if @timer != nil
-            @timer.stop
-        end
-        @timer.start(2000)
-        @timer.stop
-        @timer.start(2000)
-        event.skip
-    end
-    
-    def on_clear_sb(event) # called for the timer event handler
-        set_status_text("")
-        @timer.stop
-        @timer = nil
-    end
-    
-    def on_close_window(event)
-        if @timer != nil
-            @timer.stop
-            @timer = nil
-        end     
-        destroy
-    end
-end
-
-module Demo
-    def Demo.run(frame,nb,log)
-        win = TestToolBar.new(frame, log)
-        frame.otherWin = win
-        win.show
-    end
-    
-    def Demo.overview
-        "A toolbar is that familiar little rectangular strip below the menubar that hosts various 'buttons', which are usually shortcuts to menu commands."
-    end
-end
-
-
-if __FILE__ == $0
-  run_solo_lib = File.join( File.dirname(__FILE__), 'run.rb')
-  load run_solo_lib
-  run File.basename($0)
-end

data/samples/bigdemo/wxTreeCtrl.rbw

@@ -1,191 +0,0 @@
-#!/usr/bin/env ruby
-# wxRuby2 Sample Code. Copyright (c) 2004-2008 wxRuby development team
-# Freely reusable code: see SAMPLES-LICENSE.TXT for details
-begin
-  require 'rubygems' 
-rescue LoadError
-end
-require 'wx'
-
-
-
-class MyTreeCtrl < Wx::TreeCtrl
-    def initialize(parent, id, pos, size, style, log)
-        super(parent,id,pos,size,style)
-        @log = log
-        
-        evt_left_dclick {|event| on_left_dclick(event)}
-        evt_right_down {|event| on_right_click(event)}
-        evt_right_up {|event| on_right_up(event)}
-    end
-    
-    def on_left_dclick(event)
-        pt = Wx::Point.new(event.get_x, event.get_y)
-        
-    end
-    
-    def on_right_click(event)
-        pt = Wx::Point.new(event.get_x, event.get_y)
-        id = hit_test(pt)
-        if id
-            @log.write_text("on_right_click: ")# + @tree.get_item_text(id))
-        end
-    end
-    
-    def on_right_up(event)
-        pt = Wx::Point.new(event.get_x, event.get_y)
-        id = hit_test(pt)
-        if id
-            @log.write_text("on_right_up: ")#+ @tree.get_item_text(id) + " (manually starting label edit)")
-        end
-    end
-    
-    def on_compare_items(item1, item2)
-        t1 = get_item_text(item1)
-        t2 = get_item_text(item2)
-        @log.write_text('compare: ' + t1 + ' <> ' + t2)
-        if t1 < t2 then return -1 end
-        if t1 == t2 then return 0 end
-        return 1
-    end
-end
-
-class TestTreeCtrlPanel < Wx::Panel
-    def initialize(parent, log)
-        # Use the WANTS_CHARS style so the panel doesn't eat the Return key
-        super(parent, -1, Wx::DEFAULT_POSITION, Wx::DEFAULT_SIZE, Wx::WANTS_CHARS)
-        evt_size {|event| on_size(event)}
-        
-        @log = log
-        tID = 5000
-        
-        @tree = MyTreeCtrl.new(self, tID, Wx::DEFAULT_POSITION, Wx::DEFAULT_SIZE, Wx::TR_HAS_BUTTONS | Wx::TR_EDIT_LABELS, @log)
-        
-        isz = Wx::Size.new(16,16)
-        il = Wx::ImageList.new(16,16)
-        bm = Wx::Bitmap.new
-        bm.copy_from_icon(Wx::ArtProvider::get_icon(Wx::ART_FOLDER, Wx::ART_OTHER, isz))
-        fldridx = il.add(bm)
-        bm.copy_from_icon(Wx::ArtProvider::get_icon(Wx::ART_FILE_OPEN, Wx::ART_OTHER, isz))
-        fldropenidx = il.add(bm)
-        bm.copy_from_icon(Wx::ArtProvider::get_icon(Wx::ART_FILE_OPEN, Wx::ART_OTHER, isz))
-        fileidx = il.add(bm)
-        bmp_file = File.join(File.dirname(__FILE__), 'icons', 'wxwin16x16.xpm')
-        smileidx = il.add(Wx::Bitmap.new(bmp_file))
-        
-        @tree.set_image_list(il)
-        @il = il
-        
-        @root = @tree.add_root("The Root Item")
-        @tree.set_item_image(@root, fldridx, Wx::TreeItemIcon::TreeItemIcon_Normal)
-        @tree.set_item_image(@root, fldropenidx, Wx::TreeItemIcon::TreeItemIcon_Expanded)
-        0.upto(15) do |x|
-            child = @tree.append_item(@root, "Item " + x.to_s)
-            @tree.set_item_image(child, fldridx, Wx::TreeItemIcon::TreeItemIcon_Normal)
-            @tree.set_item_image(child, fldropenidx, Wx::TreeItemIcon::TreeItemIcon_Expanded)
-            character = "a"
-            0.upto(4) do |y|
-                last = @tree.append_item(child, "item " + x.to_s + "-" + character)
-                @tree.set_item_image(last, fldridx, Wx::TreeItemIcon::TreeItemIcon_Normal)
-                @tree.set_item_image(last, fldropenidx, Wx::TreeItemIcon::TreeItemIcon_Expanded)
-                0.upto(4) do |z|
-                    item = @tree.append_item(last, "item " + x.to_s + "-" + character + "-" + z.to_s)
-                    @tree.set_item_image(item, fileidx, Wx::TreeItemIcon::TreeItemIcon_Normal)
-                    @tree.set_item_image(item, smileidx, Wx::TreeItemIcon::TreeItemIcon_Selected)
-                end
-                character.succ!
-            end
-        end
-        
-        @tree.expand(@root)
-        evt_tree_item_expanded(tID) {|event| on_item_expanded(event)}
-        evt_tree_item_collapsed(tID) {|event| on_item_collapsed(event)}
-        evt_tree_sel_changed(tID) {|event| on_sel_changed(event)}
-        evt_tree_begin_label_edit(tID) {|event| on_begin_edit(event)}
-        evt_tree_end_label_edit(tID) {|event| on_end_edit(event)}
-        evt_tree_item_activated(tID) {|event| on_activate(event)}
-        
-        
-    end
-    
-    
-    def on_begin_edit(event)
-        @log.write_text("on_begin_edit")
-        # show how to prevent edit
-        if @tree.get_item_text(event.get_item) == "The Root Item"
-            @log.write_text("You can't edit this one...")
-        
-            # Let's just see what's visible of its children
-            cookie = 0
-            root = event.get_item
-            child, cookie = @tree.get_first_child(root)
-            while child != nil
-                @log.write_text("Child [" + @tree.get_item_text(child) + "] visible = " + @tree.is_visible(child).to_s)
-                child,cookie = @tree.get_next_child(root, cookie)
-            end
-            event.veto
-        end
-    end
-    
-    def on_end_edit(event)
-        @log.write_text("on_end_edit")
-        #show how to reject edit, we'll not allow any digits
-        nums = ("0".."9").to_a
-        x = event.get_label
-        x.each_byte do |byte|
-            if nums.include?(byte.chr)
-                @log.write_text("You can't enter digits...")
-                event.veto
-                return
-            end
-        end
-    end
-    
-    def on_size(event)
-        size = get_client_size
-        @tree.set_size(0,0,size.width, size.height)
-    end
-    
-    def on_item_expanded(event)
-        item = event.get_item
-        @log.write_text("on_item_expanded: " + @tree.get_item_text(item))
-    end
-    
-    def on_item_collapsed(event)
-        item = event.get_item
-        @log.write_text("on_item_collapsed: " + @tree.get_item_text(item))
-    end
-    
-    def on_sel_changed(event)
-        @item = event.get_item
-        if @item.ok?
-            @log.write_text("on_sel_changed: " + @tree.get_item_text(@item))
-            # if Wx::PLATFORM == "WXMSW"
-                #@log.write_text("BoundingRect: " + @tree.get_bounding_rect(@item))
-            #end
-        end
-        event.skip
-    end
-    
-    def on_activate(event)
-        @log.write_text("on_activate: " + @tree.get_item_text(@item))
-    end
-end
-
-module Demo
-    def Demo.run(frame, nb, log)
-        win = TestTreeCtrlPanel.new(nb, log)
-        return win
-    end
-
-    def Demo.overview
-        return ""
-    end
-end
-    
-
-if __FILE__ == $0
-  run_solo_lib = File.join( File.dirname(__FILE__), 'run.rb')
-  load run_solo_lib
-  run File.basename($0)
-end

data/samples/caret/caret.rb

@@ -1,298 +0,0 @@
-# Copyright (c) 2023 M.J.N. Corino, The Netherlands
-#
-# This software is released under the MIT license.
-# 
-# Some parts are
-# Copyright 2004-2007, wxRuby development team
-# released under the MIT-like wxRuby2 license
-
-# Adapted for wxRuby3
-###
-
-require 'wx'
-
-include Wx
-
-# menu items
-Caret_set_blink_time = 3
-Caret_Move = 4
-
-# controls start here (the numbers are, of course, arbitrary)
-Caret_Text = 1000
-
-
-# MyCanvas is a canvas on which you can type
-class MyCanvas < ScrolledWindow
-  def initialize(parent)
-    super(parent, :style => SUNKEN_BORDER)
-
-    self.background_colour = WHITE
-
-    @font = Font.new(12, FONTFAMILY_TELETYPE,
-                     FONTSTYLE_NORMAL, FONTWEIGHT_NORMAL)
-
-    @x_caret = @y_caret = @x_chars = @y_chars = 0
-    @x_margin = @y_margin = 5
-    @text = nil
-
-    create_caret
-
-    evt_paint :on_paint
-    evt_size :on_size
-    evt_char :on_char
-  end
-
-  def [](x,y)
-    @text[x + @x_chars * y,1]
-  end
-
-  def []=(x,y,z)
-    @text[x + @x_chars * y,1] = z
-  end
-
-  # caret movement
-  def home_pos
-    @x_caret = 0
-  end
-
-  def end_pos
-    @x_caret = @x_chars - 1
-  end
-
-  def first_line
-    @y_caret = 0
-  end
-
-  def last_line
-    @y_caret = @y_chars - 1
-  end
-
-  def prev_char
-    if @x_caret == 0
-      end_pos
-      prev_line
-    else
-      @x_caret -= 1
-    end
-  end
-
-  def next_char
-    @x_caret += 1
-    if @x_caret == @x_chars
-      home_pos
-      next_line
-    end
-  end
-
-  def prev_line
-    if @y_caret == 0
-      last_line
-    else
-      @y_caret -= 1
-    end
-  end
-
-  def next_line
-    @y_caret += 1
-    if @y_caret == @y_chars
-      first_line
-    end
-  end
-
-  def create_caret
-    paint do | dc |
-      dc.font = @font
-      @height_char = dc.char_height
-      @width_char = dc.char_width
-
-      my_caret = Caret.new(self, Size.new(@width_char, @height_char))
-      self.caret = my_caret
-
-      caret.move [ @x_margin, @y_margin ]
-      caret.show
-    end
-  end
-
-  def move_caret(x,y)
-    @x_caret = x
-    @y_caret = y
-
-    do_move_caret
-  end
-
-  def do_move_caret
-    log_status("Caret is at (%d, %d)", @x_caret, @y_caret)
-
-    caret.move( [@x_margin + @x_caret * @width_char,
-                 @y_margin + @y_caret * @height_char])
-  end
-
-  def on_size(event)
-    @x_chars = (event.size.width - 2 * @x_margin) / @width_char
-    @y_chars = (event.size.height - 2 * @y_margin) / @height_char
-    if @x_chars <= 0
-      @x_chars = 1
-    end
-    if @y_chars <= 0
-      @y_chars = 1
-    end
-    if @x_caret >= @x_chars
-      @x_caret = @x_chars-1
-    end
-    if @y_caret >= @y_chars
-      @y_caret = @y_chars-1
-    end
-
-    @text = " " * @x_chars * @y_chars
-
-    if parent && parent.status_bar
-      msg = sprintf("Panel size is (%d, %d)", @x_chars, @y_chars)
-      parent.set_status_text(msg, 1)
-      parent.refresh
-    end
-    event.skip
-  end
-
-  def on_paint
-    if caret
-      caret.hide
-    end
-
-    paint do | dc |
-      dc.clear
-      dc.set_font(@font)
-
-      for y in 0 ... @y_chars
-        line = @text[@x_chars * y,@x_chars]
-        dc.draw_text( line, @x_margin, @y_margin + y * @height_char )
-      end
-    end
-
-    if caret
-      caret.show
-    end
-  end
-
-  def on_char(event)
-    case event.key_code
-    when K_LEFT, K_BACK
-      prev_char
-    when K_RIGHT
-      next_char
-    when K_UP
-      prev_line
-    when K_DOWN
-      next_line
-    when K_HOME
-      home_pos
-    when K_END
-      end_pos
-    when K_RETURN
-      home_pos
-      next_line
-    else
-      ch = event.key_code
-      if !event.alt_down and (ch >= K_SPACE) and (ch < K_DELETE)
-        self[@x_caret, @y_caret] = ch.chr
-        refresh
-        next_char
-      else
-        event.skip
-      end
-    end
-    do_move_caret
-  end
-end
-
-class MyFrame < Frame
-  def initialize(title, pos, size)
-    super(nil, -1, title, pos, size)
-    # set the frame icon
-    icon_file = File.join(File.dirname(__FILE__), 'mondrian.xpm')
-    self.icon = Icon.new(icon_file, BITMAP_TYPE_XPM)
-
-    # create a menu bar
-    menu_file = Menu.new
-
-    menu_file.append(Caret_set_blink_time, "&Blink time...\tCtrl-B")
-    menu_file.append(Caret_Move, "&Move caret\tCtrl-C")
-    menu_file.append_separator
-    menu_file.append(Wx::ID_ABOUT, "&About...\tCtrl-A", "Show about dialog")
-    menu_file.append_separator
-    menu_file.append(Wx::ID_EXIT, "E&xit\tAlt-X", "Quit self program")
-
-    # now append the freshly created menu to the menu bar...
-    menu_bar = MenuBar.new
-    menu_bar.append(menu_file, "&File")
-
-    # ... and attach self menu bar to the frame
-    self.menu_bar = menu_bar
-
-    @canvas = MyCanvas.new(self)
-
-    # This is required to set focus so that key events are directed to
-    # this Window, on Linux/GTK in particular 
-    @canvas.set_focus
-
-    # create a status bar just for fun (by default with 1 pane only)
-    create_status_bar(2)
-    self.status_text = "Welcome to Windows!"
-
-    evt_menu Wx::ID_EXIT, :on_quit
-    evt_menu Wx::ID_ABOUT, :on_about
-    evt_menu Caret_set_blink_time, :on_set_blink_time
-    evt_menu Caret_Move, :on_caret_move
-  end
-  
-  def on_quit
-    # true is to force the frame to close
-    close(true)
-  end
-
-  def on_about
-    message_box("The caret Windows sample, adapted for WxRuby",
-                "About Caret", OK | ICON_INFORMATION, self)
-  end
-
-  def on_caret_move
-    @canvas.move_caret(10, 10)
-  end
-
-  def on_set_blink_time
-    blink_time = get_number_from_user(
-                   "The caret blink time is the time between two blinks",
-                   "Time in milliseconds:",
-                   "Caret sample",
-                   Caret::get_blink_time, 0, 10000,
-                   self)
-    if blink_time != -1
-      Caret::set_blink_time(blink_time)
-      @canvas.create_caret
-      log_status(self,"Blink time set to %d milliseconds.", blink_time)
-    end
-  end
-end
-
-module CaretSample
-
-  include WxRuby::Sample if defined? WxRuby::Sample
-
-  def self.describe
-    { file: __FILE__,
-      summary: 'wxRuby Caret example.',
-      description: 'wxRuby example demonstrating using and controlling a caret.' }
-  end
-
-  def self.run
-    execute(__FILE__)
-  end
-
-  if $0 == __FILE__
-    Wx::App.run do
-      frame = MyFrame.new("Caret Windows sample",
-                          Point.new(50, 50), Size.new(450, 340))
-      frame.show(true)
-    end
-  end
-
-end

data/samples/caret/mondrian.xpm

@@ -1,44 +0,0 @@
-/* XPM */
-static char *mondrian_xpm[] = {
-/* columns rows colors chars-per-pixel */
-"32 32 6 1",
-"  c Black",
-". c Blue",
-"X c #00bf00",
-"o c Red",
-"O c Yellow",
-"+ c Gray100",
-/* pixels */
-"                                ",
-" oooooo +++++++++++++++++++++++ ",
-" oooooo +++++++++++++++++++++++ ",
-" oooooo +++++++++++++++++++++++ ",
-" oooooo +++++++++++++++++++++++ ",
-" oooooo +++++++++++++++++++++++ ",
-" oooooo +++++++++++++++++++++++ ",
-" oooooo +++++++++++++++++++++++ ",
-"                                ",
-" ++++++ ++++++++++++++++++ .... ",
-" ++++++ ++++++++++++++++++ .... ",
-" ++++++ ++++++++++++++++++ .... ",
-" ++++++ ++++++++++++++++++ .... ",
-" ++++++ ++++++++++++++++++ .... ",
-" ++++++ ++++++++++++++++++      ",
-" ++++++ ++++++++++++++++++ ++++ ",
-" ++++++ ++++++++++++++++++ ++++ ",
-" ++++++ ++++++++++++++++++ ++++ ",
-" ++++++ ++++++++++++++++++ ++++ ",
-" ++++++ ++++++++++++++++++ ++++ ",
-" ++++++ ++++++++++++++++++ ++++ ",
-" ++++++ ++++++++++++++++++ ++++ ",
-" ++++++ ++++++++++++++++++ ++++ ",
-" ++++++ ++++++++++++++++++ ++++ ",
-" ++++++                    ++++ ",
-" ++++++ OOOOOOOOOOOO XXXXX ++++ ",
-" ++++++ OOOOOOOOOOOO XXXXX ++++ ",
-" ++++++ OOOOOOOOOOOO XXXXX ++++ ",
-" ++++++ OOOOOOOOOOOO XXXXX ++++ ",
-" ++++++ OOOOOOOOOOOO XXXXX ++++ ",
-" ++++++ OOOOOOOOOOOO XXXXX ++++ ",
-"                                "
-};