FarPoint.Win.Chart.BarSeries series = new FarPoint.Win.Chart.BarSeries();
series.SeriesName = "Series 0";
series.Values.Add(2.0);
series.Values.Add(4.0);
series.Values.Add(3.0);
series.Values.Add(5.0);
series.VaryColors = true;
series.TopBevel = new FarPoint.Win.Chart.CircleBevel(6.0F, 6.0F);
series.BottomBevel = new FarPoint.Win.Chart.CircleBevel(6.0F, 6.0F);
//series.TopBevel = new FarPoint.Win.Chart.NoBevel();
//series.BottomBevel = new FarPoint.Win.Chart.NoBevel();
FarPoint.Win.Chart.YPlotArea plotArea = new FarPoint.Win.Chart.YPlotArea();
plotArea.Location = new System.Drawing.PointF(0.2F, 0.2F);
plotArea.Size = new System.Drawing.SizeF(0.6F, 0.6F);
plotArea.Series.Add(series);
FarPoint.Win.Chart.ChartModel model = new FarPoint.Win.Chart.ChartModel();
model.PlotAreas.Add(plotArea);
FarPoint.Win.Spread.Chart.SpreadChart chart =new FarPoint.Win.Spread.Chart.SpreadChart();
chart.Model = model;
chart.Size = new System.Drawing.Size(200, 200);
chart.Location = new System.Drawing.Point(50, 50);
chart.ViewType = FarPoint.Win.Chart.ChartViewType.View3D;
FpSpread1.Sheets(0).Charts.Add(chart);
Dim series As New FarPoint.Win.Chart.BarSeries()
series.SeriesName = "Series 0"
series.Values.Add(2.0)
series.Values.Add(4.0)
series.Values.Add(3.0)
series.Values.Add(5.0)
series.VaryColors = True
series.TopBevel = New FarPoint.Win.Chart.CircleBevel(6.0F, 6.0F)
series.BottomBevel = New FarPoint.Win.Chart.CircleBevel(6.0F, 6.0F)
'series.TopBevel = New FarPoint.Win.Chart.NoBevel()
'series.BottomBevel = New FarPoint.Win.Chart.NoBevel()
Dim plotArea As New FarPoint.Win.Chart.YPlotArea()
plotArea.Location = New System.Drawing.PointF(0.2F, 0.2F)
plotArea.Size = New System.Drawing.SizeF(0.6F, 0.6F)
plotArea.Series.Add(series)
Dim model As New FarPoint.Win.Chart.ChartModel()
model.PlotAreas.Add(plotArea)
Dim chart As New FarPoint.Win.Spread.Chart.SpreadChart()
chart.Model = model
chart.Size = New System.Drawing.Size(200, 200)
chart.Location = New System.Drawing.Point(50, 50)
chart.ViewType = FarPoint.Win.Chart.ChartViewType.View3D
FpSpread1.Sheets(0).Charts.Add(chart)