ПОВТОРНАЯ ПРОСЬБА. Как отобразить две прямых на плоскости?

[VOVA-74]

Уважаемые знатоки. Обращаюсь к Вам повторно по вопросу построения двух прямых на плоскости. Строю по отдельности прямые отображаются. Строю две прямых одновременно не получается. Плоскость остается пустой. Что за напасть не пойму. Если не трудно посмотрите код. Может где-то закралась ошибка. Заранее благодарен.

float a,d,x,N,P,P1,d1,N1;
d=2;
N=50;
P=d/N;
Label2->Caption=FloatToStr(P);
for(float x=P;x<N;x++)
{
    Series1->AddXY(x,0*x+P, "", clRed);
   }
    Series1->Active=true;
d1=4;
N1=50;
P1=d1/N1;
Label3->Caption=FloatToStr(P1);
for(int x=P1;x<N;x++)
{
    Series2->AddXY(x,0*x+P1, "", clBlue);
   }
    Series2->Active=true;