summaryrefslogtreecommitdiff
path: root/ext/tk/sample/tkextlib/iwidgets/sample/feedback.rb
blob: 27fe625a5db481384f908b7f03553d9395c9e198 (plain)
1
2
3
4
5
6
7
8
9
10
11
#!/usr/bin/env ruby
# frozen_string_literal: false
require 'tk'
require 'tkextlib/iwidgets'

Tk::Iwidgets::Feedback.new(:labeltext=>'Status', :steps=>20){|fb|
  pack(:padx=>10, :pady=>10, :fill=>:both, :expand=>true)
  TkTimer.new(500, 20, proc{fb.step}).start(2500)
}

Tk.mainloop