Du kannst von vorneherein verhindern, dass Duplikate von der ListBox akzeptiert werden:
Delphi-Quellcode:
ListBox.Items.Sorted := True; // ist Voraussetzung für die nächste Zeile
ListBox.Items.Duplicates := dupIgnore; // keine doppelten Einträge
Als Nebeneffekt ist die ListBox dann alphabetisch sortiert...
Gruß, teebee