Problem mit StringGrid

[star_votes]

Leider macht er bei mir mehr Schleifendurchläufe beim einlesen der Datei als Zeilen vorhanden sind und somit ist der mitgezählte Wert unbrauchbar.

Kann man da vllt. was am Quelltext machen, damit das hinhaut?

Delphi-Quellcode:

with StringGrid1 do
                 begin
                   Readln(f, n);
                   StringGrid1.colcount:=n;
                   Readln(f, n);
                   StringGrid1.rowcount:=n;
                   for col:=0 to stringGrid1.colcount-1 do
                       for row:=0 to StringGrid1.rowcount-1 do
                           begin
                             readln(f, d);
                             StringGrid1.Cells[r, k]:=d;
                           end;
                 end;