iwidgets::spinner(1) [incr Widgets] iwidgets::spinner(1)


iwidgets::spinner - Create and manipulate a spinner widget

iwidgets::spinner pathName ?options?

itk::Widget <- iwidgets::Labeledwidget <- iwidgets::Spinner


background         borderWidth     cursor              exportSelection
foreground         highlightColor  highlightThickness  insertBackground
insertBorderWidth  insertOffTime   insertOnTime        insertWidth
justify            relief          selectBackground    selectBorderWidth
selectForeground   textVariable

See the "options" manual entry for details on the standard options.

show	state

See the "entry" manual entry for details on the associated options.

childSitePos	command	fixed	focusCommand
invalid	textBackground	textFont	validate
width

See the "entryfield" widget manual entry for details on the above inherited options.

disabledForeground	labelBitmap	labelFont	labelImage
labelMargin	labelPos	labelText	labelVariable
state sticky

See the "labeledwidget" widget manual entry for details on the above inherited options.

Name:	arrowOrient
Class:	Orient
Command-Line Switch:	-arroworient
Specifies placement of arrow buttons: horizontal or vertical. The default is vertical.

Name:	decrement
Class:	Command
Command-Line Switch:	-decrement
Tcl command to be executed when down arrow is pressed.

Name:	increment
Class:	Command
Command-Line Switch:	-increment
Tcl command to be executed when up arrow is pressed.

Name:	repeatDelay
Class:	RepeatDelay
Command-Line Switch:	-repeatdelay
Specifies the initial delay in milliseconds before the spinner repeat action on the arrow buttons engages. The default is 300 milliseconds.

Name:	repeatInterval
Class:	RepeatInterval
Command-Line Switch:	-repeatinterval
Specifies the repeat delay in milliseconds between selections of the arrow buttons. A repeatinterval of 0 disables button repeat. The default is 100 milliseconds.


The iwidgets::spinner command creates a spinner widget. The spinner is comprised of an entryfield plus up and down arrow buttons. Arrows may be drawn horizontally or vertically.

The iwidgets::spinner command creates a new Tcl command whose 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 ...?

Option and the args determine the exact behavior of the command. The following commands are possible for spinner widgets:

delete	get	icursor	index	
insert	scan	selection	xview	

See the "entry" manual entry for details on the associated methods.

childsite	clear	peek

See the "entryfield" manual entry for details on the associated methods.

Returns the current value of the configuration option given by option. Option may have any of the values accepted by the iwidgets::spinner command.
Query or modify the configuration options of the widget. If no option is specified, returns a list describing all of the available options for pathName (see Tk_ConfigureInfo for information 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::spinner command.
Derived classes may overload this method to specialize functionality.
Derived classes may overload this method to specialize functionality.

Name:	downarrow
Class:	Canvas
The downarrow component is the downward pointing button of the spinner. See the "canvas" widget manual entry for details on the downarrow component item.

Name:	uparrow
Class:	Canvas
The uparrow component is the upward pointing button of the spinner. See the "canvas" widget manual entry for details on the uparrow component item.

 package require Iwidgets 4.0
 set months {January February March April May June July \
                 August September October November December}
 proc blockInput {char} {
     return 0
 }
 proc spinMonth {step} {
     global months
     set index [expr [lsearch $months [.sm get]] + $step]
     if {$index < 0} {set index 11}
     if {$index > 11} {set index 0}
     .sm delete 0 end
     .sm insert 0 [lindex $months $index]
 }
 iwidgets::spinner .sm -labeltext "Month : " -width 10 -fixed 10 \
   -validate blockInput -decrement {spinMonth -1} -increment {spinMonth 1}
 .sm insert 0 January
 pack .sm -padx 10 -pady 10

Ken Copeland <ken@hilco.com>

10/18/95 - Added auto-repeat action to spinner arrow buttons.

Sue Yockey

spinner, widget

  Tk