[REBOL] Clearing a text field?
From: depotcity:telus at: 2-May-2001 13:36
How does one clear a field (and set focus) with a button?
For example, in the IRSee.r script below, the message input field only clears once? Any
subsequent "submits" won't clear the field?
REBOL [
Title: "LFReD IRSee"
Author: "Terry Brownell"
Email: [tbrownell--yahoo--com]
Date: 02-May-2001
File: %IRSee.r
History: [{
Ver 1.0
}]
]
read-it: http://216.232.249.87/view/irc.txt
write-it: http://216.232.249.87/cgi-bin/irc.LFReD?said
view layout [
backdrop 103.134.170 effect [ grid 10x10 93.124.160 ]
across
handle: field "Handle" 100 93.124.160
button "Enter" 75x25 93.124.160 [forever [wait 2 m/text: read read-it show m]]
button "Quit" 75x25 93.124.160 [quit]
return
m: text 400x200
s4: slider 14x200 93.124.160 [scroll-para m s4] return
message: field 93.124.160 return
button 93.124.160 75x25 "Submit" #"^M" [read rejoin [write-it rejoin [handle/text ":
" message/text]]message/text: "" show message]
]