'

' This example demonstrates how to add an element by index number.

' It also shows what happens when you try to add an element that

' is already part of the SubComponent and what happens when you

' try to add an element using an invalid index number.

'

NewScene , false

set oObject = Application.ActiveSceneRoot.AddGeometry( "Cube", "MeshSurface", "MyCube" )

set oSubComponent = oObject.ActivePrimitive.Geometry.CreateSubComponent( siVertexCluster, Array(3,4,5) )

Application.LogMessage oSubComponent

' Add the vertex at index 6 to the subcomponent

oSubComponent.AddElement 6

Application.LogMessage oSubComponent

' No change to the SubComponent since the vertex at index 4 is already part of it

oSubComponent.AddElement 4

Application.LogMessage oSubComponent

' No change to the SubComponent since index 55 is not a valid vertex index

On Error Resume Next

oSubComponent.AddElement 55

Application.LogMessage Err.Description

On Error GoTo 0

' Expected results:

'INFO : MyCube.pnt[3-5]

'INFO : MyCube.pnt[3-6]

'INFO : MyCube.pnt[3-6]

'INFO : 2028 - Invalid argument specified.