'========================================================
' This example demonstrates what the CollectionItem.Name
' property returns with a variety of inputs
' First try it on a camera:
Set oCollectionItem = CreateObject("XSI.CollectionItem")
oCollectionItem.Value = "Camera"
printName oCollectionItem
' Then on a sphere:
CreatePrim "Sphere", "MeshSurface"
Set oSphere = CreateObject("XSI.CollectionItem")
oSphere.Value = "sphere"
printName oSphere
' Then on one of the sphere's edges:
Set oEdge = CreateObject("XSI.CollectionItem")
oEdge.Value = ActiveSceneRoot.FindChild( ,,siMeshFamily ).ActivePrimitive.Geometry.Segments(3).SubComponent
printName oEdge
'========================================================
Function printName( in_object )
' Returns the full path for subcomponents
LogMessage in_object.Name
End Function
'========================================================
' OUTPUT:
'INFO : "Camera"
'INFO : "sphere"
'INFO : "sphere.edge[3]" |