#Window_Main=0
#Gadget_Main_Ok=1
#Gadget_Main_Canvas=2
#Image_Main_Canvas=2
If OpenWindow(#Window_Main,175,0,184,172,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"Demo")
| PVGadgets_Canvas(#Gadget_Main_Canvas,#Image_Main_Canvas,15,25,150,100,12632256)
|
| ButtonGadget(#Gadget_Main_Ok,105,140,60,20,"Press Me")
|
| UseImage(#Image_Main_Canvas)
|
| StartDrawing(ImageOutput())
|
| Box(10,10,130,80,$00FFFF)
|
| Box(20,20,110,60,$00FFFF)
|
| PVGadgets_Refresh(#Gadget_Main_Canvas) ;<-- After drawing to the Canvas, Refresh it so we can see results
|
| EventID=WaitWindowEvent()
|
| If EventID=#PB_Event_Gadget
|
| If EventGadgetID()=#Gadget_Main_Ok
|
| UseImage(#Image_Main_Canvas)
|
| StartDrawing(ImageOutput())
|
| PVGadgets_Refresh(#Gadget_Main_Canvas) ;<-- After drawing to the Canvas, Refresh it so we can see results
|
| Until EventID=#PB_Event_CloseWindow
| EndIf
|