Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] [view][focus] Weird black line..

From: Izkata::Comcast::net at: 7-Apr-2005 21:19

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