Уважаемые знатоки помогите и на этот раз.

Везде в инете какие то накрученные слишком функции для поиска подстрок.

Я бы хотел, что нибудь типа preg_match_all как в пхп, чтобы комманда искала все возможные варианты.


Сейчас я ищу вот так:

Код:

r:='Гоша дай мне сало!';

p1:=pos('Гоша',r);
p2:=pos('мне сало',r);
p:=copy(r,p1,p2-p1); // слово  'дай' найденно

Но этот вариант не нормальн оработает, часто не хочет цеплять из страничек текст.


Помогите каким нибудь самым лёгким и прост рабочим примером поиска текста в массиве строк.

Спасиба!