This document is archived and information here might be outdated. Recommended version. |
Constructs cPoints points evenly distributed along the input curve.
[Visual Basic .NET] Public Sub ConstructDivideEqual ( _ ByVal inCurve As ICurve, _ ByVal numInnerPoints As Integer _ )
[C#] public void ConstructDivideEqual ( ICurve inCurve, int numInnerPoints );
[C++]
HRESULT ConstructDivideEqual(
ICurve* inCurve,
long numInnerPoints
);
[C++]
Parameters inCurve
inCurve is a parameter of type ICurve* numInnerPoints
numInnerPoints is a parameter of type long
Constructs a Multipoint consisting of the From point of the input Curve, n inner points equally spaced over the length of the curve, and the To point of the curve.
The number of points in the constructed multipoint is equal to the input numPoints plus the 2 endpoints.
private void ConstructDivideEqual()
{
IPoint centerPoint=new PointClass();
centerPoint.PutCoords(10, 0);
IPoint fromPoint=new PointClass();
fromPoint.PutCoords(0, 0);
IPoint toPoint=new PointClass();
toPoint.PutCoords(0, 20);
ICircularArc circularArcConstruction=new CircularArcClass();
circularArcConstruction.PutCoords(centerPoint, fromPoint, toPoint, esriArcOrientation.esriArcClockwise);
IConstructMultipoint constructMultipoint=new MultipointClass();
constructMultipoint.ConstructDivideEqual(circularArcConstruction as ICurve, 10);
IPointCollection pointCollection=constructMultipoint as IPointCollection;
System.Windows.Forms.MessageBox.Show("Number of points is: " + pointCollection.PointCount);
}
Sub ConstructDivideEqual_Example()
Dim pCArc As ICircularArc, pConstructMultipoint As IConstructMultipoint
Dim pCenter As IPoint, pFrom As IPoint, pTo As IPoint
Dim ptc As IPointCollection
pCArc=New CircularArc
pCenter=New Point
pCenter.PutCoords(10, 0)
pFrom=New Point
pFrom.PutCoords(0, 0)
pTo=New Point
pTo.PutCoords(0, 20)
pCArc.PutCoords(pCenter, pFrom, pTo, esriArcOrientation.esriArcClockwise)
pConstructMultipoint=New Multipoint
pConstructMultipoint.ConstructDivideEqual(pCArc, 10)
ptc=pConstructMultipoint
Debug.Print("Number of points is: " & ptc.PointCount)
End Sub