ComboBox: keine doppelten Einträge

[Markus K.]

Hallo yankee,
versuche es mal so.

Delphi-Quellcode:

for i :=0 to VerlagcomboBox.Items.Count-1 do 
begin 
     if VerlagcomboBox.Items.Names[i] =VerlagcomboBox.Items.Names[i+1] 
     then VerlagComboBox.Items.Delete(i); 
end;

Tschüß Markus