Chart Serie zur Laufzeit erstellen

[marabu]

Hi René,

alles ist richtig so wie du es machst. Hier dein Code, nur etwas aufgeräumter:

Delphi-Quellcode:

begin
  with Form57 do
  begin
    with Chart1 do
    begin
      AutoRepaint := False;
      FreeAllSeries;
      Assign(Chart5);
      for i := 0 to Pred(Chart5.SeriesCount) do
        AddSeries(CloneChartSeries(Chart5[i]));
      AutoRepaint := True;
    end;
    Show;
  end;
end;

Den BarStyle kannst du umstellen, sobald du dir einen Zeiger auf die BarSeries besorgt hast. Nehmen wir an es handele sich um die erste Serie im Chart, dann geht das z.B. so:

Delphi-Quellcode:

with Chart1[0] as TBarSeries do
  BarStyle := Succ(BarStyle);

Die Export-Funktionalität von TeeChart ist kein Bestandteil von TChart.

Grüße vom marabu