Einzelnen Beitrag anzeigen

Koloss

Registriert seit: 21. Jul 2010
74 Beiträge
 
Delphi 2 Desktop
 
#5

AW: Chart Serie Freigeben, gibt nicht frei!

  Alt 11. Jul 2014, 10:57
Problem mit der Series gelöst!

Statt Series := TLineSeries.Create(Chart);
Kommt Series := TLineSeries.Create(nil);

Da finde ich die series übers Chart!

Beim Button funktioniert:
Statt Button.Free;
Kommt RemoveComponent(Button);
Wenn Button := TButton.Create(Self) ist.

Das selbe bei der Series funktionert aber nicht, nur wenn TLineSeries.Create(nil) dann funktioniert das Free.

Code:
    Series := FindSeries('S1', idx);
    if Series <> nil then
    begin
      Chart.SeriesList.Delete(idx);
      RemoveComponent(Series); //oder Series.Free;
    end;
    Series := TLineSeries.Create(nil); // funktioniert nicht TLineSeries.Create(Chart);
    Series.Name := 'S1';
    Series.XValues.DateTime := True;
    Chart.AddSeries(Series);

Geändert von Koloss (11. Jul 2014 um 11:38 Uhr)
  Mit Zitat antworten Zitat