MENU "#Com:&COM"
	"#Com:&Show Error"	""	"ComDebug.ShowError"	"TextCmds.SelectionGuard"
	"#Com:&Show Interfaces"	""	"ComDebug.ShowInterfaceRecords"	""
	SEPARATOR
	"#Com:&Interface Info"	""	"DevBrowser.ShowInterface('+!')"	"TextCmds.SelectionGuard"
	"#Com:&Type Libraries"	""	"ComInterfaceGen.Open"	""
	SEPARATOR
	"#Com:&New GUID"	""	"ComDebug.NewGuid"	""
	"#Com:&Insert OLE Object..."	""	"OleClient.InsertObject"	"StdCmds.PasteViewGuard"
	SEPARATOR
	"#Com:&Collect"	""	"MdiMenus.Collect"	""
	SEPARATOR
	"#Com:&DTC Help"	""	"StdCmds.OpenBrowser('Com/Docu/DTC-Help', '#Com:DTC Help')"	""
	"#Com:&DTC Examples"	""	"StdCmds.OpenBrowser('Com/Docu/Sys-Map', '#Com:DTC Examples')"	""
END
