Add Method (ContextMenus)
Adds (or updates an existing) context menu to this session document
expression.Add( _
ByVal As ContextMenu _
) As Boolean
where
expression is a variable that represents a
ContextMenus Object
Parameters
- menu
- A context menu. This is a ContextMenu Object that contains the context menu to add.
Return Value
True if the add or update was successful, false if an error occurred
| Exception | Description |
|---|
| ArgumentNullException | If the name passed is null or empty |
| InvalidOperationException | If the ContextMenus object is not available or in an error state |
This example adds menu item to default context menu and uses the Add method to update the menu.
Sub AddMenuToDefaultMenuFix()
Dim action As InputMapAction
Dim sequence As InputMapActionSequence
Dim menuItem As ContextMenuItem
Dim menu As contextMenu
'Get the default context menu.
Set menu = ThisIbmTerminal.ContextMenus.ItemByName("Default")
'Create an action sequence to hold the actions.
Set sequence = New InputMapActionSequence
'set an action to open the Office Tools Pane and add it to the sequence.
Set action = New InputMapAction
action.ActionId = InputMapActionID_OfficeToolsPaneAction
sequence.Add action
'Create the menu item for the Office Tools action and map it to the sequence.
Set menuItem = New ContextMenuItem
menuItem.Name = "Open Office Tools"
menuItem.MenuItemType = ContextMenuItemType_MenuItem
Set menuItem.mapping = sequence
'Add the Office Tools menu item to the menu.
menu.AddMenuItem menuItem
'Update the menu
ThisIbmTerminal.ContextMenus.Add menu
End Sub
