如何从 Progress 4gl、Open Edge 中连接的数据库中获取下拉项值？

Question

我创建了一个带有一个下拉框的简单窗口，并且该项目已经与默认的体育数据库连接。现在我想在该下拉框中显示数据库中的所有表。

Answer 1

为了能够动态填充组合框的内容，您需要动态创建它：

DEFINE VARIABLE ComboBoxWidgetHandle AS HANDLE NO-UNDO.
CREATE COMBO-BOX ComboBoxWidgetHandle.

之后，您可以通过使用名为“_file”的数据库元架构表，使用小部件句柄将元素添加到组合框：

FOR EACH _file NO-LOCK WHERE _Hidden = NO:
    ComboBoxWidgetHandle:ADD-FIRST (_file._FILE-NAME).
END.

如果您还想了解 _file 元架构表的其他属性，只需尝试 a

FOR EACH _file NO-LOCK WHERE _Hidden = NO:
    DISPLAY _file.
END.

，您将获得对该元架构表的概述。