WidGet file, version 1.1, created: Tue Jul 29 18:09:02 PDT 1997 Widget radiobutton#19 configure variable rbutton other error {} other tags {} other level {} other help {} configure value 2 configure command ShowButtons configure anchor w other master {} other pathname radiobutton#19 geometry sticky nesw other tabbing {} other item_name radiobutton#19 geometry row 4 other type radiobutton configure text pineapples other comments {} geometry column 2 Widget label#1 geometry row 5 other error {} other type label configure anchor w configure textvariable displayText other master {} other pathname label#1 other tags {} other level {} other help {} configure padx 20 geometry column 2 other comments {} configure borderwidth 4 other tabbing {} other item_name displayLabel geometry sticky nesw configure relief raised Widget radiobutton#13 configure variable rbutton other error {} other tags {} other level {} other help {} configure value 0 configure command ShowButtons configure anchor w other master {} other pathname radiobutton#13 geometry sticky nesw other tabbing {} other item_name radiobutton#13 geometry row 2 other type radiobutton configure text kiwis other comments {} geometry column 2 Widget f other generic_options {button { } canvas { } checkbutton { } entry { } frame { } label { } listbox { } menubutton { } message { } radiobutton { } scale { } scrollbar { } text { } } other panel {} other resize_row {0 0 0 0 0 0} other type frame other code {# The exRadiobutton.ui example shows the way # a script can determine which radiobutton # was "pushed". proc ShowButtons {} { global rbutton displayText # Display user's choice in a label, # using button's value as index into a list. set fruit_list [list kiwis guavas pineapples] set displayText [lindex $fruit_list $rbutton] } } other min_row {11 15 8 6 16 11} other master {} other pathname f other resize_column {0 3 0} other tags {} other level 0 configure background #e9e9e9 other min_column {9 76 10} other help {} other Colors {black white bisque grey red green blue magenta yellow #AE00B200C300} other comments {} other item_name f other tabbing {} Widget radiobutton#18 configure variable rbutton other error {} other tags {} other level {} other help {} configure value 1 configure command ShowButtons configure anchor w other master {} other pathname radiobutton#18 geometry sticky nesw other tabbing {} other item_name radiobutton#18 geometry row 3 other type radiobutton configure text guavas other comments {} geometry column 2