Checkbox issue in List VLFOne
Posted: Thu Oct 31, 2024 9:01 am
My #PRIM_List checkbox looks like this but i cant change it if its unchecked or checked. Any one have this issue?
Code: Select all
Define_Com Class(#PRIM_LIST.CheckBox) Name(#ListColumn5) Displayposition(6) Parent(#List)
Evtroutine Handling(#ListColumn5.Click)
If Cond(#ListColumn5.CurrentItem.ReadOnly *EQ False)
#SYS_WEB.Alert Caption("checkbox read only false")
If Cond(#ListColumn5.CurrentItem.ButtonState *EQ Checked)
#SYS_WEB.Alert Caption("checkbox checked")
#ListColumn5.CurrentItem.ButtonState := Unchecked
Else
#SYS_WEB.Alert Caption("checkbox not checked")
#ListColumn5.CurrentItem.ButtonState := Checked
Endif
Endif
Endroutine