如何冻结显示以便用户可以读取数据?

How to freeze display so that data can be read by the user?

有人知道我如何在不确定的时间内修复显示此代码正在进行的结果的框架吗?任何时候我 运行 它都会与结果一起出现并以相同的方式消失。

 FOR EACH tablename no-lock:
    DISPLAY tablename.attribute
            tablename.attribute2.
 END.

您需要添加一个 PAUSE 语句。

您实际展示的代码开箱即用。如所写,tt 将显示两个字段并移动到下一行。当框架被线条填充时,它会自动暂停。

如果没有这样做,那是因为还有其他代码未显示。 (可能在运行此过程的过程中。)

其他代码可能只是:

pause 0 before-hide.

或者它可能是更复杂的东西,例如循环外的框架定义。像这样(使用著名的 "sports" 数据库):

form customer.custNum customer.name skip with frame a.

for each customer no-lock:

  display custNum name with frame a.

end.

添加 PAUSE 语句是一种快速解决方法。其他方法可能更合适,例如:

form customer.custNum customer.name skip with frame a 5 down.

for each customer no-lock:

  display custNum name with frame a.
  down with frame a.
end.

但这是否是您需要的取决于您的代码中实际发生的事情以及您想要实现的目标。