[REBOL] Re: ANN: Rugby again, whiping out SOAP
From: mario:cassani:icl at: 6-Sep-2001 17:09
Hi Maarten,
I wanted to test your excellent work with the following:
(one line of code one empty line to easily find line wraps)
8<----------------------------------------------------------
REBOL [Title: "DisplayServer" Date: 6-Sep-2001/17:38:48]
auto-clear: true
RemoteDisplay: layout [
size 200x125
at 25x5 vh1 "Remote Display" 153x28
at 20x45 FARDisplay: field "Field" 165x40 240.240.240 bold font-size
30 font [name: "courier new"]
]
do %../rugby.r
append-display: func [ f ] [
if auto-clear [clear FARDisplay/text FARDisplay/color: snow auto-clear:
false]
append FARDisplay/text f
show FARDisplay
return f
]
clear-display: does [
FARDisplay/text: copy "0" auto-clear: true show FARDisplay
return 0
]
;Start serving
serve [ append-display clear-display ]
view RemoteDisplay
8<----------------------------------------------------------
Can you (or some /view expert) explain me why the GUI
is not shown?
Xie xie nimen
Mario