Hola.
Supongamos que Clave y Clave1 son de tipo string... sería:
Código Delphi
[-]
var
Clave,Clave1: string;
begin
Clave:= ComboBox1.Items[ComboBox1.ItemIndex];
Clave1:= ComboBox2.Items[ComboBox2.ItemIndex];
end;
Ahora supongamos que son de tipo integer:
Código Delphi
[-]
var
Clave,Clave1: integer;
begin
Clave:= StrToInt(ComboBox1.Items[ComboBox1.ItemIndex]);
Clave1:= StrToInt(ComboBox2.Items[ComboBox1.ItemIndex]);
end;
Lógicamente en este último caso ComboBox1 y ComboBox2 tendrían que tener valores válidos para ser convertidos, por ejemplo: '1', '1101','500' y
no 'Casa' o 'ab132'...
Un saludo.