ChartDirector 5.1 (.NET Edition)

Surface Wireframe

          

This example demonstrates the rectangular and triangular wireframes of a surface at different interpolation levels, configured using SurfaceChart.setShadingMode and SurfaceChart.setInterpolation.

Source Code Listing

[ASP.NET - VB Version] NetWebCharts\VBNetASP\surfacewireframe.aspx
(Click here on how to convert this code to Visual Studio code-behind style.) 
<%@ Page Language="VB" Debug="true" %>
<%@ Import Namespace="ChartDirector" %>
<%@ Register TagPrefix="chart" Namespace="ChartDirector" Assembly="netchartdir" %>
<script runat="server">

'
' Create chart
'
Protected Sub createChart(viewer As WebChartViewer, img As String)

    ' The x and y coordinates of the grid
    Dim dataX() As Double = {-2, -1, 0, 1, 2}
    Dim dataY() As Double = {-2, -1, 0, 1, 2}

    ' The values at the grid points. In this example, we will compute the values
    ' using the formula z = square_root(15 - x * x - y * y).
    Dim dataZ((UBound(dataX) + 1) * (UBound(dataY) + 1) - 1) As Double
    For yIndex As Integer = 0 To UBound(dataY)
        Dim y As Double = dataY(yIndex)
        For xIndex As Integer = 0 To UBound(dataX)
            Dim x As Double = dataX(xIndex)
            dataZ(yIndex * (UBound(dataX) + 1) + xIndex) = Math.Sqrt(15 - x * x - y _
                 * y)
        Next
    Next

    ' Create a SurfaceChart object of size 380 x 340 pixels, with white (ffffff)
    ' background and grey (888888) border.
    Dim c As SurfaceChart = New SurfaceChart(380, 340, &Hffffff, &H888888)

    ' Demonstrate various wireframes with and without interpolation
    If img = "0" Then
        ' Original data without interpolation
        c.addTitle("5 x 5 Data Points<*br*>Standard Shading", "Arial Bold", 12)
        c.setContourColor(&H80ffffff)
    ElseIf img = "1" Then
        ' Original data, spline interpolated to 40 x 40 for smoothness
        c.addTitle("5 x 5 Points - Spline Fitted to 40 x 40<*br*>Standard Shading", _
            "Arial Bold", 12)
        c.setContourColor(&H80ffffff)
        c.setInterpolation(40, 40)
    ElseIf img = "2" Then
        ' Rectangular wireframe of original data
        c.addTitle("5 x 5 Data Points<*br*>Rectangular Wireframe")
        c.setShadingMode(Chart.RectangularFrame)
    ElseIf img = "3" Then
        ' Rectangular wireframe of original data spline interpolated to 40 x 40
        c.addTitle( _
            "5 x 5 Points - Spline Fitted to 40 x 40<*br*>Rectangular Wireframe")
        c.setShadingMode(Chart.RectangularFrame)
        c.setInterpolation(40, 40)
    ElseIf img = "4" Then
        ' Triangular wireframe of original data
        c.addTitle("5 x 5 Data Points<*br*>Triangular Wireframe")
        c.setShadingMode(Chart.TriangularFrame)
    Else
        ' Triangular wireframe of original data spline interpolated to 40 x 40
        c.addTitle( _
            "5 x 5 Points - Spline Fitted to 40 x 40<*br*>Triangular Wireframe")
        c.setShadingMode(Chart.TriangularFrame)
        c.setInterpolation(40, 40)
    End If

    ' Set the center of the plot region at (200, 170), and set width x depth x height
    ' to 200 x 200 x 150 pixels
    c.setPlotRegion(200, 170, 200, 200, 150)

    ' Set the plot region wall thichness to 5 pixels
    c.setWallThickness(5)

    ' Set the elevation and rotation angles to 20 and 30 degrees
    c.setViewAngle(20, 30)

    ' Set the data to use to plot the chart
    c.setData(dataX, dataY, dataZ)

    ' Output the chart
    viewer.Image = c.makeWebImage(Chart.JPG)

End Sub

'
' Page Load event handler
'
Protected Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)

    createChart(WebChartViewer0, "0")
    createChart(WebChartViewer1, "1")
    createChart(WebChartViewer2, "2")
    createChart(WebChartViewer3, "3")
    createChart(WebChartViewer4, "4")
    createChart(WebChartViewer5, "5")

