wxruby3 0.9.1 → 0.9.3

data/samples/text/richtext.rb

@@ -8,1747 +8,1751 @@
 require 'wx'
 require 'stringio'
 
-# A custom field type
-class RichTextFieldTypePropertiesTest < Wx::RTC::RichTextFieldTypeStandard
+module RichTextExt
 
-  def initialize(name, label_or_bmp, displayStyle = Wx::RTC::RICHTEXT_FIELD_STYLE_RECTANGLE)
-    super(name, label_or_bmp, displayStyle)
-  end
-
-  def can_edit_properties(_obj); true; end
+  # A custom field type
+  class RichTextFieldTypePropertiesTest < Wx::RTC::RichTextFieldTypeStandard
 
-  def edit_properties(_obj, _parent, _buffer)
-    label = get_label
-    Wx.message_box("Editing #{label}")
-    true
-  end
+    def initialize(name, label_or_bmp, displayStyle = Wx::RTC::RICHTEXT_FIELD_STYLE_RECTANGLE)
+      super(name, label_or_bmp, displayStyle)
+    end
 
-  def get_properties_menu_label(_obj)
-    get_label
-  end
+    def can_edit_properties(_obj); true; end
 
-end
+    def edit_properties(_obj, _parent, _buffer)
+      label = get_label
+      Wx.message_box("Editing #{label}")
+      true
+    end
 
-# A custom composite field type
-class RichTextFieldTypeCompositeTest < RichTextFieldTypePropertiesTest
+    def get_properties_menu_label(_obj)
+      get_label
+    end
 
-  def initialize(name, label)
-    super(name, label, Wx::RTC::RICHTEXT_FIELD_STYLE_COMPOSITE)
   end
 
-  def update_field(buffer, obj)
-    if buffer
-      attr = Wx::RTC::RichTextAttr.new(buffer.get_attributes)
-      attr.get_text_box_attr.reset
-      attr.set_paragraph_spacing_after(0)
-      attr.set_line_spacing(10)
-      obj.set_attributes(attr)
-    end
-    obj.delete_children
-    para = Wx::RTC::RichTextParagraph.new
-    text = Wx::RTC::RichTextPlainText.new(get_label)
-    para.append_child(text)
-    obj.append_child(para)
-    true
-  end
+  # A custom composite field type
+  class RichTextFieldTypeCompositeTest < RichTextFieldTypePropertiesTest
 
-end
+    def initialize(name, label)
+      super(name, label, Wx::RTC::RICHTEXT_FIELD_STYLE_COMPOSITE)
+    end
 
-# ----------------------------------------------------------------------------
-# private classes
-# ----------------------------------------------------------------------------
+    def update_field(buffer, obj)
+      if buffer
+        attr = Wx::RTC::RichTextAttr.new(buffer.get_attributes)
+        attr.get_text_box_attr.reset
+        attr.set_paragraph_spacing_after(0)
+        attr.set_line_spacing(10)
+        obj.set_attributes(attr)
+      end
+      obj.delete_children
+      para = Wx::RTC::RichTextParagraph.new
+      text = Wx::RTC::RichTextPlainText.new(get_label)
+      para.append_child(text)
+      obj.append_child(para)
+      true
+    end
 
+  end
 
-class RichTextEnhancedDrawingHandler < Wx::RTC::RichTextDrawingHandler
+  # ----------------------------------------------------------------------------
+  # private classes
+  # ----------------------------------------------------------------------------
 
-  def initialize(name = nil)
-    super("enhanceddrawing")
-    @lockBackgroundColour = Wx::Colour.new(220, 220, 220)
-  end
 
-  # Returns @true if this object has virtual attributes that we can provide.
-  def has_virtual_attributes(obj)
-    obj.get_properties.has_property("Lock")
-  end
+  class RichTextEnhancedDrawingHandler < Wx::RTC::RichTextDrawingHandler
 
-  # Provides virtual attributes that we can provide.
-  def get_virtual_attributes(attr, obj)
-    if obj.get_properties.has_property("Lock")
-      attr.set_background_colour(@lockBackgroundColour)
-      true
-    else
-      false
+    def initialize(name = nil)
+      super("enhanceddrawing")
+      @lockBackgroundColour = Wx::Colour.new(220, 220, 220)
     end
-  end
 
-  # Gets the count for mixed virtual attributes for individual positions within the object.
-  # For example, individual characters within a text object may require special highlighting.
-  def get_virtual_subobject_attributes_count(_obj); 0; end
+    # Returns @true if this object has virtual attributes that we can provide.
+    def has_virtual_attributes(obj)
+      obj.get_properties.has_property("Lock")
+    end
 
-  # Gets the mixed virtual attributes for individual positions within the object.
-  # For example, individual characters within a text object may require special highlighting.
-  # Returns the number of virtual attributes found.
-  def get_virtual_subobject_attributes(_obj, _positions, _attributes); 0; end
+    # Provides virtual attributes that we can provide.
+    def get_virtual_attributes(attr, obj)
+      if obj.get_properties.has_property("Lock")
+        attr.set_background_colour(@lockBackgroundColour)
+        true
+      else
+        false
+      end
+    end
 
-  # Do we have virtual text for this object? Virtual text allows an application
-  # to replace characters in an object for editing and display purposes, for example
-  # for highlighting special characters.
-  def has_virtual_text(_obj); false; end
+    # Gets the count for mixed virtual attributes for individual positions within the object.
+    # For example, individual characters within a text object may require special highlighting.
+    def get_virtual_subobject_attributes_count(_obj); 0; end
 
-  # Gets the virtual text for this object.
-  def get_virtual_text(_obj, _text); false; end
+    # Gets the mixed virtual attributes for individual positions within the object.
+    # For example, individual characters within a text object may require special highlighting.
+    # Returns the number of virtual attributes found.
+    def get_virtual_subobject_attributes(_obj, _positions, _attributes); 0; end
 
-end
+    # Do we have virtual text for this object? Virtual text allows an application
+    # to replace characters in an object for editing and display purposes, for example
+    # for highlighting special characters.
+    def has_virtual_text(_obj); false; end
 
-# Define a new application type, each program should derive a class from wxApp
-class MyRichTextCtrl < Wx::RTC::RichTextCtrl
+    # Gets the virtual text for this object.
+    def get_virtual_text(_obj, _text); false; end
 
-  def initialize(parent, id: Wx::ID_ANY, value: '', pos: Wx::DEFAULT_POSITION, size: Wx::DEFAULT_SIZE,
-                 style: Wx::RTC::RE_MULTILINE, validator: Wx::DEFAULT_VALIDATOR, name: 'myRichTextCtrl')
-    super(parent, id: id, value: value, pos: pos, size: size, style: style, validator: validator, name: name)
-    @lockId = 0
-    @locked = false
   end
 
-  attr_accessor :lockId
+  # Define a new application type, each program should derive a class from wxApp
+  class MyRichTextCtrl < Wx::RTC::RichTextCtrl
 
-  def begin_lock; @lockId += 1; @locked = true; end
-  def end_lock; @locked = false; end
-  def is_locked?; @locked; end
+    def initialize(parent, id: Wx::ID_ANY, value: '', pos: Wx::DEFAULT_POSITION, size: Wx::DEFAULT_SIZE,
+                   style: Wx::RTC::RE_MULTILINE, validator: Wx::DEFAULT_VALIDATOR, name: 'myRichTextCtrl')
+      super(parent, id: id, value: value, pos: pos, size: size, style: style, validator: validator, name: name)
+      @lockId = 0
+      @locked = false
+    end
 
-  def self.set_enhanced_drawing_handler
-    Wx::RTC::RichTextBuffer::add_drawing_handler(RichTextEnhancedDrawingHandler.new)
-  end
+    attr_accessor :lockId
+
+    def begin_lock; @lockId += 1; @locked = true; end
+    def end_lock; @locked = false; end
+    def is_locked?; @locked; end
+
+    def self.set_enhanced_drawing_handler
+      Wx::RTC::RichTextBuffer::add_drawing_handler(RichTextEnhancedDrawingHandler.new)
+    end
 
-  # Prepares the content just before insertion (or after buffer reset). Called by the same function in wxRichTextBuffer.
-  # Currently is only called if undo mode is on.
-  def prepare_content(container)
-    if is_locked?
-        # Lock all content that's about to be added to the control
-        container.get_children.each do |child|
-          if child.is_a?(Wx::RTC::RichTextParagraph)
-            child.get_children.each do |obj|
-              obj.get_properties.set_property("Lock", @lockId)
+    # Prepares the content just before insertion (or after buffer reset). Called by the same function in wxRichTextBuffer.
+    # Currently is only called if undo mode is on.
+    def prepare_content(container)
+      if is_locked?
+          # Lock all content that's about to be added to the control
+          container.get_children.each do |child|
+            if child.is_a?(Wx::RTC::RichTextParagraph)
+              child.get_children.each do |obj|
+                obj.get_properties.set_property("Lock", @lockId)
+              end
             end
           end
-        end
+      end
     end
-  end
 
-  # Can we delete this range?
-  # Sends an event to the control.
-  def can_delete_range(container, range)
-    Range.new(range.begin, range.end, true).each do |i|
-      obj = container.get_leaf_object_at_position(i)
-      return false if obj && obj.get_properties.has_property("Lock")
+    # Can we delete this range?
+    # Sends an event to the control.
+    def can_delete_range(container, range)
+      Range.new(range.begin, range.end, true).each do |i|
+        obj = container.get_leaf_object_at_position(i)
+        return false if obj && obj.get_properties.has_property("Lock")
+      end
+      true
     end
-    true
-  end
-
-  # Can we insert content at this position?
-  # Sends an event to the control.
-  def can_insert_content(container, pos)
-    child1 = container.get_leaf_object_at_position(pos)
-    child2 = container.get_leaf_object_at_position(pos-1)
 
-    lock1 = lock2 = -1
-
-    if child1 && child1.get_properties.has_property("Lock")
-      lock1 = child1.get_properties.get_property_long("Lock")
-    end
-    if child2 && child2.get_properties.has_property("Lock")
-      lock2 = child2.get_properties.get_property_long("Lock")
-    end
+    # Can we insert content at this position?
+    # Sends an event to the control.
+    def can_insert_content(container, pos)
+      child1 = container.get_leaf_object_at_position(pos)
+      child2 = container.get_leaf_object_at_position(pos-1)
 
-    return false if lock1 != -1 && lock1 == lock2
+      lock1 = lock2 = -1
 
-    # Don't allow insertion before a locked object if it's at the beginning of the buffer.
-    return false if pos == 0 && lock1 != -1
+      if child1 && child1.get_properties.has_property("Lock")
+        lock1 = child1.get_properties.get_property_long("Lock")
+      end
+      if child2 && child2.get_properties.has_property("Lock")
+        lock2 = child2.get_properties.get_property_long("Lock")
+      end
 
-    true
-  end
+      return false if lock1 != -1 && lock1 == lock2
 
-  # Finds a table,  either selected or near the cursor
-  def find_table
-    obj = find_current_position
+      # Don't allow insertion before a locked object if it's at the beginning of the buffer.
+      return false if pos == 0 && lock1 != -1
 
-    # It could be a table or a cell (or neither)
-    if obj.is_a?(Wx::RTC::RichTextTable)
-      return obj
+      true
     end
 
-    while obj
-      obj = obj.get_parent
+    # Finds a table,  either selected or near the cursor
+    def find_table
+      obj = find_current_position
+
+      # It could be a table or a cell (or neither)
       if obj.is_a?(Wx::RTC::RichTextTable)
         return obj
       end
-    end
 
-    nil
-  end
+      while obj
+        obj = obj.get_parent
+        if obj.is_a?(Wx::RTC::RichTextTable)
+          return obj
+        end
+      end
 
-  # Helper for FindTable()
-  def find_current_position
-    position = -1
+      nil
+    end
+
+    # Helper for FindTable()
+    def find_current_position
+      position = -1
 
-    if has_selection  # First see if there's a selection
-      range = get_selection_range
-      if (range.size-1) == 1
-        position = range.begin
+      if has_selection  # First see if there's a selection
+        range = get_selection_range
+        if (range.size-1) == 1
+          position = range.begin
+        end
       end
-    end
-    if position == -1  # Failing that, near cursor
-      position = get_adjusted_caret_position(get_caret_position)
+      if position == -1  # Failing that, near cursor
+        position = get_adjusted_caret_position(get_caret_position)
+      end
+
+      get_focus_object.get_leaf_object_at_position(position)
     end
 
-    get_focus_object.get_leaf_object_at_position(position)
   end
 
-end
+  # Define a new application type
+  class MyApp < Wx::App
 
-# Define a new application type
-class MyApp < Wx::App
+    def initialize
+      super
+      @styleSheet = nil
+      @printing =nil
+    end
 
-  def initialize
-    super
-    @styleSheet = nil
-    @printing =nil
-  end
+    # override base class virtuals
+    # ----------------------------
+
+    # this one is called on application startup and is a good place for the app
+    # initialization (doing it here and not in the ctor allows to have an error
+    # return: if on_init() returns false, the application terminates)
+    def on_init
 
-  # override base class virtuals
-  # ----------------------------
+      if Wx.has_feature?(:USE_HELP)
+        Wx::HelpProvider.set(Wx::SimpleHelpProvider.new)
+      end
 
-  # this one is called on application startup and is a good place for the app
-  # initialization (doing it here and not in the ctor allows to have an error
-  # return: if on_init() returns false, the application terminates)
-  def on_init
+      @styleSheet = Wx::RTC::RichTextStyleSheet.new
+      if Wx.has_feature?(:USE_PRINTING_ARCHITECTURE)
+        @printing = Wx::RTC::RichTextPrinting.new("Test Document")
 
-    if Wx.has_feature?(:USE_HELP)
-      Wx::HelpProvider.set(Wx::SimpleHelpProvider.new)
-    end
+        @printing.set_footer_text("@TITLE@", Wx::RTC::RICHTEXT_PAGE_ALL, Wx::RTC::RICHTEXT_PAGE_CENTRE)
+        @printing.set_footer_text("Page @PAGENUM@", Wx::RTC::RICHTEXT_PAGE_ALL, Wx::RTC::RICHTEXT_PAGE_RIGHT)
+      end
 
-    @styleSheet = Wx::RTC::RichTextStyleSheet.new
-    if Wx.has_feature?(:USE_PRINTING_ARCHITECTURE)
-      @printing = Wx::RTC::RichTextPrinting.new("Test Document")
+      create_styles
 
-      @printing.set_footer_text("@TITLE@", Wx::RTC::RICHTEXT_PAGE_ALL, Wx::RTC::RICHTEXT_PAGE_CENTRE)
-      @printing.set_footer_text("Page @PAGENUM@", Wx::RTC::RICHTEXT_PAGE_ALL, Wx::RTC::RICHTEXT_PAGE_RIGHT)
-    end
+      MyRichTextCtrl.set_enhanced_drawing_handler
 
-    create_styles
+      # Add extra handlers (plain text is automatically added)
+      Wx::RTC::RichTextBuffer.add_handler(Wx::RTC::RichTextXMLHandler.new)
+      Wx::RTC::RichTextBuffer.add_handler(Wx::RTC::RichTextHTMLHandler.new)
 
-    MyRichTextCtrl.set_enhanced_drawing_handler
+      # Add field types
 
-    # Add extra handlers (plain text is automatically added)
-    Wx::RTC::RichTextBuffer.add_handler(Wx::RTC::RichTextXMLHandler.new)
-    Wx::RTC::RichTextBuffer.add_handler(Wx::RTC::RichTextHTMLHandler.new)
+      Wx::RTC::RichTextBuffer.add_field_type(RichTextFieldTypePropertiesTest.new("rectangle", "RECTANGLE", Wx::RTC::RichTextFieldTypeStandard::RICHTEXT_FIELD_STYLE_RECTANGLE))
 
-    # Add field types
+      s1 = Wx::RTC::RichTextFieldTypeStandard.new("begin-section", "SECTION", Wx::RTC::RichTextFieldTypeStandard::RICHTEXT_FIELD_STYLE_START_TAG)
+      s1.set_background_colour(Wx::BLUE)
 
-    Wx::RTC::RichTextBuffer.add_field_type(RichTextFieldTypePropertiesTest.new("rectangle", "RECTANGLE", Wx::RTC::RichTextFieldTypeStandard::RICHTEXT_FIELD_STYLE_RECTANGLE))
+      s2 = Wx::RTC::RichTextFieldTypeStandard.new("end-section", "SECTION", Wx::RTC::RichTextFieldTypeStandard::RICHTEXT_FIELD_STYLE_END_TAG)
+      s2.set_background_colour(Wx::BLUE)
 
-    s1 = Wx::RTC::RichTextFieldTypeStandard.new("begin-section", "SECTION", Wx::RTC::RichTextFieldTypeStandard::RICHTEXT_FIELD_STYLE_START_TAG)
-    s1.set_background_colour(Wx::BLUE)
+      s3 = Wx::RTC::RichTextFieldTypeStandard.new("bitmap", Wx.Bitmap(:paste), Wx::RTC::RichTextFieldTypeStandard::RICHTEXT_FIELD_STYLE_NO_BORDER)
 
-    s2 = Wx::RTC::RichTextFieldTypeStandard.new("end-section", "SECTION", Wx::RTC::RichTextFieldTypeStandard::RICHTEXT_FIELD_STYLE_END_TAG)
-    s2.set_background_colour(Wx::BLUE)
+      Wx::RTC::RichTextBuffer.add_field_type(s1)
+      Wx::RTC::RichTextBuffer.add_field_type(s2)
+      Wx::RTC::RichTextBuffer.add_field_type(s3)
 
-    s3 = Wx::RTC::RichTextFieldTypeStandard.new("bitmap", Wx.Bitmap(:paste), Wx::RTC::RichTextFieldTypeStandard::RICHTEXT_FIELD_STYLE_NO_BORDER)
+      s4 = RichTextFieldTypeCompositeTest.new("composite", "This is a field value")
+      Wx::RTC::RichTextBuffer.add_field_type(s4)
 
-    Wx::RTC::RichTextBuffer.add_field_type(s1)
-    Wx::RTC::RichTextBuffer.add_field_type(s2)
-    Wx::RTC::RichTextBuffer.add_field_type(s3)
+      if Wx.has_feature? :USE_FILESYSTEM
+        Wx::FileSystem.add_handler(Wx::MemoryFSHandler.new)
+      end
 
-    s4 = RichTextFieldTypeCompositeTest.new("composite", "This is a field value")
-    Wx::RTC::RichTextBuffer.add_field_type(s4)
+      # create the main application window
+      size = Wx.get_display_size
+      size.scale(0.75, 0.75)
+      frame = MyFrame.new("Wx::RTC::RichTextCtrl Sample", size: size)
 
-    if Wx.has_feature? :USE_FILESYSTEM
-      Wx::FileSystem.add_handler(Wx::MemoryFSHandler.new)
-    end
+      if Wx.has_feature?(:USE_PRINTING_ARCHITECTURE)
+        @printing.set_parent_window(frame)
+      end
 
-    # create the main application window
-    size = Wx.get_display_size
-    size.scale(0.75, 0.75)
-    frame = MyFrame.new("Wx::RTC::RichTextCtrl Sample", size: size)
+      # and show it (the frames, unlike simple controls, are not shown when
+      # created initially)
+      frame.show(true)
 
-    if Wx.has_feature?(:USE_PRINTING_ARCHITECTURE)
-      @printing.set_parent_window(frame)
+      # success: wxApp::OnRun() will be called which will enter the main message
+      # loop and the application will run. If we returned false here, the
+      # application would exit immediately.
+      true
     end
 
