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

data/samples/bigdemo/About.rbw

@@ -0,0 +1,39 @@
+module About
+
+class MyAboutBox < Wx::Dialog
+    def initialize(parent)
+        super(parent, -1, "About the WxRuby Demo.")
+        sizer = Wx::BoxSizer.new(Wx::HORIZONTAL)
+        set_size(Wx::Size.new(600,350))
+        headerFont = Wx::Font.new(36, Wx::FONTFAMILY_SWISS, Wx::FONTSTYLE_NORMAL, Wx::FONTWEIGHT_NORMAL)
+        bodyFont = Wx::Font.new(12, Wx::FONTFAMILY_SWISS, Wx::FONTSTYLE_NORMAL, Wx::FONTWEIGHT_NORMAL)
+        title = Wx::StaticText.new(self, -1, "WxRuby Demo!", Wx::Point.new(20, 20))
+        title.set_font(headerFont)
+        
+        rVersion = Wx::StaticText.new(self, -1, "Running on Ruby version " + RUBY_VERSION + " on " + RUBY_PLATFORM, Wx::Point.new(20,100))
+        rVersion.set_font(bodyFont)
+        rVersion.set_foreground_colour(Wx::RED)
+        
+        wxVersion = Wx::StaticText.new(self, -1, Wx::WXWIDGETS_VERSION, Wx::Point.new(20,120))
+        wxVersion.set_font(bodyFont)
+        wxVersion.set_foreground_colour(Wx::BLUE)
+        
+        str = "Welcome to the WxRuby Demo!  This demo has been ported from the \nwxPython demo created by ROBIN DUNN (http://www.wxpython.org).\nGo ahead and click on each demo via the tree or the demo menu.\nLook at the source code - it is an excellent way to learn WxRuby!\n\nPorted by Robert Paul Carlin"
+        body = Wx::StaticText.new(self, -1, str, Wx::Point.new(20, 160))
+        body.set_font(bodyFont)
+        
+        self.centre_on_parent(Wx::BOTH)
+        
+        
+    end
+    
+    
+end
+
+end
+
+if __FILE__ == $0
+  run_solo_lib = File.join( File.dirname(__FILE__), 'run.rb')
+  load run_solo_lib
+  run File.basename($0)
+end

data/samples/bigdemo/ColorPanel.rbw

@@ -0,0 +1,23 @@
+#!/usr/bin/env ruby
+# wxRuby2 Sample Code. Copyright (c) 2004-2008 wxRuby development team
+# Freely reusable code: see SAMPLES-LICENSE.TXT for details
+begin
+  require 'rubygems' 
+rescue LoadError
+end
+require 'wx'
+
+
+
+class ColoredPanel < Wx::Window
+    def initialize(parent, color)
+        super(parent, -1, Wx::DEFAULT_POSITION, Wx::DEFAULT_SIZE, Wx::SIMPLE_BORDER)
+        set_background_colour(color)
+    end
+end
+
+if __FILE__ == $0
+  run_solo_lib = File.join( File.dirname(__FILE__), 'run.rb')
+  load run_solo_lib
+  run File.basename($0)
+end

data/samples/bigdemo/GridSimple.rbw

