Автоматический скроллинг

[zver777]

Есть чат.
Сообщения выводятся в richedit.
Там есть вертикальный скроуллинг.
Как сделать, чтобы при приходе сообщения скроуллинг опускался в самый низ?

[mihali4]

with RichEdit do 
begin
SelLength := 0;
SelStart := Length(Text);
Perform(EM_SCROLLCARET,0,0);
end;

[Proof]

RichEdit1.Perform(WM_VSCROLL, SB_BOTTOM, 0);

Использовал на событие onChange

[zver777]

Proof спасибо. Всё работает.