Поиск образца текста в StringList

← →
Мимо прогодивший (2014-01-14 18:17) [0]

Так как "Начинающим" не работает, пишу вопрос сюда.

Есть программа где текст хранится в StringList. Нужно по всему его тексту выполнить поиск подстроки, подстрока не может начинаться в Strings[I], а заканчиваться на Strings[I + 1]. Поэтому код примерно такой:
S: String; .......................................................... for i := 0 to StringList.Count - 1 do begin S := StringList.Strings[i]; ....................................... поиск образца текста в "S" end;

Каждый раз нужно делать S := StringList.Strings[i] ?

← →
antonn © (2014-01-14 18:31) [1]

if(pos("popa",StringList.Strings[i]))
если в лоб

← →
Юрий Зотов © (2014-01-14 18:34) [2]

Можно и не делать, а искать прямо в StringList.Strings[i].

А если искомая подстрока не содержит CR/LF, то можно искать и без цикла, в StringList.Text

← →
Юрий Зотов © (2014-01-14 18:35) [3]

> antonn © (14.01.14 18:31) [1]
>
> if(pos("popa",StringList.Strings[i]))
> если в лоб

Это не в лоб.

← →
Мимо прогодивший (2014-01-14 18:54) [4]

Я за то что нельзя:

for i := 0 to StringList.Count - 1 do for j := 1 to Length(StringList.Strings[i]) do begin StringList.Strings[i][j] end; Copy(SL.Strings[i],2,5)

> Можно и не делать, а искать прямо в StringList.Strings[i].

Подскажите плиз.

> if(pos("popa",StringList.Strings[i]))

так конечно можно, но как то не удобно параметром постоянно указывать StringList.Strings[i]

← →
Мимо прогодивший (2014-01-14 18:55) [5]

> А если искомая подстрока не содержит CR/LF, то можно искать
> и без цикла, в StringList.Text

Содержит, текст грузится с текстовых файлов

← →
Мимо прогодивший (2014-01-14 19:01) [6]

А, во, возможна следующая конструкция:

string(StringList.Strings[i])[j];

> но как то не удобно параметром постоянно указывать StringList.Strings[i]

Неудобно параметром указывать StringList.Text. А StringList.Strings это просто массив указателей.

> Юрий Зотов © (14.01.14 18:35) [3]
>
> > antonn © (14.01.14 18:31) [1]
> >
> > if(pos("popa",StringList.Strings[i]))
> > если в лоб
>
> Это не в лоб.

я к тому, что неужели оптимизатор конструкцию автора к моему виду не видет? а если приведет - я лишь синтаксисом написал то что у него и есть

Поиск образца текста в StringList Найти похожие ветки