创建动态图表工具提示

本文关键字：工具提示 动态 创建 | 更新日期: 2023-09-27 17:54:58

我使用Visual Studio 2010和WFC创建数据点图。为了创建我的图表，我有一个数据表，有3个不同的列;这些是日期，值和序列。这个表是根据SQL查询动态生成的，然后我在x轴上绘制Date，在y轴上绘制Value。我想要实现的是，当鼠标在图表上的一个点上时，工具提示显示日期，值和与这些值相关的唯一串行。现在我使用

myChart.Series["mySeries"].ToolTip = "XValue = #VALY 'r'nDate = #VALX{d}";
然而，

显然没有显示这些值对应的序列号。我尝试使用工具提示事件，但是在尝试从像素中的数据点转换为图形上的精确绘图时出现了一些问题。我希望这个问题是有意义的。

创建动态图表工具提示

我解决了问题，感谢@vikas。我没有尝试分配一个通用的工具提示，而是为每个点分配了一个单独的工具提示。

        int points = 0;
        //For every row in the values table, plot the date against the variable value
        foreach (DataRow row in Values.Rows)
        {
            myChart.Series[Variable].Points.AddXY(Convert.ToDateTime(row["Date"].ToString()), row["Variable"].ToString());               
            myChart.Series[Variable].Points[points].ToolTip = Variable + " = #VALY 'r'nDate = #VALX{d} 'r'nSerial = " + row["Serial"].ToString();
            points += 1;
        }

所以计数器从0开始，然后对数据表Values中的每一行将1添加到点数上，并为每个点单独分配一个唯一的工具提示。

just for Idea

For i As Integer = 0 To dt.Rows.Count - 1
                    StrSeries = Convert.ToString(dt.Rows(i)("Engage_Title"))
                    ChartRecentActivities.Series.Add(StrSeries)
                    ChartRecentActivities.Series(StrSeries).ChartType = SeriesChartType.Line
                    ChartRecentActivities.Series(StrSeries).MarkerStyle = MarkerStyle.Circle
                    ChartRecentActivities.Series(StrSeries).MarkerSize = 7
                    ChartRecentActivities.Series(StrSeries).BorderWidth = 3
                    ChartRecentActivities.Series(StrSeries).ShadowOffset = 2
                    ChartRecentActivities.Series(StrSeries).Legend = "Default"
                    ChartRecentActivities.Series(StrSeries).LegendText = StrSeries
                    ChartRecentActivities.Series(StrSeries).LegendToolTip = StrSeries
                    ChartRecentActivities.Series(StrSeries).ToolTip = StrSeries
                    For j As Integer = 0 To ChartRecentActivities.ChartAreas(0).Axes(0).CustomLabels.Count - 1
                        dv.RowFilter = "Engage_Title = '" & StrSeries & "' AND Transaction_Date = '" & ChartRecentActivities.ChartAreas(0).Axes(0).CustomLabels(j).Text & "'"
                        If (dv.Count > 0) Then
                            dblPoint = Convert.ToDouble(dv.Item(0)(0))
                        Else
                            dblPoint = 0
                        End If
                        ChartRecentActivities.Series(StrSeries).Points.Add(dblPoint)
                        ChartRecentActivities.Series(StrSeries).Points(j).ToolTip = StrSeries & " = " & dblPoint.ToString()
                    Next
                Next

看最后一行

ChartRecentActivities.Series(StrSeries).Points(j).ToolTip = StrSeries & " = " & dblPoint.ToString()
相关文章：