Delay 1?

Steve: my framework uses this code (I've turned off the standard PolledInput):

While PeekEvent()
			PollEvent()
		  	Select EventID()
			Case EVENT_MOUSEDOWN
                        'do something
		        End Select
Wend 	

Plus I only use Delay(1) when the user clicks out of the game and the game is in a suspended state. This gives some processing power back to Windows so everything isn't really slow.