九乡新闻网魔法门10橙色装备:MapX地图操基本作功能的实现:MapX开发基础教程（2）
来源：百度文库 编辑：九乡新闻网 时间：2024/05/03 03:15:18
MapX地图操基本作功能的实现:MapX开发基础教程（2）
时间:2010-08-30 00:06来源:互联网 作者:格格 点击:181次 MapX开发基础教程（2）:MapX地图操基本作功能的实现。MapX开发基础教程（2）:MapX地图操基本作功能的实现菜单栏的创建
- 工具栏的创建
- 地图操作功能的实现
1、VB+MapX创建菜单栏
在Form1上，点击鼠标右键，在捷菜单上选择“菜单编辑器”。
例子：通过菜单编辑器，建立一个名为“地图操作”的菜单，并建立其子菜单“放大、缩小、漫游、中心、选择、标注”等子菜单。
2、VB+MapX创建工具栏
方法:
（1）在“控件工具箱”上，单击鼠标右键，在弹出的快捷菜单上点击“部件”子菜单，弹出“部件”对话框。“控件”选项卡下，找到“ Microsoft Windows Common Control 6”，在其前的方框内打勾，点击“确定”按钮，会看到在“控件工具箱”中新增了9个控件。其中包括ToolBar，ImageList，StatusBar等控件。
（2）将ToolBar和ImageList控件添加到窗体上。设置ImageList的相关属性。
（3）设置ToolBar的属性。
3、VB+MapX地图基本操作
MapX组件引入VB开发环境
在控件工具箱上，点击右键，在“Components…”
地图对象(Map)的CurrentTool 属性
通过Map1的CurrentTool属性，可以为Map1定义工具。
这个工具可以是MapX预先定义好的一些工具，也可以是用户自己定义的工具。
它的值可以设定为一个整型数，也可以是相应的常量。
MapX提供的工具值在1000——1011之间
用户自定义的工具值在1——999之间
MapX提供的工具P244
地图操作功能的实现
Map1.CurrentTool = miZoomInTool
Map1.CurrentTool = miZoomOutTool
Map1.CurrentTool = miPanTool
编写代码实现操作功能——菜单和工具栏
Private Sub Map_ZoomIn_Menu_Click()
Map1.CurrentTool=miZoomInTool
End Sub
Private Sub Toolbar1_ButtonClick(Byval Button as MSComctLib.Button)
Select case Button.Index
case 1:
case 2: Map_ZoomIn_Menu_Click
End select