-    # and show it (the frames, unlike simple controls, are not shown when
-    # created initially)
-    frame.show(true)
+    def create_styles
+      # Paragraph styles
+
+      romanFont = Wx::Font.new(Wx::FontInfo.new(12).family(Wx::FONTFAMILY_ROMAN))
+      swissFont = Wx::Font.new(Wx::FontInfo.new(12).family(Wx::FONTFAMILY_SWISS))
+
+      normalPara = Wx::RTC::RichTextParagraphStyleDefinition.new("Normal")
+      normalAttr = Wx::RTC::RichTextAttr.new
+      normalAttr.set_font_face_name(romanFont.get_face_name)
+      normalAttr.set_font_size(12)
+      # Let's set all attributes for this style
+      normalAttr.set_flags(Wx::TEXT_ATTR_FONT | Wx::TEXT_ATTR_BACKGROUND_COLOUR | Wx::TEXT_ATTR_TEXT_COLOUR|Wx::TEXT_ATTR_ALIGNMENT|Wx::TEXT_ATTR_LEFT_INDENT|Wx::TEXT_ATTR_RIGHT_INDENT|Wx::TEXT_ATTR_TABS|
+                              Wx::TEXT_ATTR_PARA_SPACING_BEFORE|Wx::TEXT_ATTR_PARA_SPACING_AFTER|Wx::TEXT_ATTR_LINE_SPACING|
+                              Wx::TEXT_ATTR_BULLET_STYLE|Wx::TEXT_ATTR_BULLET_NUMBER)
+      normalPara.set_style(normalAttr)
+
+      @styleSheet.add_paragraph_style(normalPara)
+
+      indentedPara = Wx::RTC::RichTextParagraphStyleDefinition.new("Indented")
+      indentedAttr = Wx::RTC::RichTextAttr.new
+      indentedAttr.set_font_face_name(romanFont.get_face_name)
+      indentedAttr.set_font_size(12)
+      indentedAttr.set_left_indent(100, 0)
+      # We only want to affect indentation
+      indentedAttr.set_flags(Wx::TEXT_ATTR_LEFT_INDENT|Wx::TEXT_ATTR_RIGHT_INDENT)
+      indentedPara.set_style(indentedAttr)
+
+      @styleSheet.add_paragraph_style(indentedPara)
+
+      indentedPara2 = Wx::RTC::RichTextParagraphStyleDefinition.new("Red Bold Indented")
+      indentedAttr2 = Wx::RTC::RichTextAttr.new
+      indentedAttr2.set_font_face_name(romanFont.get_face_name)
+      indentedAttr2.set_font_size(12)
+      indentedAttr2.set_font_weight(Wx::FONTWEIGHT_BOLD)
+      indentedAttr2.set_text_colour(Wx::RED)
+      indentedAttr2.set_font_size(12)
+      indentedAttr2.set_left_indent(100, 0)
+      # We want to affect indentation, font and text colour
+      indentedAttr2.set_flags(Wx::TEXT_ATTR_LEFT_INDENT|Wx::TEXT_ATTR_RIGHT_INDENT|Wx::TEXT_ATTR_FONT|Wx::TEXT_ATTR_TEXT_COLOUR)
+      indentedPara2.set_style(indentedAttr2)
+
+      @styleSheet.add_paragraph_style(indentedPara2)
+
+      flIndentedPara = Wx::RTC::RichTextParagraphStyleDefinition.new("First Line Indented")
+      flIndentedAttr = Wx::RTC::RichTextAttr.new
+      flIndentedAttr.set_font_face_name(swissFont.get_face_name)
+      flIndentedAttr.set_font_size(12)
+      flIndentedAttr.set_left_indent(100, -100)
+      # We only want to affect indentation
+      flIndentedAttr.set_flags(Wx::TEXT_ATTR_LEFT_INDENT|Wx::TEXT_ATTR_RIGHT_INDENT)
+      flIndentedPara.set_style(flIndentedAttr)
+
+      @styleSheet.add_paragraph_style(flIndentedPara)
+
+      # Character styles
+
+      boldDef = Wx::RTC::RichTextCharacterStyleDefinition.new("Bold")
+      boldAttr = Wx::RTC::RichTextAttr.new
+      boldAttr.set_font_face_name(romanFont.get_face_name)
+      boldAttr.set_font_size(12)
+      boldAttr.set_font_weight(Wx::FONTWEIGHT_BOLD)
+      # We only want to affect boldness
+      boldAttr.set_flags(Wx::TEXT_ATTR_FONT_WEIGHT)
+      boldDef.set_style(boldAttr)
+
+      @styleSheet.add_character_style(boldDef)
+
+      italicDef = Wx::RTC::RichTextCharacterStyleDefinition.new("Italic")
+      italicAttr = Wx::RTC::RichTextAttr.new
+      italicAttr.set_font_face_name(romanFont.get_face_name)
+      italicAttr.set_font_size(12)
+      italicAttr.set_font_style(Wx::FONTSTYLE_ITALIC)
+      # We only want to affect italics
+      italicAttr.set_flags(Wx::TEXT_ATTR_FONT_ITALIC)
+      italicDef.set_style(italicAttr)
+
+      @styleSheet.add_character_style(italicDef)
+
+      redDef = Wx::RTC::RichTextCharacterStyleDefinition.new("Red Bold")
+      redAttr = Wx::RTC::RichTextAttr.new
+      redAttr.set_font_face_name(romanFont.get_face_name)
+      redAttr.set_font_size(12)
+      redAttr.set_font_weight(Wx::FONTWEIGHT_BOLD)
+      redAttr.set_text_colour(Wx::RED)
+      # We only want to affect colour, weight and face
+      redAttr.set_flags(Wx::TEXT_ATTR_FONT_FACE|Wx::TEXT_ATTR_FONT_WEIGHT|Wx::TEXT_ATTR_TEXT_COLOUR)
+      redDef.set_style(redAttr)
+
+      @styleSheet.add_character_style(redDef)
+
+      bulletList = Wx::RTC::RichTextListStyleDefinition.new("Bullet List 1")
+      10.times do |i|
+        if i == 0
+          bulletText = "standard/circle"
+        elsif i == 1
+          bulletText = "standard/square"
+        elsif i == 2
+          bulletText = "standard/circle"
+        elsif i == 3
+          bulletText = "standard/square"
+        else
+          bulletText = "standard/circle"
+        end
+        bulletList.set_attributes(i, (i+1)*60, 60, Wx::TEXT_ATTR_BULLET_STYLE_STANDARD, bulletText)
+      end
 
-    # success: wxApp::OnRun() will be called which will enter the main message
-    # loop and the application will run. If we returned false here, the
-    # application would exit immediately.
-    true
-  end
+      @styleSheet.add_list_style(bulletList)
+
+      numberedList = Wx::RTC::RichTextListStyleDefinition.new("Numbered List 1")
+      10.times do |i|
+        if i == 0
+          numberStyle = Wx::TEXT_ATTR_BULLET_STYLE_ARABIC|Wx::TEXT_ATTR_BULLET_STYLE_PERIOD
+        elsif i == 1
+          numberStyle = Wx::TEXT_ATTR_BULLET_STYLE_LETTERS_LOWER|Wx::TEXT_ATTR_BULLET_STYLE_PARENTHESES
+        elsif i == 2
+          numberStyle = Wx::TEXT_ATTR_BULLET_STYLE_ROMAN_LOWER|Wx::TEXT_ATTR_BULLET_STYLE_PARENTHESES
+        elsif i == 3
+          numberStyle = Wx::TEXT_ATTR_BULLET_STYLE_ROMAN_UPPER|Wx::TEXT_ATTR_BULLET_STYLE_PARENTHESES
+        else
+          numberStyle = Wx::TEXT_ATTR_BULLET_STYLE_ARABIC|Wx::TEXT_ATTR_BULLET_STYLE_PERIOD
+        end
 
-  def create_styles
-    # Paragraph styles
-
-    romanFont = Wx::Font.new(Wx::FontInfo.new(12).family(Wx::FONTFAMILY_ROMAN))
-    swissFont = Wx::Font.new(Wx::FontInfo.new(12).family(Wx::FONTFAMILY_SWISS))
-
-    normalPara = Wx::RTC::RichTextParagraphStyleDefinition.new("Normal")
-    normalAttr = Wx::RTC::RichTextAttr.new
-    normalAttr.set_font_face_name(romanFont.get_face_name)
-    normalAttr.set_font_size(12)
-    # Let's set all attributes for this style
-    normalAttr.set_flags(Wx::TEXT_ATTR_FONT | Wx::TEXT_ATTR_BACKGROUND_COLOUR | Wx::TEXT_ATTR_TEXT_COLOUR|Wx::TEXT_ATTR_ALIGNMENT|Wx::TEXT_ATTR_LEFT_INDENT|Wx::TEXT_ATTR_RIGHT_INDENT|Wx::TEXT_ATTR_TABS|
-                            Wx::TEXT_ATTR_PARA_SPACING_BEFORE|Wx::TEXT_ATTR_PARA_SPACING_AFTER|Wx::TEXT_ATTR_LINE_SPACING|
-                            Wx::TEXT_ATTR_BULLET_STYLE|Wx::TEXT_ATTR_BULLET_NUMBER)
-    normalPara.set_style(normalAttr)
-
-    @styleSheet.add_paragraph_style(normalPara)
-
-    indentedPara = Wx::RTC::RichTextParagraphStyleDefinition.new("Indented")
-    indentedAttr = Wx::RTC::RichTextAttr.new
-    indentedAttr.set_font_face_name(romanFont.get_face_name)
-    indentedAttr.set_font_size(12)
-    indentedAttr.set_left_indent(100, 0)
-    # We only want to affect indentation
-    indentedAttr.set_flags(Wx::TEXT_ATTR_LEFT_INDENT|Wx::TEXT_ATTR_RIGHT_INDENT)
-    indentedPara.set_style(indentedAttr)
-
-    @styleSheet.add_paragraph_style(indentedPara)
-
-    indentedPara2 = Wx::RTC::RichTextParagraphStyleDefinition.new("Red Bold Indented")
-    indentedAttr2 = Wx::RTC::RichTextAttr.new
-    indentedAttr2.set_font_face_name(romanFont.get_face_name)
-    indentedAttr2.set_font_size(12)
-    indentedAttr2.set_font_weight(Wx::FONTWEIGHT_BOLD)
-    indentedAttr2.set_text_colour(Wx::RED)
-    indentedAttr2.set_font_size(12)
-    indentedAttr2.set_left_indent(100, 0)
-    # We want to affect indentation, font and text colour
-    indentedAttr2.set_flags(Wx::TEXT_ATTR_LEFT_INDENT|Wx::TEXT_ATTR_RIGHT_INDENT|Wx::TEXT_ATTR_FONT|Wx::TEXT_ATTR_TEXT_COLOUR)
-    indentedPara2.set_style(indentedAttr2)
-
-    @styleSheet.add_paragraph_style(indentedPara2)
-
-    flIndentedPara = Wx::RTC::RichTextParagraphStyleDefinition.new("First Line Indented")
-    flIndentedAttr = Wx::RTC::RichTextAttr.new
-    flIndentedAttr.set_font_face_name(swissFont.get_face_name)
-    flIndentedAttr.set_font_size(12)
-    flIndentedAttr.set_left_indent(100, -100)
-    # We only want to affect indentation
-    flIndentedAttr.set_flags(Wx::TEXT_ATTR_LEFT_INDENT|Wx::TEXT_ATTR_RIGHT_INDENT)
-    flIndentedPara.set_style(flIndentedAttr)
-
-    @styleSheet.add_paragraph_style(flIndentedPara)
-
-    # Character styles
-
-    boldDef = Wx::RTC::RichTextCharacterStyleDefinition.new("Bold")
-    boldAttr = Wx::RTC::RichTextAttr.new
-    boldAttr.set_font_face_name(romanFont.get_face_name)
-    boldAttr.set_font_size(12)
-    boldAttr.set_font_weight(Wx::FONTWEIGHT_BOLD)
-    # We only want to affect boldness
-    boldAttr.set_flags(Wx::TEXT_ATTR_FONT_WEIGHT)
-    boldDef.set_style(boldAttr)
-
-    @styleSheet.add_character_style(boldDef)
-
-    italicDef = Wx::RTC::RichTextCharacterStyleDefinition.new("Italic")
-    italicAttr = Wx::RTC::RichTextAttr.new
-    italicAttr.set_font_face_name(romanFont.get_face_name)
-    italicAttr.set_font_size(12)
-    italicAttr.set_font_style(Wx::FONTSTYLE_ITALIC)
-    # We only want to affect italics
-    italicAttr.set_flags(Wx::TEXT_ATTR_FONT_ITALIC)
-    italicDef.set_style(italicAttr)
-
-    @styleSheet.add_character_style(italicDef)
-
-    redDef = Wx::RTC::RichTextCharacterStyleDefinition.new("Red Bold")
-    redAttr = Wx::RTC::RichTextAttr.new
-    redAttr.set_font_face_name(romanFont.get_face_name)
-    redAttr.set_font_size(12)
-    redAttr.set_font_weight(Wx::FONTWEIGHT_BOLD)
-    redAttr.set_text_colour(Wx::RED)
-    # We only want to affect colour, weight and face
-    redAttr.set_flags(Wx::TEXT_ATTR_FONT_FACE|Wx::TEXT_ATTR_FONT_WEIGHT|Wx::TEXT_ATTR_TEXT_COLOUR)
-    redDef.set_style(redAttr)
-
-    @styleSheet.add_character_style(redDef)
-
-    bulletList = Wx::RTC::RichTextListStyleDefinition.new("Bullet List 1")
-    10.times do |i|
-      if i == 0
-        bulletText = "standard/circle"
-      elsif i == 1
-        bulletText = "standard/square"
-      elsif i == 2
-        bulletText = "standard/circle"
-      elsif i == 3
-        bulletText = "standard/square"
-      else
-        bulletText = "standard/circle"
+        numberStyle |= Wx::TEXT_ATTR_BULLET_STYLE_ALIGN_RIGHT
+
+        numberedList.set_attributes(i, (i+1)*60, 60, numberStyle)
       end
-      bulletList.set_attributes(i, (i+1)*60, 60, Wx::TEXT_ATTR_BULLET_STYLE_STANDARD, bulletText)
-    end
 
-    @styleSheet.add_list_style(bulletList)
+      @styleSheet.add_list_style(numberedList)
 
-    numberedList = Wx::RTC::RichTextListStyleDefinition.new("Numbered List 1")
-    10.times do |i|
-      if i == 0
-        numberStyle = Wx::TEXT_ATTR_BULLET_STYLE_ARABIC|Wx::TEXT_ATTR_BULLET_STYLE_PERIOD
-      elsif i == 1
-        numberStyle = Wx::TEXT_ATTR_BULLET_STYLE_LETTERS_LOWER|Wx::TEXT_ATTR_BULLET_STYLE_PARENTHESES
-      elsif i == 2
-        numberStyle = Wx::TEXT_ATTR_BULLET_STYLE_ROMAN_LOWER|Wx::TEXT_ATTR_BULLET_STYLE_PARENTHESES
-      elsif i == 3
-        numberStyle = Wx::TEXT_ATTR_BULLET_STYLE_ROMAN_UPPER|Wx::TEXT_ATTR_BULLET_STYLE_PARENTHESES
-      else
-        numberStyle = Wx::TEXT_ATTR_BULLET_STYLE_ARABIC|Wx::TEXT_ATTR_BULLET_STYLE_PERIOD
+      outlineList = Wx::RTC::RichTextListStyleDefinition.new("Outline List 1")
+      10.times do |i|
+        if i < 4
+          numberStyle = Wx::TEXT_ATTR_BULLET_STYLE_OUTLINE|Wx::TEXT_ATTR_BULLET_STYLE_PERIOD
+        else
+          numberStyle = Wx::TEXT_ATTR_BULLET_STYLE_ARABIC|Wx::TEXT_ATTR_BULLET_STYLE_PERIOD
+        end
+
+        outlineList.set_attributes(i, (i+1)*120, 120, numberStyle)
       end
 
-      numberStyle |= Wx::TEXT_ATTR_BULLET_STYLE_ALIGN_RIGHT
+      @styleSheet.add_list_style(outlineList)
+    end
 
-      numberedList.set_attributes(i, (i+1)*60, 60, numberStyle)
+    def get_style_sheet
+      @styleSheet
     end
 
-    @styleSheet.add_list_style(numberedList)
+    if Wx.has_feature?(:USE_PRINTING_ARCHITECTURE)
 
-    outlineList = Wx::RTC::RichTextListStyleDefinition.new("Outline List 1")
-    10.times do |i|
-      if i < 4
-        numberStyle = Wx::TEXT_ATTR_BULLET_STYLE_OUTLINE|Wx::TEXT_ATTR_BULLET_STYLE_PERIOD
-      else
-        numberStyle = Wx::TEXT_ATTR_BULLET_STYLE_ARABIC|Wx::TEXT_ATTR_BULLET_STYLE_PERIOD
+      def get_printing
+        @printing
       end
 
-      outlineList.set_attributes(i, (i+1)*120, 120, numberStyle)
     end
-
-    @styleSheet.add_list_style(outlineList)
   end
 
-  def get_style_sheet
-    @styleSheet
-  end
 
-  if Wx.has_feature?(:USE_PRINTING_ARCHITECTURE)
-
-    def get_printing
-      @printing
-    end
+  # Define a new frame type: this is going to be our main frame
+  class MyFrame < Wx::Frame
 
-  end
-end
+    # IDs for the controls and the menu commands
+    module ID
+      include Wx::IDHelper
 
+      # menu items
+      Quit = Wx::ID_EXIT
+      About = Wx::ID_ABOUT
 
