Выделение двух равных подстрок в тексте

← →
alois (2003-07-01 21:04) [0]

Уважаемые мастера, подскажите, plz.
Надо сделать так, чтобы в тексте выделялись (например, цветом) две любые равные друг другу подстроки, при условии что длина такой подстроки должна быть больше n символов. Как это осуществить? Plz, помогите, очень нужно.

← →
Спрашивающий_ (2003-07-02 02:35) [1]

Условие длины Length(S)>n
Выделение цветом SelStart,SelLength и SelAttributes используй РичЕдит или подобный компанент
ну а сравнение двух подстрок это If S1=S2(Copy,Pos,Delete и т.д.) ну и на последок надо немного подумать.

Выделение двух равных подстрок в тексте Найти похожие ветки