1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48
|
=begin
dialog.rb - a part of testgtk.c rewritten in Ruby/GTK2
Copyright (C) 2002-2005 Ruby-GNOME2 Project Team
$Id: dialog.rb,v 1.6 2005/07/17 16:55:27 mutoh Exp $
=end
require 'sample'
class DialogSample < SampleDialog
def initialize
super("Gtk::Dialog")
set_default_size(200, 100)
button = Gtk::Button.new("OK")
button.signal_connect("clicked"){destroy}
button.can_default = true
action_area.pack_start(button)
button.grab_default
button = Gtk::Button.new("Toggle")
button.signal_connect("clicked"){label_toggle}
button.can_default = true
action_area.pack_start(button)
@label = nil
end
private
def label_toggle
if @label == nil then
@label = Gtk::Label.new("Dialog Test")
@label.signal_connect("destroy"){@label = nil}
@label.set_padding(10, 10)
child.pack_start(@label)
@label.show
else
@label.destroy
end
end
end
|