Una dudilla con TComboBox...

[AFilth]

Buenas a todos, tengo una duda muy tonta pero con la que me estoy voviendo loco y no encuentro respuesta buscando en el foro, en un CxComboBox meto lo siguiente:

 
CBTipoPago.Properties.Items.AddObject('Efectivo', TString.Create('1'));
CBTipoPago.Properties.Items.AddObject('Tarjeta', TString.Create('2'));

TString es una clase que he creado que hereda de TObject y que simplemente guarda un String.

Esto lo he hecho para tener el nombre que quiero mostrar más la clave que es la que voy a usar.

Y ahora la pregunta tonta...Como recupero el valor del TObject que he guardado en el TStrings, es decir el valor de la clave que es el que me interesa...

Un saludo.

[[Lepe]]

No uso el cxCombobox, pero debe tener una propiedad Objects[i].

Por otro lado tu TString, debe tener una propiedad o variable para poder leer ese string. Más o menos sería así:

Código Delphi [-]
TSTring(cxCombo.Properties.Objects[i])).propiedadDelTStringParaLeerElString

o bien:

TSTring(cxCombo.Properties.Items[i].Object)).propiedadDelTStringParaLeerElString

Deberás buscar la propiedad Object a vern donde está, si en properties, Items, o una que se llame Objects a secas.

Saludos

[AFilth]

Muchas gracias Lepe, lo acabo de probar y en efecto es así:

TString (CBTipoPrecio.Properties.Items.Objects[CBTipoPrecio.ItemIndex]).Texto;

Un saludo.