Учебник. Настройка диаграммы с помощью событий
В этом учебнике показано, как настраивать диаграммы с помощью событий.Будет добавлен пользовательский маркер в максимальную точку данных, чтобы выделить продавца, у которого были в этом году самые большие продажи.
Для выполнения заданий данного учебника необходимо завершить работы с учебником: Учебник. Привязка данных диаграммы к базе данных.
Добавление пространства имен диаграммы
Для начала откройте файл с выделенным кодом в приложении ASP.NET или переключитесь в представление кода в приложении Windows Form.
В начале файла кода добавьте пространство имен диаграммы, как показано далее.
' For Windows Forms
Imports System.Windows.Forms.DataVisualization.Charting
' For ASP.NET
Imports System.Web.UI.DataVisualization.Charting
// For Windows Forms
using System.Windows.Forms.DataVisualization.Charting;
// For ASP.NET
using System.Web.UI.DataVisualization.Charting;
Добавление события PostPaint
Добавьте обработчик для события Chart.PostPaint.
В Windows Forms это выполняется в конструкторе форм непосредственно после метода InitializeComponent.В ASP.NET это выполняется в методе обработчика события Page_Load, который создается автоматически.
AddHandler Me.Chart1.PostPaint, AddressOf Chart1_PostPaint
this.Chart1.PostPaint += new EventHandler<ChartPaintEventArgs>(Chart1_PostPaint);
Затем добавьте определение метода для вновь зарегистрированного обработчика события.Для этого добавьте следующий код в определение класса.
Private Sub Chart1_PostPaint(ByVal sender As Object, ByVal e As ChartPaintEventArgs)
End Sub
void Chart1_PostPaint(object sender, ChartPaintEventArgs e)
{
}
Применение пользовательской отрисовки
Будет добавлен пользовательский код, выделяющий продавца, у которого были в этом году самые большие продажи.Для этого добавьте приведенный ниже код к созданному обработчику события Chart1_PostPaint, сохраните файл и запустите приложение.
' Make sure all series have been drawn before proceeding
If TypeOf e.ChartElement Is Series AndAlso DirectCast(e.ChartElement, Series).Name = "Series2" Then
Dim s As Series = e.Chart.Series(0)
Dim cg As ChartGraphics = e.ChartGraphics
Dim max As Double = s.Points.FindMaxByValue().YValues(0)
' Highlight the maximum sales this year
For i As Integer = 0 To s.Points.Count - 1
If s.Points(i).YValues(0) = max Then
' Get relative coordinates of the data point
Dim pos As System.Drawing.PointF = System.Drawing.PointF.Empty
pos.X = CSng(cg.GetPositionFromAxis("ChartArea1", AxisName.X, i+1))
pos.Y = CSng(cg.GetPositionFromAxis("ChartArea1", AxisName.Y, max))
' Convert relative coordinates to absolute coordinates.
pos = cg.GetAbsolutePoint(pos)
' Draw concentric circles at the data point
For radius As Integer = 10 To 39 Step 10
cg.Graphics.DrawEllipse(System.Drawing.Pens.Red, _
CSng(pos.X - radius / 2), _
CSng(pos.Y - radius / 2), radius, radius)
Next
End If
Next
End If
// Make sure all series have been drawn before proceeding
if (e.ChartElement is Series && ((Series)e.ChartElement).Name == "Series2" )
{
Series s = e.Chart.Series[0];
ChartGraphics cg = e.ChartGraphics;
double max = s.Points.FindMaxByValue().YValues[0];
// Highlight the maximum sales this year
for(int i = 0; i < s.Points.Count; i++)
{
if(s.Points[i].YValues[0] == max)
{
// Get relative coordinates of the data point
System.Drawing.PointF pos = System.Drawing.PointF.Empty;
pos.X = (float)cg.GetPositionFromAxis("ChartArea1", AxisName.X, i);
pos.Y = (float)cg.GetPositionFromAxis("ChartArea1", AxisName.Y, max);
// Convert relative coordinates to absolute coordinates.
pos = cg.GetAbsolutePoint(pos);
// Draw concentric circles at the data point
for (int radius = 10; radius < 40; radius += 10)
{
cg.Graphics.DrawEllipse(
System.Drawing.Pens.Red,
pos.X - radius / 2,
pos.Y - radius / 2,
radius, radius);
}
}
}
}
См. также
Справочник
System.Windows.Forms.DataVisualization.Charting
System.Web.UI.DataVisualization.Charting