//Set different colors to each state Chart.PaletteName = Palette.Five; int i=0; foreach(Shape shape in layer.Shapes) { if(i >= Chart.Palette.Length ) { i=0; Chart.PaletteName = Palette.Four; } shape.Background.Color = Chart.Palette[i];
<%@ Page Language="vb" Description="dotnetCHARTING Component" %> <%@ Register TagPrefix="dotnet" Namespace="dotnetCHARTING" Assembly="dotnetCHARTING"%> <%@ Import Namespace="System.Drawing" %> <%@ Import Namespace="System.Drawing.Drawing2D" %> <%@ Import Namespace="dotnetCHARTING.Mapping" %> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <title>.netCHARTING Sample</title> <script runat="server"> ' Demonstrates how to iterate a layer of shape files. Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Chart.Type = ChartType.Map Chart.Size = "1215x580" Chart.Title = " World map colored by Country" Chart.TempDirectory = "temp" Chart.Debug=True Chart.TitleBox.Position = TitleBoxPosition.Full Chart.LegendBox.Template="%name" Chart.Mapping.ZoomCenterPoint = New PointF(16f,0f) Chart.Mapping.ZoomPercentage = 110
Chart.ChartArea.Background = New Background(Color.FromArgb(142,195,236),Color.FromArgb(63,137,200),90) Dim layer As MapLayer = MapDataEngine.LoadLayer("../../../Images/MapFiles/world.shp")
'Set different colors to each state Chart.PaletteName = Palette.Five Dim i As Integer=0 For Each shape As Shape In layer.Shapes If i >= Chart.Palette.Length Then i=0 Chart.PaletteName = Palette.Four End If shape.Background.Color = Chart.Palette(i)
Previous