Description

Enables isolation in the 3D view based on the selected array of nodes (equivalent to the GUI object tree right click option "Isolate and Fit View to Selection").

Syntax

IsolateAndFit3DView ( nodes(), types() )

Parameters

nodes() As Long

The array of node numbers to isolate.

types() As String

An array of strings defining the meaning of the matching nodes() entry. Permitted values are:

                    "geometry" or "fnode",

                    "material" or "glass",

                    "coating",

                    "scatter",

                    "surface property" or "raytrace control",

                    "surface roughness"

                    "keyword"

Remarks

This function enables isolation in the 3D view for the selected array of nodes. Because node numbers are not unique across the entire list of objects that can be isolated on, for each nodes() entry a types() entry is also required to identify the object being isolated (i.e. the combination of node number and type is unique).

Examples

The below example isolates surfaces in the 3D view if they are part of the geometry "Geometry.Heliar Housing v2.Lens 2 Rear Ring 133" or using the "BBAR" coating.

Sub Main

          Dim nodes() As Long, types() As String

          ReDim nodes(1)

          ReDim types(1)

          nodes(0) = FindFullName( "Geometry.Heliar Housing v2.Lens 2 Rear Ring 133" )

          types(0) = "geometry"

          nodes(1) = FindCoating( "BBAR" )

          types(1) = "coating"

          Print "Initial Isolation"

          IsolateAndFit3DView(nodes(), types())

End Sub

See Also

EnableIsolateFeature

AddToIsolateAndFit3DView

RemoveFromIsolateAndFit3DView