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

Цитата:
Сообщение от Last Living Man
думаю для двух столбцов TListView будет удобнее, и выглядит более привлекательно чем TStringGrid)
что-то никак не хочет:
Код:
procedure THistoryForm.BtnTodayClick(Sender: TObject);
var
  f: TextFile;
  s: string;
  i,j: integer;
  SL: TStringList;
begin
  SL:= TStringList.Create;
  SL.LoadFromFile('Pathfinder.txt');
  for i:= 0 to Sl.Count - 1 do
   begin
     //LI:= TListView.Items.Add;
     LI.Caption:= Sl.Strings[i];
   end;
  Sl.Free;
end;

эту строчку никак не соображу, в чем ошибка:
LI:= TListView.Items.Add;
LI - ListItem
Ответить с цитированием