String in ListBox einfügen ohne Duplikate ?

[thomas2009]

Hallo

ich möchte Strings in ListBox einfügen. Es soll aber keine Duplikate
Ich muss zuerst nach dem String in ListBox suchen und wenn das Ergebnis = 0 then

Delphi-Quellcode:

ListBox1.Items.Add('string')
else
ListBox1.Items.Add('string'+IntToStr(1)); // einen anderen namen

[alleinherrscher]

Guck dir mal Listbox.items.indexof(aString) an.

Ich würde das so machen

Delphi-Quellcode:

If Listbox.items.indexof(Teststring) < 0 then    //teststring ist nicht in Listbox
   //mache irgendetwas
else                                             //teststring ist in Listbox
   //mache etwas anderes