[REBOL] Re: fields and keyboard
From: sunandadh:aol at: 30-Jan-2002 4:10
> > 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.
