Как лучше считывать матрицу размера 32х870

void __fastcall TForm1::Button1Click(TObject *Sender)
{
        int n;
        n=StrToInt(Edit1->Text);
        int m;
        m=StrToInt(Edit2->Text);
        Label2->Caption=FloatToStrF(n,ffGeneral,7,2);// для проверки
        for(int i = 0; i < n; i++)
            {Label3->Caption=FloatToStrF(i,ffGeneral,7,2);// для проверки
        for(int j = 0; j < m; j++);
 
 
}
}

        int X;
        X=StrToInt(Edit1->Text);
        int Y;
        Y=StrToInt(Edit2->Text);
        int **Matrix = new int * [X];
        for (int i = 0; i < X; i++) {
        Matrix[i] = new int [Y];
        }
        for (int i = 0; i < X; i++) {
        for (int j = 0; j < Y; j++) {
        fstream fi("L1.txt");
        int *Matrix=new int [i][j];
        for( int j=0;j<Y;j++){
        for ( int i = 0; i < X; i++ )
                {
                        fi >> x;
                                   Matrix[i][j]=x;
                }
        }

{
int X;
        X=StrToInt(Edit1->Text);
        int Y;
        Y=StrToInt(Edit2->Text);
        int **Matrix = new int * [X];
        for (int i = 0; i < X; i++) {
        Matrix[i] = new int [Y];
        }
        for (int i = 0; i < X; i++) {
        for (int j = 0; j < Y; j++)
        fstream fi("L1.txt");
        int *Matrix=new int [i][j];
        for( int j=0;j<Y;j++){
        for ( int i = 0; i < X; i++ )
 
                        fi >> x;
                                   Matrix[i][j]=x;
                }
        }
}

        int X;
        int Y;
        int **Matrix = new int * [X];
        X=StrToInt(Edit1->Text);
        Y=StrToInt(Edit2->Text);
        for (int i = 0; i < X; i++) {
        Matrix[i] = new int [Y];
        }
 
 
        for (int i = 0; i < X; i++) {  //тут ты обьявил i   /*    начало цыкла "1"   */
                for (int j = 0; j < Y; j++)  // тут ты обьявил j
                    fstream fi("L1.txt");
                    int *Matrix=new int [i][j];
                        for( int j=0;j<Y;j++){  // а вот тут все еще продолжаетса цыкл "1" но ты зачем то еще раз обьявляешь i
                        for ( int i = 0; i < X; i++ )   //аналогично с j ????? 
 
                        fi >> x;  //почему тут х стала маленькой? вы ее гдето раньше обьявили ?
                                   Matrix[i][j]=x;  
                }
        }

int X;
                int Y;
                int **Matrix = new int * [X];
                X=StrToInt(Edit1->Text);
                Y=StrToInt(Edit2->Text);
                for (int i = 0; i < X; i++) {
                Matrix[i] = new int [Y];
                }
 
 
                for (int i = 0; i < X; i++) {  //тут ты обьявил i   /*    начало цыкла "1"   */
                                for (int j = 0; j < Y; j++)  // тут ты обьявил j
                                        fstream fi("L1.txt");
                                        int *Matrix=new int [i][j];
 
 
               
                                                                   Matrix[i][j]<<fi;  
                                }
                }

// Переменные
int **Array;
int n = 5;
//-------- Создаем массив
Array = new int*[n];
 
for (int i = 0; i < n; i++)
{
Array[i] = new int[n];
}
//-------- 
//-------- Загружаем в поток данные
fstream stream(".\\12.txt");
//-------- 
//-------- Заполняем массив
for (int i = 0; i < n; i++)
{
for (int j = 0; j < n; j++)
{
// Если нужно чтобы данные шли так же как и в текстовом файле
// То просто поменяй местами индексы в массиве Array[i][j] на Array[j][i]
 stream >> Array[i][j];
}
}
//--------
//-------- Заполняем стринг грид
for (int i = 0; i < n; i++)
{
for (int j = 0; j < n; j++)
{
StringGrid1->Cells[i][j]=IntToStr(Array[i][j]);
}
}