Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Activate popup on right click in a grid
Message
From
04/08/1998 10:34:15
Francois Liboiron
National Bank of Canada
Montréal, Quebec, Canada
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00123022
Message ID:
00123781
Views:
28
Your are all right with your suggestions but, if found that with vfp 3.0b
this command is not available :
DEFINE POPUP mypopup SHORTCUT RELATIVE FROM MROW(),MCOL()
SHORTCUT is not available with vfp 3.0b. I choose to make a form with
the options i want instead of using the right click with a popup menu.
I am waiting my boss to upgrade to the version 6.0. We got windows 3.1
on 22 machines and they stop the progress still 2 years!!!

>>Thank you, but the line
>>ON SELECTION POPUP myPopup DO myprg WITH BAR()
>>
>>BAR( ) returns 0 if there is no active menu or if the user presses Esc to exit the menu. I dont want to change de sysmenu, is it possible
>>to have just the popup? and take a action with the value of BAR().
>>
>
>Instead of calling a procedure, do conditional statements below activate popup directly.
>
>
>ON SELECTION POPUP mypopup
>ACTIVATE POPUP mypopup
>
>DO CASE
>CASE BAR() = 0
>     blah...
>CASE BAR() = 1
>     blan...
>ENDCASE
>
>RELEASE POPUP mypopup
>
>
>
>
>
>>>Hi,
>>> Use Shortcut instead of popup and call it from RIGHTCLICK() event of the grid's textbox. For Example
>>>
>>> DEFINE POPUP mypopup SHORTCUT RELATIVE FROM MROW(),MCOL()
>>>
>>> DEFINE BAR 1 OF myPopup PROMPT "One"
>>> DEFINE BAR 2 OF myPopup PROMPT "Two"
>>>
>>> ON SELECTION POPUP myPopup DO myprg WITH BAR()
>>> ACTIVATE POPUP mypopup
>>> RELEASE POPUP myPopup
>>>
>>>Hope it helps
>>>
>>>Bye
>>>Jayesh
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform