[Windows Forms - C# version] NetWinCharts\CSharpWinCharts\polarline.cs
using System;
using ChartDirector;
namespace CSharpChartExplorer
{
public class polarline : DemoModule
{
//Name of demo module
public string getName() { return "Polar Line Chart"; }
//Number of charts produced in this demo module
public int getNoOfCharts() { return 1; }
//Main code for creating chart.
//Note: the argument chartIndex is unused because this demo only has 1 chart.
public void createChart(WinChartViewer viewer, int chartIndex)
{
// The data for the chart
double[] data0 = {90, 25, 40, 55, 68, 44, 79, 85, 50};
double[] angles0 = {15, 60, 110, 180, 230, 260, 260, 310, 340};
double[] data1 = {80, 91, 66, 80, 92, 87};
double[] angles1 = {40, 65, 88, 110, 150, 200};
// Create a PolarChart object of size 460 x 500 pixels, with a grey (e0e0e0) background
// and 1 pixel 3D border
PolarChart c = new PolarChart(460, 500, 0xe0e0e0, 0x000000, 1);
// Add a title to the chart at the top left corner using 15pt Arial Bold Italic font.
// Use a wood pattern as the title background.
c.addTitle("Polar Line Chart Demo", "Arial Bold Italic", 15).setBackground(
c.patternColor("@/images/wood.png"));
// Set center of plot area at (230, 280) with radius 180 pixels, and white (ffffff)
// background.
c.setPlotArea(230, 280, 180, 0xffffff);
// Set the grid style to circular grid, with grids below the chart layers
c.setGridStyle(false, false);
// Add a legend box at top-center of plot area (230, 35) using horizontal layout. Use
// 10pt Arial Bold font, with 1 pixel 3D border effect.
LegendBox b = c.addLegend(230, 35, false, "Arial Bold", 9);
b.setAlignment(Chart.TopCenter);
b.setBackground(Chart.Transparent, Chart.Transparent, 1);
// Set angular axis as 0 - 360, with a spoke every 30 units
c.angularAxis().setLinearScale(0, 360, 30);
// Add a blue (0xff) line layer to the chart using (data0, angle0)
PolarLineLayer layer0 = c.addLineLayer(data0, 0x0000ff, "Close Loop Line");
layer0.setAngles(angles0);
// Set the line width to 2 pixels
layer0.setLineWidth(2);
// Use 11 pixel triangle symbols for the data points
layer0.setDataSymbol(Chart.TriangleSymbol, 11);
// Enable data label and set its format
layer0.setDataLabelFormat("({value},{angle})");
// Set the data label text box with light blue (0x9999ff) backgruond color and 1 pixel
// 3D border effect
layer0.setDataLabelStyle().setBackground(0x9999ff, Chart.Transparent, 1);
// Add a red (0xff0000) line layer to the chart using (data1, angle1)
PolarLineLayer layer1 = c.addLineLayer(data1, 0xff0000, "Open Loop Line");
layer1.setAngles(angles1);
// Set the line width to 2 pixels
layer1.setLineWidth(2);
// Use 11 pixel diamond symbols for the data points
layer1.setDataSymbol(Chart.DiamondSymbol, 11);
// Set the line to open loop
layer1.setCloseLoop(false);
// Enable data label and set its format
layer1.setDataLabelFormat("({value},{angle})");
// Set the data label text box with light red (0xff9999) backgruond color and 1 pixel 3D
// border effect
layer1.setDataLabelStyle().setBackground(0xff9999, Chart.Transparent, 1);
// Output the chart
viewer.Chart = c;
//include tool tip for the chart
viewer.ImageMap = c.getHTMLImageMap("clickable", "",
"title='[{dataSetName}] ({radius}, {angle})'");
}
}
}
[Windows Forms - VB Version] NetWinCharts\VBNetWinCharts\polarline.vb
Imports System
Imports Microsoft.VisualBasic
Imports ChartDirector
Public Class polarline
Implements DemoModule
'Name of demo module
Public Function getName() As String Implements DemoModule.getName
Return "Polar Line Chart"
End Function
'Number of charts produced in this demo module
Public Function getNoOfCharts() As Integer Implements DemoModule.getNoOfCharts
Return 1
End Function
'Main code for creating chart.
'Note: the argument chartIndex is unused because this demo only has 1 chart.
Public Sub createChart(viewer As WinChartViewer, chartIndex As Integer) _
Implements DemoModule.createChart
' The data for the chart
Dim data0() As Double = {90, 25, 40, 55, 68, 44, 79, 85, 50}
Dim angles0() As Double = {15, 60, 110, 180, 230, 260, 260, 310, 340}
Dim data1() As Double = {80, 91, 66, 80, 92, 87}
Dim angles1() As Double = {40, 65, 88, 110, 150, 200}
' Create a PolarChart object of size 460 x 500 pixels, with a grey (e0e0e0) background and 1
' pixel 3D border
Dim c As PolarChart = New PolarChart(460, 500, &He0e0e0, &H000000, 1)
' Add a title to the chart at the top left corner using 15pt Arial Bold Italic font. Use a
' wood pattern as the title background.
c.addTitle("Polar Line Chart Demo", "Arial Bold Italic", 15).setBackground(c.patternColor( _
"@/wood.png"))
' Set center of plot area at (230, 280) with radius 180 pixels, and white (ffffff)
' background.
c.setPlotArea(230, 280, 180, &Hffffff)
' Set the grid style to circular grid, with grids below the chart layers
c.setGridStyle(False, False)
' Add a legend box at top-center of plot area (230, 35) using horizontal layout. Use 10pt
' Arial Bold font, with 1 pixel 3D border effect.
Dim b As LegendBox = c.addLegend(230, 35, False, "Arial Bold", 9)
b.setAlignment(Chart.TopCenter)
b.setBackground(Chart.Transparent, Chart.Transparent, 1)
' Set angular axis as 0 - 360, with a spoke every 30 units
c.angularAxis().setLinearScale(0, 360, 30)
' Add a blue (0xff) line layer to the chart using (data0, angle0)
Dim layer0 As PolarLineLayer = c.addLineLayer(data0, &H0000ff, "Close Loop Line")
layer0.setAngles(angles0)
' Set the line width to 2 pixels
layer0.setLineWidth(2)
' Use 11 pixel triangle symbols for the data points
layer0.setDataSymbol(Chart.TriangleSymbol, 11)
' Enable data label and set its format
layer0.setDataLabelFormat("({value},{angle})")
' Set the data label text box with light blue (0x9999ff) backgruond color and 1 pixel 3D
' border effect
layer0.setDataLabelStyle().setBackground(&H9999ff, Chart.Transparent, 1)
' Add a red (0xff0000) line layer to the chart using (data1, angle1)
Dim layer1 As PolarLineLayer = c.addLineLayer(data1, &Hff0000, "Open Loop Line")
layer1.setAngles(angles1)
' Set the line width to 2 pixels
layer1.setLineWidth(2)
' Use 11 pixel diamond symbols for the data points
layer1.setDataSymbol(Chart.DiamondSymbol, 11)
' Set the line to open loop
layer1.setCloseLoop(False)
' Enable data label and set its format
layer1.setDataLabelFormat("({value},{angle})")
' Set the data label text box with light red (0xff9999) backgruond color and 1 pixel 3D
' border effect
layer1.setDataLabelStyle().setBackground(&Hff9999, Chart.Transparent, 1)
' Output the chart
viewer.Chart = c
'include tool tip for the chart
viewer.ImageMap = c.getHTMLImageMap("clickable", "", _
"title='[{dataSetName}] ({radius}, {angle})'")
End Sub
End Class
[WPF - C#] NetWPFCharts\CSharpWPFCharts\polarline.cs
using System;
using ChartDirector;
namespace CSharpWPFCharts
{
public class polarline : DemoModule
{
//Name of demo module
public string getName() { return "Polar Line Chart"; }
//Number of charts produced in this demo module
public int getNoOfCharts() { return 1; }
//Main code for creating chart.
//Note: the argument chartIndex is unused because this demo only has 1 chart.
public void createChart(WPFChartViewer viewer, int chartIndex)
{
// The data for the chart
double[] data0 = {90, 25, 40, 55, 68, 44, 79, 85, 50};
double[] angles0 = {15, 60, 110, 180, 230, 260, 260, 310, 340};
double[] data1 = {80, 91, 66, 80, 92, 87};
double[] angles1 = {40, 65, 88, 110, 150, 200};
// Create a PolarChart object of size 460 x 500 pixels, with a grey (e0e0e0) background
// and 1 pixel 3D border
PolarChart c = new PolarChart(460, 500, 0xe0e0e0, 0x000000, 1);
// Add a title to the chart at the top left corner using 15pt Arial Bold Italic font.
// Use a wood pattern as the title background.
c.addTitle("Polar Line Chart Demo", "Arial Bold Italic", 15).setBackground(
c.patternColor("@/images/wood.png"));
// Set center of plot area at (230, 280) with radius 180 pixels, and white (ffffff)
// background.
c.setPlotArea(230, 280, 180, 0xffffff);
// Set the grid style to circular grid, with grids below the chart layers
c.setGridStyle(false, false);
// Add a legend box at top-center of plot area (230, 35) using horizontal layout. Use
// 10pt Arial Bold font, with 1 pixel 3D border effect.
LegendBox b = c.addLegend(230, 35, false, "Arial Bold", 9);
b.setAlignment(Chart.TopCenter);
b.setBackground(Chart.Transparent, Chart.Transparent, 1);
// Set angular axis as 0 - 360, with a spoke every 30 units
c.angularAxis().setLinearScale(0, 360, 30);
// Add a blue (0xff) line layer to the chart using (data0, angle0)
PolarLineLayer layer0 = c.addLineLayer(data0, 0x0000ff, "Close Loop Line");
layer0.setAngles(angles0);
// Set the line width to 2 pixels
layer0.setLineWidth(2);
// Use 11 pixel triangle symbols for the data points
layer0.setDataSymbol(Chart.TriangleSymbol, 11);
// Enable data label and set its format
layer0.setDataLabelFormat("({value},{angle})");
// Set the data label text box with light blue (0x9999ff) backgruond color and 1 pixel
// 3D border effect
layer0.setDataLabelStyle().setBackground(0x9999ff, Chart.Transparent, 1);
// Add a red (0xff0000) line layer to the chart using (data1, angle1)
PolarLineLayer layer1 = c.addLineLayer(data1, 0xff0000, "Open Loop Line");
layer1.setAngles(angles1);
// Set the line width to 2 pixels
layer1.setLineWidth(2);
// Use 11 pixel diamond symbols for the data points
layer1.setDataSymbol(Chart.DiamondSymbol, 11);
// Set the line to open loop
layer1.setCloseLoop(false);
// Enable data label and set its format
layer1.setDataLabelFormat("({value},{angle})");
// Set the data label text box with light red (0xff9999) backgruond color and 1 pixel 3D
// border effect
layer1.setDataLabelStyle().setBackground(0xff9999, Chart.Transparent, 1);
// Output the chart
viewer.Chart = c;
//include tool tip for the chart
viewer.ImageMap = c.getHTMLImageMap("clickable", "",
"title='[{dataSetName}] ({radius}, {angle})'");
}
}
}
[ASP.NET Web Forms - C# version] NetWebCharts\CSharpASP\polarline.aspx
(Click here on how to convert this code to code-behind style.)<%@ Page Language="C#" Debug="true" %>
<%@ Import Namespace="ChartDirector" %>
<%@ Register TagPrefix="chart" Namespace="ChartDirector" Assembly="netchartdir" %>
<!DOCTYPE html>
<script runat="server">
//
// Page Load event handler
//
protected void Page_Load(object sender, EventArgs e)
{
// The data for the chart
double[] data0 = {90, 25, 40, 55, 68, 44, 79, 85, 50};
double[] angles0 = {15, 60, 110, 180, 230, 260, 260, 310, 340};
double[] data1 = {80, 91, 66, 80, 92, 87};
double[] angles1 = {40, 65, 88, 110, 150, 200};
// Create a PolarChart object of size 460 x 500 pixels, with a grey (e0e0e0) background and 1
// pixel 3D border
PolarChart c = new PolarChart(460, 500, 0xe0e0e0, 0x000000, 1);
// Add a title to the chart at the top left corner using 15pt Arial Bold Italic font. Use a wood
// pattern as the title background.
c.addTitle("Polar Line Chart Demo", "Arial Bold Italic", 15).setBackground(c.patternColor(
Server.MapPath("wood.png")));
// Set center of plot area at (230, 280) with radius 180 pixels, and white (ffffff) background.
c.setPlotArea(230, 280, 180, 0xffffff);
// Set the grid style to circular grid, with grids below the chart layers
c.setGridStyle(false, false);
// Add a legend box at top-center of plot area (230, 35) using horizontal layout. Use 10pt Arial
// Bold font, with 1 pixel 3D border effect.
LegendBox b = c.addLegend(230, 35, false, "Arial Bold", 9);
b.setAlignment(Chart.TopCenter);
b.setBackground(Chart.Transparent, Chart.Transparent, 1);
// Set angular axis as 0 - 360, with a spoke every 30 units
c.angularAxis().setLinearScale(0, 360, 30);
// Add a blue (0xff) line layer to the chart using (data0, angle0)
PolarLineLayer layer0 = c.addLineLayer(data0, 0x0000ff, "Close Loop Line");
layer0.setAngles(angles0);
// Set the line width to 2 pixels
layer0.setLineWidth(2);
// Use 11 pixel triangle symbols for the data points
layer0.setDataSymbol(Chart.TriangleSymbol, 11);
// Enable data label and set its format
layer0.setDataLabelFormat("({value},{angle})");
// Set the data label text box with light blue (0x9999ff) backgruond color and 1 pixel 3D border
// effect
layer0.setDataLabelStyle().setBackground(0x9999ff, Chart.Transparent, 1);
// Add a red (0xff0000) line layer to the chart using (data1, angle1)
PolarLineLayer layer1 = c.addLineLayer(data1, 0xff0000, "Open Loop Line");
layer1.setAngles(angles1);
// Set the line width to 2 pixels
layer1.setLineWidth(2);
// Use 11 pixel diamond symbols for the data points
layer1.setDataSymbol(Chart.DiamondSymbol, 11);
// Set the line to open loop
layer1.setCloseLoop(false);
// Enable data label and set its format
layer1.setDataLabelFormat("({value},{angle})");
// Set the data label text box with light red (0xff9999) backgruond color and 1 pixel 3D border
// effect
layer1.setDataLabelStyle().setBackground(0xff9999, Chart.Transparent, 1);
// Output the chart
WebChartViewer1.Image = c.makeWebImage(Chart.SVG);
// Include tool tip for the chart
WebChartViewer1.ImageMap = c.getHTMLImageMap("", "",
"title='[{dataSetName}] ({radius}, {angle})'");
}
</script>
<html>
<head>
<script type="text/javascript" src="cdjcv.js"></script>
</head>
<body>
<chart:WebChartViewer id="WebChartViewer1" runat="server" />
</body>
</html>
[ASP.NET Web Forms - VB Version] NetWebCharts\VBNetASP\polarline.aspx
(Click here on how to convert this code to code-behind style.)<%@ Page Language="VB" Debug="true" %>
<%@ Import Namespace="ChartDirector" %>
<%@ Register TagPrefix="chart" Namespace="ChartDirector" Assembly="netchartdir" %>
<!DOCTYPE html>
<script runat="server">
'
' Page Load event handler
'
Protected Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
' The data for the chart
Dim data0() As Double = {90, 25, 40, 55, 68, 44, 79, 85, 50}
Dim angles0() As Double = {15, 60, 110, 180, 230, 260, 260, 310, 340}
Dim data1() As Double = {80, 91, 66, 80, 92, 87}
Dim angles1() As Double = {40, 65, 88, 110, 150, 200}
' Create a PolarChart object of size 460 x 500 pixels, with a grey (e0e0e0) background and 1
' pixel 3D border
Dim c As PolarChart = New PolarChart(460, 500, &He0e0e0, &H000000, 1)
' Add a title to the chart at the top left corner using 15pt Arial Bold Italic font. Use a wood
' pattern as the title background.
c.addTitle("Polar Line Chart Demo", "Arial Bold Italic", 15).setBackground(c.patternColor( _
Server.MapPath("wood.png")))
' Set center of plot area at (230, 280) with radius 180 pixels, and white (ffffff) background.
c.setPlotArea(230, 280, 180, &Hffffff)
' Set the grid style to circular grid, with grids below the chart layers
c.setGridStyle(False, False)
' Add a legend box at top-center of plot area (230, 35) using horizontal layout. Use 10pt Arial
' Bold font, with 1 pixel 3D border effect.
Dim b As LegendBox = c.addLegend(230, 35, False, "Arial Bold", 9)
b.setAlignment(Chart.TopCenter)
b.setBackground(Chart.Transparent, Chart.Transparent, 1)
' Set angular axis as 0 - 360, with a spoke every 30 units
c.angularAxis().setLinearScale(0, 360, 30)
' Add a blue (0xff) line layer to the chart using (data0, angle0)
Dim layer0 As PolarLineLayer = c.addLineLayer(data0, &H0000ff, "Close Loop Line")
layer0.setAngles(angles0)
' Set the line width to 2 pixels
layer0.setLineWidth(2)
' Use 11 pixel triangle symbols for the data points
layer0.setDataSymbol(Chart.TriangleSymbol, 11)
' Enable data label and set its format
layer0.setDataLabelFormat("({value},{angle})")
' Set the data label text box with light blue (0x9999ff) backgruond color and 1 pixel 3D border
' effect
layer0.setDataLabelStyle().setBackground(&H9999ff, Chart.Transparent, 1)
' Add a red (0xff0000) line layer to the chart using (data1, angle1)
Dim layer1 As PolarLineLayer = c.addLineLayer(data1, &Hff0000, "Open Loop Line")
layer1.setAngles(angles1)
' Set the line width to 2 pixels
layer1.setLineWidth(2)
' Use 11 pixel diamond symbols for the data points
layer1.setDataSymbol(Chart.DiamondSymbol, 11)
' Set the line to open loop
layer1.setCloseLoop(False)
' Enable data label and set its format
layer1.setDataLabelFormat("({value},{angle})")
' Set the data label text box with light red (0xff9999) backgruond color and 1 pixel 3D border
' effect
layer1.setDataLabelStyle().setBackground(&Hff9999, Chart.Transparent, 1)
' Output the chart
WebChartViewer1.Image = c.makeWebImage(Chart.SVG)
' Include tool tip for the chart
WebChartViewer1.ImageMap = c.getHTMLImageMap("", "", _
"title='[{dataSetName}] ({radius}, {angle})'")
End Sub
</script>
<html>
<head>
<script type="text/javascript" src="cdjcv.js"></script>
</head>
<body>
<chart:WebChartViewer id="WebChartViewer1" runat="server" />
</body>
</html>
[ASP.NET MVC - Controller] NetMvcCharts\Controllers\PolarlineController.cs
using System;
using System.Web.Mvc;
using ChartDirector;
namespace NetMvcCharts.Controllers
{
public class PolarlineController : Controller
{
//
// Default Action
//
public ActionResult Index()
{
ViewBag.Title = "Polar Line Chart";
createChart(ViewBag.Viewer = new RazorChartViewer(HttpContext, "chart1"));
return View("~/Views/Shared/ChartView.cshtml");
}
//
// Create chart
//
private void createChart(RazorChartViewer viewer)
{
// The data for the chart
double[] data0 = {90, 25, 40, 55, 68, 44, 79, 85, 50};
double[] angles0 = {15, 60, 110, 180, 230, 260, 260, 310, 340};
double[] data1 = {80, 91, 66, 80, 92, 87};
double[] angles1 = {40, 65, 88, 110, 150, 200};
// Create a PolarChart object of size 460 x 500 pixels, with a grey (e0e0e0) background and 1
// pixel 3D border
PolarChart c = new PolarChart(460, 500, 0xe0e0e0, 0x000000, 1);
// Add a title to the chart at the top left corner using 15pt Arial Bold Italic font. Use a
// wood pattern as the title background.
c.addTitle("Polar Line Chart Demo", "Arial Bold Italic", 15).setBackground(c.patternColor(
Url.Content("~/Content/wood.png")));
// Set center of plot area at (230, 280) with radius 180 pixels, and white (ffffff)
// background.
c.setPlotArea(230, 280, 180, 0xffffff);
// Set the grid style to circular grid, with grids below the chart layers
c.setGridStyle(false, false);
// Add a legend box at top-center of plot area (230, 35) using horizontal layout. Use 10pt
// Arial Bold font, with 1 pixel 3D border effect.
LegendBox b = c.addLegend(230, 35, false, "Arial Bold", 9);
b.setAlignment(Chart.TopCenter);
b.setBackground(Chart.Transparent, Chart.Transparent, 1);
// Set angular axis as 0 - 360, with a spoke every 30 units
c.angularAxis().setLinearScale(0, 360, 30);
// Add a blue (0xff) line layer to the chart using (data0, angle0)
PolarLineLayer layer0 = c.addLineLayer(data0, 0x0000ff, "Close Loop Line");
layer0.setAngles(angles0);
// Set the line width to 2 pixels
layer0.setLineWidth(2);
// Use 11 pixel triangle symbols for the data points
layer0.setDataSymbol(Chart.TriangleSymbol, 11);
// Enable data label and set its format
layer0.setDataLabelFormat("({value},{angle})");
// Set the data label text box with light blue (0x9999ff) backgruond color and 1 pixel 3D
// border effect
layer0.setDataLabelStyle().setBackground(0x9999ff, Chart.Transparent, 1);
// Add a red (0xff0000) line layer to the chart using (data1, angle1)
PolarLineLayer layer1 = c.addLineLayer(data1, 0xff0000, "Open Loop Line");
layer1.setAngles(angles1);
// Set the line width to 2 pixels
layer1.setLineWidth(2);
// Use 11 pixel diamond symbols for the data points
layer1.setDataSymbol(Chart.DiamondSymbol, 11);
// Set the line to open loop
layer1.setCloseLoop(false);
// Enable data label and set its format
layer1.setDataLabelFormat("({value},{angle})");
// Set the data label text box with light red (0xff9999) backgruond color and 1 pixel 3D
// border effect
layer1.setDataLabelStyle().setBackground(0xff9999, Chart.Transparent, 1);
// Output the chart
viewer.Image = c.makeWebImage(Chart.SVG);
// Include tool tip for the chart
viewer.ImageMap = c.getHTMLImageMap("", "",
"title='[{dataSetName}] ({radius}, {angle})'");
}
}
}
[ASP.NET MVC - View] NetMvcCharts\Views\Shared\ChartView.cshtml
@{ Layout = null; }
<!DOCTYPE html>
<html>
<head>
<meta name="viewport" content="width=device-width" />
<title>@ViewBag.Title</title>
<style>
@ViewBag.Style
</style>
@Scripts.Render("~/Scripts/cdjcv.js")
</head>
<body style="margin:5px 0px 0px 5px">
<div style="font:bold 18pt verdana;">
@ViewBag.Title
</div>
<hr style="border:solid 1px #000080; background:#000080" />
<div>
@{
if (ViewBag.Viewer is Array)
{
// Display multiple charts
for (int i = 0; i < ViewBag.Viewer.Length; ++i)
{
@:@Html.Raw(ViewBag.Viewer[i].RenderHTML())
}
}
else
{
// Display one chart only
@:@Html.Raw(ViewBag.Viewer.RenderHTML())
}
}
</div>
</body>
</html>
© 2023 Advanced Software Engineering Limited. All rights reserved.
