Как считать символы в RichEdit без двух символов, которые дает каждая новая строка?

Question

У меня проблема с подсчетом символов в richedit (Delphi XE).Для каждой новой строки в результате я получаю на два символа больше, но в тексте их нет.

Пример: здесь 15 символов, но richedit дает 17 из-за новой строки.

line zero
line one

Есть ли решение для этого?

Answer 1

Удалите CR / LFs и получите количество оставшихся символов.Пример:

NumChars := Length(StringReplace(RichEdit1.Text, sLineBreak, '', [rfReplaceAll]));