-# Define a new frame type: this is going to be our main frame
-class MyFrame < Wx::Frame
-  
-  # IDs for the controls and the menu commands
-  module ID
-    include Wx::IDHelper
-    
-    # menu items
-    Quit = Wx::ID_EXIT
-    About = Wx::ID_ABOUT
-
-    FORMAT_BOLD = self.next_id
-    FORMAT_ITALIC = self.next_id
-    FORMAT_UNDERLINE = self.next_id
-    FORMAT_STRIKETHROUGH = self.next_id
-    FORMAT_SUPERSCRIPT = self.next_id
-    FORMAT_SUBSCRIPT = self.next_id
-    FORMAT_FONT = self.next_id
-    FORMAT_IMAGE = self.next_id
-    FORMAT_PARAGRAPH = self.next_id
-    FORMAT_CONTENT = self.next_id
-
-    RELOAD = self.next_id
-
-    INSERT_SYMBOL = self.next_id
-    INSERT_URL = self.next_id
-    INSERT_IMAGE = self.next_id
-
-    FORMAT_ALIGN_LEFT = self.next_id
-    FORMAT_ALIGN_CENTRE = self.next_id
-    FORMAT_ALIGN_RIGHT = self.next_id
-
-    FORMAT_INDENT_MORE = self.next_id
-    FORMAT_INDENT_LESS = self.next_id
-
-    FORMAT_PARAGRAPH_SPACING_MORE = self.next_id
-    FORMAT_PARAGRAPH_SPACING_LESS = self.next_id
-
-    FORMAT_LINE_SPACING_HALF = self.next_id
-    FORMAT_LINE_SPACING_DOUBLE = self.next_id
-    FORMAT_LINE_SPACING_SINGLE = self.next_id
-
-    FORMAT_NUMBER_LIST = self.next_id
-    FORMAT_BULLETS_AND_NUMBERING = self.next_id
-    FORMAT_ITEMIZE_LIST = self.next_id
-    FORMAT_RENUMBER_LIST = self.next_id
-    FORMAT_PROMOTE_LIST = self.next_id
-    FORMAT_DEMOTE_LIST = self.next_id
-    FORMAT_CLEAR_LIST = self.next_id
-
-    TABLE_ADD_COLUMN = self.next_id
-    TABLE_ADD_ROW = self.next_id
-    TABLE_DELETE_COLUMN = self.next_id
-    TABLE_DELETE_ROW = self.next_id
-
-    SET_FONT_SCALE = self.next_id
-    SET_DIMENSION_SCALE = self.next_id
-
-    VIEW_HTML = self.next_id
-    SWITCH_STYLE_SHEETS = self.next_id
-    MANAGE_STYLES = self.next_id
-
-    PRINT = self.next_id
-    PREVIEW = self.next_id
-    PAGE_SETUP = self.next_id
-
-    RICHTEXT_CTRL = self.next_id
-    RICHTEXT_STYLE_LIST = self.next_id
-    RICHTEXT_STYLE_COMBO = self.next_id
-  end
-  
-  # ctor(s)
-  def initialize(title, id: Wx::ID_ANY, pos: Wx::DEFAULT_POSITION, size: Wx::DEFAULT_SIZE, style: Wx::DEFAULT_FRAME_STYLE)
-    super(nil, id: id, pos: pos, size: size, style: style)
+      FORMAT_BOLD = self.next_id
+      FORMAT_ITALIC = self.next_id
+      FORMAT_UNDERLINE = self.next_id
+      FORMAT_STRIKETHROUGH = self.next_id
+      FORMAT_SUPERSCRIPT = self.next_id
+      FORMAT_SUBSCRIPT = self.next_id
+      FORMAT_FONT = self.next_id
+      FORMAT_IMAGE = self.next_id
+      FORMAT_PARAGRAPH = self.next_id
+      FORMAT_CONTENT = self.next_id
 
-    @richTextCtrl = nil
+      RELOAD = self.next_id
 
-    if Wx::PLATFORM == 'WXMAC'
-      set_window_variant(Wx::WINDOW_VARIANT_SMALL)
-    end
+      INSERT_SYMBOL = self.next_id
+      INSERT_URL = self.next_id
+      INSERT_IMAGE = self.next_id
 
-    self.icon = Wx::Icon.new(local_icon_file('../sample.xpm'))
+      FORMAT_ALIGN_LEFT = self.next_id
+      FORMAT_ALIGN_CENTRE = self.next_id
+      FORMAT_ALIGN_RIGHT = self.next_id
 
-    # create a menu bar
-    fileMenu = Wx::Menu.new
+      FORMAT_INDENT_MORE = self.next_id
+      FORMAT_INDENT_LESS = self.next_id
 
-    # the "About" item should be in the help menu
-    helpMenu = Wx::Menu.new
-    helpMenu.append(ID::About, "&About\tF1", "Show about dialog")
+      FORMAT_PARAGRAPH_SPACING_MORE = self.next_id
+      FORMAT_PARAGRAPH_SPACING_LESS = self.next_id
 
-    fileMenu.append(Wx::ID_OPEN, "&Open\tCtrl+O", "Open a file")
-    fileMenu.append(Wx::ID_SAVE, "&Save\tCtrl+S", "Save a file")
-    fileMenu.append(Wx::ID_SAVEAS, "&Save As...\tF12", "Save to a new file")
-    fileMenu.append_separator
-    fileMenu.append(ID::RELOAD, "&Reload Text\tF2", "Reload the initial text")
-    fileMenu.append_separator
-    fileMenu.append(ID::PAGE_SETUP, "Page Set&up...", "Page setup")
+      FORMAT_LINE_SPACING_HALF = self.next_id
+      FORMAT_LINE_SPACING_DOUBLE = self.next_id
+      FORMAT_LINE_SPACING_SINGLE = self.next_id
 
-    if Wx.has_feature? :USE_PRINTING_ARCHITECTURE
-    fileMenu.append(ID::PRINT, "&Print...\tCtrl+P", "Print")
-    fileMenu.append(ID::PREVIEW, "Print Pre&view", "Print preview")
-    end
-
-    fileMenu.append_separator
-    fileMenu.append(ID::VIEW_HTML, "&View as HTML", "View HTML")
-    fileMenu.append_separator
-    fileMenu.append(ID::Quit, "E&xit\tAlt+X", "Quit this program")
-
-    editMenu = Wx::Menu.new
-    editMenu.append(Wx::ID_UNDO, "&Undo\tCtrl+Z")
-    editMenu.append(Wx::ID_REDO, "&Redo\tCtrl+Y")
-    editMenu.append_separator
-    editMenu.append(Wx::ID_CUT, "Cu&t\tCtrl+X")
-    editMenu.append(Wx::ID_COPY, "&Copy\tCtrl+C")
-    editMenu.append(Wx::ID_PASTE, "&Paste\tCtrl+V")
-
-    editMenu.append_separator
-    editMenu.append(Wx::ID_SELECTALL, "Select A&ll\tCtrl+A")
-    editMenu.append_separator
-    editMenu.append(ID::SET_FONT_SCALE, "Set &Text Scale...")
-    editMenu.append(ID::SET_DIMENSION_SCALE, "Set &Dimension Scale...")
-
-    formatMenu = Wx::Menu.new
-    formatMenu.append_check_item(ID::FORMAT_BOLD, "&Bold\tCtrl+B")
-    formatMenu.append_check_item(ID::FORMAT_ITALIC, "&Italic\tCtrl+I")
-    formatMenu.append_check_item(ID::FORMAT_UNDERLINE, "&Underline\tCtrl+U")
-    formatMenu.append_separator
-    formatMenu.append_check_item(ID::FORMAT_STRIKETHROUGH, "Stri&kethrough")
-    formatMenu.append_check_item(ID::FORMAT_SUPERSCRIPT, "Superscrip&t")
-    formatMenu.append_check_item(ID::FORMAT_SUBSCRIPT, "Subscrip&t")
-    formatMenu.append_separator
-    formatMenu.append_check_item(ID::FORMAT_ALIGN_LEFT, "L&eft Align")
-    formatMenu.append_check_item(ID::FORMAT_ALIGN_RIGHT, "&Right Align")
-    formatMenu.append_check_item(ID::FORMAT_ALIGN_CENTRE, "&Centre")
-    formatMenu.append_separator
-    formatMenu.append(ID::FORMAT_INDENT_MORE, "Indent &More")
-    formatMenu.append(ID::FORMAT_INDENT_LESS, "Indent &Less")
-    formatMenu.append_separator
-    formatMenu.append(ID::FORMAT_PARAGRAPH_SPACING_MORE, "Increase Paragraph &Spacing")
-    formatMenu.append(ID::FORMAT_PARAGRAPH_SPACING_LESS, "Decrease &Paragraph Spacing")
-    formatMenu.append_separator
-    formatMenu.append(ID::FORMAT_LINE_SPACING_SINGLE, "Normal Line Spacing")
-    formatMenu.append(ID::FORMAT_LINE_SPACING_HALF, "1.5 Line Spacing")
-    formatMenu.append(ID::FORMAT_LINE_SPACING_DOUBLE, "Double Line Spacing")
-    formatMenu.append_separator
-    formatMenu.append(ID::FORMAT_FONT, "&Font...")
-    formatMenu.append(ID::FORMAT_IMAGE, "Image Property")
-    formatMenu.append(ID::FORMAT_PARAGRAPH, "&Paragraph...")
-    formatMenu.append(ID::FORMAT_CONTENT, "Font and Pa&ragraph...\tShift+Ctrl+F")
-    formatMenu.append_separator
-    formatMenu.append(ID::SWITCH_STYLE_SHEETS, "&Switch Style Sheets")
-    formatMenu.append(ID::MANAGE_STYLES, "&Manage Styles")
-
-    listsMenu = Wx::Menu.new
-    listsMenu.append(ID::FORMAT_BULLETS_AND_NUMBERING, "Bullets and &Numbering...")
-    listsMenu.append_separator
-    listsMenu.append(ID::FORMAT_NUMBER_LIST, "Number List")
-    listsMenu.append(ID::FORMAT_ITEMIZE_LIST, "Itemize List")
-    listsMenu.append(ID::FORMAT_RENUMBER_LIST, "Renumber List")
-    listsMenu.append(ID::FORMAT_PROMOTE_LIST, "Promote List Items")
-    listsMenu.append(ID::FORMAT_DEMOTE_LIST, "Demote List Items")
-    listsMenu.append(ID::FORMAT_CLEAR_LIST, "Clear List Formatting")
-
-    tableMenu = Wx::Menu.new
-    tableMenu.append(ID::TABLE_ADD_COLUMN, "&Add Column")
-    tableMenu.append(ID::TABLE_ADD_ROW, "Add &Row")
-    tableMenu.append(ID::TABLE_DELETE_COLUMN, "Delete &Column")
-    tableMenu.append(ID::TABLE_DELETE_ROW, "&Delete Row")
-
-    insertMenu = Wx::Menu.new
-    insertMenu.append(ID::INSERT_SYMBOL, "&Symbol...\tCtrl+I")
-    insertMenu.append(ID::INSERT_URL, "&URL...")
-    insertMenu.append(ID::INSERT_IMAGE, "&Image...")
-
-    # now append the freshly created menu to the menu bar...
-    menuBar = Wx::MenuBar.new
-    menuBar.append(fileMenu, "&File")
-    menuBar.append(editMenu, "&Edit")
-    menuBar.append(formatMenu, "F&ormat")
-    menuBar.append(listsMenu, "&Lists")
-    menuBar.append(tableMenu, "&Tables")
-    menuBar.append(insertMenu, "&Insert")
-    menuBar.append(helpMenu, "&Help")
-
-    # ... and attach this menu bar to the frame
-    set_menu_bar(menuBar)
-
-    # create a status bar just for fun (by default with 1 pane only)
-    # but don't create it on limited screen space (mobile device)
-    is_pda = Wx::SystemSettings.get_screen_type <= Wx::SYS_SCREEN_PDA
-
-    if Wx.has_feature? :USE_STATUSBAR
-      unless is_pda
-        create_status_bar(2)
-        set_status_text("Welcome to wxRichTextCtrl!")
-      end
-    end
+      FORMAT_NUMBER_LIST = self.next_id
+      FORMAT_BULLETS_AND_NUMBERING = self.next_id
+      FORMAT_ITEMIZE_LIST = self.next_id
+      FORMAT_RENUMBER_LIST = self.next_id
+      FORMAT_PROMOTE_LIST = self.next_id
+      FORMAT_DEMOTE_LIST = self.next_id
+      FORMAT_CLEAR_LIST = self.next_id
 
-    sizer = Wx::VBoxSizer.new
-    set_sizer(sizer)
+      TABLE_ADD_COLUMN = self.next_id
+      TABLE_ADD_ROW = self.next_id
+      TABLE_DELETE_COLUMN = self.next_id
+      TABLE_DELETE_ROW = self.next_id
 
-    # On Mac, don't create a 'native' wxToolBar because small bitmaps are not supported by native
-    # toolbars. On Mac, a non-native, small-bitmap toolbar doesn't show unless it is explicitly
-    # managed, hence the use of sizers. In a real application, use larger icons for the main
-    # toolbar to avoid the need for this workaround. Or, use the toolbar in a container window
-    # as part of a more complex hierarchy, and the toolbar will automatically be non-native.
+      SET_FONT_SCALE = self.next_id
+      SET_DIMENSION_SCALE = self.next_id
 
-    Wx::SystemOptions.set_option("mac.toolbar.no-native", 1)
+      VIEW_HTML = self.next_id
+      SWITCH_STYLE_SHEETS = self.next_id
+      MANAGE_STYLES = self.next_id
 
-    toolBar = Wx::ToolBar.new(self, style: Wx::NO_BORDER|Wx::TB_FLAT|Wx::TB_NODIVIDER|Wx::TB_NOALIGN)
+      PRINT = self.next_id
+      PREVIEW = self.next_id
+      PAGE_SETUP = self.next_id
 
-    sizer.add(toolBar, 0, Wx::EXPAND)
+      RICHTEXT_CTRL = self.next_id
+      RICHTEXT_STYLE_LIST = self.next_id
+      RICHTEXT_STYLE_COMBO = self.next_id
+    end
 
-    toolBar.add_tool(Wx::ID_OPEN, '', Wx.Bitmap(:open), "Open")
-    toolBar.add_tool(Wx::ID_SAVEAS, '', Wx.Bitmap(:save), "Save")
-    toolBar.add_separator
-    toolBar.add_tool(Wx::ID_CUT, '', Wx.Bitmap(:cut), "Cut")
-    toolBar.add_tool(Wx::ID_COPY, '', Wx.Bitmap(:copy), "Copy")
-    toolBar.add_tool(Wx::ID_PASTE, '', Wx.Bitmap(:paste), "Paste")
-    toolBar.add_separator
-    toolBar.add_tool(Wx::ID_UNDO, '', Wx.Bitmap(:undo), "Undo")
-    toolBar.add_tool(Wx::ID_REDO, '', Wx.Bitmap(:redo), "Redo")
-    toolBar.add_separator
-    toolBar.add_check_tool(ID::FORMAT_BOLD, '', Wx.Bitmap(:bold), nil, "Bold")
-    toolBar.add_check_tool(ID::FORMAT_ITALIC, '', Wx.Bitmap(:italic), nil, "Italic")
-    toolBar.add_check_tool(ID::FORMAT_UNDERLINE, '', Wx.Bitmap(:underline), nil, "Underline")
-    toolBar.add_separator
-    toolBar.add_check_tool(ID::FORMAT_ALIGN_LEFT, '', Wx.Bitmap(:alignleft), nil, "Align Left")
-    toolBar.add_check_tool(ID::FORMAT_ALIGN_CENTRE, '', Wx.Bitmap(:centre), nil, "Centre")
-    toolBar.add_check_tool(ID::FORMAT_ALIGN_RIGHT, '', Wx.Bitmap(:alignright), nil, "Align Right")
-    toolBar.add_separator
-    toolBar.add_tool(ID::FORMAT_INDENT_LESS, '', Wx.Bitmap(:indentless), "Indent Less")
-    toolBar.add_tool(ID::FORMAT_INDENT_MORE, '', Wx.Bitmap(:indentmore), "Indent More")
-    toolBar.add_separator
-    toolBar.add_tool(ID::FORMAT_FONT, '', Wx.Bitmap(:font), "Font")
-    toolBar.add_separator
+    # ctor(s)
+    def initialize(title, id: Wx::ID_ANY, pos: Wx::DEFAULT_POSITION, size: Wx::DEFAULT_SIZE, style: Wx::DEFAULT_FRAME_STYLE)
+      super(nil, id: id, pos: pos, size: size, style: style)
 
-    combo = Wx::RTC::RichTextStyleComboCtrl.new(toolBar, ID::RICHTEXT_STYLE_COMBO, size: [160, -1], style: Wx::CB_READONLY)
-    toolBar.add_control(combo)
+      @richTextCtrl = nil
 
-    toolBar.realize
+      if Wx::PLATFORM == 'WXMAC'
+        set_window_variant(Wx::WINDOW_VARIANT_SMALL)
+      end
 
-    splitter = Wx::SplitterWindow.new(self, style: Wx::SP_LIVE_UPDATE)
-    sizer.add(splitter, 1, Wx::EXPAND)
+      self.icon = Wx::Icon.new(local_icon_file('../sample.xpm'))
 
-    @richTextCtrl = MyRichTextCtrl.new(splitter, id: ID::RICHTEXT_CTRL, style: Wx::VSCROLL|Wx::HSCROLL) # /*|wxWANTS_CHARS*/)
-    # @richTextCtrl = Wx::RTC::RichTextCtrl.new(splitter, id: ID::RICHTEXT_CTRL, style: Wx::VSCROLL|Wx::HSCROLL) # /*|wxWANTS_CHARS*/)
-    # wxASSERT(!m_richTextCtrl.GetBuffer().GetAttributes().HasFontPixelSize())
+      # create a menu bar
+      fileMenu = Wx::Menu.new
 
-    font = Wx::Font.new(Wx::FontInfo.new(12).family(Wx::FONTFAMILY_ROMAN))
+      # the "About" item should be in the help menu
+      helpMenu = Wx::Menu.new
+      helpMenu.append(ID::About, "&About\tF1", "Show about dialog")
 
-    @richTextCtrl.set_font(font)
+      fileMenu.append(Wx::ID_OPEN, "&Open\tCtrl+O", "Open a file")
+      fileMenu.append(Wx::ID_SAVE, "&Save\tCtrl+S", "Save a file")
+      fileMenu.append(Wx::ID_SAVEAS, "&Save As...\tF12", "Save to a new file")
+      fileMenu.append_separator
+      fileMenu.append(ID::RELOAD, "&Reload Text\tF2", "Reload the initial text")
+      fileMenu.append_separator
+      fileMenu.append(ID::PAGE_SETUP, "Page Set&up...", "Page setup")
 
-    # wxASSERT(!m_richTextCtrl.GetBuffer().GetAttributes().HasFontPixelSize())
+      if Wx.has_feature? :USE_PRINTING_ARCHITECTURE
+      fileMenu.append(ID::PRINT, "&Print...\tCtrl+P", "Print")
+      fileMenu.append(ID::PREVIEW, "Print Pre&view", "Print preview")
+      end
 
