wxruby3 0.9.0.pre.beta.8-x64-mingw-ucrt

data/samples/drawing/svgtest.rb

@@ -0,0 +1,373 @@
+#!/usr/bin/env ruby
+# Copyright (c) M.J.N. Corino, The Netherlands
+###
+
+require 'wx'
+
+class SVGPage < Wx::ScrolledWindow
+
+  PAGES = [
+    'Lines',
+    'Polygons',
+    'Text',
+    'Arcs',
+    'Checkmarks',
+    'Scaled Text',
+    'Bitmaps',
+    'Clipping',
+    'Text Position'
+  ]
+  PAGES.each_with_index do |title, index|
+    self.const_set("PAGE_#{title.tr(' ', '')}", index)
+  end
+  PG_DESC = [
+    'Green Cross, Cyan Line and spline',
+    'Blue rectangle, red edge, clear rounded rectangle, gold ellipse, gold and clear stars',
+    'Swiss, Times text; red text, rotated and colored orange',
+    'This is an arc test page',
+    'Two check marks',
+    'Scaling test page',
+    'Icon and Bitmap ',
+    'Clipping region',
+    'Text position test page'
+  ]
+
+  def initialize(parent, index)
+    super(parent, style: Wx::VSCROLL|Wx::HSCROLL)
+    set_background_colour(Wx::WHITE)
+    set_scrollbars(20, 20, 50, 50)
+    @index = index
+    evt_paint :on_paint
+  end
+
+  def on_save(filename)
+    svgDC = Wx::SVGFileDC.new(filename, 600, 650)
+    on_draw(svgDC)
+    svgDC.ok?
+  end
+
+  def on_paint
+    paint do |dc|
+      on_draw(dc)
+    end
+  end
+
+  # Define the repainting behaviour
+  def on_draw(dc)
+    dc.set_font(Wx::SWISS_FONT)
+    dc.set_pen(Wx::GREEN_PEN)
+
+    case @index
+    when PAGE_Lines
+      # draw lines to make a cross
+      dc.draw_line(0, 0, 200, 200)
+      dc.draw_line(200, 0, 0, 200)
+      # draw point colored line and spline
+      wP = Wx::Pen.new(Wx::CYAN_PEN)
+      wP.set_width(3)
+      dc.set_pen(wP)
+    
+      dc.draw_point(25,15)
+      dc.draw_line(50, 30, 200, 30)
+      dc.draw_spline(50, 200, 50, 100, 200, 10)
+
+    when PAGE_Polygons
+      # draw standard shapes
+      dc.set_brush(Wx::CYAN_BRUSH)
+      dc.set_pen(Wx::RED_PEN)
+      dc.draw_rectangle(10, 10, 100, 70)
+      wB = Wx::Brush.new('DARK ORCHID', Wx::BRUSHSTYLE_TRANSPARENT)
+      dc.set_brush(wB)
+      dc.draw_rounded_rectangle(50, 50, 100, 70, 20)
+      dc.set_brush(Wx::Brush.new('GOLDENROD'))
+      dc.draw_ellipse(100, 100, 100, 50)
+
+      points = [
+        [100, 200],
+        [70, 260],
+        [160, 230],
+        [40, 230],
+        [130, 260],
+      ]
+      dc.draw_polygon(points)
+      points << [100, 200]
+      dc.draw_lines(points, 160)
+
+    when PAGE_Text
+      # draw text in Arial or similar font
+      dc.draw_line(50,25,50,35)
+      dc.draw_line(45,30,55,30)
+      dc.draw_text('This is a Swiss-style string', 50, 30)
+      dc.with_text_foreground(:FIREBRICK) do
+        # no effect in msw ??
+        dc.set_text_background(:wheat)
+        dc.draw_text('This is a Red string', 50, 200)
+        dc.draw_rotated_text('This is a 45 deg string', 50, 200, 45)
+        dc.draw_rotated_text('This is a 90 deg string', 50, 200, 90)
+        dc.set_font(Wx::FontInfo.new(18)
+                                .face_name('Times New Roman')
+                                .family(Wx::FONTFAMILY_ROMAN)
+                                .italic.bold)
+      end
+      dc.draw_text('This is a Times-style string', 50, 60)
+
+    when PAGE_Arcs
+      # four arcs start and end points, center
+      dc.set_brush(Wx::GREEN_BRUSH)
+      dc.draw_arc(200,300, 370,230, 300,300)
+      dc.set_brush(Wx::BLUE_BRUSH)
+      dc.draw_arc(270-50, 270-86, 270-86, 270-50, 270,270)
+      dc.set_device_origin(-10,-10)
+      dc.draw_arc(270-50, 270-86, 270-86, 270-50, 270,270)
+      dc.set_device_origin(0,0)
+
+      wP = Wx::Pen.new('CADET BLUE')
+      dc.set_pen(wP)
+      dc.draw_arc(75,125, 110, 40, 75, 75)
+
+      wP.set_colour(:SALMON)
+      dc.set_pen(wP)
+      dc.set_brush(Wx::RED_BRUSH)
+      # top left corner, width and height, start and end angle
+      # 315 same center and x-radius as last pie-arc, half Y radius
+      dc.draw_elliptic_arc(25,50,100,50,180.0,45.0)
+
+      wP = Wx::Pen.new(Wx::CYAN_PEN)
+      wP.set_width(3)
+      dc.set_pen(wP)
+      dc.set_brush(Wx::Brush.new('SALMON'))
+      dc.draw_elliptic_arc(300,  0,200,100, 0.0,145.0)
+      # same end point
+      dc.draw_elliptic_arc(300, 50,200,100,90.0,145.0)
+      dc.draw_elliptic_arc(300,100,200,100,90.0,345.0)
+
+    when PAGE_Checkmarks
+      dc.draw_check_mark( 30,30,25,25)
+      dc.set_brush(Wx::Brush.new('SALMON',Wx::BRUSHSTYLE_TRANSPARENT))
+      dc.draw_check_mark( 80,50,75,75)
+      dc.draw_rectangle( 80,50,75,75)
+
+    when PAGE_ScaledText
+      dc.set_font(Wx::FontInfo.new(18)
+                              .face_name('Times New Roman')
+                              .family(Wx::FONTFAMILY_ROMAN)
+                              .italic.bold)
+      dc.draw_line(0, 0, 200, 200)
+      dc.draw_line(200, 0, 0, 200)
+      dc.draw_text('This is an 18pt string', 50, 60)
+
+      # rescale and draw in blue
+      wP = Wx::Pen.new(Wx::CYAN_PEN)
+      dc.set_pen(wP)
+      dc.set_user_scale(2.0,0.5)
+      dc.set_device_origin(200,0)
+      dc.draw_line(0, 0, 200, 200)
+      dc.draw_line(200, 0, 0, 200)
+      dc.draw_text('This is an 18pt string 2 x 0.5 UserScaled', 50, 60)
+      dc.set_user_scale(2.0,2.0)
+      dc.set_device_origin(200,200)
+      dc.draw_text('This is an 18pt string 2 x 2 UserScaled', 50, 60)
+
+      wP = Wx::Pen.new(Wx::RED_PEN)
+      dc.set_pen(wP)
+      dc.set_user_scale(1.0,1.0)
+      dc.set_device_origin(0,10)
+      dc.set_map_mode(Wx::MM_METRIC) #svg ignores this
+      dc.draw_line(0, 0, 200, 200)
+      dc.draw_line(200, 0, 0, 200)
+      dc.draw_text("This is an 18pt string in MapMode", 50, 60)
+
+    when PAGE_Bitmaps
+      dc.draw_icon(Wx::Icon.new(File.join(__dir__,'..', 'art', "wxruby.png")), 10, 10)
+      dc.draw_bitmap(Wx::Bitmap.new(File.join(__dir__, 'SVGlogo24.xpm')), 50,15)
+
+    when PAGE_Clipping
+      dc.set_text_foreground('RED')
+      dc.draw_text('Red = Clipping Off', 30, 5)
+      dc.set_text_foreground('GREEN')
+      dc.draw_text('Green = Clipping On', 30, 25)
+
+      dc.set_text_foreground(:BLACK)
+
+      dc.set_pen(Wx::RED_PEN)
+      dc.set_brush(Wx::Brush.new('SALMON', Wx::BRUSHSTYLE_TRANSPARENT))
+      dc.draw_check_mark(80,50,75,75)
+      dc.draw_rectangle(80,50,75,75)
+
+      dc.set_pen(Wx::GREEN_PEN)
+
+      # Clipped checkmarks
+      dc.draw_rectangle(180,50,75,75)
+      dc.set_clipping_region(180,50,75,75)                   # x,y,width,height version
+      dc.draw_check_mark(180,50,75,75)
+      dc.destroy_clipping_region
+
+      dc.draw_rectangle(Wx::Rect.new(80,150,75,75))
+      dc.set_clipping_region(Wx::Point.new(80,150), Wx::Size.new(75,75))  # pt,size version
+      dc.draw_check_mark(80,150,75,75)
+      dc.destroy_clipping_region
+
+      dc.draw_rectangle(Wx::Rect.new(180,150,75,75))
+      dc.set_clipping_region(Wx::Rect.new(180,150,75,75))          # rect version
+      dc.draw_check_mark(180,150,75,75)
+      dc.destroy_clipping_region
+
+      dc.draw_rectangle(Wx::Rect.new(80,250,50,65))
+      dc.draw_rectangle(Wx::Rect.new(105,260,50,65))
+      dc.set_clipping_region(Wx::Rect.new(80,250,50,65))  # second call to SetClippingRegion
+      dc.set_clipping_region(Wx::Rect.new(105,260,50,65))  # forms intersection with previous
+      dc.draw_check_mark(80,250,75,75)
+      dc.destroy_clipping_region                   # only one call to destroy (there's no stack)
+
+      # ** Clipping by wxRegion not implemented for SVG.   Should be
+      # ** possible, but need to access points that define the wxRegion
+      # ** from inside DoSetDeviceClippingRegion() and wxRegion does not
+      # ** implement anything like getPoints().
+      # points[0].x = 180 points[0].y = 250
+      # points[1].x = 255 points[1].y = 250
+      # points[2].x = 180 points[2].y = 325
+      # points[3].x = 255 points[3].y = 325
+      # points[4].x = 180 points[4].y = 250
+      #
+      # dc.DrawLines (5, points)
+      # wxRegion reg = wxRegion(5,points)
+      #
+      # dc.SetClippingRegion(reg)
+      # dc.DrawCheckMark ( 180,250,75,75)
+      # dc.DestroyClippingRegion()
+
+    when PAGE_TextPosition
+      txtPad = 0
+
+      wP = Wx::Pen.new(Wx::RED_PEN)
+      dc.set_pen(wP)
+
+      # Horizontal text
+      txtStr = 'Horizontal string'
+      txtW, txtH, _, _ = dc.get_text_extent(txtStr)
+      txtX = 50
+      txtY = 300
+      dc.draw_rectangle(txtX, txtY, txtW + 2*txtPad, txtH + 2*txtPad)
+      dc.draw_text(txtStr, txtX + txtPad, txtY + txtPad)
+
+      # Vertical text
+      txtStr = 'Vertical string'
+      txtW, txtH, _, _ = dc.get_text_extent(txtStr)
+      txtX = 50
+      txtY = 250
+      dc.draw_rectangle(txtX, txtY - (txtW + 2*txtPad), txtH + 2*txtPad, txtW + 2*txtPad)
+      dc.draw_rotated_text(txtStr, txtX + txtPad, txtY - txtPad, 90)
+
+      # 45 degree text
+      txtStr = '45 deg string'
+      txtW, txtH, _, _ = dc.get_text_extent(txtStr)
+      lenW = (txtW + 2*txtPad) / Math.sqrt(2.0)
+      lenH = (txtH + 2*txtPad) / Math.sqrt(2.0)
+      padding = txtPad / Math.sqrt(2.0)
+      txtX = 150
+      txtY = 200
+      dc.draw_line(txtX - padding.to_i, txtY, txtX + lenW.to_i, txtY - lenW.to_i) # top
+      dc.draw_line(txtX + lenW.to_i, txtY - lenW.to_i, txtX - (padding + lenH + lenW).to_i, txtY + (lenH - lenW).to_i)
+      dc.draw_line(txtX - padding.to_i, txtY, txtX - (padding + lenH).to_i, txtY + lenH.to_i)
+      dc.draw_line(txtX - (padding + lenH).to_i, txtY + lenH.to_i, txtX - (padding + lenH + lenW).to_i, txtY + (lenH - lenW).to_i) # bottom
+      dc.draw_rotated_text(txtStr, txtX, txtY, 45)
+    end
+
+    Wx.log_status(PG_DESC[@index])
+  end
+  
+end
+
+class SVGFrame < Wx::Frame
+
+  def initialize
+    super(nil, title: 'SVG Demo', size: [500, 400])
+
+    icon_file = File.join(__dir__,'..', 'art', "wxruby.png")
+    self.icon = Wx::Icon.new(icon_file)
+
+    if Wx.has_feature?(:USE_STATUSBAR)
+      create_status_bar()
+    end
+
+    # Make a menubar
+    file_menu = Wx::Menu.new
+    file_menu.append(Wx::ID_SAVE)
+    file_menu.append(Wx::ID_EXIT)
+
+    help_menu = Wx::Menu.new
+    help_menu.append(Wx::ID_ABOUT)
+
+    mbar = Wx::MenuBar.new
+
+    mbar.append(file_menu, "&File")
+    mbar.append(help_menu, "&Help")
+
+    # Associate the menu bar with the frame
+    self.menu_bar = mbar
+
+    # Create a notebook
+    @notebook = Wx::Notebook.new(self, style: Wx::BK_TOP)
+
+    # Add SVG Windows to a notebook
+    SVGPage::PAGES.each_with_index do |title, index|
+      @notebook.add_page(SVGPage.new(@notebook, index), title)
+    end
+
+    evt_menu Wx::ID_SAVE, :file_save_picture
+    evt_menu Wx::ID_EXIT, :on_quit
+    evt_menu Wx::ID_ABOUT, :on_about
+  end
+
+  def file_save_picture(event)
+    page = @notebook.current_page
+
+    Wx::FileDialog(self, 'Save Picture as', '',
+                   @notebook.get_page_text(@notebook.get_selection),
+                   'SVG vector picture files (*.svg)|*.svg',
+                   Wx::FD_SAVE|Wx::FD_OVERWRITE_PROMPT) do |dlg|
+      if dlg.show_modal == Wx::ID_OK
+        page.on_save(dlg.get_path)
+      end
+    end
+  end
+
+  def on_about(event)
+    Wx.message_box(
+      "wxRuby SVG sample\n" +
+      "(converted from wxWidgets)\n" +
+      "Authors:\n" +
+      "   Chris Elliott (c) 2002-2009\n" +
+      "   Prashant Kumar Nirmal (c) 2017\n" +
+      "   Martin Corino (c) 2023\n" +
+      'Usage: click File|Save to Save the Selected SVG Test',
+      'About SVG Test')
+  end
+
+  def on_quit(event)
+    close
+  end
+
+end
+
+module SVGTestSample
+
+  include WxRuby::Sample if defined? WxRuby::Sample
+
+  def self.describe
+    { file: __FILE__,
+      summary: 'wxRuby SVGFileDC example.',
+      description: 'wxRuby example showcasing Wx::SVGFileDC to create SVG files.' }
+  end
+
+  def self.activate
+    frame = SVGFrame.new
+    frame.show
+    frame
+  end
+
+  if $0 == __FILE__
+    Wx::App.run { SVGTestSample.activate }
+  end
+
+end

