ChartPageNavigator

Jim · Post by **Jim** » Sat Dec 06, 2003 5:41 pm

Hi,

Any way to disable this control after a manual scroll. I mean if you click and drag or zoom the control appears to be active but doesn't function. One must click and drag to un-zoom before control will function.

Thanks

Marjan · Post by **Marjan** » Sun Dec 07, 2003 8:23 pm

Hi, Jim.

Perhaps you could use the followig code in the TChart.OnAfterDraw event :

Code: Select all

procedure TForm1.Chart1AfterDraw(Sender: TObject);
begin
  With Sender as TCustomChart do
    if Axes.Bottom.Automatic = true then MaxPointsPerPage := 5
    else MaxPointsPerPage := 0;
end;

This way yon can disable the page navigator if for any reason zooming/scrolling is used.