'
' This example demonstrates how to work with a subset of facets on a polygon mesh
'
NewScene , false
dim oObj, oSubComponent 
set oObj = Application.ActiveSceneRoot.AddGeometry("Cube","MeshSurface")
set oFacetColl = oObj.ActivePrimitive.Geometry.Facets
set oSubComponent = oFacetColl(2).SubComponent
Application.LogMessage oSubComponent & " has " & UBound(oSubComponent.ElementArray)+1 & _
	" components of type " & TypeName(oSubComponent.ComponentCollection(0))
set oObj = Application.ActiveSceneRoot.AddGeometry("Cube","MeshSurface")
set oSubComponent = oObj.ActivePrimitive.Geometry.Facets(2).SubComponent
oSubComponent.AddElement 3
Application.LogMessage oSubComponent & " has " & UBound(oSubComponent.ElementArray)+1 & _
	" components of type " & TypeName(oSubComponent.ComponentCollection(0))
' Expected results:
'INFO : cube.poly[2] has 1 components of type PolygonFace
'INFO : cube1.poly[2,3] has 2 components of type PolygonFace

/*
	This example demonstrates how to access a PolygonMesh-specific property.
	First it starts out getting the generic Facets collection. From the 
	FacetCollection it creates a SubComponent. From the SubComponent, it gets 
	the PolygonMesh-specific PolygonFaceCollection
*/
NewScene( null, false );
// Setup: create a PolygonMesh and get its facet collection
var grid = Application.ActiveSceneRoot.AddGeometry( "Grid", "MeshSurface" );
var fcs = grid.ActivePrimitive.Geometry.Facets;
// Convert it to SubComponent and just for fun, consider only four facets 
var subcmp = fcs.SubComponent;
var subset = new Array(27,28,35,36);
subcmp.ElementArray = subset;
// Now convert the SubComponent to a PolygonFaceCollection using the
// SubComponent.ComponentCollection property and then loop through the 
// list of PolygonFaces, getting its adjacent neighbors
var polyfaces = subcmp.ComponentCollection;
for (var i=0; i<polyfaces.Count; i++) {
	Application.LogMessage( "PolygonFace[" + i + "] at index " + polyfaces(i) + " is next to..." );
	var adjacent = polyfaces(i).NeighborPolygons();
	for (var j=0; j<adjacent.Count; j++) {
		Application.LogMessage( "\t...the PolygonFace at index " + adjacent(j).Index );
	}
}
// Expected results:
//INFO : PolygonFace[0] at index PolygonFace is next to...
//INFO : 	...the PolygonFace at index 19
//INFO : 	...the PolygonFace at index 28
//INFO : 	...the PolygonFace at index 35
//INFO : 	...the PolygonFace at index 26
//INFO : PolygonFace[1] at index PolygonFace is next to...
//INFO : 	...the PolygonFace at index 20
//INFO : 	...the PolygonFace at index 29
//INFO : 	...the PolygonFace at index 36
//INFO : 	...the PolygonFace at index 27
//INFO : PolygonFace[2] at index PolygonFace is next to...
//INFO : 	...the PolygonFace at index 27
//INFO : 	...the PolygonFace at index 36
//INFO : 	...the PolygonFace at index 43
//INFO : 	...the PolygonFace at index 34
//INFO : PolygonFace[3] at index PolygonFace is next to...
//INFO : 	...the PolygonFace at index 28
//INFO : 	...the PolygonFace at index 37
//INFO : 	...the PolygonFace at index 44
//INFO : 	...the PolygonFace at index 35

#
# This example demonstrates how to determine which polygons are selected
# in the UI by using the SubComponent object via the Selection
# 
app = Application
app.NewScene( "", 0 )
# Setup: create a polygon mesh and select some polygons on it
disc = app.ActiveSceneRoot.AddGeometry( "Sphere", "MeshSurface" )
app.Selection.Clear()
app.Selection.SetAsText( disc.Name + ".poly[20,3,47,0,16,34,22]" );
# When components are selected, the first member of the Selection
# is returned as a CollectionItem which can then be converted to a
# SubComponent object. From there, the ComponentCollection property
# converts it to the proper collection type (in this case a 
# PolygonFaceCollection)
selected = app.Selection(0).SubComponent.ComponentCollection
for sel in selected :
	app.LogMessage( "poly[%s] is selected." % (sel.Index) )
# Expected results:
#INFO : poly[20] is selected.
#INFO : poly[3] is selected.
#INFO : poly[47] is selected.
#INFO : poly[0] is selected.
#INFO : poly[16] is selected.
#INFO : poly[34] is selected.
#INFO : poly[22] is selected.