Replaces the geometry of an object with that of another object. Note, the target object's attributes, such as it's object identifier, attribute user data, and other properties, are retained.
Rhino.ReplaceGeometry (strTarget, strSource [, blnDelete])
strTarget |
Required. String. The target object, or the object geometry to replace. |
strSource |
Required. String. The source object, or the object geometry to replace with. |
blnDelete |
Optional. Boolean. Delete the source object. The default is not to delete the source object (False). |
String |
The identifier of the target object if successful. |
Null |
If not successful, or on error. |
Dim strObject, arrBox, arrPoint
strObject = Rhino.GetObject("Select object to twist")
If Not IsNull(strObject) Then
Rhino.TwistObject strObject, Array(0,0,0), Array(1,0,0), 45, True, False
End If