[bb] Mouse Released, or Mouse Up by Rob [ 1+ years ago ]

Started by BlitzBot, June 29, 2017, 00:28:41

Previous topic - Next topic

BlitzBot

Title : Mouse Released, or Mouse Up
Author : Rob
Posted : 1+ years ago

Description : determine if user has let go of mouse button easily.

Code :
Code (blitzbasic) Select
; For inner - how to do a "mouse released" or "mouse up"
; By Rob Cummings (rob@redflame net)

Global oldbutton,newbutton

While Not KeyHit(1)
If MouseUp() Then Print "MOUSEUP!"
UpdateMouse()
Wend
End

Function updatemouse()
oldbutton=newbutton
newbutton=MouseDown(1)
End Function

Function MouseUp()
If oldbutton=1 And newbutton=0 Return 1
End Function


Comments : none...