1 / 14

MapX 控件的基本属性

MapX 控件的基本属性. 荆平 天津师范大学城环学院. MapX 控件的基本属性. 在 Map 控件上右击. 相关属性设置. MapX 控件的基本属性. 在运行时也可查看“属性页”。为此,可向 Map.MouseUp 事件添加以下代码。 If Button = 2 Then Map1.PropertyPage. MapX 控件的基本属性. Private Sub Map1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

cicero
Download Presentation

MapX 控件的基本属性

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript


  1. MapX控件的基本属性 荆平 天津师范大学城环学院

  2. MapX控件的基本属性 在Map控件上右击 相关属性设置

  3. MapX控件的基本属性 在运行时也可查看“属性页”。为此,可向 Map.MouseUp 事件添加以下代码。 If Button = 2 Then Map1.PropertyPage

  4. MapX控件的基本属性 Private Sub Map1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then Map1.PropertyPage End Sub

  5. MapX控件的基本属性 产品: Layers.LayersDlg 方法取代 PropertyPage方法,因为 LayersDlg 对话框更加友好。

  6. MapX控件的基本属性 Private Sub Command1_Click() Map1.Layers.LayersDlg End Sub

  7. MapX控件的基本属性 显示所有图层名称 Dim x As Integer For x = 1 To Map1.Layers.Count Picture1.Print Map1.Layers(x).Name Next

  8. MapX控件的基本属性 每个单独的地图均称为图层, MapX 将地图存储为图 层的集合。

  9. MapX控件的基本属性 添加新的图层、移除图层和更改图层的样式或可 见性均属于可在图层上执行的操作。 这些图层既可在设计阶段通过 MapX 的“属性”对话框更改,也可在运行时通过编程更改。使用“属 性”对话框,设计者只需更改设置即可控制图层。

  10. MapX控件的基本属性 GeoSet GeoSet 是图层及其设置的集合。GeoSet 确定了在 Map 对象及其设置中使用的 MapInfo 表的集合。 GeoSet 可在设计阶段指定。如果在运行时设定,则它将先移除所有加载的图层和 Dataset,然后加载新的 GeoSet。默认加载的 GeoSet 是 US.GST。

  11. MapX控件的基本属性

  12. MapX控件的基本属性 Map1. GeoSet =“图集文件名”

  13. MapX控件的基本属性 CurrentTool(操作功能)

  14. Select Case Index Case 0 Map1.CurrentTool = miZoomInTool Case 1 Map1.CurrentTool = miZoomOutTool Case 2 Map1.CurrentTool = miPanTool Case 3 Map1.CurrentTool = ToolConstants.miArrowTool Case 4 Map1.CurrentTool = ToolConstants.miCenterTool Case 5 Map1.Rotation = Map1.Rotation + 90

More Related