Pauses for user input of a point constrained to a surface or polysurface object.
Rhino.GetPointOnSurface (strObject [, strMessage])
strObject |
Required. String. The object's identifier. |
strMessage |
Optional. String. A prompt or message. |
Array |
The 3-D point selected by the user successful. |
Null |
If not successful, or on error. |
Dim strObject, arrPoint
strObject = Rhino.GetObject("Pick a surface")
If Rhino.IsSurface(strObject) Then
arrPoint = Rhino.GetPointOnSurface(strObject, "Point on surface")
If IsArray(arrPoint) Then
Rhino.AddPoint arrPoint
End If
End If