Adds a point cloud object to the document.
Rhino.AddPointCloud (arrPoints [, arrColors])
arrPoints |
Required. Array. An array of 3-D points. |
arrColors |
Optional. Array. An array of RGB color values. Note, for every point, there must be a corresponding point color. |
String |
The identifier of the new object if successful. |
Null |
If not successful, or on error. |
Dim arrPoints
arrPoints = Rhino.GetPoints(True, True, "Select points")
If IsArray(arrPoints) Then
Rhino.AddPointCloud arrPoints
End If