iwidgets::regexpfield .fname \
-labeltext "Enter First Name:" \
-fixed 12 \
-regexp {^[a-zA-Z]+$}
iwidgets::Labeledwidget::alignlabels .fname
pack .fname \
-fill x \
-expand 1
iwidgets::regexpfield .fname \
-labeltext "Enter First Name:" \
-fixed 12 \
-regexp {^[a-zA-Z]+$}
iwidgets::Labeledwidget::alignlabels .fname
pack .fname \
-fill x \
-expand 1