[Lazarus-es] tcombobox con values

Paola Bruccoleri pbruccoleri en adinet.com.uy
Lun Jun 14 20:03:47 CEST 2010


José Mejuto escribió:
> Hello Paola,
>
> Monday, June 14, 2010, 6:08:48 PM, you wrote:
>
> PB> Estoy probando esto..
> PB>   cboTipo.Items.AddObject('Contado', TObject('A'));
> PB>   cboTipo.Items.AddObject('Credito', TObject('B'));
> PB> y me agrega al combo una linea vacía y luego 'Contado', y 'Credito'..
> PB> además, no sé como llegar a obtener el valor A o B respectivamente, ya
> PB> que no existe el método SelectedItem...
>
> Depende de la naturaleza de los objetos asociados que quieras poner,
> como veo que son strings, lo más fácil es que crees un TStringList con
> las distintas strings asociadas y en "AddObject" pongas el index
> correspondiente del TStringList. También puedes hacer que el
> "AddObject" sea un string, pero eso es peligroso, ya que se perdería
> el control del string por parte del compilador y tendrías que
> asegurarte manualmente de crearla y liberarla. Resumiendo, más fácil
> con un TStringList.
>
>   
Hola...
descubrí que para obtener el A o B, puedo hacerlo de esta forma:

chr(Integer(cboTipoComprobante.Items.Objects[cboTipoComprobante.Itemindex]))

chauuuuuuuuu






More information about the Lazarus-es mailing list