-    @richTextCtrl.set_margins(10, 10)
+      fileMenu.append_separator
+      fileMenu.append(ID::VIEW_HTML, "&View as HTML", "View HTML")
+      fileMenu.append_separator
+      fileMenu.append(ID::Quit, "E&xit\tAlt+X", "Quit this program")
+
+      editMenu = Wx::Menu.new
+      editMenu.append(Wx::ID_UNDO, "&Undo\tCtrl+Z")
+      editMenu.append(Wx::ID_REDO, "&Redo\tCtrl+Y")
+      editMenu.append_separator
+      editMenu.append(Wx::ID_CUT, "Cu&t\tCtrl+X")
+      editMenu.append(Wx::ID_COPY, "&Copy\tCtrl+C")
+      editMenu.append(Wx::ID_PASTE, "&Paste\tCtrl+V")
+
+      editMenu.append_separator
+      editMenu.append(Wx::ID_SELECTALL, "Select A&ll\tCtrl+A")
+      editMenu.append_separator
+      editMenu.append(ID::SET_FONT_SCALE, "Set &Text Scale...")
+      editMenu.append(ID::SET_DIMENSION_SCALE, "Set &Dimension Scale...")
+
+      formatMenu = Wx::Menu.new
+      formatMenu.append_check_item(ID::FORMAT_BOLD, "&Bold\tCtrl+B")
+      formatMenu.append_check_item(ID::FORMAT_ITALIC, "&Italic\tCtrl+I")
+      formatMenu.append_check_item(ID::FORMAT_UNDERLINE, "&Underline\tCtrl+U")
+      formatMenu.append_separator
+      formatMenu.append_check_item(ID::FORMAT_STRIKETHROUGH, "Stri&kethrough")
+      formatMenu.append_check_item(ID::FORMAT_SUPERSCRIPT, "Superscrip&t")
+      formatMenu.append_check_item(ID::FORMAT_SUBSCRIPT, "Subscrip&t")
+      formatMenu.append_separator
+      formatMenu.append_check_item(ID::FORMAT_ALIGN_LEFT, "L&eft Align")
+      formatMenu.append_check_item(ID::FORMAT_ALIGN_RIGHT, "&Right Align")
+      formatMenu.append_check_item(ID::FORMAT_ALIGN_CENTRE, "&Centre")
+      formatMenu.append_separator
+      formatMenu.append(ID::FORMAT_INDENT_MORE, "Indent &More")
+      formatMenu.append(ID::FORMAT_INDENT_LESS, "Indent &Less")
+      formatMenu.append_separator
+      formatMenu.append(ID::FORMAT_PARAGRAPH_SPACING_MORE, "Increase Paragraph &Spacing")
+      formatMenu.append(ID::FORMAT_PARAGRAPH_SPACING_LESS, "Decrease &Paragraph Spacing")
+      formatMenu.append_separator
+      formatMenu.append(ID::FORMAT_LINE_SPACING_SINGLE, "Normal Line Spacing")
+      formatMenu.append(ID::FORMAT_LINE_SPACING_HALF, "1.5 Line Spacing")
+      formatMenu.append(ID::FORMAT_LINE_SPACING_DOUBLE, "Double Line Spacing")
+      formatMenu.append_separator
+      formatMenu.append(ID::FORMAT_FONT, "&Font...")
+      formatMenu.append(ID::FORMAT_IMAGE, "Image Property")
+      formatMenu.append(ID::FORMAT_PARAGRAPH, "&Paragraph...")
+      formatMenu.append(ID::FORMAT_CONTENT, "Font and Pa&ragraph...\tShift+Ctrl+F")
+      formatMenu.append_separator
+      formatMenu.append(ID::SWITCH_STYLE_SHEETS, "&Switch Style Sheets")
+      formatMenu.append(ID::MANAGE_STYLES, "&Manage Styles")
+
+      listsMenu = Wx::Menu.new
+      listsMenu.append(ID::FORMAT_BULLETS_AND_NUMBERING, "Bullets and &Numbering...")
+      listsMenu.append_separator
+      listsMenu.append(ID::FORMAT_NUMBER_LIST, "Number List")
+      listsMenu.append(ID::FORMAT_ITEMIZE_LIST, "Itemize List")
+      listsMenu.append(ID::FORMAT_RENUMBER_LIST, "Renumber List")
+      listsMenu.append(ID::FORMAT_PROMOTE_LIST, "Promote List Items")
+      listsMenu.append(ID::FORMAT_DEMOTE_LIST, "Demote List Items")
+      listsMenu.append(ID::FORMAT_CLEAR_LIST, "Clear List Formatting")
+
+      tableMenu = Wx::Menu.new
+      tableMenu.append(ID::TABLE_ADD_COLUMN, "&Add Column")
+      tableMenu.append(ID::TABLE_ADD_ROW, "Add &Row")
+      tableMenu.append(ID::TABLE_DELETE_COLUMN, "Delete &Column")
+      tableMenu.append(ID::TABLE_DELETE_ROW, "&Delete Row")
+
+      insertMenu = Wx::Menu.new
+      insertMenu.append(ID::INSERT_SYMBOL, "&Symbol...\tCtrl+I")
+      insertMenu.append(ID::INSERT_URL, "&URL...")
+      insertMenu.append(ID::INSERT_IMAGE, "&Image...")
+
+      # now append the freshly created menu to the menu bar...
+      menuBar = Wx::MenuBar.new
+      menuBar.append(fileMenu, "&File")
+      menuBar.append(editMenu, "&Edit")
+      menuBar.append(formatMenu, "F&ormat")
+      menuBar.append(listsMenu, "&Lists")
+      menuBar.append(tableMenu, "&Tables")
+      menuBar.append(insertMenu, "&Insert")
+      menuBar.append(helpMenu, "&Help")
+
+      # ... and attach this menu bar to the frame
+      set_menu_bar(menuBar)
+
+      # create a status bar just for fun (by default with 1 pane only)
+      # but don't create it on limited screen space (mobile device)
+      is_pda = Wx::SystemSettings.get_screen_type <= Wx::SYS_SCREEN_PDA
+
+      if Wx.has_feature? :USE_STATUSBAR
+        unless is_pda
+          create_status_bar(2)
+          set_status_text("Welcome to wxRichTextCtrl!")
+        end
+      end
 
-    @richTextCtrl.set_style_sheet(Wx.get_app.get_style_sheet)
+      sizer = Wx::VBoxSizer.new
+      set_sizer(sizer)
 
-    combo.set_style_sheet(Wx.get_app.get_style_sheet)
-    combo.set_rich_text_ctrl(@richTextCtrl)
-    combo.update_styles
+      # On Mac, don't create a 'native' wxToolBar because small bitmaps are not supported by native
+      # toolbars. On Mac, a non-native, small-bitmap toolbar doesn't show unless it is explicitly
+      # managed, hence the use of sizers. In a real application, use larger icons for the main
+      # toolbar to avoid the need for this workaround. Or, use the toolbar in a container window
+      # as part of a more complex hierarchy, and the toolbar will automatically be non-native.
 
-    styleListCtrl = Wx::RTC::RichTextStyleListCtrl.new(splitter, ID::RICHTEXT_STYLE_LIST)
+      Wx::SystemOptions.set_option("mac.toolbar.no-native", 1)
 
-    display = Wx.get_display_size
-    if is_pda && display.width < display.height
-      splitter.split_horizontally(@richTextCtrl, styleListCtrl)
-    else
-      width = get_client_size.width * 4 / 5
-      splitter.split_vertically(@richTextCtrl, styleListCtrl, width)
-      splitter.set_sash_gravity(0.8)
-    end
+      toolBar = Wx::ToolBar.new(self, style: Wx::NO_BORDER|Wx::TB_FLAT|Wx::TB_NODIVIDER|Wx::TB_NOALIGN)
 
-    layout
+      sizer.add(toolBar, 0, Wx::EXPAND)
 
-    splitter.update_size
+      toolBar.add_tool(Wx::ID_OPEN, '', Wx.Bitmap(:open), "Open")
+      toolBar.add_tool(Wx::ID_SAVEAS, '', Wx.Bitmap(:save), "Save")
+      toolBar.add_separator
+      toolBar.add_tool(Wx::ID_CUT, '', Wx.Bitmap(:cut), "Cut")
+      toolBar.add_tool(Wx::ID_COPY, '', Wx.Bitmap(:copy), "Copy")
+      toolBar.add_tool(Wx::ID_PASTE, '', Wx.Bitmap(:paste), "Paste")
+      toolBar.add_separator
+      toolBar.add_tool(Wx::ID_UNDO, '', Wx.Bitmap(:undo), "Undo")
+      toolBar.add_tool(Wx::ID_REDO, '', Wx.Bitmap(:redo), "Redo")
+      toolBar.add_separator
+      toolBar.add_check_tool(ID::FORMAT_BOLD, '', Wx.Bitmap(:bold), nil, "Bold")
+      toolBar.add_check_tool(ID::FORMAT_ITALIC, '', Wx.Bitmap(:italic), nil, "Italic")
+      toolBar.add_check_tool(ID::FORMAT_UNDERLINE, '', Wx.Bitmap(:underline), nil, "Underline")
+      toolBar.add_separator
+      toolBar.add_check_tool(ID::FORMAT_ALIGN_LEFT, '', Wx.Bitmap(:alignleft), nil, "Align Left")
+      toolBar.add_check_tool(ID::FORMAT_ALIGN_CENTRE, '', Wx.Bitmap(:centre), nil, "Centre")
+      toolBar.add_check_tool(ID::FORMAT_ALIGN_RIGHT, '', Wx.Bitmap(:alignright), nil, "Align Right")
+      toolBar.add_separator
+      toolBar.add_tool(ID::FORMAT_INDENT_LESS, '', Wx.Bitmap(:indentless), "Indent Less")
+      toolBar.add_tool(ID::FORMAT_INDENT_MORE, '', Wx.Bitmap(:indentmore), "Indent More")
+      toolBar.add_separator
+      toolBar.add_tool(ID::FORMAT_FONT, '', Wx.Bitmap(:font), "Font")
+      toolBar.add_separator
 
-    styleListCtrl.set_style_sheet(Wx.get_app.get_style_sheet)
-    styleListCtrl.set_rich_text_ctrl(@richTextCtrl)
-    styleListCtrl.update_styles
+      combo = Wx::RTC::RichTextStyleComboCtrl.new(toolBar, ID::RICHTEXT_STYLE_COMBO, size: [160, -1], style: Wx::CB_READONLY)
+      toolBar.add_control(combo)
 
-    # attach event handlers
-    evt_menu(ID::Quit,  :on_quit)
-    evt_menu(ID::About, :on_about)
+      toolBar.realize
 
-    evt_menu(Wx::ID_OPEN,  :on_open)
-    evt_menu(Wx::ID_SAVE,  :on_save)
-    evt_menu(Wx::ID_SAVEAS,  :on_save_as)
+      splitter = Wx::SplitterWindow.new(self, style: Wx::SP_LIVE_UPDATE)
+      sizer.add(splitter, 1, Wx::EXPAND)
 
-    evt_menu(ID::FORMAT_BOLD,  :on_bold)
-    evt_menu(ID::FORMAT_ITALIC,  :on_italic)
-    evt_menu(ID::FORMAT_UNDERLINE,  :on_underline)
+      @richTextCtrl = MyRichTextCtrl.new(splitter, id: ID::RICHTEXT_CTRL, style: Wx::VSCROLL|Wx::HSCROLL) # /*|wxWANTS_CHARS*/)
+      # @richTextCtrl = Wx::RTC::RichTextCtrl.new(splitter, id: ID::RICHTEXT_CTRL, style: Wx::VSCROLL|Wx::HSCROLL) # /*|wxWANTS_CHARS*/)
+      # wxASSERT(!m_richTextCtrl.GetBuffer().GetAttributes().HasFontPixelSize())
 
-    evt_menu(ID::FORMAT_STRIKETHROUGH,  :on_strikethrough)
-    evt_menu(ID::FORMAT_SUPERSCRIPT,  :on_superscript)
-    evt_menu(ID::FORMAT_SUBSCRIPT,  :on_subscript)
-
-    evt_update_ui(ID::FORMAT_BOLD,  :on_update_bold)
-    evt_update_ui(ID::FORMAT_ITALIC,  :on_update_italic)
-    evt_update_ui(ID::FORMAT_UNDERLINE,  :on_update_underline)
-
-    evt_update_ui(ID::FORMAT_STRIKETHROUGH,  :on_update_strikethrough)
-    evt_update_ui(ID::FORMAT_SUPERSCRIPT,  :on_update_superscript)
-    evt_update_ui(ID::FORMAT_SUBSCRIPT,  :on_update_subscript)
-
-    evt_menu(ID::FORMAT_ALIGN_LEFT,  :on_align_left)
-    evt_menu(ID::FORMAT_ALIGN_CENTRE,  :on_align_centre)
-    evt_menu(ID::FORMAT_ALIGN_RIGHT,  :on_align_right)
-
-    evt_update_ui(ID::FORMAT_ALIGN_LEFT,  :on_update_align_left)
-    evt_update_ui(ID::FORMAT_ALIGN_CENTRE,  :on_update_align_centre)
-    evt_update_ui(ID::FORMAT_ALIGN_RIGHT,  :on_update_align_right)
-
-    evt_menu(ID::FORMAT_FONT,  :on_font)
-    evt_menu(ID::FORMAT_IMAGE, :on_image)
-    evt_menu(ID::FORMAT_PARAGRAPH,  :on_paragraph)
-    evt_menu(ID::FORMAT_CONTENT,  :on_format)
-    evt_update_ui(ID::FORMAT_CONTENT,  :on_update_format)
-    evt_update_ui(ID::FORMAT_FONT,  :on_update_format)
-    evt_update_ui(ID::FORMAT_IMAGE, :on_update_image)
-    evt_update_ui(ID::FORMAT_PARAGRAPH,  :on_update_format)
-    evt_menu(ID::FORMAT_INDENT_MORE,  :on_indent_more)
-    evt_menu(ID::FORMAT_INDENT_LESS,  :on_indent_less)
+      font = Wx::Font.new(Wx::FontInfo.new(12).family(Wx::FONTFAMILY_ROMAN))
 
-    evt_menu(ID::FORMAT_LINE_SPACING_HALF,  :on_line_spacing_half)
-    evt_menu(ID::FORMAT_LINE_SPACING_SINGLE,  :on_line_spacing_single)
-    evt_menu(ID::FORMAT_LINE_SPACING_DOUBLE,  :on_line_spacing_double)
+      @richTextCtrl.set_font(font)
 
-    evt_menu(ID::FORMAT_PARAGRAPH_SPACING_MORE,  :on_paragraph_spacing_more)
-    evt_menu(ID::FORMAT_PARAGRAPH_SPACING_LESS,  :on_paragraph_spacing_less)
+      # wxASSERT(!m_richTextCtrl.GetBuffer().GetAttributes().HasFontPixelSize())
 
-    evt_menu(ID::RELOAD,  :on_reload)
+      @richTextCtrl.set_margins(10, 10)
 
-    evt_menu(ID::INSERT_SYMBOL,  :on_insert_symbol)
-    evt_menu(ID::INSERT_URL,  :on_insert_url)
-    evt_menu(ID::INSERT_IMAGE, :on_insert_image)
+      @richTextCtrl.set_style_sheet(Wx.get_app.get_style_sheet)
 
-    evt_menu(ID::FORMAT_NUMBER_LIST, :on_number_list)
-    evt_menu(ID::FORMAT_BULLETS_AND_NUMBERING, :on_bullets_and_numbering)
-    evt_menu(ID::FORMAT_ITEMIZE_LIST, :on_itemize_list)
-    evt_menu(ID::FORMAT_RENUMBER_LIST, :on_renumber_list)
-    evt_menu(ID::FORMAT_PROMOTE_LIST, :on_promote_list)
-    evt_menu(ID::FORMAT_DEMOTE_LIST, :on_demote_list)
-    evt_menu(ID::FORMAT_CLEAR_LIST, :on_clear_list)
+      combo.set_style_sheet(Wx.get_app.get_style_sheet)
+      combo.set_rich_text_ctrl(@richTextCtrl)
+      combo.update_styles
 
-    evt_menu(ID::TABLE_ADD_COLUMN, :on_table_add_column)
-    evt_menu(ID::TABLE_ADD_ROW, :on_table_add_row)
-    evt_menu(ID::TABLE_DELETE_COLUMN, :on_table_delete_column)
-    evt_menu(ID::TABLE_DELETE_ROW, :on_table_delete_row)
-    evt_update_ui_range(ID::TABLE_ADD_COLUMN, ID::TABLE_ADD_ROW, :on_table_focused_update_ui)
-    evt_update_ui_range(ID::TABLE_DELETE_COLUMN, ID::TABLE_DELETE_ROW, :on_table_has_cells_update_ui)
+      styleListCtrl = Wx::RTC::RichTextStyleListCtrl.new(splitter, ID::RICHTEXT_STYLE_LIST)
 
-    evt_menu(ID::VIEW_HTML, :on_view_html)
-    evt_menu(ID::SWITCH_STYLE_SHEETS, :on_switch_stylesheets)
-    evt_menu(ID::MANAGE_STYLES, :on_manage_styles)
+      display = Wx.get_display_size
+      if is_pda && display.width < display.height
+        splitter.split_horizontally(@richTextCtrl, styleListCtrl)
+      else
+        width = get_client_size.width * 4 / 5
+        splitter.split_vertically(@richTextCtrl, styleListCtrl, width)
+        splitter.set_sash_gravity(0.8)
+      end
 
-    if Wx.has_feature? :USE_PRINTING_ARCHITECTURE
-    evt_menu(ID::PRINT, :on_print)
-    evt_menu(ID::PREVIEW, :on_preview)
-    end
-    evt_menu(ID::PAGE_SETUP, :on_page_setup)
+      layout
+
+      splitter.update_size
+
+      styleListCtrl.set_style_sheet(Wx.get_app.get_style_sheet)
+      styleListCtrl.set_rich_text_ctrl(@richTextCtrl)
+      styleListCtrl.update_styles
+
+      # attach event handlers
+      evt_menu(ID::Quit,  :on_quit)
+      evt_menu(ID::About, :on_about)
+
+      evt_menu(Wx::ID_OPEN,  :on_open)
+      evt_menu(Wx::ID_SAVE,  :on_save)
+      evt_menu(Wx::ID_SAVEAS,  :on_save_as)
+
+      evt_menu(ID::FORMAT_BOLD,  :on_bold)
+      evt_menu(ID::FORMAT_ITALIC,  :on_italic)
+      evt_menu(ID::FORMAT_UNDERLINE,  :on_underline)
+
+      evt_menu(ID::FORMAT_STRIKETHROUGH,  :on_strikethrough)
+      evt_menu(ID::FORMAT_SUPERSCRIPT,  :on_superscript)
+      evt_menu(ID::FORMAT_SUBSCRIPT,  :on_subscript)
+
+      evt_update_ui(ID::FORMAT_BOLD,  :on_update_bold)
+      evt_update_ui(ID::FORMAT_ITALIC,  :on_update_italic)
+      evt_update_ui(ID::FORMAT_UNDERLINE,  :on_update_underline)
+
+      evt_update_ui(ID::FORMAT_STRIKETHROUGH,  :on_update_strikethrough)
+      evt_update_ui(ID::FORMAT_SUPERSCRIPT,  :on_update_superscript)
+      evt_update_ui(ID::FORMAT_SUBSCRIPT,  :on_update_subscript)
+
+      evt_menu(ID::FORMAT_ALIGN_LEFT,  :on_align_left)
+      evt_menu(ID::FORMAT_ALIGN_CENTRE,  :on_align_centre)
+      evt_menu(ID::FORMAT_ALIGN_RIGHT,  :on_align_right)
+
+      evt_update_ui(ID::FORMAT_ALIGN_LEFT,  :on_update_align_left)
+      evt_update_ui(ID::FORMAT_ALIGN_CENTRE,  :on_update_align_centre)
+      evt_update_ui(ID::FORMAT_ALIGN_RIGHT,  :on_update_align_right)
+
+      evt_menu(ID::FORMAT_FONT,  :on_font)
+      evt_menu(ID::FORMAT_IMAGE, :on_image)
+      evt_menu(ID::FORMAT_PARAGRAPH,  :on_paragraph)
+      evt_menu(ID::FORMAT_CONTENT,  :on_format)
+      evt_update_ui(ID::FORMAT_CONTENT,  :on_update_format)
+      evt_update_ui(ID::FORMAT_FONT,  :on_update_format)
+      evt_update_ui(ID::FORMAT_IMAGE, :on_update_image)
+      evt_update_ui(ID::FORMAT_PARAGRAPH,  :on_update_format)
+      evt_menu(ID::FORMAT_INDENT_MORE,  :on_indent_more)
+      evt_menu(ID::FORMAT_INDENT_LESS,  :on_indent_less)
+
+      evt_menu(ID::FORMAT_LINE_SPACING_HALF,  :on_line_spacing_half)
+      evt_menu(ID::FORMAT_LINE_SPACING_SINGLE,  :on_line_spacing_single)
+      evt_menu(ID::FORMAT_LINE_SPACING_DOUBLE,  :on_line_spacing_double)
+
+      evt_menu(ID::FORMAT_PARAGRAPH_SPACING_MORE,  :on_paragraph_spacing_more)
+      evt_menu(ID::FORMAT_PARAGRAPH_SPACING_LESS,  :on_paragraph_spacing_less)
+
+      evt_menu(ID::RELOAD,  :on_reload)
+
+      evt_menu(ID::INSERT_SYMBOL,  :on_insert_symbol)
+      evt_menu(ID::INSERT_URL,  :on_insert_url)
+      evt_menu(ID::INSERT_IMAGE, :on_insert_image)
+
+      evt_menu(ID::FORMAT_NUMBER_LIST, :on_number_list)
+      evt_menu(ID::FORMAT_BULLETS_AND_NUMBERING, :on_bullets_and_numbering)
+      evt_menu(ID::FORMAT_ITEMIZE_LIST, :on_itemize_list)
+      evt_menu(ID::FORMAT_RENUMBER_LIST, :on_renumber_list)
+      evt_menu(ID::FORMAT_PROMOTE_LIST, :on_promote_list)
+      evt_menu(ID::FORMAT_DEMOTE_LIST, :on_demote_list)
+      evt_menu(ID::FORMAT_CLEAR_LIST, :on_clear_list)
+
+      evt_menu(ID::TABLE_ADD_COLUMN, :on_table_add_column)
+      evt_menu(ID::TABLE_ADD_ROW, :on_table_add_row)
+      evt_menu(ID::TABLE_DELETE_COLUMN, :on_table_delete_column)
+      evt_menu(ID::TABLE_DELETE_ROW, :on_table_delete_row)
+      evt_update_ui_range(ID::TABLE_ADD_COLUMN, ID::TABLE_ADD_ROW, :on_table_focused_update_ui)
+      evt_update_ui_range(ID::TABLE_DELETE_COLUMN, ID::TABLE_DELETE_ROW, :on_table_has_cells_update_ui)
+
+      evt_menu(ID::VIEW_HTML, :on_view_html)
+      evt_menu(ID::SWITCH_STYLE_SHEETS, :on_switch_stylesheets)
+      evt_menu(ID::MANAGE_STYLES, :on_manage_styles)
+
+      if Wx.has_feature? :USE_PRINTING_ARCHITECTURE
+      evt_menu(ID::PRINT, :on_print)
+      evt_menu(ID::PREVIEW, :on_preview)
+      end
+      evt_menu(ID::PAGE_SETUP, :on_page_setup)
 
