TChart, динамическое добавление Series

[Nigadyai]

Здравствуйте, столкнулся с такой проблемой...
по нажатии кнопки нужно создать N-ное количество Series (тип - линия)
с разными параметрами:
1) рандомный цвет
2) кастомное имя
а застрял на самом начале, а именно добавлении Series... в инете нашел подходящий код

Chart1.AddSeries(TLineSeries.Create( Self ));

либо такой

var
  Series:TLineSeries;
begin
  Series:=TLineSeries.Create(self);
  Series.Name:='Series1';
  Series.ParentChart:=Chart1; // Или Chart1.AddSeries(Series);
end;

Но компилятор ругается на TLineSeries, обзывая "необозначеным идентификатором". В чем может быть проблема?

[raxp]

uses chart,series,TeEngine;

[Nigadyai]

спасибо, с этим разобрался так...

  for i:=1 to NumRow do begin
    Series:=TLineSeries.Create(self);
    Series.Name:=StringGrid1.Cells[0,i];
    Series.ParentChart:=Chart1;
  end;

Теперь остается их удалить все разом

  for i:=Chart1.SeriesCount-1 downto 0   do
  begin
    if Chart1.Series[i].Name='Series'+IntToStr(i+1) then
    Chart1.Series[i].Free;
  end;

такой вариант мне не подходит, так как названия графиков - отдельные слова и неизвестно в каком порядке они были созданы. Есть еще какие варианты?

[raxp]

...так как, удалить все разом (тогда причем тут порядок и имя) или все-таки выборочно?

[Nigadyai]

нет, удалить надо все серии разом, но как (это и есть вопрос) я не нашел.
Нашел вот только пример удаления серий, которые пронумерованы.

[Anatole]

Сообщение от Nigadyai

нет, удалить надо все серии разом, но как (это и есть вопрос) я не нашел.
Нашел вот только пример удаления серий, которые пронумерованы.

Храни серии в динамическом массиве.

[Stilet]

А что Chart1.SeriesList.Clear
отменили?

[Nigadyai]

хм... с массивом муторно, но вариант, попробую сейчас...
Chart1.SeriesList.Clear - вот что получается
http://imagehost.spark-media.ru/i/75...98B5C3F20D.jpg

[Stilet]

Дык это не метод виноват, а стратегия, которую ты выбрал для создания серий.

[Nigadyai]

procedure TAdminForm.Button2Click(Sender: TObject);
var NumRow,NumCol:integer;
MS:array of string;
Series:TLineSeries;
begin
....
  if length(MS)>0 then begin
      for i:=1 to Length(MS) do begin
      if Chart1.Series[i].Name=MS[i] then Chart1.Series[i].Free;
      end;
  SetLength(MS,0);
  end;
  for i:=1 to NumRow do begin
    Series:=TLineSeries.Create(self);
    SetLength(MS,Length(MS)+1);
    MS[i]:=StringGrid1.Cells[0,i];;
    Series.Name:=MS[i];
    Showmessage(MS[i]);
    Series.ParentChart:=Chart1;
  end;

получается так:
1) сначала у нас массив MS пустой
2) добавляя серии, записываем их названия в MS
3) Всё, нужные серии созданы и выведены в чарт.
4) жмем заново кнопку..
5) массив MS не пустой уже, находим номер нужных нам серий и удаляем.
Вроде ж так должно быть?

Дык это не метод виноват, а стратегия, которую ты выбрал для создания серий.

Ну если виновата стратегия, то при каких условиях будет работать метод Chart1.SeriesList.Clear?