разобрался методом тыка
можно делать как то так
for i:=0 to N-1 do
begin
Chart1.SeriesList.AddGroup(name[i]);
while ( ...)
begin
...
Chart1.AddSeries(TAreaSeries);
k:=Chart1.SeriesCount-1;
Chart1.SeriesList.Groups.Items[i].Add(chart1.Series[k]);
...
end;
end;
|