[NumLock]

тут решение проще будет в случае если перед добавлением проверять наличие такого значения в списке, чем потом удалять дубли:

Код:

  if ListBox1.Items.IndexOf(Edit1.Text)=-1 then
    ListBox1.Items.Add(Edit1.Text);