activeDoc.active_set.project3D

Returns and sets the 3D projection properties for the active 3D set. These properties correspond to settings in the 3D Projection-Set dialog box and in the Options-Set dialog box (accessed by clicking Options in the 3D Projection-Set dialog box). For descriptions of these properties, seeapp.project3D and app.options3D.

3D Projection-Set Dialog Box activeDoc.active_set Properties
Option	Property
keep 3D data	.project3D.as3D
shaded	.project3D.asShaded
as wireframe	.project3D.asWireframe
remove hidden lines	.project3D.asHLR
create thick/thin lines	.project3D.useThickThin
create surface borders	.project3D.createSurfaceBorders
create contour fills	.project3D.createContour = {true \| false}

shaded-Set Dialog Box activeDoc.active_set Properties
Option	Property
Resolution	.project3D.resolution
Depth	.project3D.Raster_kind
Layer	.project3D.level
Draw only visible portions	.project3D.onlyPortions

Options-Set Dialog Box activeDoc.active_set Properties
Option	activeDoc.active_set Property
Thin line threshold	.project3D.smoothSurfaces
Pens: for thick lines	.project3D.thickPen
Pens: for thin lines	.project3D.thinPen
Fill contour with color	.project3D.contourFillColor.type .project3D.contourFillColor.tone .project3D.contourFillColor.color
Optimize: as lines	.project3D.HLR_type = "lines"
Optimize: as polylines	.project3D.HLR_type = "polylines"
Optimize: as Bézier paths	.project3D.HLR_type = "beziers"
Optimize: generate ellipses	.project3D.HLR_plusEllipses = {true \| false}
Advanced Settings: Optimize for speed	.project3D.HLR_optSpeed = {true \| false}

# Set the "Thin line threshold" to 25 for the active set/session.
If ( exists(activeDoc.active_set) = TRUE ) then
activeDoc.active_set.project3D.smoothSurfaces = 25
End If

# Create HLR contour fills and set contour fill color properties
If ( exists( activeDoc.active_set)= true ) then
If ( activeDoc.active_set.project3D.createContour = true ) then
Message "Creating outer HLR contour filled with " + \
activeDoc.active_set.project3D.contourFillColor
End If
End If

If ( exists( activeDoc.active_set)= true ) then
# Set for active 3D set in current session
activeDoc.active_set.project3D.createContour = true
activeDoc.active_set.project3D.contourFillColor = "{RGB 50 80 120}"
Else
# Set application global preference
App.project3D.createContour = true
App.project3D.contourFillColor.type = "colorRef"
App.project3D.contourFillColor.color = "50% Gray"
App.project3D.contourFillColor.tone = 1
End If