wxruby3 0.9.0.pre.beta.8

data/samples/splash/splash.rb

@@ -0,0 +1,164 @@
+#!/usr/bin/env ruby
+# Copyright (c) M.J.N. Corino, The Netherlands
+###
+
+require 'wx'
+
+class MyFrame < Wx::Frame
+  def initialize(title)
+    # The main application frame has no parent (nil)
+    super(nil, :title => title, :size => [ 400, 300 ])
+
+    @isPda = (Wx::SystemSettings.get_screen_type <= Wx::SYS_SCREEN_PDA)
+
+    # Give the frame an icon. PNG is a good choice of format for
+    # cross-platform images. Note that OS X doesn't have "Frame" icons.
+    icon_file = File.join(__dir__,'..', 'art', "wxruby.png")
+    self.icon = Wx::Icon.new(icon_file)
+
+    menu_bar = Wx::MenuBar.new
+    # The "file" menu
+    menu_file = Wx::Menu.new
+    # Using Wx::ID_EXIT standard id means the menu item will be given
+    # the right label for the platform and language, and placed in the
+    # correct platform-specific menu - eg on OS X, in the Application's menu
+    menu_file.append(Wx::ID_EXIT, "E&xit\tAlt-X", "Quit this program")
+    menu_bar.append(menu_file, "&File")
+
+    # The "help" menu
+    menu_help = Wx::Menu.new
+    menu_help.append(Wx::ID_ABOUT, "&About...\tF1", "Show about dialog")
+    menu_bar.append(menu_help, "&Help")
+
+    # Assign the menubar to this frame
+    self.menu_bar = menu_bar
+
+    # Create a status bar at the bottom of the frame
+    create_status_bar(2)
+    self.status_text = "Welcome to wxRuby!"
+
+    # Set it up to handle menu events using the relevant methods.
+    evt_menu Wx::ID_EXIT, :on_quit
+    evt_menu Wx::ID_ABOUT, :on_about
+  end
+
+  # End the application; it should finish automatically when the last
+  # window is closed.
+  def on_quit
+    close(true)
+  end
+
+  def on_about
+    bitmap = Wx::Bitmap.new(File.join(__dir__, @isPda ? 'mobile.xpm' : 'splash.png'))
+
+    if bitmap.ok?
+      image = bitmap.convert_to_image
+
+      # do not scale on already small screens
+      image.rescale(bitmap.width/2, bitmap.height/2) unless @isPda
+
+      bitmap = Wx::Bitmap.new(image)
+
+      splash = Wx::SplashScreen.new(bitmap,
+                                    Wx::SPLASH_CENTRE_ON_PARENT | Wx::SPLASH_NO_TIMEOUT,
+                          0, self,
+                                    style: Wx::SIMPLE_BORDER|Wx::STAY_ON_TOP)
+
+      win = splash.get_splash_window
+      text = Wx::StaticText.new(win,
+                                id: Wx::ID_EXIT,
+                                label: "click somewhere\non this image",
+                                pos: [@isPda ? 0 : 13, @isPda ? 0 : 11])
+      text.set_background_colour(Wx::WHITE)
+      text.set_foreground_colour(Wx::BLACK)
+      font = text.font
+      font.set_fractional_point_size(2.0*font.get_fractional_point_size/3.0)
+      text.font = font
+    end
+  end
+
+end
+
+class SplashApp < Wx::App
+
+  def on_init
+    # create the main application window
+    frame = MyFrame.new('Wx::SplashScreen sample application')
+
+    bitmap = Wx::Bitmap.new(File.join(__dir__, @isPda ? 'mobile.xpm' : 'splash.png'))
+
+    if bitmap.ok?
+      # we can even draw dynamic artwork onto our splashscreen
+      decorate_splash_screen(bitmap)
+
+      # show the splashscreen
+      Wx::SplashScreen.new(bitmap,
+                           Wx::SPLASH_CENTRE_ON_SCREEN|Wx::SPLASH_TIMEOUT,
+                 6000, frame,
+                           style: Wx::SIMPLE_BORDER|Wx::STAY_ON_TOP)
+    end
+
+    self.yield
+
+    # and show it (the frames, unlike simple controls, are not shown when
+    # created initially)
+    frame.show(true)
+
+    # success: the app will enter the main message
+    # loop and the application will run. If we returned false here, the
+    # application would exit immediately.
+    true
+  end
+
+  def decorate_splash_screen(bmp)
+    # use a memory DC to draw directly onto the bitmap
+    bmp.draw do |memDc|
+      # draw an orange box (with black outline) at the bottom of the splashscreen.
+      # this box will be 8% of the height of the bitmap, and be at the bottom.
+      bannerRect = Wx::Rect.new(Wx::Point.new(0, ((bmp.height / 10)*9.2).to_i),
+                                Wx::Point.new(bmp.width, bmp.height))
+      memDc.with_brush Wx::Brush.new(Wx::Colour.new(255, 102, 0)) do
+        memDc.draw_rectangle(bannerRect)
+        memDc.draw_line(bannerRect.top_left, bannerRect.top_right)
+
+        # dynamically get the wxWidgets version to display
+        description = "wxRuby %s" % Wx::WXRUBY_VERSION
+        # create a copyright notice that uses the year that this file is run
+        copyrightLabel = "%s%s wxWidgets. %s" % ["\xc2\xa9", Time.now.year.to_s, "All rights reserved."]
+
+        # draw the (white) labels inside of our orange box (at the bottom of the splashscreen)
+        memDc.set_text_foreground(Wx::WHITE)
+        # draw the "wxRuby" label on the left side, vertically centered.
+        # note that we deflate the banner rect a little bit horizontally
+        # so that the text has some padding to its left.
+        labelRect = bannerRect.deflate([5, 0])
+        memDc.draw_label(description, labelRect, Wx::ALIGN_CENTRE_VERTICAL | Wx::ALIGN_LEFT)
+
+        # draw the copyright label on the right side
+        memDc.font = Wx::FontInfo.new(8)
+        memDc.draw_label(copyrightLabel, labelRect, Wx::ALIGN_CENTRE_VERTICAL | Wx::ALIGN_RIGHT)
+      end
+    end
+  end
+
+end
+
+module SplashSample
+
+  include WxRuby::Sample if defined? WxRuby::Sample
+
+  def self.describe
+    { file: __FILE__,
+      summary: 'wxRuby SplashScreen example.',
+      description: 'wxRuby example showcasing Wx::SplashScreen.' }
+  end
+
+  def self.run
+    execute(__FILE__)
+  end
+
+  if $0 == __FILE__
+    SplashApp.run
+  end
+
+end

