Reputation: 2754
I just want to popup a wait message window in rebol view, but there's no option to do so with View command as
View win: layout [text "wait"]
do-some-lengthy-task
Unview win
will block the script until the user close the message himself which is not wanted here of course.
So how to make non-blocking view ?
Upvotes: 0
Views: 139
Reputation: 2307
What about this?
View/new win: layout [button "Do-It" [print "ok"]]
repeat i 10 [print i wait 0:0:1] ;lengthy-task
Unview win
Upvotes: 1