The Rhino.Input.RhinoGet.GetMultipleObjects() doesn’t run correctly. It does nothing et returns immediatly.
Public Shared Function GetMultipleObjects ( prompt As String, acceptNothing As Boolean, filter As ObjectType, <OutAttribute> ByRef rhObjects As ObjRef() ) As Result
Since last Rhino version update ? It worked fine before.
Const filter As Rhino.DocObjects.ObjectType = Rhino.DocObjects.ObjectType.Curve
Dim objRefs() As Rhino.DocObjects.ObjRef = Nothing
Dim cmdResult = Rhino.Input.RhinoGet.GetMultipleObjects("Select curves", False, filter, objRefs)
If cmdResult = Rhino.Commands.Result.Success Then
For i As Integer = 0 To objRefs.Length - 1
Dim obj As Rhino.DocObjects.RhinoObject = objRefs(i).Object()
If Nothing IsNot obj Then
Rhino.RhinoApp.WriteLine(obj.Id.ToString())
End If
Next
End If