[Lazarus-es] tcombobox con values

[Paola Bruccoleri]

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 de nuevo..
suponiendo que el ejemplo es este;
  cboTipo.Items.AddObject('Contado', TObject(1));
  cboTipo.Items.AddObject('Credito', TObject(2));


cómo obtengo el 1 o el 2?
chauuuuuuuuuuu