-    evt_text_url(Wx::ID_ANY, :on_url)
-    evt_richtext_stylesheet_replacing(Wx::ID_ANY, :on_stylesheet_replacing)
+      evt_text_url(Wx::ID_ANY, :on_url)
+      evt_richtext_stylesheet_replacing(Wx::ID_ANY, :on_stylesheet_replacing)
 
-    evt_menu(ID::SET_FONT_SCALE, :on_set_font_scale)
-    evt_menu(ID::SET_DIMENSION_SCALE, :on_set_dimension_scale)
+      evt_menu(ID::SET_FONT_SCALE, :on_set_font_scale)
+      evt_menu(ID::SET_DIMENSION_SCALE, :on_set_dimension_scale)
 
-    write_initial_text
-  end
+      write_initial_text
+    end
 
-  # utility function to find an icon relative to this ruby script
-  def local_icon_file(icon_name)
-    File.join(File.dirname(__FILE__), icon_name)
-  end
+    # utility function to find an icon relative to this ruby script
+    def local_icon_file(icon_name)
+      File.join(File.dirname(__FILE__), icon_name)
+    end
 
-  # event handlers
-  def on_quit(_event)
-    close(true)
-  end
+    # event handlers
+    def on_quit(_event)
+      close(true)
+    end
 
-  def on_about(_event)
-    msg = "This is a demo for Wx::RTC::RichTextCtrl, a control for editing styled text.\nOriginal code (c) Julian Smart, 2005\nAdapted for wxRuby3 (c) Martin JN Corino, 2023"
-    Wx.message_box(msg, "About wxRichTextCtrl Sample", Wx::OK | Wx::ICON_INFORMATION, self)
-  end
+    def on_about(_event)
+      msg = "This is a demo for Wx::RTC::RichTextCtrl, a control for editing styled text.\nOriginal code (c) Julian Smart, 2005\nAdapted for wxRuby3 (c) Martin JN Corino, 2023"
+      Wx.message_box(msg, "About wxRichTextCtrl Sample", Wx::OK | Wx::ICON_INFORMATION, self)
+    end
 
-  def on_open(_event)
-    fileTypes = []
-    filter = Wx::RTC::RichTextBuffer.get_ext_wildcard(false, false, fileTypes)
-    filter += "|" unless filter.empty?
-
-    filter += "All files (*.*)|*.*"
-
-    Wx.FileDialog(self, "Choose a filename",
-                  '',
-                  '',
-                  filter,
-                  Wx::FD_OPEN) do |dialog|
-      if dialog.show_modal == Wx::ID_OK
-        path1 = dialog.path
-
-        unless path1.empty?
-          filterIndex = dialog.get_filter_index
-          fileType = filterIndex < fileTypes.size ? fileTypes[filterIndex] : Wx::RTC::RICHTEXT_TYPE_TEXT
-          @richTextCtrl.load_file(path1, fileType)
+    def on_open(_event)
+      fileTypes = []
+      filter = Wx::RTC::RichTextBuffer.get_ext_wildcard(false, false, fileTypes)
+      filter += "|" unless filter.empty?
+
+      filter += "All files (*.*)|*.*"
+
+      Wx.FileDialog(self, "Choose a filename",
+                    '',
+                    '',
+                    filter,
+                    Wx::FD_OPEN) do |dialog|
+        if dialog.show_modal == Wx::ID_OK
+          path1 = dialog.path
+
+          unless path1.empty?
+            filterIndex = dialog.get_filter_index
+            fileType = filterIndex < fileTypes.size ? fileTypes[filterIndex] : Wx::RTC::RICHTEXT_TYPE_TEXT
+            @richTextCtrl.load_file(path1, fileType)
+          end
         end
       end
     end
-  end
 
-  def on_save(event)
-    if @richTextCtrl.get_filename.empty?
-      on_save_as(event)
-    else
-      @richTextCtrl.save_file
+    def on_save(event)
+      if @richTextCtrl.get_filename.empty?
+        on_save_as(event)
+      else
+        @richTextCtrl.save_file
+      end
     end
-  end
 
-  def on_save_as(_event)
-    filter = Wx::RTC::RichTextBuffer.get_ext_wildcard(false, true)
+    def on_save_as(_event)
+      filter = Wx::RTC::RichTextBuffer.get_ext_wildcard(false, true)
 
-    Wx.FileDialog(self, "Choose a filename", '', '', filter, Wx::FD_SAVE) do |dialog|
+      Wx.FileDialog(self, "Choose a filename", '', '', filter, Wx::FD_SAVE) do |dialog|
 
-      if dialog.show_modal == Wx::ID_OK
-        path1 = dialog.path
+        if dialog.show_modal == Wx::ID_OK
+          path1 = dialog.path
 
-        unless path1.empty?
-          Wx::BusyCursor.busy do
-            start = Time.now
+          unless path1.empty?
+            Wx::BusyCursor.busy do
+              start = Time.now
 
-            @richTextCtrl.save_file(path1)
+              @richTextCtrl.save_file(path1)
 
-            td = Time.now-start
-            Wx.log_debug("Saving took #{td}s")
-            Wx.message_box("Saving took #{td}s")
+              td = Time.now-start
+              Wx.log_debug("Saving took #{td}s")
+              Wx.message_box("Saving took #{td}s")
+            end
           end
         end
       end
     end
-  end
 
-  def on_bold(_event)
-    @richTextCtrl.apply_bold_to_selection
-  end
-  def on_italic(_event)
-    @richTextCtrl.apply_italic_to_selection
-  end
-  def on_underline(_event)
-    @richTextCtrl.apply_underline_to_selection
-  end
+    def on_bold(_event)
+      @richTextCtrl.apply_bold_to_selection
+    end
+    def on_italic(_event)
+      @richTextCtrl.apply_italic_to_selection
+    end
+    def on_underline(_event)
+      @richTextCtrl.apply_underline_to_selection
+    end
 
-  def on_strikethrough(_event)
-    @richTextCtrl.apply_text_effect_to_selection(Wx::TEXT_ATTR_EFFECT_STRIKETHROUGH)
-  end
-  def on_superscript(_event)
-    @richTextCtrl.apply_text_effect_to_selection(Wx::TEXT_ATTR_EFFECT_SUPERSCRIPT)
-  end
-  def on_subscript(_event)
-    @richTextCtrl.apply_text_effect_to_selection(Wx::TEXT_ATTR_EFFECT_SUBSCRIPT)
-  end
+    def on_strikethrough(_event)
+      @richTextCtrl.apply_text_effect_to_selection(Wx::TEXT_ATTR_EFFECT_STRIKETHROUGH)
+    end
+    def on_superscript(_event)
+      @richTextCtrl.apply_text_effect_to_selection(Wx::TEXT_ATTR_EFFECT_SUPERSCRIPT)
+    end
+    def on_subscript(_event)
+      @richTextCtrl.apply_text_effect_to_selection(Wx::TEXT_ATTR_EFFECT_SUBSCRIPT)
+    end
 
-  def on_update_bold(event)
-    event.check(@richTextCtrl.is_selection_bold)
-  end
-  def on_update_italic(event)
-    event.check(@richTextCtrl.is_selection_italics)
-  end
-  def on_update_underline(event)
-    event.check(@richTextCtrl.is_selection_underlined)
-  end
-  def on_update_strikethrough(event)
-    event.check(@richTextCtrl.does_selection_have_text_effect_flag(Wx::TEXT_ATTR_EFFECT_STRIKETHROUGH))
-  end
-  def on_update_superscript(event)
-    event.check(@richTextCtrl.does_selection_have_text_effect_flag(Wx::TEXT_ATTR_EFFECT_SUPERSCRIPT))
-  end
-  def on_update_subscript(event)
-    event.check(@richTextCtrl.does_selection_have_text_effect_flag(Wx::TEXT_ATTR_EFFECT_SUBSCRIPT))
-  end
+    def on_update_bold(event)
+      event.check(@richTextCtrl.is_selection_bold)
+    end
+    def on_update_italic(event)
+      event.check(@richTextCtrl.is_selection_italics)
+    end
+    def on_update_underline(event)
+      event.check(@richTextCtrl.is_selection_underlined)
+    end
+    def on_update_strikethrough(event)
+      event.check(@richTextCtrl.does_selection_have_text_effect_flag(Wx::TEXT_ATTR_EFFECT_STRIKETHROUGH))
+    end
+    def on_update_superscript(event)
+      event.check(@richTextCtrl.does_selection_have_text_effect_flag(Wx::TEXT_ATTR_EFFECT_SUPERSCRIPT))
+    end
+    def on_update_subscript(event)
+      event.check(@richTextCtrl.does_selection_have_text_effect_flag(Wx::TEXT_ATTR_EFFECT_SUBSCRIPT))
+    end
 
-  def on_align_left(_event)
-    @richTextCtrl.apply_alignment_to_selection(Wx::TEXT_ALIGNMENT_LEFT)
-  end
-  def on_align_centre(_event)
-    @richTextCtrl.apply_alignment_to_selection(Wx::TEXT_ALIGNMENT_CENTRE)
-  end
-  def on_align_right(_event)
-    @richTextCtrl.apply_alignment_to_selection(Wx::TEXT_ALIGNMENT_RIGHT)
-  end
+    def on_align_left(_event)
+      @richTextCtrl.apply_alignment_to_selection(Wx::TEXT_ALIGNMENT_LEFT)
+    end
+    def on_align_centre(_event)
+      @richTextCtrl.apply_alignment_to_selection(Wx::TEXT_ALIGNMENT_CENTRE)
+    end
+    def on_align_right(_event)
+      @richTextCtrl.apply_alignment_to_selection(Wx::TEXT_ALIGNMENT_RIGHT)
+    end
 
-  def on_update_align_left(event)
-    event.check(@richTextCtrl.is_selection_aligned(Wx::TEXT_ALIGNMENT_LEFT))
-  end
-  def on_update_align_centre(event)
-    event.check(@richTextCtrl.is_selection_aligned(Wx::TEXT_ALIGNMENT_CENTRE))
-  end
-  def on_update_align_right(event)
-    event.check(@richTextCtrl.is_selection_aligned(Wx::TEXT_ALIGNMENT_RIGHT))
-  end
+    def on_update_align_left(event)
+      event.check(@richTextCtrl.is_selection_aligned(Wx::TEXT_ALIGNMENT_LEFT))
+    end
+    def on_update_align_centre(event)
+      event.check(@richTextCtrl.is_selection_aligned(Wx::TEXT_ALIGNMENT_CENTRE))
+    end
+    def on_update_align_right(event)
+      event.check(@richTextCtrl.is_selection_aligned(Wx::TEXT_ALIGNMENT_RIGHT))
+    end
 
-  def on_indent_more(_event)
-    attr = Wx::RichTextAttr.new
-    attr.set_flags(Wx::TEXT_ATTR_LEFT_INDENT)
+    def on_indent_more(_event)
+      attr = Wx::RichTextAttr.new
+      attr.set_flags(Wx::TEXT_ATTR_LEFT_INDENT)
 
-    if @richTextCtrl.get_style(@richTextCtrl.get_insertion_point, attr)
-      range = @richTextCtrl.get_insertion_point..@richTextCtrl.get_insertion_point
-      range = @richTextCtrl.selection_range if @richTextCtrl.has_selection
+      if @richTextCtrl.get_style(@richTextCtrl.get_insertion_point, attr)
+        range = @richTextCtrl.get_insertion_point..@richTextCtrl.get_insertion_point
+        range = @richTextCtrl.selection_range if @richTextCtrl.has_selection
 
-      attr.set_left_indent(attr.get_left_indent + 100)
+        attr.set_left_indent(attr.get_left_indent + 100)
 
-      attr.set_flags(Wx::TEXT_ATTR_LEFT_INDENT)
-      @richTextCtrl.set_style(range, attr)
+        attr.set_flags(Wx::TEXT_ATTR_LEFT_INDENT)
+        @richTextCtrl.set_style(range, attr)
+      end
     end
-  end
-  def on_indent_less(_event)
-    attr = Wx::RichTextAttr.new
-    attr.set_flags(Wx::TEXT_ATTR_LEFT_INDENT)
+    def on_indent_less(_event)
+      attr = Wx::RichTextAttr.new
+      attr.set_flags(Wx::TEXT_ATTR_LEFT_INDENT)
 
-    if @richTextCtrl.get_style(@richTextCtrl.get_insertion_point, attr)
-      range = @richTextCtrl.get_insertion_point..@richTextCtrl.get_insertion_point
-      range = @richTextCtrl.selection_range if @richTextCtrl.has_selection
+      if @richTextCtrl.get_style(@richTextCtrl.get_insertion_point, attr)
+        range = @richTextCtrl.get_insertion_point..@richTextCtrl.get_insertion_point
+        range = @richTextCtrl.selection_range if @richTextCtrl.has_selection
 
-      if attr.get_left_indent > 0
-        attr.set_left_indent([0, attr.get_left_indent - 100].max)
+        if attr.get_left_indent > 0
+          attr.set_left_indent([0, attr.get_left_indent - 100].max)
 
-        @richTextCtrl.set_style(range, attr)
+          @richTextCtrl.set_style(range, attr)
+        end
       end
     end
-  end
 
-  def on_font(_event)
-    if @richTextCtrl.has_selection
-      range = @richTextCtrl.selection_range
-    else
-      range = 0..(@richTextCtrl.last_position+1)
-    end
+    def on_font(_event)
+      if @richTextCtrl.has_selection
+        range = @richTextCtrl.selection_range
+      else
+        range = 0..(@richTextCtrl.last_position+1)
+      end
 
-    pages = Wx::RTC::RICHTEXT_FORMAT_FONT
+      pages = Wx::RTC::RICHTEXT_FORMAT_FONT
 
-    Wx::RTC.RichTextFormattingDialog(pages, self) do |formatDlg|
-      formatDlg.set_options(Wx::RTC::RichTextFormattingDialog::Option_AllowPixelFontSize)
-      formatDlg.get_style(@richTextCtrl, range)
+      Wx::RTC.RichTextFormattingDialog(pages, self) do |formatDlg|
+        formatDlg.set_options(Wx::RTC::RichTextFormattingDialog::Option_AllowPixelFontSize)
+        formatDlg.get_style(@richTextCtrl, range)
 
-      if formatDlg.show_modal == Wx::ID_OK
-        formatDlg.apply_style(@richTextCtrl, range,
-                              Wx::RTC::RICHTEXT_SETSTYLE_WITH_UNDO|
-                                Wx::RTC::RICHTEXT_SETSTYLE_OPTIMIZE|
-                                Wx::RTC::RICHTEXT_SETSTYLE_CHARACTERS_ONLY)
+        if formatDlg.show_modal == Wx::ID_OK
+          formatDlg.apply_style(@richTextCtrl, range,
+                                Wx::RTC::RICHTEXT_SETSTYLE_WITH_UNDO|
+                                  Wx::RTC::RICHTEXT_SETSTYLE_OPTIMIZE|
+                                  Wx::RTC::RICHTEXT_SETSTYLE_CHARACTERS_ONLY)
+        end
       end
     end
-  end
-  def on_image(_event)
-    if @richTextCtrl.has_selection
-      range = @richTextCtrl.selection_range
-      if (range.begin...range.end).size == 1
-        image = @richTextCtrl.get_focus_object.get_leaf_object_at_position(range.begin)
-        if image.is_a?(Wx::RTC::RichTextImage)
-          Wx::RTC.RichTextObjectPropertiesDialog(image, self) do |imageDlg|
-            if imageDlg.show_modal == Wx::ID_OK
-              imageDlg.apply_style(@richTextCtrl)
+    def on_image(_event)
+      if @richTextCtrl.has_selection
+        range = @richTextCtrl.selection_range
+        if (range.begin...range.end).size == 1
+          image = @richTextCtrl.get_focus_object.get_leaf_object_at_position(range.begin)
+          if image.is_a?(Wx::RTC::RichTextImage)
+            Wx::RTC.RichTextObjectPropertiesDialog(image, self) do |imageDlg|
+              if imageDlg.show_modal == Wx::ID_OK
+                imageDlg.apply_style(@richTextCtrl)
+              end
             end
           end
         end
       end
     end
-  end
-  def on_update_image(event)
-    range = @richTextCtrl.selection_range
-    if (range.begin...range.end).size == 1
-      obj = @richTextCtrl.get_focus_object.get_leaf_object_at_position(range.begin)
-      if obj && obj.is_a?(Wx::RTC::RichTextImage)
-        event.enable(true)
-        return
+    def on_update_image(event)
+      range = @richTextCtrl.selection_range
+      if (range.begin...range.end).size == 1
+        obj = @richTextCtrl.get_focus_object.get_leaf_object_at_position(range.begin)
+        if obj && obj.is_a?(Wx::RTC::RichTextImage)
+          event.enable(true)
+          return
+        end
       end
-    end
 
-    event.enable(false)
-  end
+      event.enable(false)
+    end
 
-  def on_paragraph(_event)
-    range = if @richTextCtrl.has_selection
-              @richTextCtrl.selection_range
-            else
-              0..(@richTextCtrl.last_position + 1)
-            end
+    def on_paragraph(_event)
+      range = if @richTextCtrl.has_selection
+                @richTextCtrl.selection_range
+              else
+                0..(@richTextCtrl.last_position + 1)
+              end
 
