Матрицы вводится в Stringgrid, нужно сделать кнопку сложения матриц (Stringgrid1 и Stringgrid2) и вывести в результирующую матрицу (Stringgrid3)

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "CSPIN"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
int ndots;
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::UpDown1Click(TObject *Sender, TUDBtnType Button)
{
Edit1->Text = UpDown1->Position;
ndots = Edit1->Text.ToInt();
StringGrid1->RowCount = ndots + 1;
StringGrid2->RowCount = ndots + 1;
StringGrid3->RowCount = ndots + 1;
StringGrid1->Cells[ndots][0]=ndots;
StringGrid1->Cells[0][ndots]=ndots;
StringGrid2->Cells[ndots][0]=ndots;
StringGrid2->Cells[0][ndots]=ndots;
StringGrid3->Cells[ndots][0]=ndots;
StringGrid3->Cells[0][ndots]=ndots;
StringGrid1->Height=26*(ndots+1);
StringGrid2->Height=26*(ndots+1);
StringGrid3->Height=26*(ndots+1);
StringGrid1->ColCount = ndots + 1;
StringGrid2->ColCount = ndots + 1;
StringGrid3->ColCount = ndots + 1;
StringGrid1->Width=66*(ndots+1);
StringGrid2->Width=66*(ndots+1);
StringGrid3->Width=66*(ndots+1);
}
//---------------------------------------------------------------------------

for (int i=0;i<StringGrid3->RowCount;i++)
        for (int j=0;j<StringGrid3->ColCount;j++)
        {
                StringGrid3->Cells[i][j]=StringGrid1->Cells[i][j]+StringGrid2->Cells[i][j];
        }

StringGrid3->Cells[i][j] = 
    FloatToStr(StrToFloat(StringGrid1->Cells[i][j])+StrToFloat(StringGrid2->Cells[i][j]));