Удалить верхнуюю строку в RichView

[Shouldercannon]

Как сделать следующее? В RichView добавляется текст

    RichView.AddNL('[' + TimeToStr(Now) + '] ', 1, 0);
    RichView.AddText(FormSettings.ENick.Text + ': ', 3);
    RichView.AddText('Blabla', 9);
    RichView.Format;

Если в RichView больше 40 строк, то удалить самую первую сверху.