Code: Select all
OpenWindow(#PB_Any, #PB_Ignore, #PB_Ignore, 800, 600, "Test", #PB_Window_SystemMenu )
canvas_ID=CanvasGadget(#PB_Any, 50, 50, 700, 500, #PB_Canvas_Container)
ButtonGadget(1, 600, 100, 200, 100, "Test")
StartDrawing(CanvasOutput(canvas_ID))
Box(0,0, 700, 500, $AAAAAA)
StopDrawing()
Repeat
Until WaitWindowEvent()=#PB_Event_CloseWindow
On Windows and Mac all is OK