Verifies a polysurface object is planar.
Rhino.IsPolysurfacePlanar (strObject)
|
strObject |
Required. String. The object's identifier. |
|
Boolean |
True if successful, otherwise False. |
|
Null |
On error. |
Const rhObjectPolySurface = 16
Dim strObject
strObject = Rhino.GetObject("Select a polysurface", rhObjectPolySurface)
If Rhino.IsPolysurfacePlanar(strObject) Then
Rhino.Print "The polysurface is planar."
Else
Rhino.Print "The polysurface is not planar."
End If