If you want zoom the Chart instead of Data, you need use Chart1.ZoomWheel property instead of Chart1.Zoom.MouseWheel. You should do the same as next line code:
Code: Select all
Chart1.ZoomWheel:= pmwnormal;
Thanks in advance
Code: Select all
Chart1.ZoomWheel:= pmwnormal;
Code: Select all
procedure TForm3.FormCreate(Sender: TObject);
begin
Series1.FillSampleValues(10);
Series1.Pen.Visible := false;
end;