> > I wish to create a routine to convert to uppercase everything typed
> > inside the field.
This is not automatic (you have to exit the field before it folds), but it
may be enough.
rebol []
fold-field: func [face /upper /lower] [
if upper [face/text: uppercase face/text]
if lower [face/text: lowercase face/text]
show face
]
unview/all
view layout [field1: field [fold-field/upper face]
field2: field [fold-field/lower face]
]
Sunanda.
--
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the
subject, without the quotes.
