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

6 lines
185 B
Plaintext
Raw Normal View History

1996-09-27 06:29:02 -04:00
;;; Basic text widget
(pack (text '.text))
(.text 'insert "current" "This is a text widget, displaying some text.\n")
(.text 'insert "current" "Try editing the text in the widget.\n")