Построить зависимость между двумя параметрами, расположенными в StringGrid

float I,J,x,t;
for(I = 0; I < StringGrid1->ColCount;I++)
StringGrid1->Cells[I][0]="ПАРАМЕТР"+FloatToStr(I);
for(I=0;I<StringGrid1->RowCount;I++)
StringGrid1->Cells[0][I]= " " + FloatToStr(I);
 
for(J=0;J<StringGrid1->RowCount;J++)
StringGrid1->Cells[J][I]=FloatToStr(I) + ":" + FloatToStr(J);
 
for (float J=1;J<StringGrid1->RowCount;J++)
t= StrToFloat(StringGrid1->Cells[0][J]); // ПЕРВЫЙ СТОЛБЕЦ.
 
 
for (float J=1;J<StringGrid1->RowCount;J++)
 
 
x=StrToFloat(StringGrid1->Cells[1][J]);// ВТОРОЙ СТОЛБЕЦ
  {
 
  Series1->AddXY(x,t, "", clGreen);
 
   }

for (float J=1;J<StringGrid1->RowCount;J++)
t= StrToFloat(StringGrid1->Cells[0][J]); // бесполезный(пустой) цикл, в конце в t будет последнее значение
 
 
for (float J=1;J<StringGrid1->RowCount;J++)
x=StrToFloat(StringGrid1->Cells[1][J]);// // бесполезный(пустой) цикл, в конце в x будет последнее значение
 
  { 
 
  Series1->AddXY(x,t, "", clGreen); // не относится к циклу, выполнится один раз
 
   }

for (float J=1;J<StringGrid1->RowCount;J++)
{
t= StrToFloat(StringGrid1->Cells[0][J]); // ПЕРВЫЙ СТОЛБЕЦ.
x=StrToFloat(StringGrid1->Cells[1][J]);// ВТОРОЙ СТОЛБЕЦ
Series1->AddXY(x,t, "", clGreen);
}