End Sub

</script>
<html>
<body>
    <chart:WebChartViewer id="WebChartViewer0" runat="server" />
    <chart:WebChartViewer id="WebChartViewer1" runat="server" />
    <chart:WebChartViewer id="WebChartViewer2" runat="server" />
    <chart:WebChartViewer id="WebChartViewer3" runat="server" />
    <chart:WebChartViewer id="WebChartViewer4" runat="server" />
    <chart:WebChartViewer id="WebChartViewer5" runat="server" />
</body>
</html>

[ASP.NET - C# Version] NetWebCharts\CSharpASP\surfacewireframe.aspx
(Click here on how to convert this code to Visual Studio code-behind style.) 
<%@ Page Language="C#" Debug="true" %>
<%@ Import Namespace="ChartDirector" %>
<%@ Register TagPrefix="chart" Namespace="ChartDirector" Assembly="netchartdir" %>
<script runat="server">

//
// Create chart
//
protected void createChart(WebChartViewer viewer, string img)
{
    // The x and y coordinates of the grid
    double[] dataX = {-2, -1, 0, 1, 2};
    double[] dataY = {-2, -1, 0, 1, 2};

    // The values at the grid points. In this example, we will compute the values
    // using the formula z = square_root(15 - x * x - y * y).
    double[] dataZ = new double[(dataX.Length) * (dataY.Length)];
    for(int yIndex = 0; yIndex < dataY.Length; ++yIndex) {
        double y = dataY[yIndex];
        for(int xIndex = 0; xIndex < dataX.Length; ++xIndex) {
            double x = dataX[xIndex];
            dataZ[yIndex * (dataX.Length) + xIndex] = Math.Sqrt(15 - x * x - y * y);
        }
    }

    // Create a SurfaceChart object of size 380 x 340 pixels, with white (ffffff)
    // background and grey (888888) border.
    SurfaceChart c = new SurfaceChart(380, 340, 0xffffff, 0x888888);

    // Demonstrate various wireframes with and without interpolation
    if (img == "0") {
        // Original data without interpolation
        c.addTitle("5 x 5 Data Points\nStandard Shading", "Arial Bold", 12);
        c.setContourColor(unchecked((int)0x80ffffff));
    } else if (img == "1") {
        // Original data, spline interpolated to 40 x 40 for smoothness
        c.addTitle("5 x 5 Points - Spline Fitted to 40 x 40\nStandard Shading",
            "Arial Bold", 12);
        c.setContourColor(unchecked((int)0x80ffffff));
        c.setInterpolation(40, 40);
    } else if (img == "2") {
        // Rectangular wireframe of original data
        c.addTitle("5 x 5 Data Points\nRectangular Wireframe");
        c.setShadingMode(Chart.RectangularFrame);
    } else if (img == "3") {
        // Rectangular wireframe of original data spline interpolated to 40 x 40
        c.addTitle("5 x 5 Points - Spline Fitted to 40 x 40\nRectangular Wireframe");
        c.setShadingMode(Chart.RectangularFrame);
        c.setInterpolation(40, 40);
    } else if (img == "4") {
        // Triangular wireframe of original data
        c.addTitle("5 x 5 Data Points\nTriangular Wireframe");
        c.setShadingMode(Chart.TriangularFrame);
    } else {
        // Triangular wireframe of original data spline interpolated to 40 x 40
        c.addTitle("5 x 5 Points - Spline Fitted to 40 x 40\nTriangular Wireframe");
        c.setShadingMode(Chart.TriangularFrame);
        c.setInterpolation(40, 40);
    }

    // Set the center of the plot region at (200, 170), and set width x depth x
    // height to 200 x 200 x 150 pixels
    c.setPlotRegion(200, 170, 200, 200, 150);

    // Set the plot region wall thichness to 5 pixels
    c.setWallThickness(5);

    // Set the elevation and rotation angles to 20 and 30 degrees
    c.setViewAngle(20, 30);

    // Set the data to use to plot the chart
    c.setData(dataX, dataY, dataZ);

    // Output the chart
    viewer.Image = c.makeWebImage(Chart.JPG);
}

//
// Page Load event handler
//
protected void Page_Load(object sender, EventArgs e)
{
    createChart(WebChartViewer0, "0");
    createChart(WebChartViewer1, "1");
    createChart(WebChartViewer2, "2");
    createChart(WebChartViewer3, "3");
    createChart(WebChartViewer4, "4");
    createChart(WebChartViewer5, "5");
}

</script>
<html>
<body>
    <chart:WebChartViewer id="WebChartViewer0" runat="server" />
    <chart:WebChartViewer id="WebChartViewer1" runat="server" />
    <chart:WebChartViewer id="WebChartViewer2" runat="server" />
    <chart:WebChartViewer id="WebChartViewer3" runat="server" />
    <chart:WebChartViewer id="WebChartViewer4" runat="server" />
    <chart:WebChartViewer id="WebChartViewer5" runat="server" />
</body>
</html>

[Windows Forms - VB Version] NetWinCharts\VBNetWinCharts\surfacewireframe.vb 
Imports System
Imports Microsoft.VisualBasic
Imports ChartDirector

Public Class surfacewireframe
    Implements DemoModule

    'Name of demo module
    Public Function getName() As String Implements DemoModule.getName
        Return "Surface Wireframe"
    End Function

    'Number of charts produced in this demo module
    Public Function getNoOfCharts() As Integer Implements DemoModule.getNoOfCharts
        Return 6
    End Function

    'Main code for creating charts
    Public Sub createChart(viewer As WinChartViewer, img As String) _
        Implements DemoModule.createChart

        ' The x and y coordinates of the grid
        Dim dataX() As Double = {-2, -1, 0, 1, 2}
        Dim dataY() As Double = {-2, -1, 0, 1, 2}

        ' The values at the grid points. In this example, we will compute the values
        ' using the formula z = square_root(15 - x * x - y * y).
        Dim dataZ((UBound(dataX) + 1) * (UBound(dataY) + 1) - 1) As Double
        For yIndex As Integer = 0 To UBound(dataY)
            Dim y As Double = dataY(yIndex)
            For xIndex As Integer = 0 To UBound(dataX)
                Dim x As Double = dataX(xIndex)
                dataZ(yIndex * (UBound(dataX) + 1) + xIndex) = Math.Sqrt(15 - x * x _
                     - y * y)
            Next
        Next

        ' Create a SurfaceChart object of size 380 x 340 pixels, with white (ffffff)
        ' background and grey (888888) border.
        Dim c As SurfaceChart = New SurfaceChart(380, 340, &Hffffff, &H888888)

        ' Demonstrate various wireframes with and without interpolation
        If img = "0" Then
            ' Original data without interpolation
            c.addTitle("5 x 5 Data Points<*br*>Standard Shading", "Arial Bold", 12)
            c.setContourColor(&H80ffffff)
        ElseIf img = "1" Then
            ' Original data, spline interpolated to 40 x 40 for smoothness
            c.addTitle( _
                "5 x 5 Points - Spline Fitted to 40 x 40<*br*>Standard Shading", _
                "Arial Bold", 12)
            c.setContourColor(&H80ffffff)
            c.setInterpolation(40, 40)
        ElseIf img = "2" Then
            ' Rectangular wireframe of original data
            c.addTitle("5 x 5 Data Points<*br*>Rectangular Wireframe")
            c.setShadingMode(Chart.RectangularFrame)
        ElseIf img = "3" Then
            ' Rectangular wireframe of original data spline interpolated to 40 x 40
            c.addTitle( _
                "5 x 5 Points - Spline Fitted to 40 x 40<*br*>Rectangular Wireframe")
            c.setShadingMode(Chart.RectangularFrame)
            c.setInterpolation(40, 40)
        ElseIf img = "4" Then
            ' Triangular wireframe of original data
            c.addTitle("5 x 5 Data Points<*br*>Triangular Wireframe")
            c.setShadingMode(Chart.TriangularFrame)
        Else
            ' Triangular wireframe of original data spline interpolated to 40 x 40
            c.addTitle( _
                "5 x 5 Points - Spline Fitted to 40 x 40<*br*>Triangular Wireframe")
            c.setShadingMode(Chart.TriangularFrame)
            c.setInterpolation(40, 40)
        End If

        ' Set the center of the plot region at (200, 170), and set width x depth x
        ' height to 200 x 200 x 150 pixels
        c.setPlotRegion(200, 170, 200, 200, 150)

        ' Set the plot region wall thichness to 5 pixels
        c.setWallThickness(5)

        ' Set the elevation and rotation angles to 20 and 30 degrees
        c.setViewAngle(20, 30)

        ' Set the data to use to plot the chart
        c.setData(dataX, dataY, dataZ)

        ' Output the chart
        viewer.Chart = c

    End Sub

End Class

[Windows Forms - C# Version] NetWinCharts\CSharpWinCharts\surfacewireframe.cs 
using System;
using ChartDirector;

namespace CSharpChartExplorer
{
    public class surfacewireframe : DemoModule
    {
        //Name of demo module
        public string getName() { return "Surface Wireframe"; }

        //Number of charts produced in this demo module
        public int getNoOfCharts() { return 6; }

        //Main code for creating charts
        public void createChart(WinChartViewer viewer, string img)
        {
            // The x and y coordinates of the grid
            double[] dataX = {-2, -1, 0, 1, 2};
            double[] dataY = {-2, -1, 0, 1, 2};

            // The values at the grid points. In this example, we will compute the
            // values using the formula z = square_root(15 - x * x - y * y).
            double[] dataZ = new double[(dataX.Length) * (dataY.Length)];
            for(int yIndex = 0; yIndex < dataY.Length; ++yIndex) {
                double y = dataY[yIndex];
                for(int xIndex = 0; xIndex < dataX.Length; ++xIndex) {
                    double x = dataX[xIndex];
                    dataZ[yIndex * (dataX.Length) + xIndex] = Math.Sqrt(15 - x * x -
                        y * y);
                }
            }

            // Create a SurfaceChart object of size 380 x 340 pixels, with white
            // (ffffff) background and grey (888888) border.
            SurfaceChart c = new SurfaceChart(380, 340, 0xffffff, 0x888888);

            // Demonstrate various wireframes with and without interpolation
            if (img == "0") {
                // Original data without interpolation
                c.addTitle("5 x 5 Data Points\nStandard Shading", "Arial Bold", 12);
                c.setContourColor(unchecked((int)0x80ffffff));
            } else if (img == "1") {
                // Original data, spline interpolated to 40 x 40 for smoothness
                c.addTitle(
                    "5 x 5 Points - Spline Fitted to 40 x 40\nStandard Shading",
                    "Arial Bold", 12);
                c.setContourColor(unchecked((int)0x80ffffff));
                c.setInterpolation(40, 40);
            } else if (img == "2") {
                // Rectangular wireframe of original data
                c.addTitle("5 x 5 Data Points\nRectangular Wireframe");
                c.setShadingMode(Chart.RectangularFrame);
            } else if (img == "3") {
                // Rectangular wireframe of original data spline interpolated to 40 x
                // 40
                c.addTitle(
                    "5 x 5 Points - Spline Fitted to 40 x 40\nRectangular Wireframe")
                    ;
                c.setShadingMode(Chart.RectangularFrame);
                c.setInterpolation(40, 40);
            } else if (img == "4") {
                // Triangular wireframe of original data
                c.addTitle("5 x 5 Data Points\nTriangular Wireframe");
                c.setShadingMode(Chart.TriangularFrame);
            } else {
                // Triangular wireframe of original data spline interpolated to 40 x
                // 40
                c.addTitle(
                    "5 x 5 Points - Spline Fitted to 40 x 40\nTriangular Wireframe");
                c.setShadingMode(Chart.TriangularFrame);
                c.setInterpolation(40, 40);
            }

            // Set the center of the plot region at (200, 170), and set width x depth
            // x height to 200 x 200 x 150 pixels
            c.setPlotRegion(200, 170, 200, 200, 150);

            // Set the plot region wall thichness to 5 pixels
            c.setWallThickness(5);

            // Set the elevation and rotation angles to 20 and 30 degrees
            c.setViewAngle(20, 30);

            // Set the data to use to plot the chart
            c.setData(dataX, dataY, dataZ);

            // Output the chart
            viewer.Chart = c;
        }
    }
}

© 2012 Advanced Software Engineering Limited. All rights reserved.