Wie auf den Eintrag der Combobox zugreifen?

[Rolf Rostig]

Hallo,

ich fülle eine Combobox aus einer Firebird-Tabelle:

Delphi-Quellcode:

  with DM.IBSQLAdressen do
   begin
    close;
    ExecQuery;
    cbNamen.Items.clear;
    while not Eof do
     begin
      cbNamen.Items.AddObject(FieldByName('Eintrag').asString,
        TObject(FieldByName('ID').asInteger));
      next;
     end;
   close;
  end;

Nun möchte ich mit der ID auf den Eintrag der Combobox zugreifen.
Aber wie?

Combobox.ItemIndex := FieldByName('ID').asInteger geht ja nicht