ObjectsByRegion error

Trying to script a crossing selection using Rhino.ObjectsByRegion and the surfs and polysurfs filter 8, 16 or 24, doesn’t select the surfs. The 0 filters selects them successfully. I’ve worked around this by de-selecting the other geometry but am curious to know whether it’s a bug or a coding error.

Test file and snippet attached.

Dim arr_WindowPt(3), arr_Selection, str_CurrentView
Dim intMode, intType

str_CurrentView = Rhino.CurrentView       

intMode = 1 'Crossing selection
intType = 0 'Selection Filter

arr_WindowPt(0) = Array(0, -50, -50)
arr_WindowPt(1) = Array(0, 50, -50)
arr_WindowPt(2) = Array(0, 50, 50)
arr_WindowPt(3) = Array(0, -50, 50)

If IsArray(arr_WindowPt)Then
	arr_Selection = Rhino.ObjectsByRegion(arr_WindowPt, _
		intMode, intType, str_CurrentView, True)
End If

Test- ObjectsByRegion.3dm (178.1 KB)

Hi Brian,

I’ve reported this as a bug.

http://mcneel.myjetbrains.com/youtrack/issue/RH-32199

– Dale