'

' This example demonstrates how to work with a subset of segments on a polygon mesh

'

NewScene , false

dim oObj, oSubComponent 

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

set oSegColl = oObj.ActivePrimitive.Geometry.Edges

set oSubComponent = oSegColl(4).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.Edges(7).SubComponent

oSubComponent.AddElement 4

Application.LogMessage oSubComponent & " has " & UBound(oSubComponent.ElementArray)+1 & _

	" components of type " & TypeName(oSubComponent.ComponentCollection(0))

' Expected results:

'INFO : cube.edge[4] has 1 components of type Edge

'INFO : cube1.edge[4,7] has 2 components of type Edge

/*

	This example demonstrates how to access a PolygonMesh-specific property.

	First it starts out getting the generic Segments collection. From the 

	SegmentCollection it creates a SubComponent. From the SubComponent, it 

	gets the PolygonMesh-specific EdgeCollection

*/

NewScene( null, false );

// Setup: create a PolygonMesh and get its segment collection

var cyl = Application.ActiveSceneRoot.AddGeometry( "Disc", "MeshSurface" );

var fcs = cyl.ActivePrimitive.Geometry.Segments;

// Convert it to SubComponent and just for fun, select edges in the middle

var subcmp = fcs.SubComponent;

var subset = new Array(23,40,31,12,6,15,22,39);

subcmp.ElementArray = subset;

// Now convert the SubComponent to a EdgeCollection using the

// SubComponent.ComponentCollection property and then loop 

// through the list of Edges, finding whether it is a boundary

var edgs = subcmp.ComponentCollection;

for (var i=0; i<edgs.Count; i++) {

	var results = ( edgs(i).IsBoundary ) ? "" : "NOT ";

	Application.LogMessage( "Edge[" + i + "] at index " + edgs(i).Index 

		+ " is " + results + "a boundary." );

}

// Expected results:

//INFO : Edge[0] at index 23 is a boundary.

//INFO : Edge[1] at index 40 is a boundary.

//INFO : Edge[2] at index 31 is NOT a boundary.

//INFO : Edge[3] at index 12 is NOT a boundary.

//INFO : Edge[4] at index 6 is NOT a boundary.

//INFO : Edge[5] at index 15 is NOT a boundary.

//INFO : Edge[6] at index 22 is NOT a boundary.

//INFO : Edge[7] at index 39 is NOT a boundary.

#

# This example demonstrates how to determine which edges 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 edges on it

disc = app.ActiveSceneRoot.AddGeometry( "Disc", "MeshSurface" )

app.Selection.Clear()

app.Selection.SetAsText( disc.Name + ".edge[113,115,117,119,121]" );

# 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 an EdgeCollection)

selected = app.Selection(0).SubComponent.ComponentCollection

for sel in selected :

	app.LogMessage( "edge[%s] is selected." % (sel.Index) )

# Expected results:

#INFO : edge[113] is selected.

#INFO : edge[115] is selected.

#INFO : edge[117] is selected.

#INFO : edge[119] is selected.

#INFO : edge[121] is selected.