Member 13410460 Ответов: 1

Как скрыть информацию после перемещения мыши в datacharts ?


Всем Привет,
У меня есть этот код, который я показываю информацию диаграммы данных с помощью перемещения мыши, но дело в том, что после того, как информация будет видна, она не исчезнет, поэтому чем больше я перемещаю мышь в точках, тем больше беспорядка получает моя диаграмма.

Это мой код для отображения информации:


<pre>Private Sub Chart1_MouseMove(ByVal sender As Object, ByVal e As MouseEventArgs) Handles Chart1.MouseMove
        Dim result As HitTestResult = Chart1.HitTest(e.X, e.Y)
        If result.ChartElementType = ChartElementType.DataPoint Then
            ' Get getails from DataPoint.
            Dim department As String = result.Series.Name
            Dim Year As String = result.Series.Points(result.PointIndex).AxisLabel
            ' Dim NOA As String = result.Series.Points(result.PointIndex).AxisLabel
            Dim Total As Double = result.Series.Points(result.PointIndex).YValues(0)
            Dim thisPt As PointF = New PointF(Convert.ToSingle(result.Series.Points(result.PointIndex).XValue),
                                              Convert.ToSingle(result.Series.Points(result.PointIndex).YValues(0)))
            Dim ca As CalloutAnnotation = New CalloutAnnotation With {
                .AnchorDataPoint = result.Series.Points(result.PointIndex),
                .X = thisPt.X + 1,
                .Y = thisPt.Y + 1,
                .CalloutStyle = CalloutStyle.SimpleLine,
                .ForeColor = Color.Coral,
                .Font = New Font("Tahoma", 9, FontStyle.Bold),
                .Name = department,
                .Text = Year & " - " & department & Total
            }
            Chart1.Annotations(department) = ca
            Chart1.Invalidate()


        End If

    End Sub


Что я уже пробовал:

Я погуглил, и там было несколько примеров, но ничего такого, над чем я мог бы работать.


Спасибо вам всем,
С уважением

Gerry Schmitz

Может быть, "подсказка" сработает лучше ... они предназначены для этой цели.

1 Ответов

Рейтинг:
7

Member 13410460

Мне просто нужно было использовать эту строку кода перед остальными, и она исправила это.

Chart1.Annotations.Clear()