| 很多线划图数据进ArcSDE库中都会有些对象转换不进去。这些对象有很大一部分是由于数据本身有自相交的情况。如果这些线划图数据只是用来做底图，而不需要做对象分析。则可以采用数据简单化操作后再转换入ArcSDE中。具体操作如下例子： |
| 过程描述 |
Private Sub SimplifyPolyLine(pPolyline As esriGeometry.Polyline)
'通过QI取得线对象的拓扑操作接口
Dim pTopologicalOperator As esriGeometry.ITopologicalOperator
Set pTopologicalOperator = pPolyline
'执行简单化操作
pTopologicalOperator.Simplify
'简单化操作完了的数据可以转换入ArcSDE中了
'下面代码用来展示简单化后的线数据的每个部分
Dim pGeometryCollection As esriGeometry.IGeometryCollection
Set pGeometryCollection = pPolyline
Dim i As Long
For i = 0 To pGeometryCollection.GeometryCount - 1
Dim TempPolyline As esriGeometry.IGeometryCollection
Dim TempPath As esriGeometry.IPath
Set TempPolyline = New esriGeometry.Polyline
Set TempPath = pGeometryCollection.Geometry(i)
TempPolyline.AddGeometry TempPath
MapControl1.FlashShape TempPolyline
Set TempPath = Nothing
Set TempPolyline = Nothing
Next i
End Sub
备注：点、线、面都可以执行简单化操作。可以根据不同的业务需求来使用这些功能。 |
（本文已被浏览 次） | | |
相关评论
