When I run this code, there's a weird black vertical line at the beginning
of the box -
is there a way to remove it or do I have to live with it? (I've seen it
before... ugh.)
The thing is, if I don't use 'focus, the line is gone. But then the feel
doesn't work.
REBOL []
view/new Disp: center-face layout [
Fiel: box 200x24 green with [
edge: [color: red effect: 'ibevel size: 3x3]
font: [name: {Papyrus} size: 12 color: black shadow: none align:
'left]
] feel [
engage: func [a b c][
if b = 'key [
either char? c/key [
append Fiel/text trim/head/tail to-string c/key
show Fiel
][
]
]
]
]
]
focus Fiel
do-events
-Izzy Boy
--
To unsubscribe from the list, just send an email to
lists at rebol.com with unsubscribe as the subject.