概要

サンプル コード

オブジェクト間の距離を計測

オブジェクト間の距離は、IProximityOperator::ReturnDistance で取得します。

private  double RetDistance(IGeometry Geo1, IGeometry Geo2)
    IProximityOperator  pProxi = (IProximityOperator)Geo1;
    Double adis;
    adis = pProxi.ReturnDistance(Geo2);
    System.Diagnostics.Debug.Print(adis.ToString());
    return (adis);
}

Private Function RetDistance(Geo1 As IGeometry, Geo2 As IGeometry) As Double
    Dim pProxi As IProximityOperator = Geo1
    Dim adis As Double
    adis = pProxi.ReturnDistance(Geo2)
    System.Diagnostics.Debug.Print(adis)
    Return adis
End Function

オブジェクト上の近接点を取得

IProximityOperator::ReturnNearestPoint メソッドの利用

private IPoint RetNerestPT(IGeometry TargetGeo,IPoint InputPt,esriSegmentExtension est) {
    IProximityOperator pProxi = (IProximityOperator)TargetGeo;
    IPoint retPt;
    retPt = pProxi.ReturnNearestPoint(InputPt, esriSegmentExtension.esriNoExtension);
    return (retPt);
}

Private Function RetNerestPT(TargetGeo As IGeometry, InputPt As IPoint, est As esriSegmentExtension) As IPoint
    Dim pProxi As IProximityOperator = TargetGeo
    Dim retPt As IPoint
    retPt = pProxi.ReturnNearestPoint(InputPt, esriSegmentExtension.esriNoExtension)
    'System.Diagnostics.Debug.Print(adis)
    Return retPt
End Function

IProximityOperator::QueryNearestPoint メソッドの利用

private IPoint QryNearestPT(IGeometry TargetGeo, IPoint InputPt, esriSegmentExtension est)
{
    IProximityOperator pProx = (IProximityOperator)TargetGeo;
    IPoint retPt  = new PointClass();
    pProx.QueryNearestPoint(InputPt, esriSegmentExtension.esriNoExtension, retPt);
    return (retPt);
}

Private Function QryNearestPT(TargetGeo As IGeometry, InputPt As IPoint, est As esriSegmentExtension) As IPoint
    Dim pProxi As IProximityOperator = TargetGeo
    Dim retPt As IPoint = New PointClass
    pProxi.QueryNearestPoint(InputPt, esriSegmentExtension.esriNoExtension, retPt)
    Return retPt
End Function