DBCombobox receber valor de tabela

[Gabriel Cabral]

E ae pessoal..

assim, o DBComboBox não recebe valores da tabela?

Digo, a propriedade Text dele?

Vou explicar melhor...

Fazendo uma busca de produtos em um DBGrid, eu preencho vários Edits e DBEdits com os valores de tal registro.

Aí também tenho um DBComboBox. Quando estou no modo inclusão ou alteração, ele possui valores a serem escolhidos.. Mas quando realizo uma busca, o valor deste campo não aparece na combo.

if dm.ESTAPRO.FieldByName('PROICM').IsNull = False then
begin
  frmCadPro.cboCadPro_Icms.Text := dm.ESTAPRO.FieldByName('PROICM').Value;
end;

O código acima não é aceitável... a combo fica em branco.

Mas ela deveria trazer o valor que está na tabela... e mostrar esse valor, como se eu tivesse escolhido alguma das opções da combo.

Como devo fazer pra combo mostrar o valor buscado na tabela??

Obrigado.

Editado Abril 5, 2010 por Gabriel Cabral

[Douglas Soares]

Quando você consulta os dados, tras todos os campos e não tras os dados do ComboBox, é isso?

[Gabriel Cabral]

É.. tipo... na inclusão do produto, tenho a combobox pra escolher a alíquota de icms... tenho as opções 7, 12, 18 e 29... aí escolho uma e esta opção que escolhi fica sendo o valor da propriedade Text da combo, certo?! é este valor que será gravado na tabela..

aí depois vou fazer uma busca deste produto..então desejo que o valor gravado (18, por exemplo) preencha a combobox.

Ou seja... é diferente de adicionar itens na combo... o 18 deve ser o valor da propriedade Text.

[Douglas Soares]

Se ele estiver gravando no banco normalmente, tenta fazer isso após a pesquisa...

DBComboBox1.Text := frmCadPro.cboCadPro_Icms.Text;

Abraços

[Gabriel Cabral]

Mas frmCadPro.cboCadPro_Icms é a DBComboBox

Não entendi... é pra colocar em outra combo o valor recebido pela minha combo? mas ela não está recebendo o valor da tabela

[Douglas Soares]

Você tem uma tabela com todos os valores que você passa pro DBComboBox? ou você passa tudo pra ele manualmente pelo ITENS?

Se tiver a tabela, troque o componente pelo DBLookupComboBox, altere a ListSource pelo DataSource que está os dados e o ListField o campo de descrição...

daí no DataSource você coloca o DataSource de gravação, e em DataField o campo em que vai gravar a informação...

Caso faça manualmente pelo ITENS... siga abaixo...

Mas frmCadPro.cboCadPro_Icms é a DBComboBox

Não entendi... é pra colocar em outra combo o valor recebido pela minha combo? mas ela não está recebendo o valor da tabela

Eu não sabia que seu DBComboBox chamava cboCadPro_Icms... por isso falei besteira...

Então tente assim

cboCadPro_Icms.Text := dm.ESTAPRO.FieldByName('PROICM').Value;

Abraços

[Gabriel Cabral]

É... dessa última forma é do jeito que eu fiz e não está dando certo...

Vou tentar fazer da primeira maneira que você disse

[Douglas Soares]

Beleza, tenta ai, desculpa eu ter passado o mesmo que você já tentou, eu to meio sem cabeça hoje....

Abraços