class TOPPING < $TK_WIDGET |
---|
**** | Toppings are mainly buttons on which van click to select that topping for your pizza. They also store the name of the topping the the value factor. |
$TK_WIDGET |
attr name: STR; |
---|
create(frame:$TK_WIDGET,n:STR,updfunc:ROUT): SAME |
---|
**** | Creates a new topping button in the frame 'frame'. 'n' is the name of the topping. 'updfunc' will be called when the button is pressed. |
is_selected: BOOL |
---|
**** | Returns true if button is selected. |
price: FLT |
---|
**** | Returns the price for this topping on the current pizza. |
attr name: STR; |
---|
attr var: TK_VAR; |
---|
attr var: TK_VAR; |
---|