ruby_1_8_6/ext/tk/sample/tkextlib/iwidgets/sample/calendar.rb


1
2
3
4
5
6
7
8
9
10

#!/usr/bin/env ruby
require 'tk'
require 'tkextlib/iwidgets'

Tk::Iwidgets::Calendar.new(:command=>proc{|arg| puts(arg.date)}, 
                           :weekendbackground=>'mistyrose', 
                           :weekdaybackground=>'ghostwhite', 
                           :outline=>'black', :startday=>'wednesday', 
                           :days=>%w(We Th Fr Sa Su Mo Tu)).pack
Tk.mainloop