Kbase P63366: How to populate a combo-box widget with the current 4GL session's printer names?
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  4/10/2010 |
|
Status: Verified
GOAL:
How to populate a combo-box widget with the current 4GL session's printer names?
GOAL:
How to clear a combo box and populate it with new values.
GOAL:
How to blank a combo box.
FACT(s) (Environment):
Windows
Progress 9.x
OpenEdge 10.x
FIX:
The following code demonstrates how to populate a combo box with the current Progress 4GL session's printer names:
DEFINE VARIABLE i AS INTEGER NO-UNDO.
DEFINE VARIABLE c AS CHARACTER NO-UNDO.
ASSIGN
i = NUM-ENTRIES(SESSION:GET-PRINTERS())
SessionPrinterNames:LIST-ITEMS = "". /* clear the combo */
DO i = 1 TO NUM-ENTRIES(SESSION:GET-PRINTERS()):
c = ENTRY(i, SESSION:GET-PRINTERS()).
SessionPrinterNames:ADD-LAST(c).
END.