Thursday, July 15, 2010

objects by Layers


GH3D links:

more can be found : Rhino .NET Framework SDK



Bake object to specific layers:

Private Sub RunScript(ByVal obj As Brep, ByVal lay As String, ByVal col As Color, ByRef A As Object)
 Dim lay_index As Int32 = doc.Layers.Find(lay, True)
 If (lay_index < 0) Then
  lay_index = doc.Layers.Add(lay, col)
 End If

 Dim att As New DocObjects.ObjectAttributes()
 att.LayerIndex = lay_index

 A = doc.Objects.AddBrep(obj, att)
End Sub

No comments:

Post a Comment