Code: Select all
If OpenWindow(0, 0, 0, 140, 130, "OptionGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
OptionGadget(0, 30, 20, 60, 20, "Option 1")
OptionGadget(1, 30, 45, 60, 20, "Option 2")
OptionGadget(2, 30, 70, 60, 20, "Option 3")
;SetGadgetState(1, 1) ; set second option as active one
ButtonGadget(3, 30, 100, 80, 24, "Button")
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf