(you can try this code on PB)
- Code: Select all
CreateImage(0, 32, 32, 24, RGB(255,0,0))
CreateImage(1, 32, 32, 24, RGB(0,255,0))
OpenWindow(0, 0, 0, 222, 200, "ButtonGadgets", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ButtonImageGadget(0, 10, 10, 40, 40, ImageID(0), #PB_Button_Toggle)
SetGadgetAttribute(0, #PB_Button_PressedImage, ImageID(1))
CompilerIf #PB_Compiler_OS <> #PB_OS_Web
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
CompilerEndIf