空间数据的显示和基本操作.ppt
空间数据的显示和基本操作空间数据的显示和基本操作现在学习的是第1页，共30页第第4章章 空间数据的显示和基本操作空间数据的显示和基本操作现在学习的是第2页，共30页本 章 目 标 通过本章学习，能够使用SuperMap Objects控件编写代码，掌握并实现以下基本功能：1、打开各种数据源；、打开各种数据源；2、显示空间几何图形；、显示空间几何图形；3、能进行地图的放大、缩小等基本操作；、能进行地图的放大、缩小等基本操作；4、对地图窗口中的图层进行管理。、对地图窗口中的图层进行管理。现在学习的是第3页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作 本章内容本章内容n 4.1 打开数据源打开数据源n 4.2 空间数据的显示空间数据的显示n 4.3 地图放大、缩小、漫游等基本操作地图放大、缩小、漫游等基本操作n 4.4 图层管理图层管理现在学习的是第4页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作4.1 打开数据源打开数据源打开数据源思路：打开数据源思路：现在学习的是第5页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作4.1 打开数据源打开数据源n 控件控件n SuperWorkSpace、Buttonn 按钮事件按钮事件n SuperWorkSpace.OpenDatasourcen SuperWorkspace.OpenDatasourceExn 传递的参数不同，Ex用于打开数据库类型数据源现在学习的是第6页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作4.1 打开数据源打开数据源 加载控件：SuperMap Core Controls核心控件，并将SuperWorkSpace控件添加到窗体上。控件及控件及对对象象方法、事件方法、事件功能描述功能描述SuperWorkspace1 OpenDataSource打开数据源文件soDataSource打开数据源文件：打开数据源文件：l 语法描述语法描述soDatasource SuperWorkspace.OpenDataSource(strDataSourceName As String,strAlias As String,nEngineType As seEngineType,bReadOnly As Boolean)现在学习的是第7页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作参数参数可可选选类类型型描述描述strDataSourceName 必选String数据源文件全路径名（*.sdb）strAlias 必选String数据源标识名（在同一个工作空间中必须唯一）nEngineType 必选seEngineType数据源引擎类型bReadOnly 必选Boolean是否只读4.1 打开数据源打开数据源参数说明：现在学习的是第8页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作l 实例实例：编写代码实现打开SDB数据源功能（1）窗体设计）窗体设计：添加Command控件到窗体上，将Command1.Caption属性设置为“打开数据源”。现在学习的是第9页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作（2）代码：代码：Private Sub Command1_Click（）打开数据源 Dim objDs As soDataSource 定义数据源对象变量 Dim strDsName As String 定义数据源名称变量 strDsName=App.Path&worldworld.sdb 数据源相对路径相对路径 Set objDs=SuperWorkspace1.OpenDataSource(strDsName,world,sceSDBPlus,False)打开数据源 If objDs Is Nothing Then 判断是否打开成功 MsgBox 打开数据源失败！Exit Sub Else MsgBox 打开数据源成功！End If Set objDs=Nothing 释放变量 End Sub现在学习的是第10页，共30页 本章内容本章内容n 4.1 打开数据源打开数据源n 4.2 空间数据的显示空间数据的显示n 4.3 地图放大、缩小、漫游等基本操作地图放大、缩小、漫游等基本操作n 4.4 图层管理图层管理第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作现在学习的是第11页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作4.2 空间数据的显示空间数据的显示 加载控件：加载SuperMap Core Controls 核心控件、工作空间管理器控件SuperWkspManager控件，并将SuperMap、SuperWorkspace控件和SuperWkspManager控件添加到窗体上。在工作空间中打开的数据源，可以通过VB中的TreeView控件、ListView控件将其显示出来。SuperMap Objects为了降低开发难度，提高开发效率，提供了专门的辅助控件工作空间管理器控件SuperWkspManager，其主要功能是将工作空间中管理的所有数据进行树状的直观显示。显示方法只需以下两个步骤：现在学习的是第12页，共30页n Load/Unload事件事件n SuperWkspManager.Connect SuperWorkspace.Handlen SuperMap1.Connect SuperWorkspace1.Handlen SuperWkspManager.Disconnectn SuperWkspManager.Refreshn 控件控件n SuperWorkSpace、SuperWkspManager、SuperMap第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作现在学习的是第13页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作控件及控件及对对象象方法、事件方法、事件功能描述功能描述SuperWkspManager1LDbClick当用户在选项卡列表中某一项上双击鼠标左键时触发SuperMap1soLayers(对象)AddDataset用于把一个数据集添加到地图的图层集合中（1）将工作空间管理器控件和工作空间控件进行关联，方法为：Private Sub Form_Load()SuperWkspManager1.Connect SuperWorkspace1.Handle 在相关控件之间建立连接End Sub（2）在打开数据源成功后，刷新工作空间管理控件，方法为：SuperWkspManager1.Refresh 通过以上两个步骤，可将工作空间中的数据显示出来，但并没有将图形显示出来，以下通过实例介绍通过工作空间管理器控件打开数据集显示图形方法和过程。现在学习的是第14页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作l语语法描述法描述、工作空、工作空间间管理控件的双管理控件的双击击事件事件SuperWkspManager.LDbClick(nFlag As SeSelectedItemFlag,strSelected As String,strParent As String)参数说明：参数参数可可选选类类型型描述描述nFlag必选seSelectedItemFlag当前选中的项(Item)的类型，如数据源、数据集、地图、布局、线型库、符号库等。strSelected 必选String选中的项的文本。如果是数据源，则是数据源别名；如果是数据集或者地图、布局，则是其名称。strParent 必选String选中对象的父节点的名称，对数据集来说，就是数据源的名称，其他类型的选中无用。现在学习的是第15页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作参数参数可可选选类类型型描述描述objDataset 必选soDataset要添加的数据集对象，可以是soDatasetVector或 soDatasetRaster对象。bAddToHead必选Boolean表示是否将数据集添加到SuperMap最顶层，True表示添加到最顶层；False表示添加到最底层。l语语法描述法描述 2、添加数据集到地图窗口的图层集中添加数据集到地图窗口的图层集中soLayer soLayers.AddDataset(objDataset As soDataset,bAddToHead As Boolean)参数说明：现在学习的是第16页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作n实例：实例：双击工作空间管理器中的某个数据集后，即可将该数据集显示在地图窗口上双击工作空间管理器中的某个数据集后，即可将该数据集显示在地图窗口上窗体设计窗体设计：将工作空间管理器控件、地图窗口控件添加到窗体上即 SuperWkspManager1、SuperMap1主要步骤主要步骤：（1）判断选中的节点是否是数据集（If nFlag=scsDataset Then）；（2）将选中节点的父节点字符串（strParent）作为数据源的别名，获得要显示的数据集对应的数据源；（3）将选中节点的字符串（strSelected）作为数据集的名称，得到点中的数据集；（4）将步骤3中得到的数据集添加到地图窗口的图层中；（5）刷新地图窗口。现在学习的是第17页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作SuperWkspManager_LDbClick(nFlag As SeSelectedItemFlag,strSelected As String,strParent As String)Dim objDs As soDataSource 数据源变量 Dim objDt As soDataset 数据集变量 If nFlag=scsDataset Then 如果点中的是数据集 Set objDs=SuperWorkspace1.Datasources(strParent)If Not(objDs Is Nothing)Then 如果数据源非空 Set objDt=objDs.Datasets(strSelected)If Not(objDt Is Nothing)Then 如果数据集非空将选中的数据集添加到地图窗口的层中进行显示 SuperMap1.Layers.AddDataset objDt,True SuperMap1.Refresh End If End If End If Set objDt=NothingSet objDs=Nothing代码：代码：现在学习的是第18页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作注：注：地图窗口中显示的图形数据来自于工作空间。因此，在显示数据之前，需要将 SuperMap控件和SuperWorkspace 控件进行关联。方法是：SuperMap1.Connect SuperWorkspace1.Handle（通常写在Form_Load事件中），在使用完后需要断开控件之间的连接。Private Sub Form_Load()SuperWkspManager1.Connect SuperWorkspace1.Handle 加载地图列表时需关联 SuperMap1.Connect SuperWorkspace1.Handle 地图显示时需关联End SubPrivate Sub Form_Unload(Cancel As Integer)SuperWkspManager1.DisconnectSuperMap1.CloseEnd Sub现在学习的是第19页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作 本章内容本章内容n 4.1 打开数据源打开数据源n 4.2 空间数据的显示空间数据的显示n 4.3 地图放大、缩小、漫游等基本操作地图放大、缩小、漫游等基本操作n 4.4 图层管理图层管理现在学习的是第20页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作4.3 地图放大、缩小、漫游等基本操作地图放大、缩小、漫游等基本操作控件及控件及对对象象属性、方法属性、方法功能描述功能描述SuperMap1Action改变地图窗口的当前操作ViewEntire全图显示l 语法描述SuperMap1.Action seAction 通过该接口可以方便地实现地图窗口中的五十多种基本操作和编辑功能，包括：（1）基本操作功能：如放大、缩小、漫游、自由缩放和选择等功能；（2）图层基本编辑功能：如在地图窗口图层中直接创建点、线、面，以及圆、弧、椭圆等参数化的几何对象，还可以进行节点编辑，以及生成流动注记等功能；（3）跟踪层的相应功能：直接在跟踪层上添加各种几何对象。现在学习的是第21页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作参数参数参数参数常数常数常数常数描述描述描述描述seActionscaPan地图漫游scaZoomIn地图放大scaZoomOut地图缩小scaZoomFree地图自由缩放scaSelect 单点方式选择目标scaRectSelect矩形方式选择目标scaCircleSelect圆形方式选择目标scaRegionSelect多边形方式选择目标参数说明：现在学习的是第22页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作n 实例：实例：在地图窗口中进行放大、缩小、平移、自由缩放、全图和选择基本操作。本实例是增加了Toolbar与ImageList控件，制作了图标工具栏，实现了相应功能。n 代码：代码：Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)Select Case Button.Index Case 1:SuperMap1.Action=scaPan Case 2:SuperMap1.Action=scaZoomIn Case 3:SuperMap1.Action=scaZoomOut Case 4:SuperMap1.Action=scaZoomFree2 Case 5:SuperMap1.ViewEntire Case 6:SuperMap1.Action=scaSelect Case 7:SuperMap1.Action=scaRectSelect Case 8:SuperMap1.Action=scaCircleSelect Case 9:SuperMap1.Action=scaRegionSelect End Select End Sub现在学习的是第23页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作n 运行结果：运行结果：现在学习的是第24页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作 本章内容本章内容n 4.1 打开数据源打开数据源n 4.2 空间数据的显示空间数据的显示n 4.3 地图放大、缩小、漫游等基本操作地图放大、缩小、漫游等基本操作n 4.4 图层管理图层管理现在学习的是第25页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作4.4 图层管理图层管理n 采用采用SuperLegend图例控件进行图层管理图例控件进行图层管理 图例控件用于管理地图窗口中所有图层的状态，使用非常方便。（1）将图例控件图例控件与地图控件地图控件相关联，方法是：SuperLegend1.Connect SuperMap1.Handle；（2）当地图窗口中的图层发生变化时刷新图例，方法是：SuperLegend1.Refresh；（3）修改图例中图层属性后会触发SuperLegend_Modified事件，在该事件中刷新地图即可看到图层修改的结果。使用图例控件后，其对图层的基本控制的功能全部封装在控件的右键菜单中，用户可以直接使用完成对图层的控制。现在学习的是第26页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作控件及控件及对对象象属性、事件属性、事件功能描述功能描述SuperLegendModified当改变了图层的可见、可选择、可捕捉和设置图层风格等操作后触发此事件 BackColor返回/设置图例控件的背景色EditLabels返回/设置是否可以编辑图例中显示的图层的名称 Font返回/设置图例控件所用的字体（字体显示风格）HasButtons返回/设置有下级分支的节点前面是否显示+/-号ForeColor返回/设置图例控件的前景色（文字颜色）HasLines返回/设置图例控件的各层各级之间是否显示连接线ItemDragAndDrop 返回/设置是否可以用鼠标拖动来调整图例控件中图层的顺序PopupMenu返回/设置在图例控件上是否弹出右键快捷菜单SingleExpand返回/设置选中一个节点时，是否折叠其他展开的节点现在学习的是第27页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作n 实例实例：通过图例控件中的右键菜单，调整地图图层n 窗体设计窗体设计：加载SuperLegend控件并将它添加到窗体上，将SuperLegend1.Appearance设置为1。现在学习的是第28页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作n 代码：代码：1.窗体的Load事件Private Sub Form_Load()建立控件的连接 SuperLegend1.Connect SuperMap1.Handle End Sub2.图例控件的 Modified事件Private Sub SuperLegend1_Modified()SuperMap1.RefreshEnd Sub3.工作空间管理控件的双击事件Private Sub SuperWkspManager1_LDbClick(ByVal nFlag As SuperWkspManagerLib.seSelectedItemFlag,ByVal strSelected As String,ByVal strParent As String)SuperLegend1.RefreshEnd Sub现在学习的是第29页，共30页第第第第4 4章章章章 空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作空间数据的显示和基本操作n 运行结果：运行结果：现在学习的是第30页，共30页
