Button mouse over detection, how?

BlitzPlus Forums/BlitzPlus Programming/Button mouse over detection, how?

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.

WolRon
 #1
Open in online IDE
Graphics 800,600,16, 2
SetBuffer BackBuffer()

Global check_mouse$="off"
Global circle_x=50, circle_y=50, circle_width=50, circle_height=50 

; Create the timer to track speed 
frameTimer=CreateTimer(60)
While Not KeyHit(1)
WaitTimer(frameTimer)
Cls

If(check_mouse$="on") Then
	Color 0,255,0
	Oval circle_x,circle_y,circle_width,circle_height,1
EndIf

If(check_mouse$="off") Then
	Color 255,255,0
	Oval circle_x,circle_y,circle_width,circle_height,1
EndIf

pix = ReadPixel(MouseX(), MouseY())
pix = (pix Shl 8) Shr 8
If pix > 0
	check_mouse$ = "on"
Else
	check_mouse$ = "off"
EndIf

Flip
Wend:End