Lines Matching refs:index
57 public method index {args}
66 public method buttoncget {index option}
167 # METHOD: index index
170 # numerical index, keyword "end" or "default". Returns the button's
173 itcl::body iwidgets::Buttonbox::index {index} {
175 if {[regexp {(^[0-9]+$)} $index]} {
176 if {$index < [llength $_buttonList]} {
177 return $index
179 error "Buttonbox index \"$index\" is out of range"
182 } elseif {$index == "end"} {
185 } elseif {$index == "default"} {
195 if {[set idx [lsearch $_buttonList $index]] != -1} {
199 error "bad Buttonbox index \"$index\": must be number, end,\
234 # METHOD: insert index tag ?option value option value ...?
237 # given by index. All PushButton options are allowed. New buttons
241 itcl::body iwidgets::Buttonbox::insert {index tag args} {
253 set index [index $index]
254 set _buttonList [linsert $_buttonList $index $tag]
255 set _displayList [linsert $_displayList $index $tag]
261 # METHOD: delete index
265 itcl::body iwidgets::Buttonbox::delete {index} {
266 set index [index $index]
267 set tag [lindex $_buttonList $index]
271 set _buttonList [lreplace $_buttonList $index $index]
282 # METHOD: default index
284 # Sets the default to the push button given by index.
286 itcl::body iwidgets::Buttonbox::default {index} {
287 set index [index $index]
289 set defbtn [lindex $_buttonList $index]
301 # METHOD: hide index
303 # Hide the push button given by index. This doesn't remove the button
306 itcl::body iwidgets::Buttonbox::hide {index} {
307 set index [index $index]
308 set tag [lindex $_buttonList $index]
319 # METHOD: show index
321 # Displays a previously hidden push button given by index. Check if
325 itcl::body iwidgets::Buttonbox::show {index} {
326 set index [index $index]
327 set tag [lindex $_buttonList $index]
330 set _displayList [linsert $_displayList $index $tag]
337 # METHOD: invoke ?index?
341 # is expected to be a button index.
345 $itk_component([lindex $_buttonList [index default]]) invoke
348 $itk_component([lindex $_buttonList [index [lindex $args 0]]]) \
354 # METHOD: buttonconfigure index ?option? ?value option value ...?
356 # Configure a push button given by index. This method allows
360 itcl::body iwidgets::Buttonbox::buttonconfigure {index args} {
361 set tag [lindex $_buttonList [index $index]]
371 # METHOD: buttonccget index option
373 # Return value of option for push button given by index. Option may
376 itcl::body iwidgets::Buttonbox::buttoncget {index option} {
377 set tag [lindex $_buttonList [index $index]]