[Lazarus-es] tcombobox con values

[José Mejuto]

Hello Paola,

Monday, June 14, 2010, 7:06:00 PM, you wrote:

>> asegurarte manualmente de crearla y liberarla. Resumiendo, más fácil
>> con un TStringList.
PB> suponiendo que el ejemplo es este;
PB>   cboTipo.Items.AddObject('Contado', TObject(1));
PB>   cboTipo.Items.AddObject('Credito', TObject(2));
PB> cómo obtengo el 1 o el 2?

No estoy seguro 100% de memoria, pero creo recordar que sería:

Index:=Integer(cboTipo.Items.Objects[cboTipo.ItemIndex]);

Nos daría el índice del actual (siempre que esté seleccionado uno
claro).

-- 
Best regards,
 José