48 lines
897 B
Ruby
48 lines
897 B
Ruby
|
=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.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)
|
||
|
|
||
|
vbox.pack_start(@label)
|
||
|
@label.show
|
||
|
else
|
||
|
@label.destroy
|
||
|
end
|
||
|
end
|
||
|
|
||
|
end
|