Uso del combobox

[yo_pablo]

Buenas... estoy trabajando con delphi 7 y el problema que tengo es que cargo un combobox con strings y valores asociados y luego me retorna cualquier cosa. Para ser más específico lo cargo con:
while not tabla.eof do
begin
ComboBox.AddItem(tabla.descripcion.value,TObject(tabla.claveprimaria.value));
tabla.next;
end;

Tanto la descripción como la clave son strings. Luego para recuperar la clave seleccionada uso lo siguiente:
variable:=String(ComboBox.Items.Objects[ComboBox.ItemIndex]);
Pero me retorna cualquier valor...
Me podrían decir qué estoy haciendo mal ????

Mil gracias.