TRichEdit и большой текст

← →
Serg1981 © (2006-03-04 23:32) [0]

Здравствуйте, есть фрагмент кода, который выделяет нужные фрагменты нужным цветом в TRichEdit:
num := 0; str := "123"; while true do begin num := PosEx(str, Editor.Text, num + 1); if num <> 0 then begin Editor.SelStart := num - 1; Editor.SelLength := Length(str); Editor.SelAttributes.Color := clRed end else Break end;
Всё работает отлично, пока в TRichEdit не загрузишь большой текст (150 страниц, 500 тыс. символов). Почему в большом тексте слова не выделяются ? Переменная num имеет тип Integer, искомая комбинация в тексте имеется ТОЧНО.
Спасибо.

← →
TUser © (2006-03-05 09:56) [1]

> искомая комбинация в тексте имеется ТОЧНО.

Это действительно так? В частности - не разбита ли она на две строки?

← →
Serg1981 © (2006-03-05 12:50) [2]

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

← →
Serg1981 © (2006-03-06 22:50) [3]

Может у кого есть другой алгоритм выделения цветом нужных фрагментов ? Авось он заработает на больших текстах.

← →
имя (2006-03-09 08:57) [4]

Удалено модератором

TRichEdit и большой текст Найти похожие ветки