ramanujan
路人甲
路人甲
  • 注册日期2006-06-27
  • 发帖数31
  • QQ
  • 铜币249枚
  • 威望0点
  • 贡献值0点
  • 银元0个
阅读:2377回复:0

[讨论]ArcEngine例子出错?!

楼主#
更多 发布于:2008-03-15 13:25
我运行\ArcGIS\DeveloperKit\SamplesNET\Engine\ControlsCommandsHookActions\VBNet例子,在下面的代码段中提示出错“未处理的COMException,The supplied command is invalid.……”。<br><br>    Private Sub HookActions_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load<br><br>        'Add generic commands <br>        AxToolbarControl1.AddItem("esriControls.ControlsAddDataCommand", 0, -1, False, 0, esriCommandStyles.esriCommandStyleIconOnly)<br>        'Add map navigation commands<br>        AxToolbarControl1.AddItem("esriControls.ControlsMapZoomInTool", 0, -1, True, 0, esriCommandStyles.esriCommandStyleIconOnly)<br>        AxToolbarControl1.AddItem("esriControls.ControlsMapZoomOutTool", 0, -1, False, 0, esriCommandStyles.esriCommandStyleIconOnly)<br>        AxToolbarControl1.AddItem("esriControls.ControlsMapPanTool", 0, -1, False, 0, esriCommandStyles.esriCommandStyleIconOnly)<br>        AxToolbarControl1.AddItem("esriControls.ControlsMapFullExtentCommand", 0, -1, False, 0, esriCommandStyles.esriCommandStyleIconOnly)<br>        AxToolbarControl1.AddItem("esriControls.ControlsSelectFeaturesTool", 0, -1, False, 0, esriCommandStyles.esriCommandStyleIconOnly)<br>        AxToolbarControl1.AddItem("esriControls.ControlsSelectTool", 0, -1, False, 0, esriCommandStyles.esriCommandStyleIconOnly)<br>        'Add globe navigation commands<br>        AxToolbarControl1.AddItem("esriControls.ControlsGlobeZoomInOutTool", 0, -1, True, 0, esriCommandStyles.esriCommandStyleIconOnly)<br>        AxToolbarControl1.AddItem("esriControls.ControlsGlobePanTool", 0, -1, False, 0, esriCommandStyles.esriCommandStyleIconOnly)<br>        AxToolbarControl1.AddItem("esriControls.ControlsGlobeFullExtentCommand", 0, -1, False, 0, esriCommandStyles.esriCommandStyleIconOnly)<br>        AxToolbarControl1.AddItem("esriControls.ControlsGlobeSelectFeaturesTool", 0, -1, False, 0, esriCommandStyles.esriCommandStyleIconOnly)<br><br>        'Create menu <br>        m_ToolbarMenu = New ToolbarMenuClass()<br>        'Set hook and command pool<br>        m_ToolbarMenu.SetHook(AxToolbarControl1)<br>        m_ToolbarMenu.CommandPool = AxToolbarControl1.CommandPool<br>        'Add custom commands<br>        m_ToolbarMenu.AddItem(New hookActionsPan, 0, -1, False, esriCommandStyles.esriCommandStyleTextOnly)<br>        m_ToolbarMenu.AddItem(New hookActionsZoom, 0, -1, False, esriCommandStyles.esriCommandStyleTextOnly)<br>        m_ToolbarMenu.AddItem(New hookActionsFlash, 0, -1, True, esriCommandStyles.esriCommandStyleTextOnly)<br>        m_ToolbarMenu.AddItem(New hookActionsGraphic, 0, -1, True, esriCommandStyles.esriCommandStyleTextOnly)<br>        m_ToolbarMenu.AddItem(New hookActionsLabel, 0, -1, False, esriCommandStyles.esriCommandStyleTextOnly)<br>        m_ToolbarMenu.AddItem(New hookActionsCallout, 0, -1, False, esriCommandStyles.esriCommandStyleTextOnly)<br><br>        'Set buddy control<br>        AxToolbarControl1.SetBuddyControl(AxMapControl1)<br><br>    End Sub<br><br>在        'Add globe navigation commands<br>        AxToolbarControl1.AddItem("esriControls.ControlsGlobeZoomInOutTool", 0, -1, True, 0, esriCommandStyles.esriCommandStyleIconOnly)<br>处出错。<br>但是在别的机器上运行却Ok!不知道什么原因?请高手指点。<br>
喜欢0 评分0
游客

返回顶部