Ошибка -is not a valid integer value (не является допустимым целым значением), не понимаю в чем ошибка

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
int n,m,**ary;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
int n=3;int m=3;
StringGrid1->RowCount=n+1;
StringGrid1->ColCount=m+1;
  for (int i=1; i<=n; i++){
    StringGrid1->Cells[i][0]="m="+IntToStr(i);
    StringGrid1->Cells[0][i]="n="+IntToStr(i);
    }        
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
int imax=0,jmax=0,i,j,n=3,m=3;
 int** ary = new int*[n];
  for(i=0; i<n; i++) {
   ary[i] = new int[m];
   }
 
for(i=0; i<n; i++)
 for(j=0; j<m; j++)
  ary[i][j]=StrToInt(StringGrid1->Cells[j+1][i+1]);
 
for(i=0; i<n; i++)
 for(j=0; j<m; j++)
  if (ary[i][j]>ary[imax][jmax]){
   imax=i;
   jmax=j;
   }
 
for (i=0; i<n; i++)
  for (j=jmax; j<m-1; j++) ary[i][j]=ary[i][j+1];
   m--;
for (j=0; j<m; j++)
  for (i=imax; i<n-1; i++) ary[i][j]=ary[i+1][j];
   n--;
 
for(int i=0; i<StringGrid1->ColCount; i++)
  for(int j=0; j<StringGrid1->RowCount; j++)
   StringGrid1->Cells[j+1][i+1] = "";
 
for(int i=0; i<n; i++)
  for(int j=0; j<m; j++)
   StringGrid1->Cells[j+1][i+1] = IntToStr(ary[i][j]);
 
for (int i=0; i<n; i++)
  delete []ary[i];
    delete []ary;        
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Edit1Change(TObject *Sender)
{
if (Edit1->Text=="") return;
  n=StrToInt(Edit1->Text);
  StringGrid1->RowCount=n;        
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Edit2Change(TObject *Sender)
{
if (Edit2->Text=="") return;
  m=StrToInt(Edit2->Text);
  StringGrid1->ColCount=m;
}
//---------------------------------------------------------------------------