wxruby 1.9.5-universal-darwin-9

data/samples/listbook/listbook.rb

@@ -0,0 +1,181 @@
+#!/usr/bin/env ruby
+# wxRuby2 Sample Code. Copyright (c) 2004-2006 Kevin B. Smith
+# Freely reusable code: see SAMPLES-LICENSE.TXT for details
+
+begin
+  require 'wx'
+rescue LoadError => no_wx_err
+  begin
+    require 'rubygems'
+    require 'wx'
+  rescue LoadError
+    raise no_wx_err
+  end
+end
+
+#
+# Basic Frame Class. This creates the dialog window
+#
+class SimpleFrame < Wx::Frame 
+
+  FILE_DIALOG, FILE_ABOUT, FILE_QUIT = [0,Wx::ID_ABOUT,Wx::ID_EXIT]
+  
+  def initialize(parent)
+    # To load a layout defined in XRC into a Ruby subclass of Frame,
+    # first call the empty constructor. All the details of size,
+    # title, position and so on are loaded from the XRC by the call to 
+    # load_frame_subclass. Using a non-empty constructor will cause
+    # errors on GTK.
+    super()
+    $xml.load_frame_subclass(self,nil,'ID_FRAME')
+    
+    # Create a new menu
+    bar = Wx::MenuBar.new
+    menu = Wx::Menu.new
+    menu.append(FILE_ABOUT,"About...")
+    menu.append_separator
+    menu.append(FILE_QUIT,"Quit")
+    bar.append(menu,"File")
+    
+    set_menu_bar(bar)
+    
+    # Assign the menu events
+    evt_menu(FILE_ABOUT) do
+      Wx::message_box("wxRuby Listbook sample\nby Sean Long", "About Listbook", Wx::OK | Wx::ICON_INFORMATION, self)
+    end    
+    evt_menu(FILE_QUIT) do
+      Wx::get_app.exit_main_loop()
+    end
+    evt_close() do
+      Wx::get_app.exit_main_loop()
+    end
+
+    # Variables not in tabs
+    @listbook    = xrcid_to_window('ID_LISTBOOK')
+    @text_output = xrcid_to_window('ID_ORDER_TEXTCTRL')
+    
+    # Variables for widgets in Pizza tab
+    @pizza_size   = xrcid_to_window('ID_PIZZA_SIZE_CHOICE')
+    @pizza_crust  = xrcid_to_window('ID_PIZZA_CRUST_CHOICE')
+    @pizza_sauce  = xrcid_to_window('ID_PIZZA_SAUCE_CHOICE')
+    @pizza_cheese = xrcid_to_window('ID_PIZZA_CHEESE_CHOICE')
+    @pizza_toppings = []
+    3.times do |i|
+      @pizza_toppings << xrcid_to_window("ID_PIZZA_TOPPING_#{i+1}_CHOICE")
+    end
+
+    # fill in toppings
+    toppings = ['pepperoni','sausage','italian sausage','olives',
+                'mushrooms','artichoke','extra cheese','']
+    toppings.each do |top_name|
+      @pizza_toppings.each do |top_obj|
+        top_obj.append(top_name)
+      end      
+    end
+
+    index = 0
+    @pizza_toppings.each do |obj|
+      obj.set_selection(index)
+      index += 1
+    end
+    
+    # Events for pizza tab
+    evt_button( Wx::xrcid('ID_PIZZA_BUTTON') ) do |event|
+      #get selections and add to order
+      order_string = @text_output.get_value
+      if order_string != "" then order_string << "\n" end
+      order_string << "One #{@pizza_size.get_string_selection} pizza with:\n"      
+      order_string << @pizza_crust.get_string_selection + " crust" + "\n"
+      order_string << @pizza_sauce.get_string_selection + " sauce" +"\n"
+      order_string << @pizza_cheese.get_string_selection + " and" + "\n"
+      @pizza_toppings.each { |obj| order_string << obj.get_string_selection + "\n" }
+
+      @text_output.set_value(order_string)
+    end
+    
+
+    # Variables for widgets in Drink tab
+    @drink_size = xrcid_to_window('ID_DRINK_SIZE_CHOICE')
+    @drink_type = xrcid_to_window('ID_DRINK_TYPE_CHOICE')
+    
+    # Events for drink tab
+    evt_button(Wx::xrcid('ID_DRINK_BUTTON')) do |event|
+      #get selections and add to order
+      order_string = @text_output.get_value
+      if order_string != "" then order_string << "\n" end
+      
+      order_string << "One #{@drink_size.get_string_selection} #{@drink_type.get_string_selection }.\n"      
+
+      @text_output.set_value(order_string)
+    end    
+    
+    # Variables for widgets in Ice Cream tab
+    @ice_cream_size = xrcid_to_window('ID_ICE_CREAM_SIZE_CHOICE')
+    @ice_cream_type = xrcid_to_window('ID_ICE_CREAM_TYPE_CHOICE')
+    @ice_cream_toppings = []
+    4.times do |i|
+      @ice_cream_toppings << 
+        xrcid_to_window("ID_ICE_CREAM_TOPPING_#{i+1}_CHOICE")
+    end    
+
+    toppings = ['','m&m\'s','chocolate chips','fudge','nuts','cherry','whip cream'] 
+    toppings.each do |top_name|
+      @ice_cream_toppings.each do |top_obj|
+        top_obj.append(top_name)
+      end      
+    end    
+    @ice_cream_toppings.each { |obj| obj.set_selection(0) } 
+    
+    # Events for ice cream tab
+    evt_button(Wx::xrcid('ID_ICE_CREAM_BUTTON')) do |event|
+      #get selections and add to order
+      order_string = @text_output.get_value
+      if order_string != "" then order_string << "\n" end
+      
+      order_string << "One #{@ice_cream_size.get_string_selection} #{@ice_cream_type.get_string_selection} ice cream:\n"      
+      @ice_cream_toppings.each { |obj| order_string << obj.get_string_selection + "\n" }
+
+      @text_output.set_value(order_string)
+    end       
+    
+    evt_listbook_page_changed(Wx::xrcid('ID_LISTBOOK')) do |event|
+      tab_number = event.get_selection
+      order_string = @text_output.get_value
+      order_string << "moved to tab = #{@listbook.get_page_text(tab_number)} \n"
+      @text_output.set_value(order_string)
+    end
+  end
+
+  # Converts a XRCID id - as used in wxWidget's XML format - into the
+  # correct ruby window
+  def xrcid_to_window(xrc_id) 
+    Wx::Window.find_window_by_id(Wx::xrcid(xrc_id), self)      
+  end
+
+end
+
+#
+# Application class.
+#
+class XrcApp < Wx::App
+
+  def on_init
+    # Create a resource handler
+    $xml = Wx::XmlResource.get();
+    $xml.init_all_handlers();
+
+    # Load a resource file from the script's directory
+    xrc_file = File.join( File.dirname( __FILE__ ), 'listbook.xrc' )
+
+    $xml.load(xrc_file)	
+
+
+    # Show the main frame.
+    $main = SimpleFrame.new(self)
+    $main.show(true)
+    
+  end
+end
+
+
+XrcApp.new().main_loop()

data/samples/listbook/listbook.xrc

@@ -0,0 +1,370 @@
+<?xml version="1.0" encoding="ISO-8859-1"?>
+<resource version="2.3.0.1" xmlns="http://www.wxwidgets.org/wxxrc">
+    <object class="wxFrame" name="ID_FRAME" subclass="MyFrame">
+        <style>wxCAPTION|wxRESIZE_BORDER|wxSYSTEM_MENU|wxCLOSE_BOX</style>
+        <size>400,300d</size>
+        <title>Pizza Palace</title>
+        <object class="wxPanel" name="ID_MAIN_PANEL">
+            <style>wxSUNKEN_BORDER|wxTAB_TRAVERSAL</style>
+            <object class="wxBoxSizer">
+                <orient>wxVERTICAL</orient>
+                <object class="sizeritem">
+                    <flag>wxGROW|wxALL</flag>
+                    <border>5</border>
+                    <option>2</option>
+                    <object class="wxListbook" name="ID_LISTBOOK">
+                        <pos>200,200d</pos>
+                        <style>wxLB_LEFT</style>
+                        <object class="listbookpage">
+                            <label>Pizza</label>
+                            <object class="wxPanel" name="ID_PANEL_PIZZA">
+                                <style>wxSUNKEN_BORDER|wxTAB_TRAVERSAL</style>
+                                <object class="wxFlexGridSizer">
+                                    <cols>2</cols>
+                                    <rows>2</rows>
+                                    <vgap>0</vgap>
+                                    <hgap>0</hgap>
+                                    <growablecols>1</growablecols>
+                                    <growablerows>7</growablerows>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_LEFT|wxALIGN_CENTER_VERTICAL|wxALL|wxADJUST_MINSIZE</flag>
+                                        <border>5</border>
+                                        <object class="wxStaticText" name="wxID_STATIC">
+                                            <label>Your pizza size:</label>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxChoice" name="ID_PIZZA_SIZE_CHOICE">
+                                            <content>
+                                                <item>small</item>
+                                                <item>medium</item>
+                                                <item>large</item>
+                                                <item>x-large</item>
+                                            </content>
+                                            <selection>1</selection>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_LEFT|wxALIGN_CENTER_VERTICAL|wxALL|wxADJUST_MINSIZE</flag>
+                                        <border>5</border>
+                                        <object class="wxStaticText" name="wxID_STATIC">
+                                            <label>Your preferred crust style:</label>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxChoice" name="ID_PIZZA_CRUST_CHOICE">
+                                            <content>
+                                                <item>thin</item>
+                                                <item>thick</item>
+                                                <item>stuffed</item>
+                                            </content>
+                                            <selection>1</selection>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_LEFT|wxALIGN_CENTER_VERTICAL|wxALL|wxADJUST_MINSIZE</flag>
+                                        <border>5</border>
+                                        <object class="wxStaticText" name="wxID_STATIC">
+                                            <label>Your sauce type:</label>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxChoice" name="ID_PIZZA_SAUCE_CHOICE">
+                                            <content>
+                                                <item>red mild</item>
+                                                <item>red spicy</item>
+                                                <item>pesto</item>
+                                                <item>creamy garlic</item>
+                                            </content>
+                                            <selection>0</selection>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_LEFT|wxALIGN_CENTER_VERTICAL|wxALL|wxADJUST_MINSIZE</flag>
+                                        <border>5</border>
+                                        <object class="wxStaticText" name="wxID_STATIC">
+                                            <label>Cheese style:</label>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxChoice" name="ID_PIZZA_CHEESE_CHOICE">
+                                            <content>
+                                                <item>no cheese</item>
+                                                <item>normal cheese</item>
+                                                <item>lots of cheese</item>
+                                                <item>I am a mouse</item>
+                                            </content>
+                                            <selection>1</selection>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_LEFT|wxALIGN_CENTER_VERTICAL|wxALL|wxADJUST_MINSIZE</flag>
+                                        <border>5</border>
+                                        <object class="wxStaticText" name="wxID_STATIC">
+                                            <label>Topping 1:</label>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxChoice" name="ID_PIZZA_TOPPING_1_CHOICE">
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_LEFT|wxALIGN_CENTER_VERTICAL|wxALL|wxADJUST_MINSIZE</flag>
+                                        <border>5</border>
+                                        <object class="wxStaticText" name="wxID_STATIC">
+                                            <label>Topping 2:</label>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxChoice" name="ID_PIZZA_TOPPING_2_CHOICE">
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_LEFT|wxALIGN_CENTER_VERTICAL|wxALL|wxADJUST_MINSIZE</flag>
+                                        <border>5</border>
+                                        <object class="wxStaticText" name="wxID_STATIC">
+                                            <label>Topping 3:</label>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxChoice" name="ID_PIZZA_TOPPING_3_CHOICE">
+                                        </object>
+                                    </object>
+                                    <object class="spacer">
+                                        <flag>wxALIGN_CENTER_HORIZONTAL|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <size>5,5d</size>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_BOTTOM|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxButton" name="ID_PIZZA_BUTTON">
+                                            <label>Add to order</label>
+                                        </object>
+                                    </object>
+                                </object>
+                            </object>
+                        </object>
+                        <object class="listbookpage">
+                            <label>Drink</label>
+                            <object class="wxPanel" name="ID_PANEL_DRINK">
+                                <style>wxSUNKEN_BORDER|wxTAB_TRAVERSAL</style>
+                                <object class="wxFlexGridSizer">
+                                    <cols>2</cols>
+                                    <rows>2</rows>
+                                    <vgap>0</vgap>
+                                    <hgap>0</hgap>
+                                    <growablecols>1</growablecols>
+                                    <growablerows>2</growablerows>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_LEFT|wxALIGN_CENTER_VERTICAL|wxALL|wxADJUST_MINSIZE</flag>
+                                        <border>5</border>
+                                        <object class="wxStaticText" name="wxID_STATIC">
+                                            <label>Your drink size:</label>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxChoice" name="ID_DRINK_SIZE_CHOICE">
+                                            <content>
+                                                <item>small</item>
+                                                <item>medium</item>
+                                                <item>large</item>
+                                                <item>gut buster</item>
+                                            </content>
+                                            <selection>1</selection>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_LEFT|wxALIGN_CENTER_VERTICAL|wxALL|wxADJUST_MINSIZE</flag>
+                                        <border>5</border>
+                                        <object class="wxStaticText" name="wxID_STATIC">
+                                            <label>Your preferred drink:</label>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxChoice" name="ID_DRINK_TYPE_CHOICE">
+                                            <content>
+                                                <item>soda</item>
+                                                <item>tea</item>
+                                                <item>lemonade</item>
+                                                <item>coffee</item>
+                                                <item>water</item>
+                                            </content>
+                                            <selection>0</selection>
+                                        </object>
+                                    </object>
+                                    <object class="spacer">
+                                        <flag>wxALIGN_CENTER_HORIZONTAL|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <size>5,5d</size>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_BOTTOM|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxButton" name="ID_DRINK_BUTTON">
+                                            <label>Add to order</label>
+                                        </object>
+                                    </object>
+                                </object>
+                            </object>
+                        </object>
+                        <object class="listbookpage">
+                            <label>Ice Cream</label>
+                            <object class="wxPanel" name="ID_PANEL_ICE_CREAM">
+                                <pos>200,200d</pos>
+                                <style>wxSUNKEN_BORDER|wxTAB_TRAVERSAL</style>
+                                <object class="wxFlexGridSizer">
+                                    <cols>2</cols>
+                                    <rows>2</rows>
+                                    <vgap>0</vgap>
+                                    <hgap>0</hgap>
+                                    <growablecols>1</growablecols>
+                                    <growablerows>6</growablerows>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_LEFT|wxALIGN_CENTER_VERTICAL|wxALL|wxADJUST_MINSIZE</flag>
+                                        <border>5</border>
+                                        <object class="wxStaticText" name="wxID_STATIC">
+                                            <label>Your ice cream size:</label>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxChoice" name="ID_ICE_CREAM_SIZE_CHOICE">
+                                            <content>
+                                                <item>child</item>
+                                                <item>small</item>
+                                                <item>medium</item>
+                                                <item>large</item>
+                                            </content>
+                                            <selection>2</selection>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_LEFT|wxALIGN_CENTER_VERTICAL|wxALL|wxADJUST_MINSIZE</flag>
+                                        <border>5</border>
+                                        <object class="wxStaticText" name="wxID_STATIC">
+                                            <label>Your ice cream:</label>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxChoice" name="ID_ICE_CREAM_TYPE_CHOICE">
+                                            <content>
+                                                <item>vanilla</item>
+                                                <item>chocolate</item>
+                                                <item>strawberry</item>
+                                                <item>chocolate chip</item>
+                                                <item>cookie dough</item>
+                                                <item>cherry</item>
+                                            </content>
+                                            <selection>0</selection>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_LEFT|wxALIGN_CENTER_VERTICAL|wxALL|wxADJUST_MINSIZE</flag>
+                                        <border>5</border>
+                                        <object class="wxStaticText" name="wxID_STATIC">
+                                            <label>Topping 1:</label>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxChoice" name="ID_ICE_CREAM_TOPPING_1_CHOICE">
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_LEFT|wxALIGN_CENTER_VERTICAL|wxALL|wxADJUST_MINSIZE</flag>
+                                        <border>5</border>
+                                        <object class="wxStaticText" name="wxID_STATIC">
+                                            <label>Topping 2:</label>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxChoice" name="ID_ICE_CREAM_TOPPING_2_CHOICE">
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_LEFT|wxALIGN_CENTER_VERTICAL|wxALL|wxADJUST_MINSIZE</flag>
+                                        <border>5</border>
+                                        <object class="wxStaticText" name="wxID_STATIC">
+                                            <label>Topping 3:</label>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxChoice" name="ID_ICE_CREAM_TOPPING_3_CHOICE">
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_LEFT|wxALIGN_CENTER_VERTICAL|wxALL|wxADJUST_MINSIZE</flag>
+                                        <border>5</border>
+                                        <object class="wxStaticText" name="wxID_STATIC">
+                                            <label>Topping 4:</label>
+                                        </object>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxChoice" name="ID_ICE_CREAM_TOPPING_4_CHOICE">
+                                        </object>
+                                    </object>
+                                    <object class="spacer">
+                                        <flag>wxALIGN_CENTER_HORIZONTAL|wxALIGN_CENTER_VERTICAL|wxALL</flag>
+                                        <border>5</border>
+                                        <size>5,5d</size>
+                                    </object>
+                                    <object class="sizeritem">
+                                        <flag>wxALIGN_RIGHT|wxALIGN_BOTTOM|wxALL</flag>
+                                        <border>5</border>
+                                        <object class="wxButton" name="ID_ICE_CREAM_BUTTON">
+                                            <label>Add to order</label>
+                                        </object>
+                                    </object>
+                                </object>
+                            </object>
+                        </object>
+                    </object>
+                </object>
+                <object class="sizeritem">
+                    <flag>wxALIGN_LEFT|wxALL|wxADJUST_MINSIZE</flag>
+                    <border>5</border>
+                    <object class="wxStaticText" name="wxID_STATIC">
+                        <label>Order:</label>
+                    </object>
+                </object>
+                <object class="sizeritem">
+                    <flag>wxGROW|wxALL</flag>
+                    <border>5</border>
+                    <option>1</option>
+                    <object class="wxTextCtrl" name="ID_ORDER_TEXTCTRL">
+                        <style>wxTE_MULTILINE</style>
+                    </object>
+                </object>
+            </object>
+        </object>
+    </object>
+</resource>

data/samples/mdi/mdi.rb

@@ -0,0 +1,87 @@
+#!/usr/bin/env ruby
+# wxRuby2 Sample Code. Copyright (c) 2004-2006 Kevin B. Smith
+# Freely reusable code: see SAMPLES-LICENSE.TXT for details
+
+begin
+  require 'wx'
+rescue LoadError => no_wx_err
+  begin
+    require 'rubygems'
+    require 'wx'
+  rescue LoadError
+    raise no_wx_err
+  end
+end
+
+# MDI sample for wxRuby
+# slapped together quickly by Kevin Smith
+
+ID_NEXT = 1
+ID_PREVIOUS = 2
+ID_CASCADE = 3
+ID_TILE = 4
+ID_CREATE = 5
+ID_CLOSE = 6
+ID_EXIT = 99
+
+class MyFrame < Wx::MDIParentFrame
+  def initialize(title)
+    super(nil, -1, title,Wx::DEFAULT_POSITION,Wx::Size.new(500,400))
+    
+    @child_number = 0
+    
+    menuFile = Wx::Menu.new
+    menuFile.append(ID_EXIT, "E&xit\tAlt-X")
+    menuMDI = Wx::Menu.new
+    menuMDI.append(ID_NEXT, "&Next Child\tCtrl-F6")
+    menuMDI.append(ID_PREVIOUS, "&Previous Child")
+    menuMDI.append_separator()
+    menuMDI.append(ID_CASCADE, "&Cascade")
+    menuMDI.append(ID_TILE, "&Tile")
+    menuMDI.append_separator()
+    menuMDI.append(ID_CREATE, "&Add Child")
+    menuMDI.append(ID_CLOSE, "&Remove Child\tCtrl-F4")
+    menuBar = Wx::MenuBar.new
+    menuBar.append(menuFile, "&File")
+    menuBar.append(menuMDI, "&Window")
+    set_menu_bar(menuBar)
+    
+    evt_menu(ID_EXIT) { close }
+    evt_menu(ID_NEXT) { activate_next }
+    evt_menu(ID_PREVIOUS) { activate_previous }
+    evt_menu(ID_CASCADE) { cascade }
+    evt_menu(ID_TILE) { tile }
+    evt_menu(ID_CREATE) { create_child }
+    evt_menu(ID_CLOSE) { on_close_child }
+    
+    create_status_bar(2).set_status_widths([100, -1])
+    set_status_text("Some features only work on MS Windows", 1)
+
+    create_child
+    create_child
+    create_child
+  end
+  
+  def on_close_child
+    active = get_active_child
+    if(active)
+        active.close
+    end
+  end
+  
+  def create_child
+    @child_number += 1
+    name = "Child #{@child_number.to_s}"
+    Wx::MDIChildFrame.new(self, -1, name)
+  end
+end
+
+class NothingApp < Wx::App
+  def on_init
+    frame = MyFrame.new("MDI App")
+	frame.show
+  end
+end
+
+a = NothingApp.new
+a.main_loop()