progress-4gl - Progress 4gl、Open Edgeで接続されているデータベースからドロップダウンアイテムの値を取得するにはどうすればよいですか？

Question

1つのドロップダウンボックスを備えた1つのシンプルなウィンドウを作成し、プロジェクトはすでにデフォルトのスポーツデータベースに接続されています。ここで、データベース内のすべてのテーブルをそのドロップダウンボックスに表示したいと思います。

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メタスキーマテーブルの他のプロパティも知りたい場合は、

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

そして、そのメタスキーマテーブルの概要がわかります。