Public ReadOnly Property Setting As ISparklineSetting

Dim instance As Sparkline
Dim value As ISparklineSetting
 
value = instance.Setting

public ISparklineSetting Setting {get;}

fpSpread1.Sheets[0].SetClip(0, 0, 1, 5, "1\t2\t3\t4\t5");
FarPoint.Win.Spread.ExcelSparkline es = new FarPoint.Win.Spread.ExcelSparkline(0, 6, fpSpread1.Sheets[0], new FarPoint.Win.Spread.Model.CellRange(0, 0, 1, 5));
FarPoint.Win.Spread.ExcelSparklineGroup esg = new FarPoint.Win.Spread.ExcelSparklineGroup(new FarPoint.Win.Spread.ExcelSparklineSetting(), FarPoint.Win.Spread.SparklineType.Column);
FarPoint.Win.Spread.Sparkline sl = new FarPoint.Win.Spread.Sparkline(esg, es);

fpSpread1.Sheets[0].Cells[0, 6].Sparkline = sl;
listBox1.Items.Add(fpSpread1.Sheets[0].Cells[0, 6].Sparkline.Setting);

fpSpread1.Sheets(0).SetClip(0, 0, 1, 5, "1" & vbTab & "2" & vbTab & "3" & vbTab & "4" & vbTab & "5")
Dim es As New FarPoint.Win.Spread.ExcelSparkline(0, 6, fpSpread1.Sheets(0), New FarPoint.Win.Spread.Model.CellRange(0, 0, 1, 5))
Dim esg As New FarPoint.Win.Spread.ExcelSparklineGroup(New FarPoint.Win.Spread.ExcelSparklineSetting(), FarPoint.Win.Spread.SparklineType.Column)
Dim sl As New FarPoint.Win.Spread.Sparkline(esg, es)

fpSpread1.Sheets(0).Cells(0, 6).Sparkline = sl
listBox1.Items.Add(fpSpread1.Sheets(0).Cells(0, 6).Sparkline.Setting)