[Gambas-user] Re: Left and Right Click
Pozzo
mauriiiii3001 at ...325...
Sat Mar 6 19:04:42 CET 2004
>
>
> it exist...
>
>public sub pic_MouseUp()
>
> if mouse.button = mouse.right then
> 'here is your code
> endif
>
>end
>
>Gambas is really powerfull and a real object language
>
Why this don't work? When I click on a image with the left buttom it go
to the else and do the same if I try to cacht the right buttom:
PUBLIC SUB Pik_MouseUp()
IF mouse.Button = mouse.Left THEN
c = 0
clicckete(LAST)
ELSE
IF Right(LAST.tag,2) <> "no" THEN
picsave.Load("save.png")
LAST.picture = picsave
LAST.tag = LAST.tag & "no"
ELSE
LAST.picture = ""
LAST.tag = Left(LAST.tag,-2)
ENDIF
ENDIF
END
:-(
Maurizio
More information about the User
mailing list