在Delphi的备忘录顶部添加行

Question

Delphi中的函数Memo.Lines.Add('Some text')将字符串添加到备忘录的底部。是否有任何功能可以将文本添加到顶部？

例如，如果备注的Lines属性包含：

string 1
string 2
string 3

我想在string 0之前添加字符串string 1。我怎么能这样做？

Answer 1

Lines属性是TStrings实例，支持在指定的行号处插入。这样做的方法是Insert，并且这样调用：

Memo.Lines.Insert(0, 'string 0');