Показать сообщение отдельно
  #15  
Старый 02.12.2011, 12:36
Der_G()RuNu(h Der_G()RuNu(h вне форума
Прохожий
 
Регистрация: 23.03.2011
Сообщения: 44
Репутация: -886
По умолчанию

написал вот так:
Код:
procedure THistoryForm.BtnTodayClick(Sender: TObject);
var
  f: TextFile;
  strTemp: String;
  SL: TStringList;
  iTmp, i, k, l: Integer;
begin
  SL:= TStringList.Create;
    SL.LoadFromFile('Pathfinder.txt');
    with SG do
      begin
         for l:=1 to 10 do 
           for i := 0 to ColCount - 1 do
             for k := 0 to RowCount - 1 do
             begin
               strtemp:= SL.strings[l];
               Cells[i, k]:= strTemp;
             end; 
      end;
      SL.Free;  
end;

end.

но теперь у меня в обоих колонках таблицы только путь к файлу (txt), из которого грузится... в чем ошибка на этот раз?
Ответить с цитированием