SurfacePrincipalCurvature - PYTHON 不支持

Adds curvature curves at the evaluated point on a surface.For more information, see the Rhino help file for the Curvature command.

语法

Rhino.SurfacePrincipalCurvature (strObject, arrPoint)

参数

strObject

Required.字符串。The curve's identifier.

arrPoint

Required.Array.A point on the curve to evaluate.

返回值

Array

An array of two strings that identify the Maximum and Minimum principal curvature curves, respectively, if successful.

Null

如果执行不成功或出错,返回空值。

示例

Sub TestSurfacePrincipalCurvature

  Dim strSurface, arrPoint, arrResult

  strSurface = Rhino.GetObject("Select surface for curvature measurement", 8)

  If IsNull(strSurface) Then Exit Sub

  arrPoint = Rhino.GetPointOnSurface(strSurface, "Select point on surface for curvature measurement")

  If Not IsArray(arrPoint) Then Exit Sub

  arrResult = Rhino.SurfacePrincipalCurvature(strSurface, arrPoint)

  If Not IsArray(arrResult) Then Exit Sub

  Rhino.ObjectName arrResult(0), "Maximum principal curvature"

  Rhino.ObjectName arrResult(1), "Minimum principal curvature"

  Rhino.SelectObjects arrResult

End Sub

同见

SurfaceCurvature

SurfaceCurvatureAnalysis