blob: e6c24113ade8ee38e3a172b8b1b04e87dd89e258 (
plain)
1
2
3
4
5
6
7
|
# ----------------------------------------------------------------------
# DEMO: timeentry in [incr Widgets]
# ----------------------------------------------------------------------
package require Iwidgets 4.0
iwidgets::timeentry .de -labeltext "Time:"
pack .de -fill x -expand yes -padx 10 -pady 10
|