Get the average position of given 2D geometry

Geometry2D.AveragePosition( compIdxArray, compPos );

Parameter	Type	Description
compIdxArray	Array of Integer values	An array of indices of 2D Component Possible Values: Description: 0 <= compIdxArray(i) < Number of 2D Component Each index in the array must be valid
compPos	SIVector3	Upon return, contains the average position of the given 2D geometry

VBScript Example

'Create a cube
CreatePrim "Cube", "MeshSurface"
set oSelList = GetValue("SelectionList")
set oItem = oSelList(0)
set oGeometry = oItem.obj
oNb2D = oGeometry.Nb2D
set o2DComponent = oGeometry.Geometry2D
set oPos = XSIMath.CreateVector3()
' Construct an array containing the indices 0,1,2,3
dim oIndicesArray
oIndicesArray = Array( 0, 1, 2, 3 )
o2DComponent.AveragePosition oIndicesArray, oPos
LogMessage "Average position of Component (0, 1, 2, 3) : " & oPos.x & " | " & oPos.y & " | " & oPos.z

Geometry2D.CenterPosition Geometry2D SIVector3