Here a solution which works.
If you see 3D in the message, delete it.
If you see
EA, it is the code ascii 136 with the ^ above e
We have the same problem with a, i, o, u.


REBOL[]
      key-event: func [face event] [
       if event/type =3D 'key [
       either find f1/text to-char 94 [
          if event/key =3D #"e" [str: replace f1/text to-char 94 "=EA"]
          unfocus f1
          f1/text: str
          show f1
          ]
      [focus f1]
         ]
       event
       ]
  insert-event-func :key-event

win:  layout [
       size 600x600
       backcolor linen
       h1 "Title"
       text 580 {Type a few words}
   across
   f1: area 400x30 with [
       color: 240.240.240
       font: [name: font-fixed]
       ]
   button "Close" [quit]
  ]
focus f1
view win
Luc Spirlet


-- 
To unsubscribe from the list, just send an email to rebol-request
at rebol.com with unsubscribe as the subject.

Reply via email to