Заполнение объекта Chart случайными числами для двух и более Series

void __fastcall TDigitalForm::Timer1Timer(TObject *Sender)
{
 
 
          //Добавляю элементы
      if(Chart1->Series[0]->Count() == 0)
   Chart1->Series[0]->AddXY(0,(50),"",clTeeColor);
 else Chart1->Series[0]->AddXY(Chart1->Series[0]->XValues->Last()+1,(50),"",clTeeColor);

// Видим только 400 элементов.
if(Chart1->Series[0]->Count()  > 400) //<-- Count of elements we want see. Over 400-run diagramm
  {
  Chart1->BottomAxis->Automatic  =  false;        // <-- we dont want automatic scaling
  Chart1->BottomAxis->Maximum  =  Series1->XValues->Last();
  Chart1->BottomAxis->Minimum  =  Chart1->BottomAxis->Maximum-400;   //<-- we want to see the last 400 points only
 
   }

// H-файл
 
// класс формы:
class TForm1 : public TForm
{
__published:    // IDE-managed Components
    // здесь ничего не трогаем
 
private:    // User declarations
public:     // User declarations
    __fastcall TForm1(TComponent* Owner);
 
    void __fastcall MakeIt(TPointSeries *serie, double val, TColor color); // Добавляем прототип
};

// CPP-файл
void __fastcall TForm1::MakeIt(TPointSeries *serie, double val, TColor color)
{
    // Добавляю элементы
    if (serie->Count() == 0)
        serie->AddXY(0, val, "", color);
    else
        serie->AddXY(Chart1->Series[0]->XValues->Last() + 1, val, "", color);
 
    if (serie->Count() > 400) // <-- Count of elements we want see. Over 400-run diagramm
    {
        Chart1->BottomAxis->Automatic = false; // <-- we dont want automatic scaling
        Chart1->BottomAxis->Maximum = Series1->XValues->Last(); // <--- Всегда по ПЕРВОЙ серии
        Chart1->BottomAxis->Minimum = Chart1->BottomAxis->Maximum - 400;
    }
}
 
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
    // Добавляю элементы
    MakeIt(Series1, 50, clTeeColor);
    MakeIt(Series2, 80, clRed);
    // тут можешь еще хоть десяток серий обрабатывать
}

 void __fastcall TDigitalForm::MakeIt(TPointSeries *serie, double val, TColor color)
{
    
    if (serie->Count() == 0)
        serie->AddXY(0, val, "", color);
    else
        serie->AddXY(Chart1->Series[0]->XValues->Last() + 1, val, "", color); 
//ЕСЛИ ТУТ ДОБАВИТЬ ЧТО ТО 
//..ТИПО serie->AddXY(Chart2->XValues->Last() + 1, val, "", color);
// - То ОшИБКА
Без этой строки работает вроде бы верно
 
 
    if (serie->Count() > 400) // <-- Count of elements we want see. Over 400-run diagramm
    {
        Chart1->BottomAxis->Automatic = false; // <-- we dont want automatic scaling
        Chart1->BottomAxis->Maximum = Series1->XValues->Last(); // <--- Âñåãäà ïî ÏÅÐÂÎÉ ñåðèè
        Chart1->BottomAxis->Minimum = Chart1->BottomAxis->Maximum - 400;
// Тут добавляем второй чарт. И следующие.
        Chart2->BottomAxis->Automatic = false; // <-- we dont want automatic scaling
        Chart2->BottomAxis->Maximum = Series2->XValues->Last(); // <--- Âñåãäà ïî ÏÅÐÂÎÉ ñåðèè
        Chart2->BottomAxis->Minimum = Chart2->BottomAxis->Maximum - 400;
    }
}

// H-файл
 
// класс формы:
class TForm1 : public TForm
{
__published:    // IDE-managed Components
    // здесь ничего не трогаем
 
private:    // User declarations
public:     // User declarations
    __fastcall TForm1(TComponent* Owner);
 
    void __fastcall MakeIt(TChart *chart, TPointSeries *serie, double val, TColor color); // Прототип изменяем
};

void __fastcall TForm1::MakeIt(TChart *chart, TPointSeries *serie, double val, TColor color)
{
    const int MaxPoints = 400; // Сделал константой, чтобы можно было быстро поменять...
 
    if (serie->Count() == 0)
        serie->AddXY(0, val, "", color);
    else
        serie->AddXY(serie->XValues->Last() + 1, val, "", color);
 
    if (serie->SeriesIndex == 0 && serie->Count() > MaxPoints) // BottomAxis обновляем только у ПЕРВОЙ серии чарта
    {
        chart->BottomAxis->Automatic = false;
        chart->BottomAxis->Maximum =  serie->XValues->Last();
        chart->BottomAxis->Minimum = chart->BottomAxis->Maximum - MaxPoints;
    }
}
 
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
 
    // Добавляю элементы
    MakeIt(Chart1, Series1, 50, clTeeColor);
    MakeIt(Chart1, Series2, 80, clRed);
 
    MakeIt(Chart2, Series3, 150, clTeeColor);
    MakeIt(Chart2, Series4, 280, clRed);
 
    MakeIt(Chart3, Series5, 42, clTeeColor);
    MakeIt(Chart3, Series6, 560, clRed);
    // можешь еще десяток чартов затолкать. 
    // Только учти, чем больше будет чартов (и серий, соответственно) - тем больше будет тормозов
}

// в классе формы:
void __fastcall MakeIt(TChart *chart, TPointSeries *serie, double val, TColor color, bool is_first = false);

// реализация
void __fastcall TForm1::MakeIt(TChart *chart, TPointSeries *serie, double val, TColor color, bool is_first)
{
    const int MaxPoints = 400; // Сделал константой, чтобы можно было быстро поменять...
 
    if (serie->Count() == 0)
        serie->AddXY(0, val, "", color);
    else
        serie->AddXY(serie->XValues->Last() + 1, val, "", color);
 
    if (is_first && serie->Count() > MaxPoints) // BottomAxis обновляем только у ПЕРВОЙ серии чарта
    {
        chart->BottomAxis->Automatic = false;
        chart->BottomAxis->Maximum =  serie->XValues->Last();
        chart->BottomAxis->Minimum = chart->BottomAxis->Maximum - MaxPoints;
    }
}
 
// вызывать - вот так:
    MakeIt(Chart1, Series1, 50, clTeeColor, true); // КАЖДАЯ первая серия на чарте - с True
    MakeIt(Chart1, Series2, 80, clRed); // вторая - без ничего, по умолчанию - false
 
    MakeIt(Chart2, Series3, 150, clTeeColor, true);
    MakeIt(Chart2, Series4, 280, clRed);
    // и так далее ...