Código Delphi [-] ListBox1.Items.Delete(ListBox1.Items.Count - 1);
ListBox1.Items.Delete(ListBox1.Items.Count - 1);