[juggle]

Народ, подскажите, пожалуйста, как мне реализовать заполнение данных из txt фаила в SrtingGrid.
Фаил заполнен так:
2 3 4
5 6 7
.....
Когда я пытаюсь подгрузить такой фаил, то у меня заполняется первый столбец данными всей строки, а мне надо чтобы каждое число в своей ячейке было. Что нужно поменять?

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30

//DownLoad the file procedure TForm1.Button2Click(Sender: TObject);      var   i,j,m,n:integer;   s:string;   input:TextFile;    begin    if OpenDialog1.Execute then       begin        AssignFile(input, OpenDialog1.FileName);     Reset(input);          m:=strtoint(Edit1.Text);      n:=strtoint(Edit2.Text);        for i := 0 to m - 1 do     begin        for j := 0 to n - 1 do        begin          Readln(input, s);          StringGrid1.Cells[i,j] := s;        end;        Readln(input);     end;        CloseFile(input);   end;