图层基本功能开发.pptVIP

图层的基本功能开发 用程序加载图层文件 图层基本属性设置 图层标注 图层控制 用程序加载图层文件 在同一文件夹中加载 在不同文件夹中加载 图层的卸载和移动 图层的选择和隐藏 综合例子演示 在同一文件夹中加载 如果你的程序和GIS图层文件（dbf、shp、shx等）在一个文件夹，图层为此文件夹下的中国各省和四川，加载程序如下： 在不同文件夹中加载 由于在实际的应用程序中，图层文件和程序文件都很多，为了方便管理，一般程序文件和图层文件不放在一个文件夹中，推荐采用一个文件夹（如data）单独存放图层文件，而把各个程序文件和它并列放置。 例如应用程序文件夹路径为“D:\MO”，程序在“D:\MO\Prog”文件夹下，图层文件放在“D:\MO\data”文件夹下，这时要用+“\..\”返回上级文件夹。 Private Sub Form_Load() Dim dc As New DataConnection Dim layer As MapLayer dc.Database = App.Path + \..\ + data If Not dc.Connect Then MsgBox 在指定的文件夹下没找到图层数据文件！ End If Set layer = New MapLayer Set layer.GeoDataset = dc.FindGeoDataset(中国各省) Map1.Layers.Add layer Set layer = New MapLayer Set layer.GeoDataset = dc.FindGeoDataset(四川) Map1.Layers.Add layer Map1.Refresh End Sub 图层的卸载和移动 用语句： Map1.Layers.Remove 0 可以把第0层卸载。注意：卸载了一个图层后，其它图层的序号就发生了变化。 用语句： Map.Layers.Clear 可以一次卸载所有的图层。 可以用MoveTo方法来把图层从位置1移动到位置2，如果原来图层在第2层，可以用以下语句把它移动到第0层： Map1.Layers.MoveTo 2,0 图层的选择和隐藏 用图层的索引号： Set layer=Map1.Layers(0) 或图层名称： Set Layer=Map1.Layers(“图层名”) 来选择当前图层。 用语句： Layer.Visible=False 来隐藏当前图层。 另外，还可以通过设置Map1.Visible来隐藏或显示整个Map控件。 综合例子演示 请参照 第二章教案\第二章代码\图层的基本功能开发代码\用程序加载图层文件\中的“一个综合例子代码” 图层基本属性设置 面状图层基本属性包括图层颜色、区域界限宽度、区域界限样式、区域界限颜色等； 线状图层的属性包括线宽度、线样式、线颜色等； 点状图层属性包括点大小、点样式、点颜色等； 另外还有属性的标注等。 图层基本属性设置 设置图层颜色 设置区域界线 设置线属性 设置点属性 属性设置的综合示例 设置图层颜色 调试前面的程序，大家可以发现图层的颜色是随机出现的。 设置Symbol对象的Color属性，可以很容易地设置固定的图层颜色。 请参考第二章教案\第二章代码\图层的基本功能开发代码\用程序加载图层文件\图层基本属性设置代码\里的“设置图层颜色”程序。 MO中常用的颜色可以参考帮助。 设置区域界线 设置线属性 当图层为线状图层时，用layer.Symbol.Size可以设置线的宽度，layer.Symbol.Size=1是较细的线型，layer.Symbol.Size＝2是较粗的线型。 还可以用Layer.Symbol.Color设置线的颜色，用layer.Symbol.Style设置线的样式，具体方法请参照帮助。 设置点属性 当图层为点状图层时，用layer.Symbol.Size可以设置点的大小，一般用3～6，3是较小的点，6是较大的点。 还可以用layer.Symbol.Color设置点的颜色，用layer.Symbol.Style设置点的样式，具体方法请参考帮助。 属性设置的综合示例 下面的例子为加载世界地图的国家（country）、河流（RIVERS）和主要城市（CITIES）三种不同的图层，再用不同的颜色和样式来设置。 请参照第二章教案\第二章代码\图层的基本功能开发代码\图层基本属性设置代码\里的“属性设置的综合示例”程序。 图层标注 利用MO的标注对象LabelRenderer，可以自动添加图层上对象的标注。 属性标注 设置图上字体 属性标注 属性标注方法为： Set Layer.Ren