TObjectlist Problem mit index

[khh]

Hallo zusammen,
ich habe eine

Tanredenlist vom Type TObjectlist.

bei der Anredenliste handelt es sich um eine kleine Liste, ich möchte das Prinzip aber auch für andere, grössere Listen und Objekte nutzen.

In einer Schleife im constructor der Liste lese ich die Objekte ein:

Fanreden := Tanreden.create(NIL);
self.add(Fanreden);

Fanreden beinhaltet id, bezeichnung , usw.
wenn ich ( zum test)in der schleife auf die Objekte zugreife funktioniert das wunderbar:

ShowMessage(Tanreden(self.items[i]).Bezeichnung);

jetzt möchte ich eine Instanz der Tanredenliste an eine Combobox übergeben:
also erzeuge ich :

Delphi-Quellcode:

 Fanredenlist := Tanredenlist.create(NIL);
  for i:=0 to Fanredenlist.count-1 do
begin
   myForm.AnredeCombobox.Items.AddObject(Tanreden(Fanredenlist.items[i]).Bezeichnung, Tanreden(Fanredenlist.items[i]));
end;

Leider bekomme ich so nur die Bbezeichnung des letzten Satzes in die Combobox, und das 'count-mal'

was mache ich falsch ?

danke Gruss KH