Verifies an object is a rational NURBS curve object.
Rhino.IsCurveRational (strObject [, intIndex])
|
strObject |
Required. String. The object's identifier. |
|
intIndex |
Optional. Number. If strObject identifies a polycurve object, then intIndex identifies the curve segment of the polycurve to query. |
|
Boolean |
True if successful, otherwise False. |
|
Null |
On error. |
Dim strObject
strObject = Rhino.GetObject("Select a curve")
If Rhino.IsCurve(strObject) Then
If Rhino.IsCurveRational(strObject) Then
Rhino.Print "The object is a rational NURBS curve."
Else
Rhino.Print "The object is not a rational NURBS curve."
End If
Else
Rhino.Print "The object is not a curve."
End If