How to count characters in RichEdit without two characters that every new line gives?

Question

I have problem with counting characters in richedit (Delphi XE). For every new line as a result i get two characters more but in text they not exists.

Example: Here are 15 characters, but richedit gives 17 because of new line.

line zero
line one

Is there solution for this?

Welcome to SO! You might get more replies and upvotes if you edit your question to include a code snippet to show how you're counting the characters currently. (In general if you have a problem, it's normally best to show what you're currently doing as well as what the problem is.) — David, Jul 28 '11 at 03:52

score 2 · Accepted Answer · answered Jul 28 '11 at 01:48

2

Remove CR/LFs and get the count of the remaining characters. An example:

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

answered Jul 28 '11 at 01:48

Sertac Akyuz

54,131
4
102
169

1

I believe what this will be 2..3 times slower compared with iteration over `Lines`. @OP: right name for pieces of text, delimited by sLineBreak is "paragraph" – Premature Optimization Jul 30 '11 at 18:15
@Downvoter - If the text is any longer then as in the question, you might very well be correct. – Sertac Akyuz Jul 31 '11 at 00:16
Works fine with smaller text, but it is slow with big text. But, you helped me a lot :) – Srdjan Aug 08 '11 at 10:49

How to count characters in RichEdit without two characters that every new line gives?

1 Answers1