Как удалить текст до слова, потом от слова ?

[littlecoder]

Как удалить текст до слова, потом от слова ?
Например ...
Есть мемо. В нём текст :
"Авпгапршщырв /слово ррвлдыа
выаыв
ываа
выаыв
буква выавы
выаыва
выа буква выа
выа буква / ваыва
выавы."
Я например задаю в двох едитах значения "слово", и "буква".
ПОскольку в тексте есть 3 значения "буква", то нужно удалить текс после последнего значения "буква" тоисть .. должен получится такой результат :
"слово ррвлдыа
выаыв
ываа
выаыв
буква выавы
выаыва
выа буква выа
выа буква "
Нужно оч срочно. Если кто знает, подскажите.

[mihali4]

Как удалить текст до слова, потом от слова ?

Вопрос можно поставить более логично: "Как выделить из текста-белиберды нужное слово?"
Тогда, кроме функции POS, ничего и не нужно...

[Квэнди]

в данной ситуации я бы даже больше рекомендовал posex

[littlecoder]

А где можно почитать подробное описание posex и pos.
А то искал, то токо Post.
А она мне позарез нужна, как видимо

[Proof]

function AnsiPos ( const Needle, HayStack : string ) : Integer;

Функция AnsiPos ищет подстроку Needle в строке HayStack, возвращая позицию в строке первого вхождения.

Весь Ansi команды поддерживают многобайтовые символы и символы с диакритическим знаком.

Если строка не найдена, то возвращается 0.

Поиск чувствителен к регистру.

posit:=AnsiPos('DD','asd DD we redf');

отработав функция вернет значени 5

[littlecoder]

Можете указать источник, где почитать ?

[Proof]

Не помню можно ли публиковать ссылки на сторонние сайты, надеюсь модераторы меня простят.
http://delphisite.ru/faq/ispolzovanie-posex-vzamen-pos
http://www.delphibasics.ru/Pos.php

[mihali4]

Сообщение от littlecoder

Можете указать источник, где почитать ?

Пишем в тексте модуля слово POS, ставим на него текстовый курсор (тыркаем мышкой) и жмем F1. Действует безотказно.