data/samples/etc/choice.rb

@@ -0,0 +1,82 @@
+#!/usr/bin/env ruby
+# wxRuby2 Sample Code. Copyright (c) 2004-2008 wxRuby development team
+# Adapted for wxRuby3
+# Copyright (c) M.J.N. Corino, The Netherlands
+###
+
+require 'wx'
+
+include Wx
+
+ID_CHOICE = 1000
+
+class ChoiceDlg < Dialog
+  def initialize
+    super(nil, -1, "ChoiceDialog", DEFAULT_POSITION, Size.new(185, 185))
+
+    list = ["ABS", "Airbag", "Air conditioning"]
+
+    @m_pChoice = Choice.new(self, ID_CHOICE, DEFAULT_POSITION, DEFAULT_SIZE, list)
+    @m_pChoice.append("Automatic gear", 100)
+
+    @m_pLabel = StaticText.new(self, -1, "default")
+    dlgSizer = BoxSizer.new(HORIZONTAL)
+    choiceSizer = BoxSizer.new(VERTICAL)
+    choiceSizer.add(@m_pChoice, 1, GROW)
+    choiceSizer.add(@m_pLabel)
+    dlgSizer.add(choiceSizer, 1, GROW)
+    set_sizer(dlgSizer)
+    set_auto_layout(true)
+    layout
+
+    evt_choice(ID_CHOICE) { |event| onChoice(event) }
+    evt_close { onClose }
+  end
+
+  def onChoice(event)
+    chose = event.get_selection
+    data = event.get_client_data
+    # NOTE: uninitialized client data will be false, not nil
+    if (!data)
+      data = 0
+    end
+    data += 1
+    @m_pLabel.set_label(data.to_s)
+
+    @m_pChoice.set_selection(chose)
+    @m_pChoice.set_client_data(chose, data)
+  end
+
+  def onClose
+    destroy
+  end
+end
+
+class RbApp < App
+  def on_init
+    dlg = ChoiceDlg.new
+    set_top_window(dlg)
+    dlg.show(true)
+  end
+
+end
+
+module ChoiceSample
+
+  include WxRuby::Sample if defined? WxRuby::Sample
+
+  def self.describe
+    { file: __FILE__,
+      summary: 'wxRuby Choice example.',
+      description: 'wxRuby example demonstrating the use of Wx::Choice control.' }
+  end
+
+  def self.run
+    execute(__FILE__)
+  end
+
+  if $0 == __FILE__
+    RbApp.run
+  end
+
+end

