private void Draw()
{
SeriesList sList = new SeriesList();
sList.ChartType = ChartType.Line;
Random r = new Random();
for(int i = 0; i < 1; i++)
{
Series sr = new Series();
sr.Points.Width = 5;
sr.Line.LineWidth = 5;
for(int x = 0; x < 32; x++)
{
SeriesItem item = new SeriesItem();
item.Name = x.ToString();
item.YValue = r.Next(0, 99);
sr.items.Add(item);
}
sList.SeriesCollection.Add(sr);
}
this.sHippoChart1.SeriesListDictionary.Add(sList);
this.sHippoChart1.DrawChart();
}
private void sHippoChart1_ChartMouseDoubleClick(object sender, MouseEventArgs e)
{
if (this.sHippoChart1.ZoomStatus == Hippo.WindowsForm4.ZoomStatus.Out)
{
this.sHippoChart1.Zoomin(3f);
}
else
{
this.sHippoChart1.Zoomout();
}
}
Private Sub Draw()
Dim sList As New. SeriesList()
sList.ChartType = ChartType.Line
Dim r As New. Random()
For i As Integer = 0 To 0
Dim sr As New. Series()
sr.Points.Width = 5
sr.Line.LineWidth = 5
For x As Integer = 0 To 31
Dim item As New. SeriesItem()
item.Name = x.ToString()
item.YValue = r.[Next](0, 99)
sr.items.Add(item)
Next
sList.SeriesCollection.Add(sr)
Next
Me.sHippoChart1.SeriesListDictionary.Add(sList)
Me.sHippoChart1.DrawChart()
End Sub
Private Sub sHippoChart1_ChartMouseDoubleClick(sender As Object, e As MouseEventArgs)
If Me.sHippoChart1.ZoomStatus = Hippo.WindowsForm4.ZoomStatus.Out Then
Me.sHippoChart1.Zoomin(3F)
Else
Me.sHippoChart1.Zoomout()
End If
End Sub