以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- chart辅助线,更换条件后无法清除了 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=165322) |
-- 作者:百事可乐 -- 发布时间:2021/5/13 19:31:00 -- chart辅助线,更换条件后无法清除了 chart辅助线,更换条件后无法清除了。多次重画的结果就是图表上到处都是辅助线了 ------------------------------------ 以下是画辅助线的代码,在Y坐标变化后,再次生成时,结果出现了二条辅助线,有什么办法可以清除之前画的辅助线吗? Dim C1Cha As C1.Win.C1Chart.C1Chart = Chart.BaseControl Dim tl As C1.Win.C1Chart.TrendLine = C1Cha.ChartGroups(0).ChartData.TrendsList.AddNewTrendLine() tl.LineStyle.Color = Color.blue \'.Gold \'线条颜色 tl.LineStyle.Thickness = 1 \'线宽 tl.LineStyle.Pattern = 0 \'直线样式 0-5 Dim zxb = New zxb柱状图标辅助线() zxb.SetXY(New PointF(minsjxh-0.5,10),New PointF( maxsjxh -0.5 ,10)) ! tl.CustomTrendLine = zxb |
-- 作者:有点蓝 -- 发布时间:2021/5/13 20:28:00 -- 试试: Dim C1Cha As C1.Win.C1Chart.C1Chart = Chart.BaseControl C1Cha.ChartGroups(0).ChartData.TrendsList.clear Dim tl As C1.Win.C1Chart.TrendLine = C1Cha.ChartGroups(0).ChartData.TrendsList.AddNewTrendLine() |
-- 作者:百事可乐 -- 发布时间:2021/5/14 10:10:00 -- 昨晚自己琢磨出来了,哈哈。 C1Cha.ChartGroups(0).ChartData.TrendsList.clear() 就是这条。我查了VB释放资源的方法。 @有点蓝 老师也答复了啊,谢谢老师。
|