loops - DELPHI 将第 2 行移至第 1 行备注

Question

我需要将Memo1的第一行转移到Memo2，并将Memo1的其余行向上移动。

这些是预期的结果：

Answer 1

像这样：

Memo2.Lines.Add(Memo1.Lines[0]);
Memo1.Lines.Delete(0);