Global Click%
Function MouseClick(n%)
If MouseDown(n) Then
Click=True
EndIf
If Click=True Then
If Not MouseDown(n) Then
If Not MouseHit(n) Then
Click=False
Return True
EndIf
EndIf
Else
Return False
EndIf
End Function
Функция срабатывает от отпускания мыши, как в windows-кнопках.
Очень удобно, если MouseHit() не всегда срабатывает, а применение MouseDown() неприменимо.