Graphics window within MaxGUI

BlitzMax Forums/BlitzMax Programming/Graphics window within MaxGUI

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.


SuperStrict

Local MainWindow:TGadget
Local MainCanvas:TGadget

MainWindow = CreateWindow("MyWindow",100,100,800,600,0,WINDOW_TITLEBAR|WINDOW_MENU|WINDOW_STATUS)
MainCanvas = CreateCanvas(0,0,800,600,MainWindow)


While WaitEvent()

		Select EventID()				
			Case EVENT_WINDOWCLOSE
				FreeGadget MainCanvas
				End
		End Select

Wend