Meu caro, você pode armazenar um valor em cada item do combo: iNumero := 1981; {valor inteiro para armazenar} ComboBox1.Items.AddObject('meu nome', TObject(iNumero)); {usa a propriedade Objects para armazenar o integer}
iIndice := Combobox1.ItemIndex;//iIndice é variável explicativa iValor := Integer(ComboBox1.Items.Objects[iIndice]); {recuperando o valor armazenado}