Calculates the union of two or more closed, planar curves and adds the results to the document. Note, curves must be coplanar.
Rhino.CurveBooleanUnion (arrCurves [, blnDelete])
arrCurves |
Required. Array. The identifiers of two or more curve objects. |
blnDelete |
Optional. Boolean. If True, then the inputs will be deleted. If not specified or False (default), then the inputs will not be deleted. |
Array |
The identifiers of the new objects if successful. |
Null |
If not successful, or on error. |
Dim arrCurves, arrResult
arrCurves = Rhino.GetObjects("Select curves to union", 4)
If IsArray(arrCurves) And UBound(arrCurves) > 0 Then
arrResult = Rhino.CurveBooleanUnion(arrCurves)
If IsArray(arrResult) Then
Rhino.DeleteObjects arrCurves
End If
End If