Code: Select all
OpenWindow(0, 0, 0, 130, 90, "", #PB_Window_SystemMenu|#PB_Window_ScreenCentered)
CheckBoxGadget(0, 10, 20, 110, 20, "PB's ThreeState", #PB_CheckBox_ThreeState)
CheckBoxGadget(1, 10, 50, 110, 20, "Correct ThreeState")
SetWindowLongPtr_(GadgetID(1), #GWL_STYLE, GetWindowLongPtr_(GadgetID(1), #GWL_STYLE) & ~#BS_AUTOCHECKBOX | #BS_AUTO3STATE)
While WaitWindowEvent() ! #PB_Event_CloseWindow : Wend