如何逃避更新消息？

Question

我在 Progress-4GL 中有以下消息：

DEF VAR L-temp AS CHARACTER.
MESSAGE "Give me information" UPDATE L-temp.

这显示了一条更新消息，这很好，但是当我试图摆脱该消息时（例如，我意识到我点击了错误的按钮，启动了该消息），我无法隐藏该消息：

我该如何解决这个问题（我只想从屏幕上删除消息）？我无法添加 VIEW-AS ALERT-BOX，因为警告框只能更新逻辑变量和字段。或者对于这种情况有一个简单的 Show-Dialogbox() 吗？

编辑
我尝试用 SET 替换 UPDATE 并将整个内容视为一个警告框，但这似乎是不允许的（似乎只允许逻辑变量和字段）。

编辑 2
尝试使用 PROMPT-FOR 不是一个好主意，因为这似乎隐藏了 window 的其余部分，而我希望消息显示为我 window/frame.

编辑 3
另外 System-Dialog 似乎不是一个好主意，因为我只想得到一个简单的字符串。

Answer 1

遗憾的是 'close window' 按钮在默认情况下不会关闭 window。即使将框架定义为模态 dialog-box，window-close 事件也需要重新路由到 close.

define frame frupdate
   cinfo as char label "Give me information" with side-labels
   with
      title "Message Update"
      view-as dialog-box      
   .

on "window-close" of frame frupdate 
   apply "close" to frame frupdate.
   
enable all with frame frupdate.
wait-for close of frame frupdate.

如何逃避更新消息？

How to escape from an update message?

progress-4gl

openedge