Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
DEFINE POPUP...IN SCREEN
Message
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00203736
Message ID:
00203784
Views:
20
>I'm trying to activate a popup menu when a button on a toolbar is pressed.
>The menu should appear near the mouse, and the code I'm using is quoted
>below.
>
>This works fine, providing there are no forms open in the application. If a form is open, then the menu appears relative to the currently active form.
>
>I thought that DEFINE POPUP...IN SCREEN would get around that, but it
>doesn't. Anyone know how to get around this. I'm seeing this in VFP 6.
>
>DEFINE POPUP coshhpopup FROM mrow(_screen.name), mcol(_screen.name) ;
> IN SCREEN SHORTCUT
>DEFINE BAR 1 OF coshhpopup PROMPT "Coshh Assessment"
>DEFINE BAR 2 OF coshhpopup PROMPT "Substance Data"
>DEFINE BAR 3 OF coshhpopup PROMPT "LEV Assessment"
>DEFINE BAR 4 OF coshhpopup PROMPT "Occupational Exposure"
>
>ON SELECTION BAR 1 OF coshhpopup do form coshhgrid
>ON SELECTION BAR 2 OF coshhpopup do form substancgrid
>ON SELECTION BAR 3 OF coshhpopup do form levgrid
>ON SELECTION BAR 4 OF coshhpopup do form occgrid
>
>ACTIVATE POPUP coshhpopup

Matt,

Try just using the menu designer and select shortcut menu then do mymenu.mpr in the click event of the button.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform