I don't want to initialise the component in code every time - I would like to do by design in the IDE.
I must be missing something.
This is the code:
Code: Select all
procedure TForm1.FormCreate(Sender: TObject);
begin
Series1.FillSampleValues(1000);
ScrollPagerTool:=TScrollPagerTool.Create(Self);
ScrollPagerTool.ParentChart:=Chart1;
ScrollPagerTool.SubChartTChart.Frame.Visible:=False;
ScrollPagerTool.ColorBandTool.StartLine.Active:=True;
ScrollPagerTool.ColorBandTool.EndLine.Active:=True;
ScrollPagerTool.AddSeries(Chart1[0]);
LineSeries1.FillSampleValues(1000);
end;