我需要在等待窗口中显示一条超时消息。我已设法使用以下代码执行此操作:
wait window 'Message Here...' timeout 1
如果单击此窗口,则消息将消失。相反,我希望有类似的东西,但如果用户点击该消息,则不会发生任何事情并且消息将保持可见(即消息将仅在超时到期时关闭)。
有人可以帮帮我吗?我不介意有类似的东西(例如消息框)执行相同的功能。
答案 0 :(得分:2)
尝试使用Visual FoxPro MessageBox()函数。此函数具有可选的超时参数。设置超时参数会使消息框在屏幕上停留大约一段时间,或直到用户单击消息框上的按钮。
答案 1 :(得分:1)
听起来您想显示一条消息并让用户等待XX秒才能继续。如果是这种情况,那么你可以这样做。
LOCAL ltMessageTimeOut
m.ltMessageTimeOut = DATETIME() + 5
DO WHILE DATETIME() < m.ltMessageTimeOut
WAIT WINDOW "Display Some Message" NOCLEAR TIMEOUT 1
ENDDO
WAIT CLEAR