CreateMenu

CreateMenu.cs

using System;
using ESRI.ArcGIS.SystemUI;

namespace SchematicApplication
{
	/// <summary>
	/// Summary description for NavigationMenu.
	/// </summary>
	public class CreateMenuSchematicEditor : IMenuDef
	{
		public CreateMenuSchematicEditor()
		{
		}
	
		public void GetItemInfo(int pos, IItemDef itemDef)
		{
			//Commands for the menu - the object browser lists these commands
			switch (pos)
			{
				case 0:
					itemDef.ID = "esriControls.ControlsSchematicStartEditCommand";
					break;
				case 1:
					itemDef.ID = "esriControls.ControlsSchematicStopEditCommand";
					break;
				case 2:
					itemDef.ID = "esriControls.ControlsSchematicSaveEditsCommand";
					itemDef.Group = true;
					break;
				case 3:
					itemDef.ID = "esriControls.ControlsSchematicRemoveLinkPointsCommand";
					itemDef.Group = true;
					break;
				case 4:
					itemDef.ID = "esriControls.ControlsSchematicSquareLinksCommand";
					break;
			}
		}
	
		public string Caption
		{
			get
			{
				return "SchematicEditor";
			}
		}
	
		public int ItemCount
		{
			get
			{
				return 5;   // there are 5 items on this menu 
			}
		}
	
		public string Name
		{
			get
			{
				return "SchematicEditor";
			}
		}
	}
}

CreateMenu.vb

Option Strict Off
Option Explicit On
Friend Class CreateMenuSchematicEditor
	Implements ESRI.ArcGIS.SystemUI.IMenuDef

	Private ReadOnly Property IMenuDef_Caption() As String Implements ESRI.ArcGIS.SystemUI.IMenuDef.Caption
		Get
			Return "SchematicEditor"
		End Get
	End Property

	Private ReadOnly Property IMenuDef_ItemCount() As Integer Implements ESRI.ArcGIS.SystemUI.IMenuDef.ItemCount
		Get
			Return 5 'There are 5 items on this menu
		End Get
	End Property

	Private ReadOnly Property IMenuDef_Name() As String Implements ESRI.ArcGIS.SystemUI.IMenuDef.Name
		Get
			Return "SchematicEditor"
		End Get
	End Property

	Private Sub IMenuDef_GetItemInfo(ByVal pos As Integer, ByVal itemDef As ESRI.ArcGIS.SystemUI.IItemDef) Implements ESRI.ArcGIS.SystemUI.IMenuDef.GetItemInfo
		Select Case pos	'Commands for the menu - the object browser lists these commands
			Case 0
				itemDef.ID = "esriControls.ControlsSchematicStartEditCommand"
			Case 1
				itemDef.ID = "esriControls.ControlsSchematicStopEditCommand"
			Case 2
				itemDef.ID = "esriControls.ControlsSchematicSaveEditsCommand"
				itemDef.Group = True
			Case 3
				itemDef.ID = "esriControls.ControlsSchematicRemoveLinkPointsCommand"
				itemDef.Group = True
			Case 4
				itemDef.ID = "esriControls.ControlsSchematicSquareLinksCommand"
		End Select
	End Sub
End Class