Eu consegui fazer com o TColumnComboBox da TMS

No Delphi:
Adicione 2 colunas ao seu componente

No código:

procedure TForm1.cbTipoChange(Sender: TObject);
begin
 ShowMessage( cbTipo.ComboItems[cbTipo.ItemIndex].Strings[0] );
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  with cbTipo.ComboItems.Add do
  begin
    Strings.Add('1');
    Strings.Add('Locação');
  end;

  with cbTipo.ComboItems.Add do
  begin
    Strings.Add('2');
    Strings.Add('Venda');
  end;
end;


Mas não teria um componente desse free não?

2009/4/30 Paulo Coutinho <pa...@prsolucoes.com>

> Olá,
>
> Alguém sabe onde tem uma combobox freeware em que eu possa adicionar
> colunas que fiquem escondidas?
>
> Vou explicar: Eu quero preencher minha combo com N itens e cada item tem
> seu ID e esse ID tem que ficar escondido, somente o NOME do item pode
> aparecer.
>
> É tipo o que o DBLookUPComboBox faz, mas não quero deixar ligado a nenhum
> componente, vai ficar totalmente desconectado.
>
>
>
> --
> Atenciosamente,
> Paulo Coutinho.
> Blog: www.prsolucoes.com/blog
> Site: www.prsolucoes.com
> Msn:  pa...@prsolucoes.com
>



-- 
Atenciosamente,
Paulo Coutinho.
Blog: www.prsolucoes.com/blog
Site: www.prsolucoes.com
Msn:  pa...@prsolucoes.com


[As partes desta mensagem que não continham texto foram removidas]

Responder a