Código Delphi [-] Memo1.Lines.Delete(Memo1.Lines.Count - 1);
Memo1.Lines.Delete(Memo1.Lines.Count - 1);