AnnSetAutoMenuItemEnable example for Visual Basic

Note: This topic is for Document/Medical only.

Private Sub Command17_Click()
   ' disable the Delete menu item from all the selected objects
   LEAD1.AnnSetAutoMenuItemEnable LEAD1.AnnContainer, 0, ANNAUTOTEXT_MENU_DELETE, ANNMENU_DISABLED, ANNFLAG_RECURSE + ANNFLAG_SELECTED, ""
   ' disable the Delete menu item from all the ellipse objects
   LEAD1.AnnSetAutoMenuItemEnable LEAD1.AnnAutomation, ANNOBJECT_ELLIPSE, ANNAUTOTEXT_MENU_DELETE, ANNMENU_DISABLED, 0, ""
End Sub