Description Adds a selected array of objects into an isolated 3D view (equivalent to the GUI object tree right click option "Add to Isolate and Fit View to Selection").
Syntax AddToIsolateAndFit3DView ( nodes(), types() )
Parameters nodes() As Long The array of node numbers to add to an isolated view.
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 adds some number of surfaces into an isolated 3D view based upon selected array of objects. Because node numbers are not unique across the entire list of objects that support isolation, 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 will add surfaces to an isolated 3D view if they are using the "Mechanical Scatter" raytrace control.
Sub Main Dim nodes() As Long, types() As String
ReDim nodes(0) ReDim types(0) nodes(0) = FindRaytraceCtrl( "Mechanical Scatter" ) types(0) = "raytrace control" AddToIsolateAndFit3DView(nodes(), types()) End Sub
See Also
|