AutoTernaryPlot Object
The AutoTernaryPlot object contains ternary plot options.
Derived from: AutoPlot object (All methods and properties of AutoPlot apply to this object.)
Properties
Methods
Remarks
Multiple ternary plots are created when a Durov or Piper plot is created. When changing plot properties via automation, each ternary plot must be modified individually. See AddDurovGraph, AddextendedDurovGraph, and AddPiperGraph for examples of setting the references to the various plots.
Example
This example shows how to use the AutoTernaryPlot object.
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
'Declares Plot as an object
Dim Plot As Object
'Creates a plot document in Grapher and
'assigns it to the variable named "Plot"
Set Plot = GrapherApp.Documents.Add(grfPlotDoc)
'Declares Shapes as an object
Dim Shapes As Object
'Assigns the AutoShapes collection to
'the variable named "Shapes"
Set Shapes = Plot.Shapes
'Declares Graph1 as an Object
Dim Graph1 As Object
'Creates a ternary graph and assigns it
'to the variable named "Graph1"
Set Graph1 = Shapes.AddTernaryGraph(GrapherApp.Path + "/samples/ternary.dat")
'Declares TernaryPlot as Object
Dim TernaryPlot As Object
'Assigns the plot to the variable named "TernaryPlot"
Set TernaryPlot = Graph1.Plots(1)
End Sub