Динамическое создание серий в Chart1

[lexaltd]

Создаю серии так :

var
Series2 : array of TChartSeries;


  if (Sender as TSpeedButton).Name = 'HorizButton' then
        Series2[i]:=THorizBarSeries.Create(Chart1);
  
  if (Sender as TSpeedButton).Name = 'PieButton' then
         Series2[i]:=TPieSeries.Create(Chart1);
   
  if (Sender as TSpeedButton).Name = 'LineButton' then
         Series2[i]:=TLineSeries.Create(Chart1);

Всё создаётся , но мне надо в серии TLineSeries изменять свойство Pointer , а его там нет
Можно ли сделать чтоб у массива Series2 : array of TChartSeries появились свойства TLineSeries.

Можно конечно создать ещё один массив Series3 : array of TLineSeries , и у него будут все свойства что мне надо , но тогда надо будет переделывать всю программу.

Вопрос: Можно ли сделать чтоб у массива Series2 : array of TChartSeries появились свойства TLineSeries.

Зарание спасибо