AutoLightingObj Object

The AutoLightingObj object controls lighting settings for the surface data, grid, and function maps, 3D bubble plots, 3D pie charts, and 3D doughnut plots.

Properties

Ambient

Application

Diffuse

HorzAngle

LightingMode

Parent

Shininess

Specular

VertAngle

Example

The following script demonstrates how the AutoLightingObj object is used.

Sub Main

 

'Declares GrapherApp as an object

  Dim GrapherApp As Object

 

 'Creates an instance of the Grapher Application object

 'and assigns it to the variable named "GrapherApp"

  Set GrapherApp = CreateObject("Grapher.Application")

 

 'Makes Grapher visible

  GrapherApp.Visible = True

 

 'Creates a plot document in Grapher and assigns

 'it to the variable named "Plot"

  Set Plot = GrapherApp.Documents.Add(grfPlotDoc)

 

 'Declares Graph as an object

  Dim Graph As Object

 

'Add a surface data map

Set Graph = Plot.Shapes.AddSurfaceDataMapGraph("C:\Program Files\Golden Software\Grapher\Samples\DEMOGRID.DAT",1,3,2)

 

'Declares SurfaceDataMap as object

Dim SurfaceDataMap as object

 

'Set the surface data map to the SurfaceDataMap object

Set SurfaceDataMap = Graph.Plots.Item(1)

 

'Set SurfLight = the surface lighting object

Set SurfLight = SurfaceDataMap.Lighting

 

End Sub