我想在系列的 LbuttonDown 上画一个圆圈。我正在做的是我正在使用 DrawLine 工具并在 OnMouseDownTchart 事件上添加一条线。但问题是,一旦我滚动轴,这条线就会消失。
谢谢阿克谢
我正在尝试使用下面的代码重现问题,但在这里对我来说似乎工作正常。每次单击图表时,它都会在随机位置添加一条线。而且我仍然可以用鼠标右键拖动相同的图表来滚动。
Private Sub Form_Load()
TChart1.Aspect.View3D = False
TChart1.AddSeries scPoint
Dim i As Integer
For i = 0 To 20
TChart1.Series(0).Add i, "", clTeeColor
Next i
TChart1.Tools.Add tcDrawLine
TChart1.Tools.Items(0).asDrawLine.EnableDraw = False
End Sub
Private Sub TChart1_OnMouseDown(ByVal Button As TeeChart.EMouseButton, ByVal Shift As TeeChart.EShiftState, ByVal X As Long, ByVal Y As Long)
With TChart1.Tools.Items(0).asDrawLine
.AddLine Rnd * 20, Rnd * 20, Rnd * 20, Rnd * 20
End With
End Sub
我正在使用 TeeChart ActiveX v2013.0.1.0。
也许你正在做一些OnMouseDown
与滚动动作相冲突的事情。
如果您仍然发现它有问题,请改进更具体的问题。一些代码会有所帮助。另外我不确定“LbuttonDown on Series”是什么意思。