DBLookupComboBox mostrando 2 compos
dá pra fazer um DBLookupComboBox mostrar o conteude de duas coluas.
por exemplo:
0112 - BIRO DE MADEIRA
O código e o nome do produto
trabalho com Delphi 7 e paradox
Farias
farias@bol.com.br
por exemplo:
0112 - BIRO DE MADEIRA
O código e o nome do produto
trabalho com Delphi 7 e paradox
Farias
farias@bol.com.br
Fariasps
Curtidas 0
Respostas
Adilsond
14/04/2004
Voce pode fazer de duas maneiras:
1 - Na propriedade ListField coloque os campos desejados separados por ;. Ex: CustNo;Company
2 - Crie um campo com a junção das duas colunas.
Caso esteja utilizando Query:
SELECT customer.´CustNo´ , cast(customer.´CustNo´ as char(5)) || ´ - ´ || customer.´Company´ As Descricao
FROM ´customer.db´ customer
ORDER BY 2
Caso esteja utilizando Table:
Crie um campo calculado e no evento onCalcFields voce faz a junção dos campos e coloca no campo criado.
1 - Na propriedade ListField coloque os campos desejados separados por ;. Ex: CustNo;Company
2 - Crie um campo com a junção das duas colunas.
Caso esteja utilizando Query:
SELECT customer.´CustNo´ , cast(customer.´CustNo´ as char(5)) || ´ - ´ || customer.´Company´ As Descricao
FROM ´customer.db´ customer
ORDER BY 2
Caso esteja utilizando Table:
Crie um campo calculado e no evento onCalcFields voce faz a junção dos campos e coloca no campo criado.
GOSTEI 0
Fariasps
14/04/2004
gostaria de fazer com Table. como faço para criar um campo calculado... e utilizar o evento onCalcFields para juntar os campos?
obrigado...
Farias
obrigado...
Farias
GOSTEI 0
Adilsond
14/04/2004
De um clique duplo sobre sua table. Com o botão direito clique em new field... . Coloque o nome desejado para o novo campo e definia o seu tipo como string, dando um tamanho que suporte a descrição + ´ - ´ + codigo.
Defina o seu tipo como Calculated e Clique em ok. No evento onCalcFields faça:
TabelaCampoCalculado.AsString := Format(´¬.5d - ¬s´,[TabelaCampoCodigo.AsInteger, TabelaCampoDescricao.AsString]);
Basta colocar este novo campo como o ListField de sua combo.
Defina o seu tipo como Calculated e Clique em ok. No evento onCalcFields faça:
TabelaCampoCalculado.AsString := Format(´¬.5d - ¬s´,[TabelaCampoCodigo.AsInteger, TabelaCampoDescricao.AsString]);
Basta colocar este novo campo como o ListField de sua combo.
GOSTEI 0