▲▲RichEdit的Append可在最上面追加行，怎么将追加行移到第一行▲▲

▲▲RichEdit的Append可在最下面追加行，如何将追加行移到第一行▲▲
RichEdit的Append可在最下面追加行，如何将追加行移到第一行，例如下面：
Edit1中的问题依次为，添加一，添加二，添加三，正常Append后效果如下

RichEdit1
添加一
添加二
添加三

想实现按照上面Append方法添加后，将新添加的行RichEdit1下面的内容整体都移到上面，如何写代码？请Delphi高手帮忙，实现效果如下

添加一
添加二
添加三
RichEdit1

[解决办法]

RichEdit.Lines.Insert(0, FormatDateTime('hhmmsszzz', now));