Показать сообщение отдельно
  #2  
Старый 04.07.2012, 20:11
Аватар для R-18Rus
R-18Rus R-18Rus вне форума
Новичок
 
Регистрация: 08.04.2012
Сообщения: 68
Версия Delphi: Delphi 7
Репутация: 127
По умолчанию

Файл можно и не читать. Есть функция POS.
Код:
var a,b:char;

a:=pos('первое что ищем', номер строки);
b:=pos('второе что ищем', номер строки);
Текст между этими pos'ами будет
Код:
copy(строка,a - начало,b-a+1 - количество символов)
Т.е. копируем в "строке" "количество символов", начиная с "начала".

Работает только с одной строкой. Но в ячейку тоже всё одной строкой придётся записывать. А вот текст между несколькими строками уже не знаю как вычленить.
Ответить с цитированием