Организовать ввод массивов как из текстовых файлов, так и с клавиатуры.

[GalaiAnton]

Дана матрица A(N, M). Найти ее наибольший элемент и номера строки и столбца, на пересечении которых он находится.

procedure TForm1.Button1Click(Sender: TObject);
var max,n,m,i,j,ii,jj:integer;
A:array[0..30,0..30] of Integer;
begin
N := SpinEdit1.Value; //количество строк
M := SpinEdit2.Value; //количество столбцов
for i:=0 to n-1 do
for j:=0 to m-1 do
 A[i,j]:=StrToInt(StringGrid1.Cells[j, i]);
 max:=A[0,0]; ii:=0; jj:=0;
 for i:=0 to n-1 do
  for j:=0 to m-1 do
   if A[i,j]>max then
    begin
     max:=A[i,j];
     ii:=i;
     jj:=j;
end;
label4.Caption:=('Максимальный элемент матрицы '+IntToStr(max)+' находится на пересечении '+IntToStr(ii)+'-й строки и '+IntToStr(jj)+' столбца');
end;

procedure TForm1.SpinEdit1Change(Sender: TObject);
begin
StringGrid1.RowCount := SpinEdit1.Value;
end;

procedure TForm1.SpinEdit2Change(Sender: TObject);
begin
StringGrid1.ColCount := SpinEdit2.Value;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
 Tstr,TstrBuff:TStringList;
 i,j:Integer;
begin
if OpenDialog1.Execute then
Begin
TstrBuff:= TStringList.Create;
TstrBuff.Delimiter:=' ';
 
Tstr:= TStringList.Create;
Tstr.LoadFromFile(OpenDialog1.FileName);

StringGrid1.RowCount:= Tstr.Count+1; // задаем количество строк в таблице
 
for i:=0 to Tstr.Count-1 do
 begin
 // определяем, нужно ли расширить таблицу
 TstrBuff.DelimitedText:=Tstr.Strings[i];
 if TstrBuff.Count> StringGrid1.ColCount-1 then  StringGrid1.ColCount:=TstrBuff.Count+1;
 
 // заполняем очередную строку таблицы соответствующими данными
 StringGrid1.Rows[i].Delimiter:=' ';
 StringGrid1.Rows[i].DelimitedText:= Tstr.Strings[i];

 end;
Tstr.Free;
TstrBuff.Free;
end;
end;

Когда я с клавиатуры ввожу,то все хорошо работает,находит пересечение,а вот из текстового файла когда открываю,то пишет,что максимальный элемент -1 находится на пересечении 0 столбца и 0 строки,а вот если я установлю в SpinEdit количество строк и столбцов,то оно только тогда начинает определять...
Подскажите,пожалуйста,можно ли сделать так,чтобы когда я вывожу из текстового файла,то автоматически количество строк и столбцов заносилось в StringGrid?