第3章地图图层及几何对象

GIS 图层显3.3.1放大，缩小，漫3.3.2基于比例尺显示图3.3.3控制图层显示顺 Setr=SetMap1.Extent=Setr.ScaleRectangleSetMap1.Extent=Setr=r.ScaleRectangleSetMap1.Extent=Single,YAsDimrAsIfButton=vbRightButton Popup1, LeftButton,X,ElseIfButton=vbLeftButtonSetr=SetMap1.Extent=Setr=r.ScaleRectangleSetMap1.Extent=EndEndEndPrivateSubMap1_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)With.MousePointer=

.MousePointer=.MousePointer=EndEndEndSetMap1.Extent= PrivateSubMap1_BeforeLayerDraw(ByValindexAsByValhDCAsDimlayerAs DimboolShowDetailAsSetlayer= boolShowDetail=Map1.Extent.Width<(Map1.FullExtent.Width/2)Iflayer.Name云南县界EndIflayer.Name云南道路layer.Visible=NotEndEndListIndex属性值是-1。列是比最大的ListIndex1。 DimlyrAs IfDC.ConnectForEachlyrInMap1.LayerslstLayers.AddItemlyr.NameNextlyrEndIflstLayers.ListCount>0ThenCommand2.Enabled=TruelstLayers.Selected(0)=TrueEndEnd

将图层名称在控件中列PrivateSubDimiAsDimlyrAs IflstLayers.ListIndex>0i=lstLayers.ListIndex-ForEachlyrInlstLayers.AddItemNextlstLayers.Selected(i)=EndEnd ：

实例 动态层最适合接收从GPS 动态层表示地图中的一层，用于刻画位置会不断当作来使用,可以用GeoEvent对象来表示。TrackingLayer:对象代表地图控件中的一层，它主要方法 Refresh方法可以不重画层集而单独重画 对象，可以是Point,Points,Line,Ellipse,Rectangle或Polygon.这些对象可以用编程的方 主要方法每一个都有相应的符号Symbol。任意个可能以相同的符号来绘制。通过设置动态层的Visible属性，你可以独立于地图的其余部分来动态跟 置SymbolCount属性

线 ShapeShape文件和SDE图层中有相应的要素类型与六种几何对象中的点、直线和多边形对象对应，具有相同的几何定义。但是，在Shape文件和SDE图层中不能直接椭圆和矩形，它们可以近似为多边形。点对象表示一种在地图坐标中具有X，Y值的几何图你可以通过属性X，Y，Z或设置一个点的位置使用方法DistanceTo，你可以计算点到点、点到线、求交（Intersect）,异或（ExclusiveOr）,差（语法DimptAsNewMapObjects2.PointMapObjects中的Points的常值描PointLinePolygonPointsRectangle对象EllipseX:Measure(度)用于表示一个可度量的要素 Difference(substractshp:Object[,extent:Rectangle]):Intersect(intersectShape:ObjectUnion(unionShape:ObjectXor(xorShape:ObjectGet(X,Y,Z,DimdblXAsDouble,dblYAsDouble,dblZAsDouble,dblMAsDoublepPoint.GetdblX,dblY,dblZ,Set(X,Y,[Z],PrivateSubMap1_MouseDown(ButtonAsInteger,ShiftAsInteger,