73 lines
1.3 KiB
Ruby
73 lines
1.3 KiB
Ruby
|
#!/usr/bin/env ruby
|
||
|
|
=begin
|
||
|
|
threads.rb - Ruby/GTK2 sample script.
|
||
|
|
|
||
|
|
Copyright (c) 2003-2006 Ruby-GNOME2 Project Team
|
||
|
|
This program is licenced under the same licence as Ruby-GNOME2.
|
||
|
|
|
||
|
|
$Id: threads.rb,v 1.5 2006/06/17 13:18:12 mutoh Exp $
|
||
|
|
=end
|
||
|
|
|
||
|
|
require 'gtk2'
|
||
|
|
require 'thread'
|
||
|
|
|
||
|
|
label = Gtk::Label.new
|
||
|
|
|
||
|
|
Thread.new {
|
||
|
|
(0...1000).each { |cnt|
|
||
|
|
p "A:" + cnt.to_s
|
||
|
|
label.label = "A:" + cnt.to_s
|
||
|
|
sleep(2)
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
start_button = Gtk::Button.new("start")
|
||
|
|
stop_button = Gtk::Button.new("stop")
|
||
|
|
|
||
|
|
start_button.signal_connect("clicked") do
|
||
|
|
start_button.sensitive=false
|
||
|
|
@th = Thread.new {
|
||
|
|
(0...10).each { |cnt|
|
||
|
|
p "B:" + cnt.to_s
|
||
|
|
label.label = "B:" + cnt.to_s
|
||
|
|
sleep(2)
|
||
|
|
}
|
||
|
|
@th = nil
|
||
|
|
start_button.sensitive = true
|
||
|
|
start_button.grab_focus
|
||
|
|
stop_button.sensitive = false
|
||
|
|
}
|
||
|
|
stop_button.sensitive = true
|
||
|
|
stop_button.grab_focus
|
||
|
|
end
|
||
|
|
|
||
|
|
stop_button.signal_connect("clicked") do
|
||
|
|
if @th
|
||
|
|
@th.kill
|
||
|
|
puts "killed"
|
||
|
|
@th = nil
|
||
|
|
start_button.sensitive = true
|
||
|
|
start_button.grab_focus
|
||
|
|
stop_button.sensitive = false
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
stop_button.sensitive = false
|
||
|
|
|
||
|
|
box = Gtk::VBox.new.
|
||
|
|
set_size_request(100,100)
|
||
|
|
|
||
|
|
box << label << start_button << stop_button
|
||
|
|
|
||
|
|
win = Gtk::Window.new << box
|
||
|
|
|
||
|
|
win.show_all.signal_connect("delete_event") do
|
||
|
|
p "Exiting..."
|
||
|
|
Gtk.main_quit
|
||
|
|
Thread.list.each {|t| t.kill }
|
||
|
|
end
|
||
|
|
|
||
|
|
Gtk.main
|
||
|
|
|
||
|
|
|