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