Ecfisa ya te ha dado la solución... pero no te has dado cuenta.
Código Delphi
[-] TObject(FieldByName('ID').AsInteger));
En un item de un Tcombobox puedes guardar un objeto. En este caso ecfisa guarda el ID del país. Puedes accesder a él sabiendo cual es el índice del item que tienes seleccionado.
Código Delphi
[-] Integer(Items.Objects[ItemIndex])
Te remito a la ayuda de Delphi.
Un saludo