[Qlimax]

такие пироги, подгрузка файла с данными,запись их в двумерный массив, затем вывод всего на StringGrid, но все идет через одно место, кое что набросал но не уверен,массив в файле по идеи 200 на 200, то бишь 40000 значений,но может и меняться,еще хотел попросить помощи в заполнении массива не с начала данных а скажем с 5 строчки.

Код:

var
  Form1: TForm1;
  Mass: array of array of real;





procedure TForm1.BitBtn1Click(Sender: TObject);
var
F : textfile;
i,j,m,n : integer;
begin
if OpenDialog1.Execute then

  AssignFile(f,OpenDialog1.FileName);
  RESET(F);
  SetLength(mass,m,n);
  I:=0 ;
  j:=0;
  i := 0;
  while not Eof(f) do begin
    Inc(i);
    SetLength(mass, i + 1);
    j:= 0;
    while not Eoln(f) do begin
      Inc(j);
      SetLength(mass[i], j + 1);
      Read(f, mass[i, j]);
    end;
    ReadLn(f);

  end;
  CloseFile(f);

For i:=1 to m-1 do
For j:=1 to n-1 do
    begin

      StringGrid1.Cells[i,j]:=floattostr(mass[i,j]);
    end;
end;

end.