Как получить слово вокруг сепаратора

[Utkin]

Возникла идея, пока еще до конца неоформившаяся, может тебе поможет. Дело в том, что МЕМО (а по идеи и TStringList), может разбивать текст на строки, где в качестве разделителя могут быть не только переходы строк, а любые прочие символы. Тогда загнав туда строки со своим разделителем, ты получишь массив строк, где длины будут разницей в число символов от одного разделителя до другого... Подумай над этим, возможно прикрутишь как-нибудь.