Помогите начинающему

@lolchy · Регистрация: 13.11.2010

Author24 — интернет-сервис помощи студентам

Есть процедура заполнения Таблицы из файла

Delphi

procedure TForm1.Button1Click(Sender: TObject);
Var
 F: TextFile;
 i,j: Integer;
 S: String;
begin
 AssignFile(F, Edit3.Text);
 Reset(F);
 For i:= 1 To StringGrid1.ColCount - 1 Do
  For j:= 1 To StringGrid1.RowCount - 1 Do
   begin
    Readln(F, S);
    StringGrid1.Cells[i,j]:= S;
   end;
 CloseFile(F);
end;

Но все значения сохраняет в первый столбец. Подскажите как исправить. Заранее спасибо тем, кто откликнется.

@aliksend · 27.10.2011, 20:34

сходу прям так и не скажеш..попробуй в [i,j] i и j местами поменять. может поможет) мож ещё чего но кажется что все норм

@aliksend 5 / 5 / 2 Регистрация: 05.12.2010 Сообщений: 66
	27.10.2011, 20:34	2
	сходу прям так и не скажеш..попробуй в [i,j] i и j местами поменять. может поможет) мож ещё чего но кажется что все норм 0