Clive Beaton
asked on
How can I prevent shortcut menus
I get standard menus on fields where I don't have my own shortcut menu. How can I prevent the standard shortcut menus?
Thanks in advance
CRB
Thanks in advance
CRB
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Unfortunately, the technique described by Anders turns off all the built-in menus.
Each form also has a method that allows you to block shortcut menus, you can set "Shortcut Menu" = No, but again that blocks all shortcut menus on a form. To overcome this, you can use the MouseUp event, check for the right click, and then use the commandbars ShowPopup method to display your menu.
Another alternative would be to use the Form Open and Form Close event to disable/enable specific commandbars:
CommandBars("form datasheet row").Enabled = False
but you will need to know the name of the commandbars you want to disable, and need to make sure you enable them again on form close or they will not show up on other forms either. To do this, you will need to know the name or index of the commandbar, if you download the Access Shortcut Tool, it will provide that information.
Each form also has a method that allows you to block shortcut menus, you can set "Shortcut Menu" = No, but again that blocks all shortcut menus on a form. To overcome this, you can use the MouseUp event, check for the right click, and then use the commandbars ShowPopup method to display your menu.
Another alternative would be to use the Form Open and Form Close event to disable/enable specific commandbars:
CommandBars("form datasheet row").Enabled = False
but you will need to know the name of the commandbars you want to disable, and need to make sure you enable them again on form close or they will not show up on other forms either. To do this, you will need to know the name or index of the commandbar, if you download the Access Shortcut Tool, it will provide that information.
ASKER
Thanks Dale. Very much appreciated.
Clive
Clive
hope it helps
ASKER
Clive