See example:
Code: Select all
If OpenWindow(0, 0, 0, 270, 160, "CheckBoxGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
StringGadget (0, 10, 10, 150, 20, "String Gadget")
CheckBoxGadget(1, 10, 40, 250, 20, "CheckBox checked"): SetGadgetState(1, #PB_Checkbox_Checked)
CheckBoxGadget(2, 10, 70, 250, 20, "CheckBox three state", #PB_CheckBox_ThreeState): SetGadgetState(2, #PB_Checkbox_Inbetween)
CheckBoxGadget(3, 10, 100, 250, 20, "CheckBox right", #PB_CheckBox_Right)
CheckBoxGadget(4, 10, 130, 250, 20, "CheckBox center", #PB_CheckBox_Center)
Repeat
ex_event = WaitWindowEvent()
ex_event_type = EventType()
If ex_event_type = #PB_EventType_Change
Debug "Changed!"
EndIf
Until ex_event = #PB_Event_CloseWindow
EndIf