@@ -0,0 +1,78 @@
+#!/usr/bin/env ruby
+# wxRuby2 Sample Code. Copyright (c) 2004-2008 wxRuby development team
+# Freely reusable code: see SAMPLES-LICENSE.TXT for details
+begin
+  require 'rubygems' 
+rescue LoadError
+end
+require 'wx'
+
+
+
+class SimpleGrid < Wx::Grid
+    
+    def initialize(parent, log)
+        super(parent, -1)
+        @log = log
+        @moveTo = nil
+        
+        evt_idle {|event| on_idle(event)}
+        
+        create_grid(25,25)      
+        
+        # simple cell formatting
+        set_col_size(3,200)
+        set_row_size(4,45)
+        set_cell_value(0,0,"First cell")
+        set_cell_value(1,1,"Another cell")
+        set_cell_value(2,2,"Yet another cell")
+        set_cell_value(3,3,"This cell is read-only")
+        set_cell_font(0,0, Wx::Font.new(12, Wx::FONTFAMILY_ROMAN, Wx::FONTSTYLE_ITALIC, Wx::FONTWEIGHT_NORMAL))
+        set_cell_text_colour(1,1,Wx::RED)
+        set_cell_background_colour(2,2,Wx::CYAN)
+        set_read_only(3,3,true)
+        
+        set_col_label_value(0, "Custom")
+        set_col_label_value(1, "column")
+        set_col_label_value(2, "labels")
+        
+        set_col_label_alignment(Wx::ALIGN_LEFT, Wx::ALIGN_BOTTOM)
+        
+        # overflow cells
+        set_cell_value(9,1, "This default cell will overflow into neighboring cells, but not if you turn overflow off.")
+        #set_cell_size(11, 1, 3, 3)
+        set_cell_alignment(11, 1, Wx::ALIGN_CENTRE, Wx::ALIGN_CENTRE)
+        set_cell_value(11, 1, "This cell is set to span 3 rows and 3 columns")
+        
+        # evt_grid_cell_left_click {|event| on_cell_left_click(event)}
+    end
+    
+    def on_cell_left_click(event)
+        @log.write_text("on_cell_left_click: (%d,%d)" % [evt.get_row, evt.get_col])
+        evt.skip
+    end
+    
+    def on_idle(event)
+        if @moveTo != nil
+            set_grid_cursor(@moveTo[0], @moveTo[1])
+            @moveTo = nil
+        end
+        event.skip
+    end
+end
+
+module GridDemo
+    class TestFrame < Wx::Frame
+        def initialize(parent, log)
+            super(parent, -1, "Simple Grid Demo", Wx::DEFAULT_POSITION, Wx::Size.new(640,480))
+            grid = SimpleGrid.new(self, log)
+        end
+    end
+end
+
+
+if __FILE__ == $0
+  run_solo_lib = File.join( File.dirname(__FILE__), 'run.rb')
+  load run_solo_lib
+  run File.basename($0)
+end

data/samples/bigdemo/MDIDemo.rbw

@@ -0,0 +1,57 @@
+#!/usr/bin/env ruby
+# wxRuby2 Sample Code. Copyright (c) 2004-2008 wxRuby development team
+# Freely reusable code: see SAMPLES-LICENSE.TXT for details
+begin
+  require 'rubygems' 
+rescue LoadError
+end
+require 'wx'
+
+
+
+module Demo
+
+class MyParentFrame < Wx::MDIParentFrame
+    def initialize
+        super(nil, -1, "MDI Parent", Wx::DEFAULT_POSITION, 
+              Wx::Size.new(600,400))
+        
+        @win_count = 0
+        menu = Wx::Menu.new
+        menu.append(5000, "&New Window")
+        menu.append_separator
+        menu.append(5001, "E&xit")
+        
+        menubar = Wx::MenuBar.new
+        menubar.append(menu, "&File")
+        set_menu_bar(menubar)
+        
+        create_status_bar
+        
+        evt_menu(5000) {|event| on_new_window(event)}
+        evt_menu(5001) {|event| on_exit(event)}
+        scrollwin_demo_file = File.join(File.dirname(__FILE__), 
+                                        "wxScrolledWindow.rbw")
+        load scrollwin_demo_file
+    end
+    
+    def on_exit(event)
+        close
+    end
+    
+    def on_new_window(event)
+        @win_count += 1
+        win = Wx::MDIChildFrame.new(self, -1, "Child Window: #{@win_count}")
+        canvas = MyCanvas.new(win)
+        win.show
+    end
+end
+    
+end
+
+
+if __FILE__ == $0
+  run_solo_lib = File.join( File.dirname(__FILE__), 'run.rb')
+  load run_solo_lib
+  run File.basename($0)
+end

data/samples/bigdemo/PopupMenu.rbw

