[jachguate]

Un ejemplo vale mas que mil palabras:

Código Delphi [-]
var
  Codigo: Integer;
begin
  Codigo := Integer(ComboBox1.Items.Objects[ComboBox1.SelectedIndex]);
  ShowMessage('El código del cliente seleccionado es ' + IntToStr(Codigo));
end;

Hasta luego.