-    pages = Wx::RTC::RICHTEXT_FORMAT_INDENTS_SPACING|Wx::RTC::RICHTEXT_FORMAT_TABS|Wx::RTC::RICHTEXT_FORMAT_BULLETS
+      pages = Wx::RTC::RICHTEXT_FORMAT_INDENTS_SPACING|Wx::RTC::RICHTEXT_FORMAT_TABS|Wx::RTC::RICHTEXT_FORMAT_BULLETS
 
-    Wx::RTC.RichTextFormattingDialog(pages, self) do |formatDlg|
-      formatDlg.get_style(@richTextCtrl, range)
+      Wx::RTC.RichTextFormattingDialog(pages, self) do |formatDlg|
+        formatDlg.get_style(@richTextCtrl, range)
 
-      formatDlg.apply_style(@richTextCtrl, range) if formatDlg.show_modal == Wx::ID_OK
+        formatDlg.apply_style(@richTextCtrl, range) if formatDlg.show_modal == Wx::ID_OK
+      end
     end
-  end
-  def on_format(_event)
-    range = if @richTextCtrl.has_selection
-              @richTextCtrl.selection_range
-            else
-              0..(@richTextCtrl.last_position + 1)
-            end
+    def on_format(_event)
+      range = if @richTextCtrl.has_selection
+                @richTextCtrl.selection_range
+              else
+                0..(@richTextCtrl.last_position + 1)
+              end
 
-    pages = Wx::RTC::RICHTEXT_FORMAT_FONT|Wx::RTC::RICHTEXT_FORMAT_INDENTS_SPACING|Wx::RTC::RICHTEXT_FORMAT_TABS|Wx::RTC::RICHTEXT_FORMAT_BULLETS
+      pages = Wx::RTC::RICHTEXT_FORMAT_FONT|Wx::RTC::RICHTEXT_FORMAT_INDENTS_SPACING|Wx::RTC::RICHTEXT_FORMAT_TABS|Wx::RTC::RICHTEXT_FORMAT_BULLETS
 
-    Wx::RTC.RichTextFormattingDialog(pages, self) do |formatDlg|
-      formatDlg.get_style(@richTextCtrl, range)
+      Wx::RTC.RichTextFormattingDialog(pages, self) do |formatDlg|
+        formatDlg.get_style(@richTextCtrl, range)
 
-      formatDlg.apply_style(@richTextCtrl, range) if formatDlg.show_modal == Wx::ID_OK
+        formatDlg.apply_style(@richTextCtrl, range) if formatDlg.show_modal == Wx::ID_OK
+      end
+    end
+    def on_update_format(event)
+      event.enable(@richTextCtrl.has_selection)
     end
-  end
-  def on_update_format(event)
-    event.enable(@richTextCtrl.has_selection)
-  end
 
-  def on_insert_symbol(_event)
-    attr = Wx::RTC::RichTextAttr.new
-    attr.set_flags(Wx::TEXT_ATTR_FONT)
-    @richTextCtrl.get_style(@richTextCtrl.insertion_point, attr)
+    def on_insert_symbol(_event)
+      attr = Wx::RTC::RichTextAttr.new
+      attr.set_flags(Wx::TEXT_ATTR_FONT)
+      @richTextCtrl.get_style(@richTextCtrl.insertion_point, attr)
 
-    currentFontName = ''
-    currentFontName = attr.font.face_name if attr.has_font && attr.font.ok?
+      currentFontName = ''
+      currentFontName = attr.font.face_name if attr.has_font && attr.font.ok?
 
-    # Don't set the initial font in the dialog (so the user is choosing
-    # 'normal text', i.e. the current font) but do tell the dialog
-    # what 'normal text' is.
+      # Don't set the initial font in the dialog (so the user is choosing
+      # 'normal text', i.e. the current font) but do tell the dialog
+      # what 'normal text' is.
 
-    Wx::RTC.SymbolPickerDialog("*", '', currentFontName, self) do |dlg|
-      if dlg.show_modal == Wx::ID_OK
-        if dlg.has_selection
-          insertionPoint = @richTextCtrl.insertion_point
+      Wx::RTC.SymbolPickerDialog("*", '', currentFontName, self) do |dlg|
+        if dlg.show_modal == Wx::ID_OK
+          if dlg.has_selection
+            insertionPoint = @richTextCtrl.insertion_point
 
-          @richTextCtrl.write_text(dlg.get_symbol)
+            @richTextCtrl.write_text(dlg.get_symbol)
 
-          unless dlg.use_normal_font
-            font = Wx::Font.new(attr.font)
-            font.set_face_name(dlg.font_name)
-            attr.set_font(font)
-            @richTextCtrl.set_style(insertionPoint, insertionPoint+1, attr)
+            unless dlg.use_normal_font
+              font = Wx::Font.new(attr.font)
+              font.set_face_name(dlg.font_name)
+              attr.set_font(font)
+              @richTextCtrl.set_style(insertionPoint, insertionPoint+1, attr)
+            end
           end
         end
       end
     end
-  end
 
-  def set_selection_spacing(flag, &block)
-    attr = Wx::RTC::RichTextAttr.new
-    attr.set_flags(flag)
+    def set_selection_spacing(flag, &block)
+      attr = Wx::RTC::RichTextAttr.new
+      attr.set_flags(flag)
 
-    if @richTextCtrl.get_style(@richTextCtrl.insertion_point, attr)
-      range = @richTextCtrl.insertion_point..@richTextCtrl.insertion_point
-      range = @richTextCtrl.selection_range if @richTextCtrl.has_selection
+      if @richTextCtrl.get_style(@richTextCtrl.insertion_point, attr)
+        range = @richTextCtrl.insertion_point..@richTextCtrl.insertion_point
+        range = @richTextCtrl.selection_range if @richTextCtrl.has_selection
 
-      block.call(attr)
+        block.call(attr)
 
-      attr.set_flags(flag)
-      @richTextCtrl.set_style(range, attr)
+        attr.set_flags(flag)
+        @richTextCtrl.set_style(range, attr)
+      end
     end
-  end
-  protected :set_selection_spacing
+    protected :set_selection_spacing
 
-  def on_line_spacing_half(_event)
-    set_selection_spacing(Wx::TEXT_ATTR_LINE_SPACING) { |attr| attr.set_line_spacing(15) }
-  end
-  def on_line_spacing_double(_event)
-    set_selection_spacing(Wx::TEXT_ATTR_LINE_SPACING) { |attr| attr.set_line_spacing(20) }
-  end
-  def on_line_spacing_single(_event)
-    set_selection_spacing(Wx::TEXT_ATTR_LINE_SPACING) { |attr| attr.set_line_spacing(0) } # you could also use 10
-  end
+    def on_line_spacing_half(_event)
+      set_selection_spacing(Wx::TEXT_ATTR_LINE_SPACING) { |attr| attr.set_line_spacing(15) }
+    end
+    def on_line_spacing_double(_event)
+      set_selection_spacing(Wx::TEXT_ATTR_LINE_SPACING) { |attr| attr.set_line_spacing(20) }
+    end
+    def on_line_spacing_single(_event)
+      set_selection_spacing(Wx::TEXT_ATTR_LINE_SPACING) { |attr| attr.set_line_spacing(0) } # you could also use 10
+    end
 
-  def on_paragraph_spacing_more(_event)
-    set_selection_spacing(Wx::TEXT_ATTR_PARA_SPACING_AFTER) do |attr|
-      attr.set_paragraph_spacing_after(attr.get_paragraph_spacing_after + 20)
+    def on_paragraph_spacing_more(_event)
+      set_selection_spacing(Wx::TEXT_ATTR_PARA_SPACING_AFTER) do |attr|
+        attr.set_paragraph_spacing_after(attr.get_paragraph_spacing_after + 20)
+      end
     end
-  end
-  def on_paragraph_spacing_less(_event)
-    set_selection_spacing(Wx::TEXT_ATTR_PARA_SPACING_AFTER) do |attr|
-      if attr.get_paragraph_spacing_after >= 20
-        attr.set_paragraph_spacing_after(attr.get_paragraph_spacing_after - 20)
-      else
-        attr.set_paragraph_spacing_after(0)
+    def on_paragraph_spacing_less(_event)
+      set_selection_spacing(Wx::TEXT_ATTR_PARA_SPACING_AFTER) do |attr|
+        if attr.get_paragraph_spacing_after >= 20
+          attr.set_paragraph_spacing_after(attr.get_paragraph_spacing_after - 20)
+        else
+          attr.set_paragraph_spacing_after(0)
+        end
       end
     end
-  end
 
-  def on_number_list(_event)
-    if @richTextCtrl.has_selection
-      range = @richTextCtrl.selection_range
-      @richTextCtrl.set_list_style(range, 'Numbered List 1', Wx::RTC::RICHTEXT_SETSTYLE_WITH_UNDO|Wx::RTC::RICHTEXT_SETSTYLE_RENUMBER)
+    def on_number_list(_event)
+      if @richTextCtrl.has_selection
+        range = @richTextCtrl.selection_range
+        @richTextCtrl.set_list_style(range, 'Numbered List 1', Wx::RTC::RICHTEXT_SETSTYLE_WITH_UNDO|Wx::RTC::RICHTEXT_SETSTYLE_RENUMBER)
+      end
     end
-  end
-  def on_bullets_and_numbering(_event)
-    sheet = @richTextCtrl.get_style_sheet
+    def on_bullets_and_numbering(_event)
+      sheet = @richTextCtrl.get_style_sheet
 
-    flags = Wx::RTC::RICHTEXT_ORGANISER_BROWSE_NUMBERING
+      flags = Wx::RTC::RICHTEXT_ORGANISER_BROWSE_NUMBERING
 
-    Wx::RTC.RichTextStyleOrganiserDialog(flags, sheet, @richTextCtrl, self, Wx::ID_ANY, 'Bullets and Numbering') do |dlg|
-      if dlg.show_modal == Wx::ID_OK
-        dlg.apply_style if dlg.get_selected_style_definition
+      Wx::RTC.RichTextStyleOrganiserDialog(flags, sheet, @richTextCtrl, self, Wx::ID_ANY, 'Bullets and Numbering') do |dlg|
+        if dlg.show_modal == Wx::ID_OK
+          dlg.apply_style if dlg.get_selected_style_definition
+        end
       end
     end
-  end
-  def on_itemize_list(_event)
-    if @richTextCtrl.has_selection
-      range = @richTextCtrl.get_selection_range
-      @richTextCtrl.set_list_style(range, 'Bullet List 1')
+    def on_itemize_list(_event)
+      if @richTextCtrl.has_selection
+        range = @richTextCtrl.get_selection_range
+        @richTextCtrl.set_list_style(range, 'Bullet List 1')
+      end
     end
-  end
-  def on_renumber_list(_event)
-    if @richTextCtrl.has_selection
-      range = @richTextCtrl.get_selection_range
-      @richTextCtrl.number_list(range, nil, Wx::RTC::RICHTEXT_SETSTYLE_WITH_UNDO|Wx::RTC::RICHTEXT_SETSTYLE_RENUMBER)
+    def on_renumber_list(_event)
+      if @richTextCtrl.has_selection
+        range = @richTextCtrl.get_selection_range
+        @richTextCtrl.number_list(range, nil, Wx::RTC::RICHTEXT_SETSTYLE_WITH_UNDO|Wx::RTC::RICHTEXT_SETSTYLE_RENUMBER)
+      end
     end
-  end
-  def on_promote_list(_event)
-    if @richTextCtrl.has_selection
-      range = @richTextCtrl.get_selection_range
-      @richTextCtrl.promote_list(1, range, nil)
+    def on_promote_list(_event)
+      if @richTextCtrl.has_selection
+        range = @richTextCtrl.get_selection_range
+        @richTextCtrl.promote_list(1, range, nil)
+      end
     end
-  end
-  def on_demote_list(_event)
-    if @richTextCtrl.has_selection
-      range = @richTextCtrl.get_selection_range
-      @richTextCtrl.promote_list(-1, range, nil)
+    def on_demote_list(_event)
+      if @richTextCtrl.has_selection
+        range = @richTextCtrl.get_selection_range
+        @richTextCtrl.promote_list(-1, range, nil)
+      end
     end
-  end
-  def on_clear_list(_event)
-    if @richTextCtrl.has_selection
-      range = @richTextCtrl.get_selection_range
-      @richTextCtrl.clear_list_style(range)
+    def on_clear_list(_event)
+      if @richTextCtrl.has_selection
+        range = @richTextCtrl.get_selection_range
+        @richTextCtrl.clear_list_style(range)
+      end
     end
-  end
 
-  def on_table_add_column(_event)
-    table = @richTextCtrl.find_table
-    if table.is_a?(Wx::RTC::RichTextTable)
-      cellAttr = table.get_cell(0, 0).attributes
-      table.add_columns(table.column_count, 1, cellAttr)
+    def on_table_add_column(_event)
+      table = @richTextCtrl.find_table
+      if table.is_a?(Wx::RTC::RichTextTable)
+        cellAttr = table.get_cell(0, 0).attributes
+        table.add_columns(table.column_count, 1, cellAttr)
+      end
     end
-  end
-  def on_table_add_row(_event)
-    table = @richTextCtrl.find_table
-    if table.is_a?(Wx::RTC::RichTextTable)
-      cellAttr = table.get_cell(0, 0).attributes
-      table.add_rows(table.row_count, 1, cellAttr)
+    def on_table_add_row(_event)
+      table = @richTextCtrl.find_table
+      if table.is_a?(Wx::RTC::RichTextTable)
+        cellAttr = table.get_cell(0, 0).attributes
+        table.add_rows(table.row_count, 1, cellAttr)
+      end
     end
-  end
-  def on_table_delete_column(_event)
-    table = @richTextCtrl.find_table
-    if table.is_a?(Wx::RTC::RichTextTable)
-      _, col = table.get_focused_cell
-      col = table.column_count-1 if col == -1
-      table.delete_columns(col, 1)
+    def on_table_delete_column(_event)
+      table = @richTextCtrl.find_table
+      if table.is_a?(Wx::RTC::RichTextTable)
+        _, col = table.get_focused_cell
+        col = table.column_count-1 if col == -1
+        table.delete_columns(col, 1)
+      end
     end
-  end
-  def on_table_delete_row(_event)
-    table = @richTextCtrl.find_table
-    if table.is_a?(Wx::RTC::RichTextTable)
-      row, _ = table.get_focused_cell
-      row = table.row_count-1 if row == -1
-      table.delete_rows(row, 1)
+    def on_table_delete_row(_event)
+      table = @richTextCtrl.find_table
+      if table.is_a?(Wx::RTC::RichTextTable)
+        row, _ = table.get_focused_cell
+        row = table.row_count-1 if row == -1
+        table.delete_rows(row, 1)
+      end
     end
-  end
-  def on_table_focused_update_ui(event)
-    event.enable(@richTextCtrl.find_table != nil)
-  end
-  def on_table_has_cells_update_ui(event)
-    enable = false
-    table = @richTextCtrl.find_table
-    if table.is_a?(Wx::RTC::RichTextTable)
-        if event.id == ID::TABLE_DELETE_COLUMN
-          enable = table.column_count > 1
-        else
-          enable = table.row_count > 1
-        end
+    def on_table_focused_update_ui(event)
+      event.enable(@richTextCtrl.find_table != nil)
+    end
+    def on_table_has_cells_update_ui(event)
+      enable = false
+      table = @richTextCtrl.find_table
+      if table.is_a?(Wx::RTC::RichTextTable)
+          if event.id == ID::TABLE_DELETE_COLUMN
+            enable = table.column_count > 1
+          else
+            enable = table.row_count > 1
+          end
+      end
+      event.enable(enable)
     end
-    event.enable(enable)
-  end
 
-  def on_reload(_event)
-    @richTextCtrl.clear
-    write_initial_text
-  end
+    def on_reload(_event)
+      @richTextCtrl.clear
+      write_initial_text
+    end
 
-  def on_view_html(_event)
-    dialog = Wx::Dialog.new(self, Wx::ID_ANY, 'HTML', Wx::DEFAULT_POSITION, [500, 400], Wx::DEFAULT_DIALOG_STYLE)
-    begin
-      boxSizer = Wx::VBoxSizer.new
-      dialog.set_sizer(boxSizer)
+    def on_view_html(_event)
+      dialog = Wx::Dialog.new(self, Wx::ID_ANY, 'HTML', Wx::DEFAULT_POSITION, [500, 400], Wx::DEFAULT_DIALOG_STYLE)
+      begin
+        boxSizer = Wx::VBoxSizer.new
+        dialog.set_sizer(boxSizer)
 
-      win = Wx::HTML::HtmlWindow.new(dialog, size: [500, 400], style: Wx::SUNKEN_BORDER)
-      boxSizer.add(win, 1, Wx::ALL, 5)
+        win = Wx::HTML::HtmlWindow.new(dialog, size: [500, 400], style: Wx::SUNKEN_BORDER)
+        boxSizer.add(win, 1, Wx::ALL, 5)
 
-      cancelButton = Wx::Button.new(dialog, Wx::ID_CANCEL, '&Close')
-      boxSizer.add(cancelButton, 0, Wx::ALL|Wx::CENTRE, 5)
+        cancelButton = Wx::Button.new(dialog, Wx::ID_CANCEL, '&Close')
+        boxSizer.add(cancelButton, 0, Wx::ALL|Wx::CENTRE, 5)
 
-      strStream = StringIO.new
+        strStream = StringIO.new
 
-      htmlHandler = Wx::RTC::RichTextHTMLHandler.new
-      htmlHandler.set_flags(Wx::RTC::RICHTEXT_HANDLER_SAVE_IMAGES_TO_MEMORY)
+        htmlHandler = Wx::RTC::RichTextHTMLHandler.new
+        htmlHandler.set_flags(Wx::RTC::RICHTEXT_HANDLER_SAVE_IMAGES_TO_MEMORY)
 
-      fontSizeMapping = [7,9,11,12,14,22,100]
+        fontSizeMapping = [7,9,11,12,14,22,100]
 
-      htmlHandler.set_font_size_mapping(fontSizeMapping)
+        htmlHandler.set_font_size_mapping(fontSizeMapping)
 
-      if htmlHandler.save_file(@richTextCtrl.buffer, strStream)
-        strStream.rewind
-        win.set_page(strStream.read || '')
-      end
+        if htmlHandler.save_file(@richTextCtrl.buffer, strStream)
+          strStream.rewind
+          win.set_page(strStream.read || '')
+        end
 
-      boxSizer.fit(dialog)
+        boxSizer.fit(dialog)
 
-      dialog.show_modal
+        dialog.show_modal
 
-      # Now delete the temporary in-memory images
-      htmlHandler.delete_temporary_images
-    ensure
-      dialog.destroy
+        # Now delete the temporary in-memory images
+        htmlHandler.delete_temporary_images
+      ensure
+        dialog.destroy
+      end
     end
-  end
 
-  class << self
-    def alternate_style_sheet
-      @alternate_style_sheet
-    end
-    def alternate_style_sheet=(alt)
-      @alternate_style_sheet = alt
+    class << self
+      def alternate_style_sheet
+        @alternate_style_sheet
+      end
+      def alternate_style_sheet=(alt)
+        @alternate_style_sheet = alt
+      end
     end
-  end
 
-  # Demonstrates how you can change the style sheets and have the changes
-  # reflected in the control content without wiping out character formatting.
-  def on_switch_stylesheets(_event)
-    styleList = find_window_by_id(ID::RICHTEXT_STYLE_LIST)
-    styleCombo = find_window_by_id(ID::RICHTEXT_STYLE_COMBO)
+    # Demonstrates how you can change the style sheets and have the changes
+    # reflected in the control content without wiping out character formatting.
+    def on_switch_stylesheets(_event)
+      styleList = find_window_by_id(ID::RICHTEXT_STYLE_LIST)
+      styleCombo = find_window_by_id(ID::RICHTEXT_STYLE_COMBO)
 
