1iwidgets::feedback − Create and manipulate a feedback widget to
2display feedback on the current status of an ongoing operation to
3the user. iwidgets::feedback pathName ?options? itk::Widget <‐
4iwidgets::Labeledwidget <‐ iwidgets::Feedback
7See the "options" manual entry for details on the standard op‐
8tions.
11See the "labeledwidget" class manual entry for details on the in‐
12herited options.
13Name: barcolor
14Class: BarColor
15Command‐Line Switch: ‐barcolor
16Specifies the color of the status bar, in any of the forms ac‐
17ceptable to Tk_GetColor. The default is DodgerBlue.
18Name: barheight
19Class: BarHeight
20Command‐Line Switch: ‐barheight
21Specifies the height of the status bar, in any of the forms ac‐
22ceptable to Tk_GetPixels. The default is 20.
23Name: troughColor
24Class: TroughColor
25Command‐Line Switch: ‐troughcolor
26Specifies the color of the frame in which the status bar sits, in
27any of the forms acceptable to Tk_GetColor. The default is
28white.
29Name: steps
30Class: Steps
31Command‐Line Switch: ‐steps
32Specifies the total number of steps for the status bar. The de‐
33fault is 10.
34
35The iwidgets::feedback command creates a widget to display feed‐
36back on the current status of an ongoing operation to the user.
37Display is given as a percentage and as a thermometer type bar.
38Options exist for adding a label and controlling its position.
39
40The iwidgets::feedback command creates a new Tcl command whose
41name is pathName. This command may be used to invoke various op‐
42erations on the widget. It has the following general form: path‐
44act behavior of the command. The following commands are possible
45for scrolledtext widgets:
46
48tion option given by option. Option may have any of the values
49accepted by the scrolledhtml command. pathName configure ?op‐
51options of the widget. If no option is specified, returns a list
52describing all of the available options for pathName (see Tk_Con‐
55describing the one named option (this list will be identical to
56the corresponding sublist of the value returned if no option is
57specified). If one or more option−value pairs are specified,
58then the command modifies the given widget option(s) to have the
59given value(s); in this case the command returns an empty
60string. Option may have any of the values accepted by the iwid‐
62of steps completed to 0, and configures the percentage complete
63label text to 0% pathName step ?inc? Increase the current number
64of steps completed by the amount specified by inc. Inc defaults
65to 1.
66
67 package require Iwidgets 4.0
68 iwidgets::feedback .fb ‐labeltext "Status" ‐steps 20
69 pack .fb ‐padx 10 ‐pady 10 ‐fill both ‐expand yes
70
71 for {set i 0} {$i < 20} {incr i} {
72 .fb step
73 after 500
74 } Sam Shen This code is based largely on his feedback.tcl code
75from tk inspect. The original feedback code is copyright 1995
76Lawrence Berkeley Laboratory. Kris Raney feedback, widget
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132