zoukankan      html  css  js  c++  java
  • 如何实现几何要素的剪切

    如何实现几何要素的剪切

     IFeatureEdit Example

    ‘Assume pSet (ISet) and pMoveVector (ILine) already exist.
    Dim pUnknown As IUnknown, pFeatureEdit As IFeatureEdit
    Set pUnknown = pSet.Next

    Do While pUnknown Is Not Nothing
      Set pFeatureEdit = pUnknown
      pFeatureEdit.MoveSet pSet, pMoveVector
      Set pUnknown = pSet.Next
    Loop

    The following code is an example of one way you could split a selected polygon features by a polyline.

    Public Sub SplitFeatures(pSelectionSet As ISelectionSet, pPolyLine As IPolyline)

    ‘ open a feature cursor on the selected features that
    ‘ intersect the splitting geometry
    Dim pFeatCursor As IFeatureCursor
    Dim pSpatialFilter As ISpatialFilter
    Set pSpatialFilter = New SpatialFilter
    Set pSpatialFilter.Geometry = pPolyLine
    pSelectionSet.Search pSpatialFilter, True, pFeatCursor

    ‘ Clean up the splitting geometry
    ‘ This is necessary because, for polygons, IFeatureEdit::Split
    ‘ relies internally on ITopologicalOperator::Cut
    Dim pTopoOpo As ITopologicalOperator
    Set pTopoOpo = pPolyLine
    pTopoOpo.Simplify

    ‘ Loop through the features and split them
    Dim pFeature As IFeature
    Set pFeature = pFeatCursor.NextFeature

    Do Until pFeature Is Nothing
      Dim pFeatureEdit As IFeatureEdit
      Set pFeatureEdit = pFeature
      pFeatureEdit.Split pPolyLine
      Set pFeature = pFeatCursor.NextFeature
    Loop

    End Sub

  • 相关阅读:
    第六章例6-5
    第六章例6-3
    第六章例6-2
    获取JVM默认编码以及获取其它JVM属性的方法(转)
    Java读取文本文件中文乱码问题
    highcharts highstock API js图形
    swing/swt可视化开发工具windowbuilder免费了
    swt 引入 js 问题
    swt 例子
    经验分享:开发SWT应用两点心得(转)
  • 原文地址:https://www.cnblogs.com/lauer0246/p/1287393.html
Copyright © 2011-2022 走看看