Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
ListBox RightClick()
Message
 
To
28/08/2003 06:42:21
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00823852
Message ID:
00824129
Views:
23
Gregory,
Thanks for that I hadn't entirely appreciated that the MouseUp and MouseDown caused 2 different sets of actions.

>>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
>
Caroline
Previous
Reply
Map
View

Click here to load this message in the networking platform