or do this :)
appwindow=CreateWindow("blah",0,0,640,480,0,3) appcanvas=CreateCanvas(0,0,640,480,appwindow) SetGadgetLayout appcanvas,1,1,1,1 SetBuffer CanvasBuffer(appcanvas) Text 80,80,"Booh!" Oval 300,200,70,60 FlipCanvas appcanvas Repeat WaitEvent() If EventID()=$803 quit=True Until quit End