▲▲RichEdit的Append可在最下面追加行，如何将追加行移到第一行▲▲

[lantianhf29]

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

RichEdit1
添加一
添加二
添加三

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

添加一
添加二
添加三
RichEdit1

[simonhehe]

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

[lantianhf29]

楼上添发可以，但顺序不对，楼上添加的顺序 113619937 113615843 113612656 RichEdit1 需要的按钮添加顺序，添加的第一条永远排在最上面，以后依次排，就像我给出效果一样 113612000 113613000 113614000 RichEdit1

[simonhehe]

引用 2 楼 lantianhf29 的回复:

楼上添发可以，但顺序不对，楼上添加的顺序 113619937 113615843 113612656 RichEdit1 需要的按钮添加顺序，添加的第一条永远排在最上面，以后依次排，就像我给出效果一样 113612000 113613000 113614000 RichEdit1

你没仔细看, 我打印的是日期, 最近的都排在了最上边, 你可以自己试一下

[lantianhf29]

不是的，已经试了，楼上的是降序排列，最前的时间在下面，不信你自己看

[simonhehe]

引用 4 楼 lantianhf29 的回复:

不是的，已经试了，楼上的是降序排列，最前的时间在下面，不信你自己看

呵呵 你看看这个呢

RichEdit.Lines.Insert(0, 'bb');
RichEdit.Lines.Insert(0, 'cc');
RichEdit.Lines.Insert(0, 'aa');

[simonhehe]

Append是追加 Insert是插入 你可以看看语法试试