图线的拖线工具在滚动轴上消失

Question

我想在Series的LbuttonDown上画一个圆。我正在做的是使用DrawLine工具并在OnMouseDownTchart事件上添加一条线。但问题是，只要我做滚动轴，线就消失了。

谢谢阿卡什

Answer 1

我正试图用下面的代码重现问题，但它似乎对我来说很好。每次我点击图表，它都会在随机位置添加一条线。我还可以滚动图表，用鼠标右键拖动。

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"是什么意思