stk/Contrib/STk-wtour/lessons/options.stk

10 lines
175 B
Plaintext
Raw Normal View History

1996-09-27 06:29:02 -04:00
;; Widget options
(option 'add "*background" "red")
(option 'add "*Button.foreground" "white")
(button '.a :text "Press Me!")
(button '.b :text "And Me Too!")
(pack .a .b)