Rebol Tutorial
Rebol Tutorial

Reputation: 2754

How to just pop up a wait message window in rebol view?

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

Answers (2)

Graham Chiu
Graham Chiu

Reputation: 4886

fl: flash "Hang about .... "

do stuff...

unview/only fl

Upvotes: 1

endo64
endo64

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

Related Questions