8.04 Bug Report - Bollinger bands

[Marius]

I get an invalid pointer operation when using a Bollinger band in my chart. I've been able to reproduce it by creating a new application and dropping an empty TCHart on it. Then in FormCreate I add the following

Code: Select all

procedure TForm1.FormCreate(Sender: TObject);
var
  Line       : TLineSeries;
  Bollinger1 : TLineSeries;
begin
  Line := TLineSeries.Create(Chart1);
  Line.FillSampleValues(100);

  Bollinger1 := TLineSeries.Create(Chart1);
  Bollinger1.SetFunction(TBollingerFunction.Create(Chart1));
  Bollinger1.DataSources.Clear;
  Bollinger1.DataSources.Add(Line);

  Chart1.AddSeries(Line);
  Chart1.AddSeries(Bollinger1);
end;

Run the app. It displays fine but when I close the app it throws the exception.

Can someone please verify that my code is correct..

BRgds,
Marius

[Marius]

Why am I not getting any replies?

Is this not the place to go for support on TChart?

[Narcís]

Hi Marius,

Yes, this is the place to receive support with TeeChart. We didn't reply earlier because, as you can see in our public holidays calendar, yesterday was a local holiday.

Regarding your technical inquiry, we have been able to reproduce the issue here. We found that doing the same using the chart editor works fine. We will need some time to investigate which is the problem here and will get back to you when we have further news.

[Marius]

Thanks Narcís

Didn't realise there was a holiday

Awaiting your reply on the main issue following your investigation

BRgds,
Marius

[Pep]

Hello Marius,

basically, the problem is the lines order. Using the same code, but changing a little bit the order should work fine :

Code: Select all

procedure TForm1.FormCreate(Sender: TObject);
var
  Line       : TLineSeries;
  Bollinger1 : TLineSeries;
begin
  Line := TLineSeries.Create(Chart1);
  Line.FillSampleValues(100);
  Chart1.AddSeries(Line);

  Bollinger1 := TLineSeries.Create(Chart1);
  Chart1.AddSeries(Bollinger1);
  Bollinger1.SetFunction(TBollingerFunction.Create(Chart1));

  Bollinger1.DataSources.Clear;
  Bollinger1.DataSources.Add(Line);
end;