algorithmic modeling for Rhino
still alive ...(toujours vivant ?)
It's the old SDK, I no longer support the old SDK as I've completely lost touch with it. Please try in RhinoCommon and see if it works there.
--
David Rutten
david@mcneel.com
Poprad, Slovakia
Yes!
Is it possible to write a SuperBlockNameToRhinoName script that do the same for all the nested blocs?
Sub BlockNameToRhinoName ()
Dim strObject, strObjects, strBlockName
strObjects = Rhino.GetObjects("Select blocks", 0)
If IsNull(strObjects) Then Exit Sub
For Each strObject in strObjects
If Rhino.IsBlockInstance(strObject) Then
strBlockName = Rhino.BlockInstanceName(strObject)
Rhino.ObjectName strObject , strBlockName
End If
Next
End Sub
Welcome to
Grasshopper
Added by Parametric House 0 Comments 0 Likes
Added by Parametric House 0 Comments 0 Likes
Added by Parametric House 0 Comments 0 Likes
Added by Parametric House 0 Comments 0 Likes
© 2024 Created by Scott Davidson. Powered by