Objecte in Combox ein und auslesen.

[machstuhl]

Hallo zusammen,

bei folgendem Fehler komme ich einfach nicht weiter.

Ich lese Daten aus einer Datenbank in eine StringList ein.
Liste.AddObject(String(Field('NAME')), TObject(Integer(Field('ID')))); Diese Daten sollen dann in eine Combobox übergeben werden. Der Normale Listenwert wird korrekt übergeben, das Objekt spinnt jedoch rum und fügt eine Random-Integer-Zahl ein.

Delphi-Quellcode:

for I := 0 to Liste.Count -1 do 
  begin
    cb_Anwender.Items.AddObject(Liste[I], TObject(Liste[I]));
    //cb_Anwender.Items.AddObject(Liste[I], TObject(Integer(Liste[I])));  // verschafft auch keine Besserung
  end;

Wo mache ich den Fehler?