Как да преброим персонажите в RichEdit без две черти, които дават всяка нова линия? - делфи, характер, ричайд, линии

Имам проблем с броенето на символи в ричхайт (Delphi XE). За всяка нова линия в резултат получавам два знака повече, но в текста те не съществуват.

Пример: Тук има 15 знака, но richedit дава 17 поради нова линия.

линия нула line one

Има ли решение за това?

Отговори:

Премахнете CR / LF и да получите броя на останалите символи. Пример:

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