Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
ListBox RightClick()
Message
De
28/08/2003 06:42:21
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00823852
Message ID:
00824116
Vues:
22
This message has been marked as a message which has helped to the initial question of the thread.
>Just in case anyone was interested the best combination seems to be
>* MouseDown()
>Lparameters nButton, nShift, nXCoord, nYCoord
>
>*-- This just stops the selection/deselection.
>*-- However the RightClick still runs.
>If nButton = 2
>	NoDefault
>EndIf
>
>* RightClick()
>ThisForm.cmdeMail.Click()  &&Perform desired RightClick action.
>
Caroline,

You're right, there's still the RightClick() firing

As far as I see there are 2 sides

(1) MouseDown NODEFAULT prevents the selection/deselection


(2) MouseUp NODEFAULT prevents the RightClick()

So, you may have to put the code in the two events depending on your needs
&& MouseDown
LPARAMETERS nButton, nShift, nXCoord, nYCoord

do case
case inlist(nButton,  2)	&& Right)
	NODEFAULT	&& prevents the selection/Deselection

endcase
&& MouseUp
LPARAMETERS nButton, nShift, nXCoord, nYCoord

do case
case inlist(nButton,  2)	&& Right)
	NODEFAULT	&& prevents the RightClick()

endcase
Gregory
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform