Dim LD As LineData
Dim G As Graph
pnl2Lines.Initialize("pnlStackedBars")
Activity.AddView(pnl2Lines, 1%x, 42dip, 99%x, Activity.Height - 42dip - 50dip)
LD.Initialize
LD.Target = pnl2Lines
Charts.AddLineColor(LD, Colors.Red) 'First line color
Charts.AddLineColor(LD, Colors.Blue) 'Second line color
Charts.AddLineMultiplePoints(LD, i, Array As Float(3.0, 2.6), False)
Charts.AddLineMultiplePoints(LD, i, Array As Float(3.1, 3.0), False)
Charts.AddLineMultiplePoints(LD, i, Array As Float(3.2, 1.7), False)
Charts.AddLineMultiplePoints(LD, i, Array As Float(3.3, 2.4), False)
Charts.AddLineMultiplePoints(LD, i, Array As Float(3.4, 2.3), False)
Charts.AddLineMultiplePoints(LD, i, Array As Float(3.5, 2.0), False)
Charts.AddLineMultiplePoints(LD, i, Array As Float(3.6, 2.7), False)
G.Initialize
G.Title = "Grafico velocità"
G.XAxis = "gare"
G.YAxis = "m/s"
G.YStart = 0
G.YEnd = 5
G.YInterval = 0.5
G.AxisColor = Colors.Black
Charts.DrawLineChart(G, LD, Colors.White)