Refresh problem

BlitzPlus Forums/BlitzPlus Programming/Refresh problem

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.

Many thanks Mark and Toby !
Try the following code, when you move the mouse into the canvas waitevent(1000) seems to be ignored ???

When you specify waitevent(1000) and when others programs works into my machine, each 1000 ms, windows try to 'update/execute' the commands into the b+ program ? Is it true ?

Global Win1
Global Canvas1
Global Seconds

Function CreateWin1()

	Win1 = CreateWindow("bayre.com",73,149,200,220,Desktop(),1+8+16)
	
	Canvas1 = CreateCanvas(5,5,185,120,Win1,0)
	SetGadgetLayout Canvas1,1,0,1,0
	SetBuffer CanvasBuffer(Canvas1)
	ClsColor 34,85,136
	Cls
	
End Function


CreateWin1()

Repeat
	
	Select WaitEvent(1000)
	
	Case $803 : End

	End Select

	Seconds = Seconds + 1	
	SetStatusText Win1, "Seconds=" + seconds
			
Forever