COmboBOx1

[elturu15]

HOla! Tengo una consulta...Tengo 2 Variables, Clave y CLave1 y a cada una le asigo un calor de un combobox y el codigo qeu uso es este:

Este Bien?

Código Delphi [-]
Clave:=integer(ComboBox1.Items.Objects[ComboBox1.ItemIndex]);
 Clave1:=integer(ComboBox2.Items.Objects[ComboBox2.ItemIndex]);

[ecfisa]

Hola elturu15.

Tendrías que especificar de que tipo son las variables Clave y Clave1, que hay almacenado en los Combos y que es lo que buscas hacer.


Un saludo.

[elturu15]

Clave1 y Clave2 son de tipo string o integer...y lo que quiero es seleccionar un elemento del ComboBox y Asignarselo a Clave1 o Clave2...y los elemento de COmboBOx varian continuamente Porque son las Claves de una Table de Acces..me explico?

[ecfisa]

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.

[JoseAntonio]

Empezado por elturu15

HOla! Tengo una consulta...Tengo 2 Variables, Clave y CLave1 y a cada una le asigo un calor de un combobox y el codigo qeu uso es este:

Este Bien?



Código Delphi [-]Clave:=integer(ComboBox1.Items.Objects[ComboBox1.ItemIndex]);
Clave1:=integer(ComboBox2.Items.Objects[ComboBox2.ItemIndex]);

puesto que pones Clave1 := Integer(.....)

es obvio que clave1 y clave son enteros, y esta bien la forma de asignar... y para llenar el combo con un solo item tendrias que hacer algo asi como

Código Delphi [-]
   with combobox1 do begin 
      Items.AddObject('Item1', 12);  //  donde el primer parametro es la cadena que se mostrara y el segundo es  el valor que se guardara Internamente

salu2

[ecfisa]

Hola JoseAntonio.

Código Delphi [-]
   with combobox1 do begin 
      Items.AddObject('Item1', 12);  //  donde el primer parametro es la cadena que se mostrara y el segundo es  el valor que se guardara Internamente

Esas líneas no van a compilar, estas pasando un argumento tipo integer donde debería ir un TObject.

Un saludo.

[JoseAntonio]

oops es que no lo habia compilado.... corrijo mi post aqui:

puesto que pones Clave1 := Integer(.....)

es obvio que clave1 y clave son enteros, y esta bien la forma de asignar... y para llenar el combo con un solo item tendrias que hacer algo asi como


Código Delphi [-]
with combobox1 do begin
Items.AddObject('Item1', TObject(12); // donde el primer parametro es la cadena que se mostrara y el segundo es el valor que se guardara Internamente






salu2