SeriesList sList = new SeriesList();
sList.ChartType = ChartType.Pie;
Random r = new Random();
for(int i = 0; i < 1; i++)
{
Series sr = new Series();
sr.Name = "Serie" + i.ToString();
sr.Line.LineWidth = 2;
sr.Points.Width = 5;
sr.UnAxisFactor.UnAxisDisplayItemType = UnAxisDisplayItemType.Percent_Name;
for(int x = 0; x < 5; x++)
{
SeriesItem item = new SeriesItem();
item.Name = "item" + x.ToString();
item.YValue = r.Next(50);
item.IsShowFigureText = true;
item.Label.Font = new Font("Tahoma", 9, FontStyle.Bold);
item.Label.ForeColor = Color.Black;
sr.items.Add(item);
}
sList.SeriesCollection.Add(sr);
}
this.hHippoChart1.LegendBox.Visible = false;
this.hHippoChart1.DesignType = ChartDesignType.Simple;
this.hHippoChart1.PaletteType = PaletteType.Classic;
this.hHippoChart1.SeriesListDictionary.Add(sList);
this.hHippoChart1.DrawChart();
Dim sList As New. SeriesList()
sList.ChartType = ChartType.Pie
Dim r As New. Random()
For i As Integer = 0 To 0
Dim sr As New. Series()
sr.Name = "Serie" & i.ToString()
sr.Line.LineWidth = 2
sr.Points.Width = 5
sr.UnAxisFactor.UnAxisDisplayItemType = UnAxisDisplayItemType.Percent_Name
For x As Integer = 0 To 4
Dim item As New. SeriesItem()
item.Name = "item" & x.ToString()
item.YValue = r.[Next](50)
item.IsShowFigureText = True
item.Label.Font = New Font("Tahoma", 9, FontStyle.Bold)
item.Label.ForeColor = Color.Black
sr.items.Add(item)
Next
sList.SeriesCollection.Add(sr)
Next
Me.hHippoChart1.LegendBox.Visible = False
Me.hHippoChart1.DesignType = ChartDesignType.Simple
Me.hHippoChart1.PaletteType = PaletteType.Classic
Me.hHippoChart1.SeriesListDictionary.Add(sList)
Me.hHippoChart1.DrawChart()