Вывод двумерного массива в StrigGrid

 //---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
float F[6][6];
float D[6];
int min,max,tmp,maxi,maxj,i,j,mi,mj,mini,minj;
float imax,imin;
 
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
 for (i=1; i<=6; i++) StringGrid1->Cells[0][i] = IntToStr(i) + "-ая строка";
 for (j=1; j<=6; j++) StringGrid1->Cells[j][0] = IntToStr(j) + "-й столбец";
 for (i=1; i<=6; i++) StringGrid2->Cells[0][i] = IntToStr(i) + "-ая строка";
 for (j=1; j<=6; j++) StringGrid2->Cells[j][0] = IntToStr(j) + "-й столбец";
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
max=F[0][0];maxi=0;minj=0;
for (i=0; i<6; i++)
for (j=0; j<6; j++)
if (F[i][j]>max)
{
max=F[i][j];maxi=i;minj=j;
}
min=F[0][0];maxi=0;minj=0;
for (i=0; i<6; i++)
for (j=0; j<6; j++)
if (F[i][j]<min)
{
max=F[i][j];maxi=i;minj=j;
}
tmp=F[i][maxi]; F[i][maxi]=F[i][mini]; F[i][mini]=tmp;
for (j=0; j<6; j++)
StringGrid2->Cells[j][1]=FormatFloat("0.00",F[j]);
}
 
//---------------------------------------------------------------------------