data/samples/etc/miniframe.rb

@@ -0,0 +1,92 @@
+#!/usr/bin/env ruby
+# wxRuby2 Sample Code. Copyright (c) 2004-2008 wxRuby development team
+# Adapted for wxRuby3
+# Copyright (c) M.J.N. Corino, The Netherlands
+###
+
+require 'wx'
+
+
+class MyFrame < Wx::Frame
+  attr_reader :mini
+
+  def initialize(title, pos, size, style = Wx::DEFAULT_FRAME_STYLE)
+    super(nil, -1, title, pos, size, style)
+
+    menuFile = Wx::Menu.new
+    helpMenu = Wx::Menu.new
+    helpMenu.append(Wx::ID_ABOUT, "&About...\tF1", "Show about dialog")
+    menuFile.append(Wx::ID_EXIT, "E&xit\tAlt-X", "Quit this program")
+    menuBar = Wx::MenuBar.new
+    menuBar.append(menuFile, "&File")
+    menuBar.append(helpMenu, "&Help")
+    set_menu_bar(menuBar)
+
+    create_status_bar(2)
+    set_status_text("Welcome to wxRuby!")
+
+    evt_menu(Wx::ID_EXIT) { on_quit }
+    evt_menu(Wx::ID_ABOUT) { on_about }
+
+    make_miniframe
+  end
+
+  def make_miniframe
+    @mini = Wx::MiniFrame.new(self, -1, 'Mini Frame', 
+                              Wx::Point.new(300, 75), Wx::Size.new(300, 150),
+                              Wx::DEFAULT_FRAME_STYLE|Wx::STAY_ON_TOP)
+    @mini_destroyed = false
+    sizer = Wx::BoxSizer.new(Wx::VERTICAL)
+    text = Wx::StaticText.new(mini, -1, 'This is a MiniFrame.')
+    sizer.add(text, 0, Wx::ALL, 2)
+    text = Wx::StaticText.new(mini, -1, 'It has a small title bar so it')
+    sizer.add(text, 0, Wx::ALL, 2)
+    text = Wx::StaticText.new(mini, -1, 'doesn\'t take up too much space.')
+    sizer.add(text, 0, Wx::ALL, 2)
+    text = Wx::StaticText.new(mini, -1, 'This MiniFrame has been set to')
+    sizer.add(text, 0, Wx::ALL, 2)
+    text = Wx::StaticText.new(mini, -1, 'stay above the main app window.')
+    sizer.add(text, 0, Wx::ALL, 2)
+    mini.set_sizer(sizer)
+
+    mini.evt_window_destroy { |evt| @mini_destroyed = true }
+
+    mini.show
+    mini.raise
+  end
+
+  def on_quit
+    mini.close unless @mini_destroyed
+    close
+  end
+
+  def on_about
+    msg =  sprintf("This is the About dialog of the miniframe sample.\n" \
+                    "Welcome to %s", Wx::WXWIDGETS_VERSION)
+    Wx::message_box(msg, "About MiniFrame", Wx::OK|Wx::ICON_INFORMATION, self)
+  end
+end
+
+module ActivationSample
+
+  include WxRuby::Sample if defined? WxRuby::Sample
+
+  def self.describe
+    { file: __FILE__,
+      summary: 'wxRuby MiniFrame example.',
+      description: 'wxRuby example demonstrating the use of Wx::MinFrame.' }
+  end
+
+  def self.activate
+    frame = MyFrame.new("Mini Frame wxRuby App",
+                        Wx::Point.new(50, 50),
+                        Wx::Size.new(450, 340))
+    frame.show
+    frame
+  end
+
+  if $0 == __FILE__
+    Wx::App.run { ActivationSample.activate }
+  end
+
+end