-    sheet = @richTextCtrl.get_style_sheet
+      sheet = @richTextCtrl.get_style_sheet
 
-    # One-time creation of an alternate style sheet
-    unless MyFrame.alternate_style_sheet
-      MyFrame.alternate_style_sheet = Wx::RTC::RichTextStyleSheet.new(sheet)
+      # One-time creation of an alternate style sheet
+      unless MyFrame.alternate_style_sheet
+        MyFrame.alternate_style_sheet = Wx::RTC::RichTextStyleSheet.new(sheet)
 
-      # Make some modifications
-      MyFrame.alternate_style_sheet.paragraph_style_count.times do |i|
-        style_def = MyFrame.alternate_style_sheet.get_paragraph_style(i)
+        # Make some modifications
+        MyFrame.alternate_style_sheet.paragraph_style_count.times do |i|
+          style_def = MyFrame.alternate_style_sheet.get_paragraph_style(i)
 
-        style_def.get_style.set_text_colour(:BLUE) if style_def.get_style.has_text_colour
+          style_def.get_style.set_text_colour(:BLUE) if style_def.get_style.has_text_colour
 
-        if style_def.get_style.has_alignment
-          if style_def.get_style.get_alignment == Wx::TEXT_ALIGNMENT_CENTRE
-            style_def.get_style.set_alignment(Wx::TEXT_ALIGNMENT_RIGHT)
-          elsif style_def.get_style.get_alignment == Wx::TEXT_ALIGNMENT_LEFT
-            style_def.get_style.set_alignment(Wx::TEXT_ALIGNMENT_CENTRE)
+          if style_def.get_style.has_alignment
+            if style_def.get_style.get_alignment == Wx::TEXT_ALIGNMENT_CENTRE
+              style_def.get_style.set_alignment(Wx::TEXT_ALIGNMENT_RIGHT)
+            elsif style_def.get_style.get_alignment == Wx::TEXT_ALIGNMENT_LEFT
+              style_def.get_style.set_alignment(Wx::TEXT_ALIGNMENT_CENTRE)
+            end
+          end
+          if style_def.get_style.has_left_indent
+            style_def.get_style.set_left_indent(style_def.get_style.get_left_indent * 2)
           end
-        end
-        if style_def.get_style.has_left_indent
-          style_def.get_style.set_left_indent(style_def.get_style.get_left_indent * 2)
         end
       end
-    end
 
-    # Switch sheets
-    tmp = MyFrame.alternate_style_sheet
-    MyFrame.alternate_style_sheet = sheet
-    sheet = tmp
+      # Switch sheets
+      tmp = MyFrame.alternate_style_sheet
+      MyFrame.alternate_style_sheet = sheet
+      sheet = tmp
 
-    @richTextCtrl.set_style_sheet(sheet)
-    @richTextCtrl.apply_style_sheet(sheet) # Makes the control reflect the new style definitions
+      @richTextCtrl.set_style_sheet(sheet)
+      @richTextCtrl.apply_style_sheet(sheet) # Makes the control reflect the new style definitions
 
-    styleList.set_style_sheet(sheet)
-    styleList.update_styles
+      styleList.set_style_sheet(sheet)
+      styleList.update_styles
 
-    styleCombo.set_style_sheet(sheet)
-    styleCombo.update_styles
-  end
-  def on_manage_styles(_event)
-    sheet = @richTextCtrl.get_style_sheet
-
-    flags = Wx::RTC::RICHTEXT_ORGANISER_CREATE_STYLES|Wx::RTC::RICHTEXT_ORGANISER_EDIT_STYLES
+      styleCombo.set_style_sheet(sheet)
+      styleCombo.update_styles
+    end
+    def on_manage_styles(_event)
+      sheet = @richTextCtrl.get_style_sheet
 
-    Wx::RTC.RichTextStyleOrganiserDialog(flags, sheet, nil, self, Wx::ID_ANY, 'Style Manager')
-  end
+      flags = Wx::RTC::RICHTEXT_ORGANISER_CREATE_STYLES|Wx::RTC::RICHTEXT_ORGANISER_EDIT_STYLES
 
-  def on_insert_url(_event)
-    url = Wx.get_text_from_user('URL:', 'Insert URL')
-    unless url.empty?
-      # Make a style suitable for showing a URL
-      urlStyle = Wx::RichTextAttr.new
-      urlStyle.set_text_colour(:BLUE)
-      urlStyle.set_font_underlined(true)
+      Wx::RTC.RichTextStyleOrganiserDialog(flags, sheet, nil, self, Wx::ID_ANY, 'Style Manager')
+    end
 
-      @richTextCtrl.begin_style(urlStyle)
-      @richTextCtrl.begin_url(url)
-      @richTextCtrl.write_text(url)
-      @richTextCtrl.end_url
-      @richTextCtrl.end_style
+    def on_insert_url(_event)
+      url = Wx.get_text_from_user('URL:', 'Insert URL')
+      unless url.empty?
+        # Make a style suitable for showing a URL
+        urlStyle = Wx::RichTextAttr.new
+        urlStyle.set_text_colour(:BLUE)
+        urlStyle.set_font_underlined(true)
+
+        @richTextCtrl.begin_style(urlStyle)
+        @richTextCtrl.begin_url(url)
+        @richTextCtrl.write_text(url)
+        @richTextCtrl.end_url
+        @richTextCtrl.end_style
+      end
+    end
+    def on_url(event)
+      Wx.message_box(event.get_string)
+    end
+    def on_stylesheet_replacing(event)
+      event.veto
     end
-  end
-  def on_url(event)
-    Wx.message_box(event.get_string)
-  end
-  def on_stylesheet_replacing(event)
-    event.veto
-  end
 
-  if Wx.has_feature? :USE_PRINTING_ARCHITECTURE
+    if Wx.has_feature? :USE_PRINTING_ARCHITECTURE
 
-  def on_print(_event)
-    Wx.get_app.get_printing.print_buffer(@richTextCtrl.buffer)
-  end
-  def on_preview(_event)
-    Wx.get_app.get_printing.preview_buffer(@richTextCtrl.buffer)
-  end
+    def on_print(_event)
+      Wx.get_app.get_printing.print_buffer(@richTextCtrl.buffer)
+    end
+    def on_preview(_event)
+      Wx.get_app.get_printing.preview_buffer(@richTextCtrl.buffer)
+    end
 
-  end
+    end
 
-  def on_page_setup(_event)
-    # dialog = Wx::Dialog.new(self, Wx::ID_ANY, 'Testing', [10, 10], [400, 300], Wx::DEFAULT_DIALOG_STYLE)
-    # begin
-    #   nb = Wx::Notebook.new(dialog, pos: [5, 5], size: [300, 250])
-    #   panel = Wx::Panel.new(nb)
-    #   panel2 = Wx::Panel.new(nb)
-    #
-    #   Wx::RichTextCtrl.new(panel, pos: [5, 5], size: [200, 150], style: Wx::VSCROLL|Wx::TE_READONLY)
-    #   nb.add_page(panel, 'Page 1')
-    #
-    #   Wx::RichTextCtrl.new(panel2, pos: [5, 5], size: [200, 150], style: Wx::VSCROLL|Wx::TE_READONLY)
-    #   nb.add_page(panel2, 'Page 2')
-    #
-    #   Wx::Button.new(dialog, Wx::ID_OK, 'OK', [5, 180])
-    #
-    #   dialog.show_modal
-    # ensure
-    #   dialog.destroy
-    # end
-    Wx.get_app.get_printing.page_setup
-  end
+    def on_page_setup(_event)
+      # dialog = Wx::Dialog.new(self, Wx::ID_ANY, 'Testing', [10, 10], [400, 300], Wx::DEFAULT_DIALOG_STYLE)
+      # begin
+      #   nb = Wx::Notebook.new(dialog, pos: [5, 5], size: [300, 250])
+      #   panel = Wx::Panel.new(nb)
+      #   panel2 = Wx::Panel.new(nb)
+      #
+      #   Wx::RichTextCtrl.new(panel, pos: [5, 5], size: [200, 150], style: Wx::VSCROLL|Wx::TE_READONLY)
+      #   nb.add_page(panel, 'Page 1')
+      #
+      #   Wx::RichTextCtrl.new(panel2, pos: [5, 5], size: [200, 150], style: Wx::VSCROLL|Wx::TE_READONLY)
+      #   nb.add_page(panel2, 'Page 2')
+      #
+      #   Wx::Button.new(dialog, Wx::ID_OK, 'OK', [5, 180])
+      #
+      #   dialog.show_modal
+      # ensure
+      #   dialog.destroy
+      # end
+      Wx.get_app.get_printing.page_setup
+    end
 
-  def on_insert_image(_event)
-    Wx.FileDialog(self, 'Choose an image', '', '',
-                  'BMP and GIF files (*.bmp;*.gif)|*.bmp;*.gif|PNG files (*.png)|*.png|JPEG files (*.jpg;*.jpeg)|*.jpg;*.jpeg') do |dialog|
-      if dialog.show_modal == Wx::ID_OK
-        path = dialog.path
-        image = Wx::Image.new
-        if image.load_file(path) && image.type != Wx::BITMAP_TYPE_INVALID
-          @richTextCtrl.write_image(path, image.type)
+    def on_insert_image(_event)
+      Wx.FileDialog(self, 'Choose an image', '', '',
+                    'BMP and GIF files (*.bmp;*.gif)|*.bmp;*.gif|PNG files (*.png)|*.png|JPEG files (*.jpg;*.jpeg)|*.jpg;*.jpeg') do |dialog|
+        if dialog.show_modal == Wx::ID_OK
+          path = dialog.path
+          image = Wx::Image.new
+          if image.load_file(path) && image.type != Wx::BITMAP_TYPE_INVALID
+            @richTextCtrl.write_image(path, image.type)
+          end
         end
       end
     end
-  end
 
-  def on_set_font_scale(_event)
-    value = "%g" % @richTextCtrl.get_font_scale
-    text = Wx.get_text_from_user('Enter a text scale factor:', 'Text Scale Factor', value, Wx.get_top_level_parent(self))
-    if !text.empty? && value != text
-      scale = text.to_f
-      scale = 1.0 if scale == 0.0
-      @richTextCtrl.set_font_scale(scale, true)
+    def on_set_font_scale(_event)
+      value = "%g" % @richTextCtrl.get_font_scale
+      text = Wx.get_text_from_user('Enter a text scale factor:', 'Text Scale Factor', value, Wx.get_top_level_parent(self))
+      if !text.empty? && value != text
+        scale = text.to_f
+        scale = 1.0 if scale == 0.0
+        @richTextCtrl.set_font_scale(scale, true)
+      end
     end
-  end
-  def on_set_dimension_scale(_event)
-    value = "%g" % @richTextCtrl.get_dimension_scale
-    text = Wx.get_text_from_user('Enter a dimension scale factor:', 'Dimension Scale Factor', value, Wx.get_top_level_parent(self))
-    if !text.empty? && value != text
-      scale = text.to_f
-      scale = 1.0 if scale == 0.0
-      @richTextCtrl.set_dimension_scale(scale, true)
+    def on_set_dimension_scale(_event)
+      value = "%g" % @richTextCtrl.get_dimension_scale
+      text = Wx.get_text_from_user('Enter a dimension scale factor:', 'Dimension Scale Factor', value, Wx.get_top_level_parent(self))
+      if !text.empty? && value != text
+        scale = text.to_f
+        scale = 1.0 if scale == 0.0
+        @richTextCtrl.set_dimension_scale(scale, true)
+      end
     end
-  end
 
-  protected
+    protected
 
-  class << self
+    class << self
 
-    def event_type
-      @event_type ||= 0
-    end
-    def event_type=(v)
-      @event_type = v
-    end
+      def event_type
+        @event_type ||= 0
+      end
+      def event_type=(v)
+        @event_type = v
+      end
 
-    def win_id
-      @win_id ||= 0
-    end
-    def win_id=(id)
-      @win_id = id.to_i
-    end
+      def win_id
+        @win_id ||= 0
+      end
+      def win_id=(id)
+        @win_id = id.to_i
+      end
 
-  end
+    end
 
-  # Write text
-  def write_initial_text
-    r = @richTextCtrl
+    # Write text
+    def write_initial_text
+      r = @richTextCtrl
 
-    r.set_default_style(Wx::RichTextAttr.new)
+      r.set_default_style(Wx::RichTextAttr.new)
 
-    r.freeze
+      r.freeze
 
-    r.begin_suppress_undo
+      r.begin_suppress_undo
 
-    r.begin_paragraph_spacing(0, 20)
+      r.begin_paragraph_spacing(0, 20)
 
-    r.begin_alignment(Wx::TEXT_ALIGNMENT_CENTRE)
-    r.begin_bold
+      r.begin_alignment(Wx::TEXT_ALIGNMENT_CENTRE)
+      r.begin_bold
 
-    r.begin_font_size(14)
+      r.begin_font_size(14)
 
-    lineBreak = ?\n
+      lineBreak = ?\n
 
-    r.write_text("Welcome to wxRichTextCtrl, a wxWidgets control" + lineBreak + "for editing and presenting styled text and images\n")
-    r.end_font_size
+      r.write_text("Welcome to wxRichTextCtrl, a wxWidgets control" + lineBreak + "for editing and presenting styled text and images\n")
+      r.end_font_size
 
-    r.begin_italic
-    r.write_text("by Julian Smart")
-    r.end_italic
+      r.begin_italic
+      r.write_text("by Julian Smart")
+      r.end_italic
 
-    r.end_bold
-    r.newline
+      r.end_bold
+      r.newline
 
-    r.write_image(Wx.Bitmap(:zebra))
+      r.write_image(Wx.Bitmap(:zebra))
 
-    r.newline
-    r.newline
+      r.newline
+      r.newline
 
-    r.end_alignment
+      r.end_alignment
 
 =begin
-    r.begin_alignment(wxTEXT_ALIGNMENT_CENTRE)
-    r.write_text("This is a simple test for a floating left image test. The zebra image should be placed at the left side of the current buffer and all the text should flow around it at the right side. This is a simple test for a floating left image test. The zebra image should be placed at the left side of the current buffer and all the text should flow around it at the right side. This is a simple test for a floating left image test. The zebra image should be placed at the left side of the current buffer and all the text should flow around it at the right side.")
-    r.newline
-    r.end_alignment
+      r.begin_alignment(wxTEXT_ALIGNMENT_CENTRE)
+      r.write_text("This is a simple test for a floating left image test. The zebra image should be placed at the left side of the current buffer and all the text should flow around it at the right side. This is a simple test for a floating left image test. The zebra image should be placed at the left side of the current buffer and all the text should flow around it at the right side. This is a simple test for a floating left image test. The zebra image should be placed at the left side of the current buffer and all the text should flow around it at the right side.")
+      r.newline
+      r.end_alignment
 =end
 
-    r.begin_alignment(Wx::TEXT_ALIGNMENT_LEFT)
-    imageAttr = Wx::RTC::RichTextAttr.new
-    imageAttr.get_text_box_attr.set_float_mode(Wx::TEXT_BOX_ATTR_FLOAT_LEFT)
-    r.write_text("This is a simple test for a floating left image test. The zebra image should be placed at the left side of the current buffer and all the text should flow around it at the right side. This is a simple test for a floating left image test. The zebra image should be placed at the left side of the current buffer and all the text should flow around it at the right side. This is a simple test for a floating left image test. The zebra image should be placed at the left side of the current buffer and all the text should flow around it at the right side.")
-    r.write_image(Wx.Bitmap(:zebra), Wx::BITMAP_TYPE_PNG, imageAttr)
+      r.begin_alignment(Wx::TEXT_ALIGNMENT_LEFT)
+      imageAttr = Wx::RTC::RichTextAttr.new
+      imageAttr.get_text_box_attr.set_float_mode(Wx::TEXT_BOX_ATTR_FLOAT_LEFT)
+      r.write_text("This is a simple test for a floating left image test. The zebra image should be placed at the left side of the current buffer and all the text should flow around it at the right side. This is a simple test for a floating left image test. The zebra image should be placed at the left side of the current buffer and all the text should flow around it at the right side. This is a simple test for a floating left image test. The zebra image should be placed at the left side of the current buffer and all the text should flow around it at the right side.")
+      r.write_image(Wx.Bitmap(:zebra), Wx::BITMAP_TYPE_PNG, imageAttr)
 
-    imageAttr.get_text_box_attr.top.set_value(200)
-    imageAttr.get_text_box_attr.top.set_units(Wx::TEXT_ATTR_UNITS_PIXELS)
-    imageAttr.get_text_box_attr.set_float_mode(Wx::TEXT_BOX_ATTR_FLOAT_RIGHT)
-    r.write_image(Wx.Bitmap(:zebra), Wx::BITMAP_TYPE_PNG, imageAttr)
-    r.write_text("This is a simple test for a floating right image test. The zebra image should be placed at the right side of the current buffer and all the text should flow around it at the left side. This is a simple test for a floating left image test. The zebra image should be placed at the right side of the current buffer and all the text should flow around it at the left side. This is a simple test for a floating left image test. The zebra image should be placed at the right side of the current buffer and all the text should flow around it at the left side.")
-    r.end_alignment
-    r.newline
+      imageAttr.get_text_box_attr.top.set_value(200)
+      imageAttr.get_text_box_attr.top.set_units(Wx::TEXT_ATTR_UNITS_PIXELS)
+      imageAttr.get_text_box_attr.set_float_mode(Wx::TEXT_BOX_ATTR_FLOAT_RIGHT)
+      r.write_image(Wx.Bitmap(:zebra), Wx::BITMAP_TYPE_PNG, imageAttr)
+      r.write_text("This is a simple test for a floating right image test. The zebra image should be placed at the right side of the current buffer and all the text should flow around it at the left side. This is a simple test for a floating left image test. The zebra image should be placed at the right side of the current buffer and all the text should flow around it at the left side. This is a simple test for a floating left image test. The zebra image should be placed at the right side of the current buffer and all the text should flow around it at the left side.")
+      r.end_alignment
+      r.newline
 
-    r.write_text("What can you do with this thing? ")
+      r.write_text("What can you do with this thing? ")
 
-    r.write_image(Wx.Bitmap(:smiley))
-    r.write_text(" Well, you can change text ")
+      r.write_image(Wx.Bitmap(:smiley))
+      r.write_text(" Well, you can change text ")
 
-    r.begin_text_colour(Wx::RED)
-    r.write_text("colour, like this red bit.")
-    r.end_text_colour
+      r.begin_text_colour(Wx::RED)
+      r.write_text("colour, like this red bit.")
+      r.end_text_colour
 
-    backgroundColourAttr = Wx::RTC::RichTextAttr.new
-    backgroundColourAttr.set_background_colour(Wx::GREEN)
-    backgroundColourAttr.set_text_colour(:BLUE)
-    r.begin_style(backgroundColourAttr)
-    r.write_text(" And this blue on green bit.")
-    r.end_style
+      backgroundColourAttr = Wx::RTC::RichTextAttr.new
+      backgroundColourAttr.set_background_colour(Wx::GREEN)
+      backgroundColourAttr.set_text_colour(:BLUE)
+      r.begin_style(backgroundColourAttr)
+      r.write_text(" And this blue on green bit.")
+      r.end_style
 
