Ошибка при вводе элементов матрицы

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
#include "Stdio.h"
#include "Stdlib.h"
 
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
 
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
 
}
 
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
Memo1->Text="";
}
//---------------------------------------------------------------------------
Matrix::stvor_mass (int Row,int Col)
 {
  n=Row;
  m=Col;
  //min_mass=new int [n];
 //max_mass=new int[m];
  //int_mass=new int *[n];
 for (int j=0; j<n; j++)
       // {//A[j]=new int[m];
       //min_mass[j]=0;
        //max_mass[j]=0;
        {for (int i=0; i<m; i++)
                {
               int_mass[j][i]=0;
              }
        }
 return 0;
        };
 
  void Matrix::Fill()
  {
  for (int j=0; j<n; j++)
       {for (int i=0; i<m; i++)
                {
                int_mass[j][i]=(int)rand();
                }
       }
  };
 
  void Matrix::Vivid ()
  {
  Form1->Memo1->Lines->Add("Matrix");
  for (int j=0; j<n; j++)
       {for (int i=0; i<m; i++)
                {
                (IntToStr(int_mass[j][i]));
                }
       }
  };
 
void Matrix::obmin ()
{
int jmin=1;
int imin=1;
min_mass=int_mass[1][1];
int jmax=1;
int imax=1;
max_mass=int_mass[1][1];
for (int j=0; j<n; j++)
       {for (int i=0; i<m; i++)
                {if (int_mass[j][i]<min_mass) {
                                              min_mass=int_mass[j][i];
                                              jmin=j;
                                              imin=i;  };
                 if (int_mass[j][i]>max_mass) {
                                              max_mass=int_mass[j][i];
                                              jmax=j;
                                              imax=i;  };
                }
        };
int_mass[jmin][imin]=max_mass;
int_mass[jmax][imax]=min_mass;
};
 
Matrix::zvil_mass (void)
{
delete A;//очищаем память
A=NULL;
return 0;
}
 
  
void __fastcall TForm1::Button1Click(TObject *Sender)
{
int Row=StrToInt(Edit1->Text);
int Col=StrToInt(Edit2->Text);
  A->stvor_mass (Row,Col);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
 A->Fill();       
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
A->Vivid();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button4Click(TObject *Sender)
{
A->obmin();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button5Click(TObject *Sender)
{
A->zvil_mass();
}
//---------------------------------------------------------------------------