AxisScroll Tool triggers OnZoom

[rvc]

Hello,

I added an AxisScroll tool for the bottom Axis, but this triggers Onzoom event. Is this meant to be? I would expect OnScroll to be triggered instead...

Regards, Ronald

[Yeray]

Hi Ronald,

Are you using the latest version? The following example works as expected for me here.
May I be missing some relevant setting?

Code: Select all

uses TeeTools, Series;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Chart1.View3D:=false;
  Chart1.AddSeries(TLineSeries).FillSampleValues;
  (Chart1.Tools.Add(TAxisScrollTool) as TAxisScrollTool).Axis:=Chart1.Axes.Bottom;
end;

procedure TForm1.Chart1Zoom(Sender: TObject);
begin
  ShowMessage('OnZoom');
end;

procedure TForm1.Chart1Scroll(Sender: TObject);
begin
  ShowMessage('OnScroll');
end;