Question

我想在系列上的LbuttonDown上绘制一个圆圈。我正在做的是我使用DrawLine工具并在OnMouseDownTchart事件上添加一行。但问题是我一直在Scroll Axis线上消失。

由于阿克沙伊

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

Teechart线的DrawLine工具在Scroll Axis上消失

1 个答案: