Bug in VB Inventor - SelectEvents with kPointCloudPointFilter

[gvasquez]

When a selection is made by SelectEvents for points in a point cloud, although the correct selection of points is displayed and the selector delivers the correct number of points, the positions of all the output items have the same position ( being the position of the first selected point).

In the image it is observed that there are 7 selected points and the positions returned are all the same.

[Sergio.D.Suárez]

Hi, Can you share a simplified macro to replicate the problem?
I have the sensation that when selecting the objects and not establishing them as collection is taking the coordinates of the last selected point, if it were so it would be reasonable that all the values are equal in X Y or Z

Regards!

[MjDeck]

@gvasquez , it looks like there is a problem in selection of multiple point cloud points within one selection session.
Is this bug preventing you from moving forward with a workflow?

[gvasquez]

For now I solved in the following way (ACTUAL SOLUTION), however it is not very efficient since the selection does not become very fluid, since I must copy from one point per selection and also include it in a Highlightset

He also indicated how the correct solution should be

Public Function Seleccion(ByRef m_set As HighlightSet, ByRef m_object_list() As Object, ByRef m_object_list_num As Integer)

m_selection_enable = True
Set m_interactionEvents = ThisApplication.CommandManager.CreateInteractionEvents

Set m_keyboardEvents = m_interactionEvents.KeyboardEvents
m_interactionEvents.InteractionDisabled = False
m_interactionEvents.StatusBarText = m_mesaje

Set m_selectEvents = m_interactionEvents.SelectEvents
m_selectEvents.AddSelectionFilter m_filter
m_interactionEvents.Start

Do While m_selection_enable
DoEvents

'Actual Solution
If m_selectEvents.SelectedEntities.Count >= 1 Then
Set m_object_list(m_object_list_num) = m_selectEvents.SelectedEntities.Item(1)
m_set.AddItem m_object_list(m_object_list_num)
m_object_list_num = m_object_list_num + 1
m_selectEvents.ResetSelections
End If
Loop

'Correct Solution
'Dim i As Integer
'For i = 1 To m_selectEvents.SelectedEntities.Count
' Set m_object_list(m_object_list_num) = m_selectEvents.SelectedEntities.Item(i)
' m_object_list_num = m_object_list_num + 1
'Next i
'm_selectEvents.ResetSelections


m_interactionEvents.Stop
Set m_selectEvents = Nothing
Set m_interactionEvents = Nothing
End Function

[shix90]

Hi @gvasquez , I'm wondering how would these pointcloud points get processed in the downstream? Will they be processed one by one? or they must be treated as one collection for the next step?

[gvasquez]

The points will be processed through the selected complete set and not one by one. As a solution I applied to obtain one of the selected points and delete the selection list and include the selected point to a Highlight to be able to show what was selected, but this process is a bit slow in the selection, since if I select 4 points very fast, only stay with the first one and erase the other three.

That solution is temporary since we are developing point cloud processing tools.

I hope you understand that my English is not very good. Regards

[shix90]

I see.

The pointcloud point selection API was meant to do single selection, because for Inventor commands such as "Cloud Point"  only one pointcloud point is needed to create a work point.

I think you have a valid workaround for now. If you find that you really need a multiple selection support during your pointcloud process tool development, please feel free to post your requirement here in the forum. Maybe with some details about the features you want to create, so our API designers can have a better understanding to help you.