Kbase P118204: How to change the columns labels of a browse widget at run time?
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  8/23/2006 |
|
Status: Unverified
GOAL:
How to change the columns labels of a browse widget at run time?
FIX:
Use code along the following lines:
DO:
DEFINE VARIABLE cLabelList AS CHARACTER NO-UNDO.
DEFINE VARIABLE iColumnIndex AS INTEGER NO-UNDO.
DEFINE VARIABLE hBrowse AS HANDLE NO-UNDO.
DEFINE VARIABLE hColumn AS HANDLE NO-UNDO.
ASSIGN
cLabelList = "First,Second,Third"
hBrowse = BROWSE-1:HANDLE IN FRAME {&FRAME-NAME}.
DO iColumnIndex = 1 TO hBrowse:NUM-COLUMNS:
ASSIGN
hColumn = hBrowse:GET-BROWSE-COLUMN(iColumnIndex)
hColumn:LABEL = ENTRY(iColumnIndex, cLabelList).
END.
END.