Código Delphi [-]SendMessage(RichEdit1.Handle, EM_SCROLL, SB_LINEDOWN, 0);
SendMessage(RichEdit1.Handle, EM_SCROLL, SB_LINEDOWN, 0);