@@ -0,0 +1,146 @@
+#!/usr/bin/env ruby
+# wxRuby2 Sample Code. Copyright (c) 2004-2008 wxRuby development team
+# Freely reusable code: see SAMPLES-LICENSE.TXT for details
+begin
+  require 'rubygems'
+rescue LoadError
+end
+require 'wx'
+
+TEXT = "Right-click on the panel (or Ctrl-click on the Mac) to show a popup\nmenu.  Then look at the code for this sample.  Notice how the\nPopupMenu method is similar to the ShowModal method of a wxDialog in\nthat it doesn't return until the popup menu has been dismissed.  The\nevent handlers for the popup menu items can either be attached to the\nmenu itself, or to the window that invokes PopupMenu."
+
+class TestPanel < Wx::Panel
+  def initialize(parent, log)
+    @log = log
+    super(parent, -1)
+    @bound = false
+    box = Wx::BoxSizer.new(Wx::VERTICAL)
+
+    # Make and layout controls
+    fs = get_font.get_point_size
+    bf = Wx::Font.new(fs + 4, Wx::FONTFAMILY_SWISS, Wx::FONTSTYLE_NORMAL, Wx::FONTWEIGHT_BOLD)
+    nf = Wx::Font.new(fs + 2, Wx::FONTFAMILY_SWISS, Wx::FONTSTYLE_NORMAL, Wx::FONTWEIGHT_NORMAL)
+
+    t = Wx::StaticText.new(self, -1, "Popup menu", Wx::DEFAULT_POSITION)
+    t.set_font(bf)
+    box.add(t, 0, Wx::CENTER | Wx::ALL, 5)
+
+    box.add(Wx::StaticLine.new(self, -1), 0, Wx::EXPAND)
+    box.add(10, 20)
+
+    t = Wx::StaticText.new(self, -1, TEXT)
+    t.set_font(nf)
+    box.add(t, 0, Wx::CENTER | Wx::ALL, 5)
+
+    set_sizer(box)
+
+    evt_right_up { |event| on_right_click(event) }
+  end
+
+  def on_right_click(event)
+    @log.write_text("on_right_click")
+
+    # only do this part the first time so the events are only bound once
+    if @bound == false
+      @popupID1,
+        @popupID2,
+        @popupID3,
+        @popupID4,
+        @popupID5,
+        @popupID6,
+        @popupID7,
+        @popupID8,
+        @popupID9 = (5000..5008).to_a
+      evt_menu(@popupID1) { |event| on_popup_one(event) }
+      evt_menu(@popupID2) { |event| on_popup_two(event) }
+      evt_menu(@popupID3) { |event| on_popup_three(event) }
+      evt_menu(@popupID4) { |event| on_popup_four(event) }
+      evt_menu(@popupID5) { |event| on_popup_five(event) }
+      evt_menu(@popupID6) { |event| on_popup_six(event) }
+      evt_menu(@popupID7) { |event| on_popup_seven(event) }
+      evt_menu(@popupID8) { |event| on_popup_eight(event) }
+      evt_menu(@popupID9) { |event| on_popup_nine(event) }
+      @bound = true
+    end
+
+    # make a menu
+    menu = Wx::Menu.new
+    # Show how to put an icon in the menu
+    item = Wx::MenuItem.new(menu, @popupID1, "One")
+    # set_bitmap is only available on GTK and Windows
+    if item.respond_to?(:set_bitmap)
+      bmp_file = File.join(File.dirname(__FILE__), 'icons', 'smiley.xpm')
+      item.set_bitmap(Wx::Bitmap.new(bmp_file))
+    end
+    menu.append_item(item)
+    # add some other items
+    menu.append(@popupID2, "Two")
+    menu.append(@popupID3, "Three")
+    menu.append(@popupID4, "Four")
+    menu.append(@popupID5, "Five")
+    menu.append(@popupID6, "Six")
+    # make a submenu
+    sm = Wx::Menu.new
+    sm.append(@popupID8, "sub item 1")
+    sm.append(@popupID9, "sub item 2")
+    mItem = Wx::MenuItem.new(menu, @popupID7, "Test Submenu", "", Wx::ITEM_NORMAL, sm)
+    menu.append_item(mItem)
+
+    popup_menu(menu, Wx::Point.new(event.get_x, event.get_y))
+    # menu.destroy
+  end
+
+  def on_popup_one(event)
+    @log.write_text("Popup one")
+  end
+
+  def on_popup_two(event)
+    @log.write_text("Popup two")
+  end
+
+  def on_popup_three(event)
+    @log.write_text("Popup three")
+  end
+
+  def on_popup_four(event)
+    @log.write_text("Popup four")
+  end
+
+  def on_popup_five(event)
+    @log.write_text("Popup five")
+  end
+
+  def on_popup_six(event)
+    @log.write_text("Popup six")
+  end
+
+  def on_popup_seven(event)
+    @log.write_text("Popup seven")
+  end
+
+  def on_popup_eight(event)
+    @log.write_text("Popup eight")
+  end
+
+  def on_popup_nine(event)
+    @log.write_text("Popup nine")
+  end
+
+end
+
+module Demo
+  def Demo.run(frame, nb, log)
+    win = TestPanel.new(nb, log)
+    return win
+  end
+
+  def Demo.overview
+    return ""
+  end
+end
+
+if __FILE__ == $0
+  run_solo_lib = File.join(File.dirname(__FILE__), 'run.rb')
+  load run_solo_lib
+  run File.basename($0)
+end

