![]() |
ActiveTcl User Guide
|
![]() |
iwidgets::feedback - Create and manipulate a feedback widget to
display feedback on the current status of an ongoing operation to
the user.
iwidgets::feedback pathName ?options?
itk::Widget <- iwidgets::Labeledwidget <- iwidgets::Feedback
background cursor foreground
highlightColor highlightThickness
options.
labelBitmap labelFont labelImage labelMargin
inherited options.
acceptable to Tk_GetColor. The default is DodgerBlue.
acceptable to Tk_GetPixels. The default is 20.
any of the forms acceptable to Tk_GetColor. The default
is white.
default is 10.
back on the current status of an ongoing operation to the user.
name is pathName. This command may be used to invoke various operations on the widget. It has the following general form:
pathName option ?arg arg ...?
pathName cget option
option. Option may have any of the values accepted
by the scrolledhtml command.
pathName configure ?option? ?value
option value ...?
option is specified, returns a list describing all of the
available options for pathName (see Tk_ConfigureInfo
for informa- tion on the format of this list). If option is
specified with no value, then the command returns a list
describing the one named option (this list will be identical to the
corresponding sublist of the value returned if no option is
specified). If one or more option-value pairs are specified,
then the command modifies the given widget option(s) to have the
given value(s); in this case the command returns an empty string.
Option may have any of the values accepted by the
iwidgets::feedback command. pathName reset
the percentage complete label text to 0%
pathName step ?inc?
specified by inc. Inc defaults to 1.
package require Iwidgets 4.0
iwidgets::feedback .fb -labeltext «Status» -steps 20
pack .fb -padx 10 -pady 10 -fill both -expand yes
for {set i 0} {$i < 20} {incr i} {
.fb step
after 500
}
inspect. The original feedback code is copyright 1995 Lawrence
feedback, widget