Пощитать количество знаков в RichEdit

[Vladya]

Проблема у меня пустяковая но сам не могу додуматься. Короче вот что мне нужно, что бы при наборе текста в поле RichEdit то в это время в строке состояния StatusBar отображалось количество введенных знаков, помогите кто знает, потомучто я не могу понять как мне это сделать.
Вот как я пробовал, но до конца не дописал потомучто не знаю что писать.

StatusBar1.Panels.Items[1].Text:=IntToStr

И естественно что бы подсчитывалось когда пользователь удаляет несколько знаков.

[fbus]

StatusBar1.Panels.Items[1].Text:=IntToStr(Length(Richedit1.Te xt));

[Stilet]

fbus

Потом от посчитанного отнять ко-во строк умноженных на два, ибо так считаются еще и переводы строк.

[Vladya]

Спасибо большое, я просто замутил что бы считало строки,

StatusBar1.Panels.Items[3].Text:=IntToStr(RichEdit1.Lines.Count)

И по такому принципу пытался сделать на знаки. Глупо наверное...