RubyLit - Ruby.del.litoral!
Pantalla Basica (changes)

Showing changes from revision #0 to #1: Added | Removed

#
#http://ruby-gnome2.sourceforge.net/tut/12.2.htm
#
require 'gtk2'

# inicio gtk, es comun olvidarse de esta linea.
Gtk.init

# Creo la ventana
window = Gtk::Window.new( Gtk::Window::TOPLEVEL )
# Seteo ancho y alto
window.set_size_request( 300, 50 )
# Le pongo Titulo
window.set_title( "Pantalla Básica" )
# creo el evento que cierra la ventana al hacer clic en la X
window.signal_connect( "delete_event" ) { Gtk.main_quit }

# Creo una Caja Vertical
vbox = Gtk::VBox.new( false, 0 )
# Agrego la caja a la ventana
window.add( vbox )

# Creo un boton
button = Gtk::Button.new( "Click" )
# Agrego el boton a la caja
vbox.pack_start( button, false, false, 0)

# Creo el evento que responde al click
button.signal_connect( "button_press_event", Gdk::Event::BUTTON_PRESS  ) { 
   |widget, event, y|
    puts "click en el boton." 
}

#muestro todo lo que puse en la ventana
window.show_all

#run!
Gtk.main