Opredelenie kol-va simvolov v tekste

← →
Alral © (2006-08-07 00:27) [0]

Kak opredeit kol-vo simvolov v tekste i virazit v Integer?

← →
Alral © (2006-08-07 00:27) [1]

Imeetsja vvidu TMemo

← →
Германн © (2006-08-07 00:36) [2]

kol-vo simvolov v tekste:=Length(Memo1.Text). Включая пробелы.

← →
Alral © (2006-08-07 00:38) [3]

spasibo

← →
Германн © (2006-08-07 01:57) [4]

Извини обманул. В свойство TMemo.Text включаются ещё и символы CR/LF.

← →
Alral © (2006-08-07 16:06) [5]

A ih kuda?

>Извини обманул. В свойство TMemo.Text включаются ещё и символы CR/LF.
A eto chto za simvoli? Kuda ih nado?

var i, cnt:Integer; begin cnt:=0; for i:=0 to Memo.Lines.Count-1 do cnt:=cnt+Length(Memo.Lines[i]);

Табуляция за пробелы не считается...