data/samples/etc/sash.rb

@@ -0,0 +1,140 @@
+#!/usr/bin/env ruby
+# wxRuby2 Sample Code. Copyright (c) 2004-2008 wxRuby development team
+# Adapted for wxRuby3
+# Copyright (c) M.J.N. Corino, The Netherlands
+###
+
+require 'wx'
+
+
+class MySashFrame < Wx::Frame
+  def initialize(title, pos, size, style = Wx::DEFAULT_FRAME_STYLE)
+    super(nil, -1, title, pos, size, style)
+
+
+    menuFile = Wx::Menu.new
+    helpMenu = Wx::Menu.new
+    helpMenu.append(Wx::ID_ABOUT, "&About...\tF1", "Show about dialog")
+    menuFile.append(Wx::ID_EXIT, "E&xit\tAlt-X", "Quit this program")
+    menuBar = Wx::MenuBar.new
+    menuBar.append(menuFile, "&File")
+    menuBar.append(helpMenu, "&Help")
+    set_menu_bar(menuBar)
+
+    create_status_bar(2)
+    set_status_text("wxRuby Sash sample")
+
+    evt_menu(Wx::ID_EXIT) { on_quit }
+    evt_menu(Wx::ID_ABOUT) { on_about }
+
+    # Start creating the sashes - these are created from outermost
+    # inwards. 
+    sash = Wx::SashLayoutWindow.new(self, -1, Wx::DEFAULT_POSITION,
+                                    Wx::Size.new(150, self.get_size.height) )
+    # The default width of the sash is 150 pixels, and it extends the
+    # full height of the frame
+    sash.set_default_size( Wx::Size.new(150, self.get_size.height) )
+    # This sash splits the frame top to bottom
+    sash.set_orientation(Wx::LAYOUT_VERTICAL)
+    # Place the sash on the left of the frame
+    sash.set_alignment(Wx::LAYOUT_LEFT)
+    # Show a drag bar on the right of the sash
+    sash.set_sash_visible(Wx::SASH_RIGHT, true)
+    sash.set_background_colour(Wx::Colour.new(225, 200, 200) )
+
+    panel = Wx::Panel.new(sash)
+    v_siz = Wx::BoxSizer.new(Wx::VERTICAL)
+    chk_1 = Wx::CheckBox.new(panel, -1, 'test 1')
+    v_siz.add(chk_1)
+    chk_2 = Wx::CheckBox.new(panel, -1, 'test 2')
+    v_siz.add(chk_2)
+    panel.set_sizer_and_fit(v_siz)
+
+    # handle the sash being dragged
+    evt_sash_dragged( sash.get_id ) { | e | on_v_sash_dragged(sash, e) }
+
+    # Create another small sash on the bottom of the frame
+    sash_2 = Wx::SashLayoutWindow.new(self, -1, Wx::DEFAULT_POSITION,
+                                      Wx::Size.new(self.get_size.width,
+                                      100),
+                                      Wx::SW_3DSASH)
+    sash_2.set_default_size( Wx::Size.new(self.get_size.width, 100) )
+    sash_2.set_orientation(Wx::LAYOUT_HORIZONTAL)
+    sash_2.set_alignment(Wx::LAYOUT_BOTTOM)
+    sash_2.set_sash_visible(Wx::SASH_TOP, true)
+    text = Wx::StaticText.new(sash_2, -1, 'This is the second sash window')
+    evt_sash_dragged( sash_2.get_id ) { | e | on_h_sash_dragged(sash_2, e) }
+
+    # The main panel - the residual part of the frame that takes up all
+    # remaining space not used by the sash windows.
+    @m_panel = Wx::Panel.new(self, -1)
+    sizer = Wx::BoxSizer.new(Wx::VERTICAL)
+
+    txt  = Wx::TextCtrl.new(@m_panel, -1, 'Main panel area', 
+                            Wx::DEFAULT_POSITION, Wx::DEFAULT_SIZE,
+                            Wx::SUNKEN_BORDER|Wx::TE_MULTILINE)
+    sizer.add(txt, 1, Wx::EXPAND|Wx::ALL, 10)
+    @m_panel.set_sizer_and_fit(sizer)
+
+    # Adjust the size of the sashes when the frame is resized
+    evt_size { | e | on_size(e) }
+
+    # Call LayoutAlgorithm#layout_frame to layout the sashes.
+    # The second argument is the residual window that takes up remaining
+    # space
+    Wx::LayoutAlgorithm.new.layout_frame(self, @m_panel)
+  end
+
+  def on_v_sash_dragged(sash, e)
+    # Call get_drag_rect to get the new size
+    size = Wx::Size.new(  e.get_drag_rect.width, self.get_size.height )
+    sash.set_default_size( size )
+    Wx::LayoutAlgorithm.new.layout_frame(self, @m_panel)
+  end
+
+  def on_h_sash_dragged(sash, e)
+    size = Wx::Size.new( self.get_size.width, e.get_drag_rect.height )
+    sash.set_default_size( size )
+    Wx::LayoutAlgorithm.new.layout_frame(self, @m_panel)
+  end
+
+  def on_size(e)
+    e.skip
+    Wx::LayoutAlgorithm.new.layout_frame(self, @m_panel)
+  end
+
+  def on_quit
+    close(true)
+  end
+
+  def on_about
+    msg =  sprintf("This is the About dialog of the sash sample.\n" \
+                    "Welcome to %s", Wx::WXWIDGETS_VERSION)
+    Wx::message_box(msg, "About Sash", Wx::OK|Wx::ICON_INFORMATION, self)
+  end
+end
+
+module SashSample
+
+  include WxRuby::Sample if defined? WxRuby::Sample
+
+  def self.describe
+    { file: __FILE__,
+      summary: 'wxRuby SashLayoutWindow example.',
+      description: 'wxRuby example demonstrating the use of Wx::SashLayoutWindow.' }
+  end
+
+  def self.activate
+    frame = MySashFrame.new("Sash Layout wxRuby App",
+                            Wx::Point.new(50, 50),
+                            Wx::Size.new(450, 340))
+
+    frame.show(true)
+    frame
+  end
+
+  if $0 == __FILE__
+    Wx::App.run { SashSample.activate }
+  end
+
+end