tvGraph - Deatiled object description

See: Object tvGraph
The object draws depending on setting the TrendsView.ViewMode property the data of one tvTrend object either in the 2D (3D) graph form or in the table form as a data column. It is possible to set in itself the appearance in the graph mode, for example, the type (linear line, steps, bar, constant, ...), color, width, filling, etc. or in the table mode the background color of cells in column, color and font of the value text,... by its properties. Properties that begin with the Table prefix, set the image in the table mode, for example, the tvGraph.TableTextColor. The column width is specified by the tvTrend.TableColumnWidth property. The object of the tvTrend type can own more objects of the tvGraph type if needed but it always owns one tvGraph object as a default - see tvTrend.GraphDefault. This default object isn't deletable, it is constructed and fixed on the construction of the tvTrend object and if no more tvGraph objects are created by a designer (e.g. by the tvTrend.AddGraph function), the whole trend is drawn by this default object.
If more tvGraph objects are created, then drawing proceeds according to the specified validity function (see: tvTrend.AddGraph and tvGraph.SetValidityFce) and further according to the priority of individual tvGraph objects. See the detailed description in the tvTrend object.
Let's have oTView object of the viewer. The example sets parameters for the basic tvGraph object and creates new tvGraph object (and sets its parameters), by which the trend of the variable is drawn in the time when values exceed the 100 constant (see LimitVal(gt;100)). In the other time it is drawn by the default graph.
Dim oGraph, oGraphDef
Set oGraphDef = oTView.Trends("t1").GraphDefault
oGraphDef.Type = "Linear"
oGraphDef.Color = "#00ff00" 'color setting by RGB String
oGraphDef.FillType = 1 'fill up the area under the graph by the FillColor color
oGraphDef.FillColor = "#008800" 'set the dark green color
Set oGraph = oTView.Trends("t1").AddGraph(1, 0, "LimitVal(gt;100)")
If Not oGraph Is Nothing Then
  '...Setting for the graph mode of the viewer
  oGraph.Color = "#ff0000" 'set the red color
  oGraph.Type = "Linear"
  oGraph.FillType = 11
  oGraph.FillColor = "#880000"
  oGraph.FillColor2 = "#008800"
  oGraph.FillColor2 = "#00ff00"
  oGraph.PointsVisible = true
  oGraph.PointsType = 3
  oGraph.PointsSize = 8
  oGraph.PointsColor = "#000000"
  '...Setting for the table mode of the viewer
  oGraph.TableBgColor = "#aaaaaa"
  oGraph.TableTextColor = "#ff0000"
  oGraph.TableFont.Size = 12
  oGraph.TableFont.Bold = true
  ' .. error
End If
© MICROSYS, spol. s r. o.Tavičská 845/21 703 00 Ostrava-Vítkovice