data/samples/text/mondrian.xpm

@@ -0,0 +1,44 @@
+/* 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 ++++ ",
+"                                "
+};

data/samples/text/rich_textctrl.rb

@@ -0,0 +1,326 @@
+#!/usr/bin/env ruby
+# wxRuby2 Sample Code. Copyright (c) 2004-2008 wxRuby development team
+# Adapted for wxRuby3
+# Copyright (c) M.J.N. Corino, The Netherlands
+###
+
+require 'wx'
+
+# RichTextCtrl sample by Chauk-Mean Proum
+#
+# RichTextCtrl is a sophisticated styled text editing component.
+# This sample illustrates a basic but functional rich editor featuring :
+# - file loading/saving
+# - text formatting
+# - change undo/redo
+# - selection copy/cut and clipboard paste
+# - font preferences
+# RichTextCtrl supports numerous other text characteristics (colour, super/subscript),
+# as well as paragraph alignment and spacing, and bullets.
+# It permits named text styles to be created and organised in stylesheets.
+# Facilities are also provided for printing.
+#
+# Icons are taken from the Tango Icon Theme.
+# Disabled icons are created at runtime as darkened grayscale versions.
+
+class RichTextFrame < Wx::Frame
+
+  def initialize
+    super( nil, :title => "RichTextCtrl Sample", :size => [900, 600] )
+
+    # Initialize the toolbar with standard actions
+    initialize_toolbar
+
+    @editor = Wx::RichTextCtrl.new(self, :style => Wx::WANTS_CHARS)
+
+    @editor.begin_text_colour(Wx::RICHTEXT_DEFAULT_FOCUS_RECT_COLOUR)
+
+    # Add extra handlers (plain text is automatically added)
+    # @editor.buffer.add_handler(Wx::RichTextXMLHandler.new)
+    # @editor.buffer.add_handler(Wx::RichTextHTMLHandler.new)
+    Wx::RichTextBuffer.add_handler(Wx::RichTextXMLHandler.new)
+    Wx::RichTextBuffer.add_handler(Wx::RichTextHTMLHandler.new)
+    file_wildcard = "Text File (*.txt)|*.txt|XML File (*.xml)|*.xml"
+    @file_open_wildcard = file_wildcard + "|All Supported File (*.*)|*.*"
+    @file_save_wildcard = file_wildcard + "|HTML File (*.html)|*.html"
+
+    @cur_dir = Dir.getwd
+    @cur_file = ""
+    @cur_filter_index = 1 # XML file
+
+    # Use the system's standard sans-serif font at 18 point
+    @editor.font = Wx::Font.new( 18, 
+                                 Wx::FONTFAMILY_SWISS,
+                                 Wx::FONTSTYLE_NORMAL,
+                                 Wx::FONTWEIGHT_NORMAL )
+
+    initialize_text
+
+    # -- For complex event handling, use of a method call --
+    evt_tool Wx::ID_OPEN, :open_file
+    evt_tool Wx::ID_SAVE, :save_file
+    evt_tool Wx::ID_PREFERENCES, :select_font
+
+    # -- For simple event handling, use of a code block --
+
+    # Apply / unapply bold to selection
+    evt_tool(Wx::ID_BOLD) do
+      @editor.apply_bold_to_selection
+    end
+
+    # Keep the pressed / unpressed state of the button in sync with the
+    # current selection in the text ctrl
+    evt_update_ui(Wx::ID_BOLD) do |evt|
+      evt.check(@editor.selection_bold?)
+    end
+
+    evt_tool(Wx::ID_ITALIC) do
+      @editor.apply_italic_to_selection
+    end
+
+    evt_update_ui(Wx::ID_ITALIC) do |evt|
+      evt.check(@editor.selection_italics?)
+    end
+
+    evt_tool(Wx::ID_UNDERLINE) do
+      @editor.apply_underline_to_selection
+    end
+
+    evt_update_ui(Wx::ID_UNDERLINE) do |evt|
+      evt.check(@editor.selection_underlined?)
+    end
+
+    evt_tool(Wx::ID_UNDO) do
+      @editor.undo
+    end
+
+    evt_update_ui(Wx::ID_UNDO) do |evt|
+      evt.enable(@editor.can_undo?)
+    end
+
+    evt_tool(Wx::ID_REDO) do
+      @editor.redo
+    end
+
+    evt_update_ui(Wx::ID_REDO) do |evt|
+      evt.enable(@editor.can_redo?)
+    end
+
+    evt_tool(Wx::ID_COPY) do
+      @editor.copy
+    end
+
+    evt_update_ui(Wx::ID_COPY) do |evt|
+      evt.enable(@editor.can_copy?)
+    end
+
+    evt_tool(Wx::ID_CUT) do
+      @editor.cut
+    end
+
+    evt_update_ui(Wx::ID_CUT) do |evt|
+      evt.enable(@editor.can_cut?)
+    end
+
+    evt_tool(Wx::ID_PASTE) do
+#      @editor.apply_bold_to_selection if @editor.selection_bold?
+#      @editor.apply_italic_to_selection if @editor.selection_italics?
+#      @editor.apply_underline_to_selection if @editor.selection_underlined?
+      @editor.paste
+    end
+
+    evt_update_ui(Wx::ID_PASTE) do |evt|
+      evt.enable(@editor.can_paste?)
+    end
+    # Shortcut keys for the editor
+    accel_keys = { "Z" => Wx::ID_UNDO,
+                   "Y" => Wx::ID_REDO,
+                   "C" => Wx::ID_COPY,
+                   "X" => Wx::ID_CUT,
+                   "V" => Wx::ID_PASTE }
+    accel_table = accel_keys.keys.map do | key | 
+      [ Wx::MOD_CMD, key, accel_keys[key] ]
+    end
+
+    @editor.accelerator_table = Wx::AcceleratorTable[ *accel_table ]
+  end
+
+
+  # Return bitmaps corresponding to the specified PNG filename :
+  # - the first one is the original version (e.g. for an enabled icon)
+  # - the second one is a darkened grayscale version (e.g. for a disabled icon)
+  def bitmaps_from_png(filename, greyscale = true)
+    img_file = File.join( File.dirname(__FILE__), filename)
+    normal_bmp = Wx::Bitmap.new(img_file, Wx::BITMAP_TYPE_PNG)
+    if greyscale
+      greyscale_img = normal_bmp.convert_to_image.convert_to_greyscale(0.2, 0.2, 0.2)
+      greyscale_bmp = Wx::Bitmap.from_image(greyscale_img)
+      return normal_bmp, greyscale_bmp
+    else
+      normal_bmp
+    end
+  end
+
+
+  # Return a new bitmap corresponding to the specified PNG filename
+  def bitmap_from_png(filename)
+    bitmaps_from_png(filename, false)
+  end
+
+
+  # Initialize the toolbar
+  #
+  # As the toolbar contains only standard actions, use of stock/builtin IDs
+  # to avoid keeping references to each tool item.
+  def initialize_toolbar
+    toolbar = create_tool_bar( Wx::TB_HORIZONTAL|Wx::NO_BORDER|
+                               Wx::TB_FLAT|Wx::TB_TEXT )
+    toolbar.tool_bitmap_size = [ 32, 32 ]
+
+    open_bmp = bitmap_from_png("document-open.png")
+    toolbar.add_item(open_bmp, :id => Wx::ID_OPEN,
+      :label => "Open", :short_help => "Open file")
+
+    save_bmp = bitmap_from_png("document-save.png")
+    toolbar.add_item(save_bmp, :id => Wx::ID_SAVE,
+      :label => "Save", :short_help => "Save file")
+
+    font_bmp = bitmap_from_png("preferences-desktop-font.png")
+    toolbar.add_item(font_bmp, :id => Wx::ID_PREFERENCES,
+      :label => "Font", :short_help => "Select font preferences")
+
+    toolbar.add_separator
+
+    copy_bmp, copy_disabled_bmp = bitmaps_from_png("edit-copy.png")
+    toolbar.add_item(copy_bmp, copy_disabled_bmp, :id => Wx::ID_COPY,
+      :label => "Copy", :short_help => "Copy selection (CMD+C)")
+
+    cut_bmp, cut_disabled_bmp = bitmaps_from_png("edit-cut.png")
+    toolbar.add_item(cut_bmp, cut_disabled_bmp, :id => Wx::ID_CUT,
+      :label => "Cut", :short_help => "Cut selection (CMD+X)")
+
+    paste_bmp, paste_disabled_bmp = bitmaps_from_png("edit-paste.png")
+    toolbar.add_item(paste_bmp, paste_disabled_bmp, :id => Wx::ID_PASTE,
+      :label => "Paste", :short_help => "Paste clipboard (CMD+V)")
+
+    undo_bmp, undo_disabled_bmp = bitmaps_from_png("edit-undo.png")
+    toolbar.add_item(undo_bmp, undo_disabled_bmp, :id => Wx::ID_UNDO,
+      :label => "Undo", :short_help => "Undo change (CMD+Z)")
+
+    redo_bmp, redo_disabled_bmp = bitmaps_from_png("edit-redo.png")
+    toolbar.add_item(redo_bmp, redo_disabled_bmp, :id => Wx::ID_REDO,
+      :label => "Redo", :short_help => "Redo change (CMD+Y)")
+
+    toolbar.add_separator
+
+    bold_bmp = bitmap_from_png("format-text-bold.png")
+    toolbar.add_item(bold_bmp, :id => Wx::ID_BOLD, :kind => Wx::ITEM_CHECK,
+      :label => "Bold", :short_help => "Apply bold")
+
+    italic_bmp = bitmap_from_png("format-text-italic.png")
+    toolbar.add_item(italic_bmp, :id => Wx::ID_ITALIC, :kind => Wx::ITEM_CHECK,
+      :label => "Italic", :short_help => "Apply italic")
+
+    underline_bmp = bitmap_from_png("format-text-underline.png")
+    toolbar.add_item(underline_bmp, :id => Wx::ID_UNDERLINE, :kind => Wx::ITEM_CHECK,
+      :label => "Underline", :short_help => "Apply underline")
+    
+    toolbar.realize
+  end
+
+  def initialize_text
+    @editor.begin_suppress_undo
+    @editor.begin_bold
+    @editor.write_text "Simple RichTextCtrl sample"
+    @editor.end_bold
+    @editor.newline
+    @editor.begin_italic
+    @editor.write_text "Use the formatting buttons then type some text or "
+    @editor.write_text "select some text and use the buttons to apply the formatting.\n"
+    @editor.write_text "Save as an XML file in order to keep the text formatting.\n"
+    @editor.end_italic
+    @editor.newline
+    @editor.end_suppress_undo
+  end
+
+  def select_font
+    data = Wx::FontData.new
+    data.initial_font = @editor.font
+#    data.enable_effects(false)
+
+    Wx::FontDialog(self, data) do |dlg|
+      if dlg.show_modal == Wx::ID_OK
+        data = dlg.font_data
+        @editor.font = data.chosen_font
+      end
+    end
+  end
+
+  def open_file
+    Wx::FileDialog(self, "Open file", @cur_dir, @cur_file, @file_open_wildcard, Wx::FD_OPEN) do |dlg|
+      dlg.filter_index = @cur_filter_index
+      if dlg.show_modal == Wx::ID_OK
+        @editor.load_file(dlg.path, Wx::RICHTEXT_TYPE_ANY)
+        update_from_file dlg
+      end
+    end
+  end
+
+  def save_file
+    Wx::FileDialog(self, "Save file as...", @cur_dir, @cur_file, @file_save_wildcard, Wx::FD_SAVE) do |dlg|
+      dlg.filter_index = @cur_filter_index
+      if dlg.show_modal == Wx::ID_OK
+        @editor.save_file(dlg.path, Wx::RICHTEXT_TYPE_ANY)
+        update_from_file dlg
+      end
+    end
+  end
+
+  # Update current file parameters
+  def update_from_file dlg
+    @cur_dir = dlg.directory
+    @cur_file = dlg.filename
+    @cur_filter_index = dlg.filter_index
+    self.title = "RichTextCtrl Sample - #{@cur_file}"
+  end
+end
+
+module RichTextSample
+
+  include WxRuby::Sample if defined? WxRuby::Sample
+
+  def self.describe
+    { file: __FILE__,
+      summary: 'wxRuby RichTextCtrl example.',
+      description: <<~__TXT 
+        wxRuby example displaying a frame window showcasing a RichTextCtrl.
+        RichTextCtrl is a sophisticated styled text editing component.
+        This sample illustrates a basic but functional rich editor featuring :
+        - file loading/saving
+        - text formatting
+        - change undo/redo
+        - selection copy/cut and clipboard paste
+        - font preferences
+        RichTextCtrl supports numerous other text characteristics (colour, super/subscript),
+        as well as paragraph alignment and spacing, and bullets.
+        It permits named text styles to be created and organised in stylesheets.
+        Facilities are also provided for printing.
+      __TXT
+    }
+  end
+
+  def self.activate
+    frame = RichTextFrame.new
+    frame.centre
+    frame.show
+    frame
+  end
+
+  if $0 == __FILE__
+    Wx::App.run do
+      self.app_name = 'RichTextCtrl sample'
+      RichTextSample.activate
+    end
+  end
+
+end