ORIGIN '../guienv'; LIB_DEF 'guienvutilsgroup' '../../lib'; BODY 'private/groupbody'; -- windowLib: attributes -- group: canvas (# <<SLOT groupLib: attributes>>; label: (# theLabel: ^text; enter (# enter theLabel[] ... #) exit (# ... exit theLabel[] #) #); open::<(# create::< (# ... #) ... #); eventHandler::< (# onRefresh::< (# ... #); #); private: @...; #)
21.11 Group Interface | © 1994-2002 Mjølner Informatics |
[Modified: Friday January 21st 2000 at 8:41]
|