Kbase 15687: How to obtain the label of current value of a RADIO-SET
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
10/05/1998 |
|
How to obtain the label of current value of a RADIO-SET
This Notebook entry shows one way to obtain the label which
corresponds to the current value of a RADIO-SET widget. When you
run the sample, the MESSAGE statement will display three values,
the last one being the label which matches the current value of
the radio set.
DEFINE VAR x AS INTEGER VIEW-AS RADIO-SET
RADIO-BUTTONS "label0",0,"label1",1,"label2",2.
DEF VAR y AS INTEGER.
DEF FRAME a x.
ON VALUE-CHANGED OF x DO:
y = LOOKUP(x:SCREEN-VALUE,x:RADIO-BUTTONS).
MESSAGE x:SCREEN-VALUE STRING(y) ENTRY(y - 1,x:RADIO-BUTTONS).
END.
ENABLE ALL WITH FRAME a.
WAIT-FOR CLOSE OF THIS-PROCEDURE.
Progress Software Technical Support Note # 15687