Ich persönlich mache das so, dass ich ID und Textwert abfrage, eine normale Combobox nehme, die ID hart zu TObject caste und das dann per AddObject zu den Items der ComboBox hinzufüge. Umd die gewählte ID zu bekommen, muss ich dann nur das TObject wieder zurück casten.
Delphi-Quellcode:
cbbBla.Items.AddObject(Data.Text, TObject(Data.ID));
...
ID := Integer(cbbBla.Items.Objects[cbbBla.ItemIndex]);