-    r.write_text(" Naturally you can make things ")
-    r.begin_bold
-    r.write_text("bold ")
-    r.end_bold
-    r.begin_italic
-    r.write_text("or italic ")
-    r.end_italic
-    r.begin_underline
-    r.write_text("or underlined.")
-    r.end_underline
+      r.write_text(" Naturally you can make things ")
+      r.begin_bold
+      r.write_text("bold ")
+      r.end_bold
+      r.begin_italic
+      r.write_text("or italic ")
+      r.end_italic
+      r.begin_underline
+      r.write_text("or underlined.")
+      r.end_underline
 
-    r.begin_font_size(14)
-    r.write_text(" Different font sizes on the same line is allowed, too.")
-    r.end_font_size
+      r.begin_font_size(14)
+      r.write_text(" Different font sizes on the same line is allowed, too.")
+      r.end_font_size
 
-    r.write_text(" Next we'll show an indented paragraph.")
+      r.write_text(" Next we'll show an indented paragraph.")
 
-    r.newline
+      r.newline
 
-    r.begin_left_indent(60)
-    r.write_text("It was in January, the most down-trodden month of an Edinburgh winter. An attractive woman came into the cafe, which is nothing remarkable.")
-    r.newline
+      r.begin_left_indent(60)
+      r.write_text("It was in January, the most down-trodden month of an Edinburgh winter. An attractive woman came into the cafe, which is nothing remarkable.")
+      r.newline
 
-    r.end_left_indent
-
-    r.write_text("Next, we'll show a first-line indent, achieved using BeginLeftIndent(100, -40).")
-
-    r.newline
-
-    r.begin_left_indent(100, -40)
+      r.end_left_indent
 
-    r.write_text("It was in January, the most down-trodden month of an Edinburgh winter. An attractive woman came into the cafe, which is nothing remarkable.")
-    r.newline
+      r.write_text("Next, we'll show a first-line indent, achieved using BeginLeftIndent(100, -40).")
 
-    r.end_left_indent
+      r.newline
 
-    r.write_text("Numbered bullets are possible, again using subindents:")
-    r.newline
+      r.begin_left_indent(100, -40)
 
-    r.begin_numbered_bullet(1, 100, 60)
-    r.write_text("This is my first item. Note that wxRichTextCtrl can apply numbering and bullets automatically based on list styles, but this list is formatted explicitly by setting indents.")
-    r.newline
-    r.end_numbered_bullet
+      r.write_text("It was in January, the most down-trodden month of an Edinburgh winter. An attractive woman came into the cafe, which is nothing remarkable.")
+      r.newline
 
-    r.begin_numbered_bullet(2, 100, 60)
-    r.write_text("This is my second item.")
-    r.newline
-    r.end_numbered_bullet
+      r.end_left_indent
 
-    r.write_text("The following paragraph is right-indented:")
-    r.newline
+      r.write_text("Numbered bullets are possible, again using subindents:")
+      r.newline
 
-    r.begin_right_indent(200)
+      r.begin_numbered_bullet(1, 100, 60)
+      r.write_text("This is my first item. Note that wxRichTextCtrl can apply numbering and bullets automatically based on list styles, but this list is formatted explicitly by setting indents.")
+      r.newline
+      r.end_numbered_bullet
 
-    r.write_text("It was in January, the most down-trodden month of an Edinburgh winter. An attractive woman came into the cafe, which is nothing remarkable.")
-    r.newline
+      r.begin_numbered_bullet(2, 100, 60)
+      r.write_text("This is my second item.")
+      r.newline
+      r.end_numbered_bullet
 
-    r.end_right_indent
+      r.write_text("The following paragraph is right-indented:")
+      r.newline
 
-    r.write_text("The following paragraph is right-aligned with 1.5 line spacing:")
-    r.newline
+      r.begin_right_indent(200)
 
-    r.begin_alignment(Wx::TEXT_ALIGNMENT_RIGHT)
-    r.begin_line_spacing(Wx::TEXT_ATTR_LINE_SPACING_HALF)
-    r.write_text("It was in January, the most down-trodden month of an Edinburgh winter. An attractive woman came into the cafe, which is nothing remarkable.")
-    r.newline
-    r.end_line_spacing
-    r.end_alignment
+      r.write_text("It was in January, the most down-trodden month of an Edinburgh winter. An attractive woman came into the cafe, which is nothing remarkable.")
+      r.newline
 
-    tabs = [400, 600, 800, 1000]
-    attr = Wx::RichTextAttr.new
-    attr.set_flags(Wx::TEXT_ATTR_TABS)
-    attr.set_tabs(tabs)
-    r.set_default_style(attr)
+      r.end_right_indent
 
-    r.write_text("This line contains tabs:\tFirst tab\tSecond tab\tThird tab")
-    r.newline
+      r.write_text("The following paragraph is right-aligned with 1.5 line spacing:")
+      r.newline
 
-    r.write_text("Other notable features of wxRichTextCtrl include:")
-    r.newline
+      r.begin_alignment(Wx::TEXT_ALIGNMENT_RIGHT)
+      r.begin_line_spacing(Wx::TEXT_ATTR_LINE_SPACING_HALF)
+      r.write_text("It was in January, the most down-trodden month of an Edinburgh winter. An attractive woman came into the cafe, which is nothing remarkable.")
+      r.newline
+      r.end_line_spacing
+      r.end_alignment
 
-    r.begin_symbol_bullet('*', 100, 60)
-    r.write_text("Compatibility with wxTextCtrl API")
-    r.newline
-    r.end_symbol_bullet
+      tabs = [400, 600, 800, 1000]
+      attr = Wx::RichTextAttr.new
+      attr.set_flags(Wx::TEXT_ATTR_TABS)
+      attr.set_tabs(tabs)
+      r.set_default_style(attr)
 
-    r.begin_symbol_bullet('*', 100, 60)
-    r.write_text("Easy stack-based BeginXXX()...EndXXX() style setting in addition to SetStyle()")
-    r.newline
-    r.end_symbol_bullet
+      r.write_text("This line contains tabs:\tFirst tab\tSecond tab\tThird tab")
+      r.newline
 
-    r.begin_symbol_bullet('*', 100, 60)
-    r.write_text("XML loading and saving")
-    r.newline
-    r.end_symbol_bullet
+      r.write_text("Other notable features of wxRichTextCtrl include:")
+      r.newline
 
-    r.begin_symbol_bullet('*', 100, 60)
-    r.write_text("Undo/Redo, with batching option and Undo suppressing")
-    r.newline
-    r.end_symbol_bullet
+      r.begin_symbol_bullet('*', 100, 60)
+      r.write_text("Compatibility with wxTextCtrl API")
+      r.newline
+      r.end_symbol_bullet
 
-    r.begin_symbol_bullet('*', 100, 60)
-    r.write_text("Clipboard copy and paste")
-    r.newline
-    r.end_symbol_bullet
+      r.begin_symbol_bullet('*', 100, 60)
+      r.write_text("Easy stack-based BeginXXX()...EndXXX() style setting in addition to SetStyle()")
+      r.newline
+      r.end_symbol_bullet
 
-    r.begin_symbol_bullet('*', 100, 60)
-    r.write_text("wxRichTextStyleSheet with named character and paragraph styles, and control for applying named styles")
-    r.newline
-    r.end_symbol_bullet
+      r.begin_symbol_bullet('*', 100, 60)
+      r.write_text("XML loading and saving")
+      r.newline
+      r.end_symbol_bullet
 
-    r.begin_symbol_bullet('*', 100, 60)
-    r.write_text("A design that can easily be extended to other content types, ultimately with text boxes, tables, controls, and so on")
-    r.newline
-    r.end_symbol_bullet
+      r.begin_symbol_bullet('*', 100, 60)
+      r.write_text("Undo/Redo, with batching option and Undo suppressing")
+      r.newline
+      r.end_symbol_bullet
 
-    # Make a style suitable for showing a URL
-    urlStyle = Wx::RichTextAttr.new
-    urlStyle.set_text_colour(:BLUE)
-    urlStyle.set_font_underlined(true)
+      r.begin_symbol_bullet('*', 100, 60)
+      r.write_text("Clipboard copy and paste")
+      r.newline
+      r.end_symbol_bullet
 
-    r.write_text("wxRichTextCtrl can also display URLs, such as this one: ")
-    r.begin_style(urlStyle)
-    r.begin_url("http:#www.wxwidgets.org")
-    r.write_text("The wxWidgets Web Site")
-    r.end_url
-    r.end_style
-    r.write_text(". Click on the URL to generate an event.")
+      r.begin_symbol_bullet('*', 100, 60)
+      r.write_text("wxRichTextStyleSheet with named character and paragraph styles, and control for applying named styles")
+      r.newline
+      r.end_symbol_bullet
 
-    r.newline
+      r.begin_symbol_bullet('*', 100, 60)
+      r.write_text("A design that can easily be extended to other content types, ultimately with text boxes, tables, controls, and so on")
+      r.newline
+      r.end_symbol_bullet
 
-    r.write_text("Note: this sample content was generated programmatically from within the MyFrame constructor in the demo. The images were loaded from inline XPMs. Enjoy wxRichTextCtrl!\n")
+      # Make a style suitable for showing a URL
+      urlStyle = Wx::RichTextAttr.new
+      urlStyle.set_text_colour(:BLUE)
+      urlStyle.set_font_underlined(true)
+
+      r.write_text("wxRichTextCtrl can also display URLs, such as this one: ")
+      r.begin_style(urlStyle)
+      r.begin_url("http:#www.wxwidgets.org")
+      r.write_text("The wxWidgets Web Site")
+      r.end_url
+      r.end_style
+      r.write_text(". Click on the URL to generate an event.")
+
+      r.newline
+
+      r.write_text("Note: this sample content was generated programmatically from within the MyFrame constructor in the demo. The images were loaded from inline XPMs. Enjoy wxRichTextCtrl!\n")
+
+      r.end_paragraph_spacing
+
+      # Add a text box
+
+      r.newline
+
+      attr1 = Wx::RichTextAttr.new
+      attr1.get_text_box_attr.margins.left.set_value(20, Wx::TEXT_ATTR_UNITS_PIXELS)
+      attr1.get_text_box_attr.margins.top.set_value(20, Wx::TEXT_ATTR_UNITS_PIXELS)
+      attr1.get_text_box_attr.margins.right.set_value(20, Wx::TEXT_ATTR_UNITS_PIXELS)
+      attr1.get_text_box_attr.margins.bottom.set_value(20, Wx::TEXT_ATTR_UNITS_PIXELS)
+
+      attr1.get_text_box_attr.border.set_colour(:BLACK)
+      attr1.get_text_box_attr.border.set_width(1, Wx::TEXT_ATTR_UNITS_PIXELS)
+      attr1.get_text_box_attr.border.set_style(Wx::TEXT_BOX_ATTR_BORDER_SOLID)
+
+      textBox = r.write_text_box(attr1)
+      r.set_focus_object(textBox)
 
-    r.end_paragraph_spacing
-    
-    # Add a text box
-
-    r.newline
-
-    attr1 = Wx::RichTextAttr.new
-    attr1.get_text_box_attr.margins.left.set_value(20, Wx::TEXT_ATTR_UNITS_PIXELS)
-    attr1.get_text_box_attr.margins.top.set_value(20, Wx::TEXT_ATTR_UNITS_PIXELS)
-    attr1.get_text_box_attr.margins.right.set_value(20, Wx::TEXT_ATTR_UNITS_PIXELS)
-    attr1.get_text_box_attr.margins.bottom.set_value(20, Wx::TEXT_ATTR_UNITS_PIXELS)
-
-    attr1.get_text_box_attr.border.set_colour(:BLACK)
-    attr1.get_text_box_attr.border.set_width(1, Wx::TEXT_ATTR_UNITS_PIXELS)
-    attr1.get_text_box_attr.border.set_style(Wx::TEXT_BOX_ATTR_BORDER_SOLID)
+      r.write_text("This is a text box. Just testing! Once more unto the breach, dear friends, once more...")
 
-    textBox = r.write_text_box(attr1)
-    r.set_focus_object(textBox)
-
-    r.write_text("This is a text box. Just testing! Once more unto the breach, dear friends, once more...")
-
-    r.set_focus_object(nil) # Set the focus back to the main buffer
-    r.set_insertion_point_end
-    
-    # Add a table
-
-    r.newline
-
-    attr1 = Wx::RichTextAttr.new
-    attr1.get_text_box_attr.margins.left.set_value(5, Wx::TEXT_ATTR_UNITS_PIXELS)
-    attr1.get_text_box_attr.margins.top.set_value(5, Wx::TEXT_ATTR_UNITS_PIXELS)
-    attr1.get_text_box_attr.margins.right.set_value(5, Wx::TEXT_ATTR_UNITS_PIXELS)
-    attr1.get_text_box_attr.margins.bottom.set_value(5, Wx::TEXT_ATTR_UNITS_PIXELS)
-    attr1.get_text_box_attr.padding.apply(attr.get_text_box_attr.margins)
-
-    attr1.get_text_box_attr.border.set_colour(:BLACK)
-    attr1.get_text_box_attr.border.set_width(1, Wx::TEXT_ATTR_UNITS_PIXELS)
-    attr1.get_text_box_attr.border.set_style(Wx::TEXT_BOX_ATTR_BORDER_SOLID)
-
-    cellAttr = Wx::RichTextAttr.new(attr1)
-    cellAttr.get_text_box_attr.width.set_value(200, Wx::TEXT_ATTR_UNITS_PIXELS)
-    cellAttr.get_text_box_attr.height.set_value(150, Wx::TEXT_ATTR_UNITS_PIXELS)
-
-    table = r.write_table(6, 4, attr1, cellAttr)
-
-    table.get_row_count.times do |j|
-      table.get_column_count.times do |i|
-        msg = "This is cell %d, %d" % [(j+1), (i+1)]
-        r.set_focus_object(table.cell(j, i))
-        r.write_text(msg)
+      r.set_focus_object(nil) # Set the focus back to the main buffer
+      r.set_insertion_point_end
+
+      # Add a table
+
+      r.newline
+
+      attr1 = Wx::RichTextAttr.new
+      attr1.get_text_box_attr.margins.left.set_value(5, Wx::TEXT_ATTR_UNITS_PIXELS)
+      attr1.get_text_box_attr.margins.top.set_value(5, Wx::TEXT_ATTR_UNITS_PIXELS)
+      attr1.get_text_box_attr.margins.right.set_value(5, Wx::TEXT_ATTR_UNITS_PIXELS)
+      attr1.get_text_box_attr.margins.bottom.set_value(5, Wx::TEXT_ATTR_UNITS_PIXELS)
+      attr1.get_text_box_attr.padding.apply(attr.get_text_box_attr.margins)
+
+      attr1.get_text_box_attr.border.set_colour(:BLACK)
+      attr1.get_text_box_attr.border.set_width(1, Wx::TEXT_ATTR_UNITS_PIXELS)
+      attr1.get_text_box_attr.border.set_style(Wx::TEXT_BOX_ATTR_BORDER_SOLID)
+
+      cellAttr = Wx::RichTextAttr.new(attr1)
+      cellAttr.get_text_box_attr.width.set_value(200, Wx::TEXT_ATTR_UNITS_PIXELS)
+      cellAttr.get_text_box_attr.height.set_value(150, Wx::TEXT_ATTR_UNITS_PIXELS)
+
+      table = r.write_table(6, 4, attr1, cellAttr)
+
+      table.get_row_count.times do |j|
+        table.get_column_count.times do |i|
+          msg = "This is cell %d, %d" % [(j+1), (i+1)]
+          r.set_focus_object(table.cell(j, i))
+          r.write_text(msg)
+        end
       end
+
+      # Demonstrate colspan and rowspan
+      cell = table.cell(1, 0)
+      cell.set_col_span(2)
+      r.set_focus_object(cell)
+      cell.clear
+      r.write_text("This cell spans 2 columns")
+
+      cell = table.cell(1, 3)
+      cell.set_row_span(2)
+      r.set_focus_object(cell)
+      cell.clear
+      r.write_text("This cell spans 2 rows")
+
+      cell = table.cell(2, 1)
+      cell.set_col_span(2)
+      cell.set_row_span(3)
+      r.set_focus_object(cell)
+      cell.clear
+      r.write_text("This cell spans 2 columns and 3 rows")
+
+      r.set_focus_object(nil) # Set the focus back to the main buffer
+      r.set_insertion_point_end
+
+      r.newline; r.newline
+
+      properties = Wx::RTC::RichTextProperties.new
+      r.write_text("This is a rectangle field: ")
+      r.write_field("rectangle", properties)
+      r.write_text(" and a begin section field: ")
+      r.write_field("begin-section", properties)
+      r.write_text("This is text between the two tags.")
+      r.write_field("end-section", properties)
+      r.write_text(" Now a bitmap. ")
+      r.write_field("bitmap", properties)
+      r.write_text(" Before we go, here's a composite field: ***")
+      field = r.write_field("composite", properties)
+      field.update_field(r.get_buffer) # Creates the composite value (sort of a text box)
+      r.write_text("*** End of composite field.")
+
+      r.newline
+      r.end_suppress_undo
+
+      # Add some locked content first - needs Undo to be enabled
+      r.begin_lock
+      r.write_text("This is a locked object.")
+      r.end_lock
+
+      r.write_text(" This is unlocked text. ")
+
+      r.begin_lock
+      r.write_text("More locked content.")
+      r.end_lock
+      r.newline
+
+      # Flush the Undo buffer
+      r.command_processor.clear_commands
+
+      r.thaw
     end
 
-    # Demonstrate colspan and rowspan
-    cell = table.cell(1, 0)
-    cell.set_col_span(2)
-    r.set_focus_object(cell)
-    cell.clear
-    r.write_text("This cell spans 2 columns")
-
-    cell = table.cell(1, 3)
-    cell.set_row_span(2)
-    r.set_focus_object(cell)
-    cell.clear
-    r.write_text("This cell spans 2 rows")
-
-    cell = table.cell(2, 1)
-    cell.set_col_span(2)
-    cell.set_row_span(3)
-    r.set_focus_object(cell)
-    cell.clear
-    r.write_text("This cell spans 2 columns and 3 rows")
-
-    r.set_focus_object(nil) # Set the focus back to the main buffer
-    r.set_insertion_point_end
-
-    r.newline; r.newline
-
-    properties = Wx::RTC::RichTextProperties.new
-    r.write_text("This is a rectangle field: ")
-    r.write_field("rectangle", properties)
-    r.write_text(" and a begin section field: ")
-    r.write_field("begin-section", properties)
-    r.write_text("This is text between the two tags.")
-    r.write_field("end-section", properties)
-    r.write_text(" Now a bitmap. ")
-    r.write_field("bitmap", properties)
-    r.write_text(" Before we go, here's a composite field: ***")
-    field = r.write_field("composite", properties)
-    field.update_field(r.get_buffer) # Creates the composite value (sort of a text box)
-    r.write_text("*** End of composite field.")
-
-    r.newline
-    r.end_suppress_undo
-
-    # Add some locked content first - needs Undo to be enabled
-    r.begin_lock
-    r.write_text("This is a locked object.")
-    r.end_lock
-
-    r.write_text(" This is unlocked text. ")
-
-    r.begin_lock
-    r.write_text("More locked content.")
-    r.end_lock
-    r.newline
-
-    # Flush the Undo buffer
-    r.command_processor.clear_commands
-
-    r.thaw
   end
 
 end
@@ -1788,7 +1792,7 @@ module RichTextExtSample
   end
 
   if $0 == __FILE__
-    MyApp.run
+    RichTextExt::MyApp.run
   end
 
 end