FarPoint.Win.Chart.PolarAreaSeries series0 = new FarPoint.Win.Chart.PolarAreaSeries();
series0.SeriesName = "Series 0";
series0.XValues.AddRange(new Double[] { 0.0, 45.0, 90.0, 180.0, 270.0 });
series0.YValues.AddRange(new Double[] { 1.0, 2.0, 3.0, 4.0, 5.0 });
FarPoint.Win.Chart.PolarAreaSeries series1 = new FarPoint.Win.Chart.PolarAreaSeries();
series1.SeriesName = "Series 1";
series1.XValues.AddRange(new Double[] { 0.0, 45.0, 90.0, 180.0, 270.0 });
series1.YValues.AddRange(new Double[] { 2.0, 3.0, 4.0, 5.0, 6.0 });
FarPoint.Win.Chart.PolarPlotArea plotArea = new FarPoint.Win.Chart.PolarPlotArea();
plotArea.Location = new System.Drawing.PointF(0.2F, 0.2F);
plotArea.Size = new System.Drawing.SizeF(0.6F, 0.6F);
plotArea.Series.Add(series0);
plotArea.Series.Add(series1);
plotArea.XAxis.RulerVisible = true; //polar angle axis
plotArea.XAxis.MinorTickVisible = true;
plotArea.XAxis.Title = "X Axis";
plotArea.XAxis.TitleVisible = true;
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 Size(200, 200);
chart.Location = new Point(100, 100);
fpSpread1.Sheets[0].Charts.Add(chart);
Dim series0 As New FarPoint.Win.Chart.PolarAreaSeries()
series0.SeriesName = "Series 0"
series0.XValues.AddRange(New Double() {0.0, 45.0, 90.0, 180.0, 270.0})
series0.YValues.AddRange(New Double() {1.0, 2.0, 3.0, 4.0, 5.0})
Dim series1 As New FarPoint.Win.Chart.PolarAreaSeries()
series1.SeriesName = "Series 1"
series1.XValues.AddRange(New Double() {0.0, 45.0, 90.0, 180.0, 270.0})
series1.YValues.AddRange(New Double() {2.0, 3.0, 4.0, 5.0, 6.0})
Dim plotArea As New FarPoint.Win.Chart.PolarPlotArea()
plotArea.Location = New System.Drawing.PointF(0.2F, 0.2F)
plotArea.Size = New System.Drawing.SizeF(0.6F, 0.6F)
plotArea.Series.Add(series0)
plotArea.Series.Add(series1)
plotArea.XAxis.RulerVisible = True 'polar angle axis
plotArea.XAxis.MinorTickVisible = True
plotArea.XAxis.Title = "X Axis"
plotArea.XAxis.TitleVisible = True
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 Size(200, 200)
chart.Location = new Point(100, 100)
FpSpread1.Sheets(0).Charts.Add(chart)