Ruby 继承 Gtk::Window

ysitbook

1. require "gtk"
   
2. 
   
3. class SampleWindow < Gtk::Window
   
4. 
   
5.   def initialize
   
6.     super
   
7.     set_title("Ruby/GTK Sample")
   
8.     signal_connect("destroy") { Gtk::main_quit }
   
9. 
   
10.     entry = Gtk::Entry.new
    
11. 
    
12.     button = Gtk::Button.new("All Caps!")
    
13.     button.signal_connect("clicked") { cmdAllCaps(entry) }
    
14. 
    
15.     box = Gtk::HBox.new
    
16.     box.add(Gtk::Label.new("Text:"))
    
17.     box.add(entry)
    
18.     box.add(button)
    
19. 
    
20.     add(box)
    
21.     show_all
    
22.   end
    
23. 
    
24.   def cmdAllCaps(textField)
    
25.     textField.set_text(textField.get_text.upcase)
    
26.   end
    
27. end
    
28. 
    
29. SampleWindow.new
    
30. Gtk::main

复制代码