diff options
Diffstat (limited to 'itcl/iwidgets/demos/datefield')
-rw-r--r-- | itcl/iwidgets/demos/datefield | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/itcl/iwidgets/demos/datefield b/itcl/iwidgets/demos/datefield new file mode 100644 index 00000000000..03b33a54932 --- /dev/null +++ b/itcl/iwidgets/demos/datefield @@ -0,0 +1,12 @@ +# ---------------------------------------------------------------------- +# DEMO: datefield in [incr Widgets] +# ---------------------------------------------------------------------- +package require Iwidgets 4.0 + +proc returnCmd {} { + puts [.df get] +} + +iwidgets::datefield .df -labeltext "Date (International Format):" \ + -command returnCmd -int 1 +pack .df -fill x -expand yes -padx 10 -pady 10 |