Ich nehme meine Beispielzeile zum besseren Verständnis mal etwas auseinander.
Zitat:
TSalutation(lbSalutations.Items.Objects[lbSalutations.ItemIndex])
Mit
lbSalutations.Items.Objects[lbSalutations.ItemIndex]
greife ich auf das Objekt zu, das in der aktuell selektierten Zeile der Listbox hinterlegt ist. In diesem Moment ist das noch vom Typ TObject, daher muss es in den passenden Typen gecastet werden, um Zugriff auf die objektspezifischen Properties zu erhalten. Da ich genau weiß, von welchem Typ das Objekt ist, mache ich einen harten Cast, fehlertoleranter wäre ein Softcast mittels as-Operator.
TSalutation(lbSalutations.Items.Objects[lbSalutations.ItemIndex]) //harter Cast des TObject in meine Klasse TSalutation
Nun ist es ein Objekt vom Typ TSalutation, ich kann also per "Punkt-Notation" auf dessen Eigenschaften und Methoden zugreifen.
In Deinem Fall müsste es also ungefähr so aussehen:
id:= Tanreden(myForm.AnredeComboBox.Items.Objects[myForm.AnredeComboBox.ItemIndex]).ANREDEN_ID ;