如何在rebol视图中弹出等待消息窗口?

时间:2010-05-08 21:44:31

标签: rebol

我只是想在rebol视图中弹出一个等待消息窗口,但是没有选项可以使用View命令执行此操作

View win: layout [text "wait"]

do-some-lengthy-task

Unview win

将阻止脚本,直到用户自己关闭消息,当然这里不需要。

那么如何制作非阻塞视图?

2 个答案:

答案 0 :(得分:1)

这个怎么样?

View/new win: layout [button "Do-It" [print "ok"]]
repeat i 10 [print i wait 0:0:1] ;lengthy-task
Unview win

答案 1 :(得分:1)

fl:flash“Hang about ....”

做事......

unview / only fl