Hello,
I am wondering if anyone has run into the below scenario, and /or any
suggestions
Converted a form with a Variable RadioGroup control that is loaded dynamically;
From Rbase Win 7.6 to Win 9.1 (32) v9.1.4.10916
In 7.6 when clicking on the radio buttons, the state of the radio button
selected is visible (i.e. the circle has a dot in it!)
In 9.1 the state of the selected radio button is not visible. (no dot, not a
different color. Appears nothing is selected)
I put a variable label on form, and the variable label changes based on
selected radio button.
I created a simple form from scratch in 7.6 with just the RadioGroup, and again
works okay in 7.6 but not in 9.1.
Below is the code (simple form)
--On Before Start
SET VAR vDefaultValue INTEGER = 1
SET VAR vCaption TEXT = NULL
SET VAR vValue TEXT = NULL
SET VAR vTxtValue TEXT = NULL
SET VAR vIntValue INTEGER = NULL
SET VAR vCommand TEXT = NULL
SET VAR vCount INTEGER = 0
SET VAR vDefGroupIndex INTEGER = NULL
SET VAR vDesc TEXT = NULL
SET VAR vProp1 TEXT = ('PROPERTY rdoGroups' & +
'''CreateRadioButton''')
SET VAR vGroup INTEGER
--On after Start
SET VAR vProp1 TEXT = ('PROPERTY rdoGroups' & +
'''CreateRadioButton''')
SET VAR vRadioCount INTEGER = 0
SET VAR vDefGroupIndex = NULL
SET VAR vCount = 0
SET VAR vIntValue = 1
SET VAR vDesc = 'Button1'
IF vDefaultValue = vIntValue THEN
SET VAR vDefGroupIndex = vCount
ENDIF
SET VAR vCount = vCount + 1
SET VAR vTxtValue = (CTXT(.vIntValue))
SET VAR vCaption = ('''' + .vDesc)
SET VAR vValue = ('|' + .vTxtValue & '''')
SET VAR vCommand = (.vProp1 & .vCaption + .vValue)
&vCommand
SET VAR vIntValue = 2
SET VAR vDesc = 'Button2'
IF vDefaultValue = vIntValue THEN
SET VAR vDefGroupIndex = vCount
ENDIF
SET VAR vCount = vCount + 1
SET VAR vTxtValue = (CTXT(.vIntValue))
SET VAR vCaption = ('''' + .vDesc)
SET VAR vValue = ('|' + .vTxtValue & '''')
SET VAR vCommand = (.vProp1 & .vCaption + .vValue)
&vCommand
--Set up radio control height / spacing
SET VAR vRadioCount INTEGER = (.vCount - 1)
SET VAR vHeight TEXT = NULL
SET VAR vCount = ( (.vCount * 20) + 25)
SET VAR vHeight = ('''' + (CTXT(vCount)) + '''')
PROPERTY rdoGroups HEIGHT &vHeight
--Check Group based on login entity
IF vDefGroupIndex IS NOT NULL THEN
SET VAR vCommand = +
'Property rdoGroups RADIOBUTTONS[' + +
(CTXT(.vDefGroupIndex)) + +
']->CHECKED TRUE'
&vCommand
ENDIF
RECALC VARIABLES
Regards,
Lena Dammstrom
QMI Security Solutions
