Windows paint message

BlitzMax Forums/BlitzMax Programming/Windows paint message

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.

tonyg
 #1
The EVENT system is available in core Bmax rather than MaxGUI.
Graphics 640,480,0
Local myTimer:TTimer = CreateTimer(60)
Repeat
	Cls
	WaitEvent()
	Select EventID()
		Case EVENT_TIMERTICK
		DrawText "Timer has ticked",0,0
	EndSelect
	Flip
Until KeyHit(KEY_ESCAPE) Or AppTerminate()