Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > if 0<pos(' - берет только последний найденный


Автор: andrey_post 19.7.2004, 12:09
Есть у меня файл текстовой, в который сшиты куча документов. В каждом из документов мне необходимо искать строку по маске ":32", и из этой строки вытаскиваю информацию, потом она сладывается , но if pos в этой куче берет только последний найденный ":32". Как последовательно брать?

Пример кода:

Код


for v:=0 to memo3.lines.count-1 do
 begin
  if 0<pos(':32', memo3.lines[v]) then
   begin
    st:=memo3.lines[v];
    s:=DeleteSpase(st);
  end;
 end;

Автор: Cheba 19.7.2004, 15:00
Если эта ":32" в отдельной строке, то проще будет использовать TStringList. Иначе можно попробовать приспособить пример из DRKD > Язык программирования Дельфи > Работа со строками > Как разделить строку на элементы, Аналог VB функции Split

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)