Показать сообщение отдельно
  #1  
Старый 02.09.2015, 10:31
lerandivan lerandivan вне форума
Прохожий
 
Регистрация: 31.08.2015
Сообщения: 2
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию Вывод данных из текстового файла в таблицу

Здравствуйте! Помогите советом, что делаю не так... Нужно чтобы в таблицу загружались значения из файла(прикреплен ниже) начиная с SB и заканчивая SC.
Вот мой код
Код:
begin
   a:=TStringlist.Create;
   a.LoadFromFile('work\3.txt');
   StringGrid8.RowCount:=22;
   StringGrid8.ColCount:=1;
   for i:=0 to 22 do
   StringGrid8.Cells[0,i]:=copy(a.Strings[i],pos('SB',a.Strings[i])+1,length(a.Strings[i])-pos('SC',a.Strings[i]));
   a.Free
   end;
Вложения
Тип файла: txt 3.txt (1.3 Кбайт, 2 просмотров)
Ответить с цитированием