Em que versão do Delphi voce criou o Exemplo? Estou tentando abrir o projeto aqui no Delphi 2007, e dá: Unable to load project Já fiz o download umas 3 vezes para ver se resolvia, mas nada... Só abre o MD_ItemCombo... e da Unit1.pas só abre o form e não mostra o código.
Abraços, Edelson. 2009/4/30 Paulo Coutinho <[email protected]> > > > Postei um exemplo na sessão de arquivos do grupo, está funcionando > perfeitamente. > > Obrigado a todos, vocês são os caras. > > Abraçam e fiquem com Deus. > > 2009/5/1 Paulo Coutinho <[email protected] <paulo%40prsolucoes.com>> > > > > Hum, boa essa do AddObject, nunca havia testado. > > > > Posso no caso armazenar vários objetos de minha classe ItemCombo, que > > contém atributos como id/valor, ai depois recupero com o cast como você > fez > > joão. > > > > Muito bom, obrigado pela ajuda, vou testar aqui. > > > > 2009/4/30 Joao Henrique Levada <[email protected]<joaolevada%40gmail.com> > > > > > > > >> > >> Meu caro, você pode armazenar um valor em cada item do combo: > >> > >> iNumero := 1981; {valor inteiro para armazenar} > >> ComboBox1.Items.AddObject('meu nome', TObject(iNumero)); {usa a > >> propriedade > >> Objects para armazenar o integer} > >> > >> iIndice := Combobox1.ItemIndex;//iIndice é variável explicativa > >> iValor := Integer(ComboBox1.Items.Objects[iIndice]); {recuperando o > >> valor armazenado} > >> > >> > >> > > > > > > > > -- > > Atenciosamente, > > Paulo Coutinho. > > Blog: www.prsolucoes.com/blog > > Site: www.prsolucoes.com > > Msn: [email protected] <paulo%40prsolucoes.com> > > > > -- > Atenciosamente, > Paulo Coutinho. > Blog: www.prsolucoes.com/blog > Site: www.prsolucoes.com > Msn: [email protected] <paulo%40prsolucoes.com> > > [As partes desta mensagem que não continham texto foram removidas] > > > [As partes desta mensagem que não continham texto foram removidas]
