Пересечение

Question

Как средствами ArcObject проверить пересечение, или попадание одного полигона в другой, без использования SpatialQuery. Так как

SQ работает только при поиске между геометрией и фичеклассом.

Т.Е. как можно просчитать пересечение между двумя объектами IPolygon без добавления их в фичекласс.

Answer 1

Вот кусок из хелпаааааааааа

Dim pPolyCurve As IPolycurve
Set pPolyCurve = pDom1
pPolyCurve.Generalize dTXY

Dim pTopo As ITopologicalOperator
Set pTopo = pPolyCurve
pTopo.Simplify

Dim pDom2 As IPolygon
Set pDom2 = pSurf2.Domain

Set pPolyCurve = pDom2
pPolyCurve.Generalize dTXY

Set pTopo = pPolyCurve
pTopo.Simplify

Set pTopo = pDom1

Dim pClip As IPolygon
Set pClip = pTopo.Intersect(pDom2, esriGeometry2Dimension)

If ((pClip Is Nothing) Or (pClip.IsEmpty)) Then
    Set pClip = pDom1
End If