Disable options popup

[Richard S.]

Is there a means to disable the options popup form that appears when
right-clicking a control in form view? I'm using the right-click mouse_up
event (after moving the mouse) to manipulate the control. After completing
the code that hides the control the options popup appears.

Thanks for any help.

 

[Dale Fye]

You can disable the shortcut menu for a form by setting that property to No.
However, this will disable it for all controls on the form, so here is what I
do:

1. Disable the shortcut menu for the form.
2. In those controls that you want to display a shortcut menu, use the
MouseUp or MouseDown event, check for Button = acRightButton, and use the
commandbars("mycommandbar").ShowPopup command to display the popup.
Something like:

Private sub txt_Something_MouseUp(Button .......)

if Button = acRightButton the commandbars("MyTextMenu").Showpopup

End sub


2. Create a new shortcut menu and use that as the default for the form.


--
HTH
Dale

email address is invalid
Please reply to newsgroup only.