data/samples/bigdemo/ShapedWindow.rbw

@@ -0,0 +1,128 @@
+#!/usr/bin/env ruby
+# wxRuby2 Sample Code. Copyright (c) 2004-2008 wxRuby development team
+# Freely reusable code: see SAMPLES-LICENSE.TXT for details
+begin
+  require 'rubygems' 
+rescue LoadError
+end
+require 'wx'
+
+include Wx
+
+class MyFrame < Frame
+  def initialize(parent, log)
+    @log = log
+    super(parent, :title => "Shaped Window", :size => [350,200], 
+          :style => FRAME_SHAPED|SIMPLE_BORDER|FRAME_NO_TASKBAR|STAY_ON_TOP)
+
+    @has_shape = false
+    @delta = [0,0]
+
+    evt_left_dclick {on_double_click}
+    evt_left_down {|event| on_left_down(event)}
+    evt_left_up {|event| on_left_up(event)}
+    evt_motion {|event| on_mouse_move(event)}
+    evt_right_up {on_exit}
+    evt_paint {on_paint}
+
+    shape = File.join( File.dirname(__FILE__), 'icons', 'wxruby-128x128.png' )
+    @bmp = Bitmap.new( Image.new(shape) )
+    set_client_size(@bmp.width, @bmp.height)
+
+    if Wx::PLATFORM == 'WXGTK'
+      # wxGTK requires that the window be created before you can
+      # set its shape, so delay the call to SetWindowShape until
+      # this event.
+      evt_window_create { set_window_shape }
+    else
+      # On wxMSW and wxMac the window has already been created, so go for it.
+      set_window_shape
+    end
+
+    paint { | dc | dc.draw_bitmap(@bmp, 0, 0, true) }
+  end
+
+  def set_window_shape
+    r = Region.new(@bmp)
+    @has_shape = set_shape(r)
+  end
+
+  def on_double_click
+    if @has_shape
+      set_shape(Region.new)
+      @has_shape = false
+    else
+      set_window_shape
+    end
+  end
+
+  def on_paint
+    paint { | dc | dc.draw_bitmap(@bmp, 0, 0, true) }
+  end
+    
+  def on_exit
+    close(true)
+  end
+
+  def on_left_down(event)
+    capture_mouse
+    point = client_to_screen(event.position)
+    origin = position
+    dx = point.x - origin.x
+    dy = point.y - origin.y
+    @delta = [dx, dy]
+  end
+
+  def on_left_up(event)
+    if has_capture
+      release_mouse
+    end
+  end
+
+  def on_mouse_move(event)
+    if event.dragging and event.left_is_down
+      point = client_to_screen(event.position)
+      move(point.x - @delta[0], point.y - @delta[1])
+    end
+  end
+end
+
+class TestPanel < Wx::Panel
+  def initialize(parent, log)
+    super(parent, :style => Wx::NO_FULL_REPAINT_ON_RESIZE)
+    @log = log
+
+    b = Button.new(self, :label => 'Show the ShapedWindow Sample', :pos => [50,50])
+    evt_button(b) { on_button }
+  end
+
+  def on_button
+    win = MyFrame.new(self, @log)
+    win.size = [200, 200]
+    win.center_on_parent(Wx::BOTH)
+    win.show(true)
+  end
+end
+        
+module Demo
+  def Demo.run(frame, nb, log)
+    TestPanel.new(nb, log)
+  end
+    
+  def Demo.overview
+    <<EOS
+Top level windows now have a SetShape method that lets you set a
+non-rectangular shape for the window using a wxRegion.  All pixels
+outside of the region will not be drawn and the window will not be
+sensitive to the mouse in those areas either.
+EOS
+  end
+end
+
+
+
+if __FILE__ == $0
+  run_solo_lib = File.join( File.dirname(__FILE__), 'run.rb')
+  load run_solo_lib
+  run File.basename($0)
+end