我只是想在rebol视图中弹出一个等待消息窗口,但是没有选项可以使用View命令执行此操作
View win: layout [text "wait"]
do-some-lengthy-task
Unview win
将阻止脚本,直到用户自己关闭消息,当然这里不需要。
那么如何制作非阻塞视图?
答案 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