Fórum DBComboBox receber o resultado de uma consulta? #510624

13/02/2015

0

Delphi

Amigos,
Tenho esta situação, o DBComboBox está com as informações do estado, quero fazer uma consulta é trazer a informação selecionada para mostra mais não estou conseguindo.

Agradeço a ajuda.


Style: csDropDownList receber o resultado selecionado
DBComboBox1.Items.IndexOf(dmGenerico.cdsTransportadora.FieldByName('estado').AsString);
Itamar Souza

Itamar Souza

Responder

Posts

13/02/2015

Ricardo

Use a propriedade KeyValue.
Responder

Gostei + 0

19/02/2015

Itamar Souza

Agradeço Ricardo,
Mais este componente não tem está Propriedade.

att..
Responder

Gostei + 0

19/02/2015

Itamar Souza

O problema que vejo é que o DBCOMBOBOX recebe o Style csDropDownList, neste caso quando é você faz a inserção da informação a mesma não aparece, então eu fiz assim:

dbComboemite_uf.Style := csDropDown;
dbComboemite_uf.Text := Generico.cdsClienteFornecedor.FieldByName('estado').AsString;

Agora a informação aparece, mais não tem como altera o style logo apos pois a informação fica em branco.
Responder

Gostei + 0

19/02/2015

Renato Rubinho

Itamar,

Para deixar como csDropDownList, a informação que será exibida no DBComboBox deve fazer parte da lista de itens possíveis para ele.
O que você tem hoje na lista do DBCOmboBox.

Tente:

dbComboemite_uf.Items.Add(Generico.cdsClienteFornecedor.FieldByName('estado').AsString);
dbComboemite_uf.Style := csDropDownList;


depois

dbComboemite_uf.ItemIndex := dbComboemite_uf.Items.Count - 1;

ou

dbComboemite_uf.ItemIndex := dbComboemite_uf.Items.IndexOf(Generico.cdsClienteFornecedor.FieldByName('estado').AsString));

ou

dbComboemite_uf.Text := Generico.cdsClienteFornecedor.FieldByName('estado').AsString;
Responder

Gostei + 0

19/02/2015

Itamar Souza

Eu fiz como está no seu exemplo, mais é preciso retira antes o style

dbComboemite_uf.Style := csDropDown;
dbComboemite_uf.Text := Generico.cdsClienteFornecedor.FieldByName('estado').AsString;

Apos isso não é possível adicionar novamente o style pois a informação não permanece.

agradeço!
Responder

Gostei + 0

19/02/2015

Renato Rubinho

Você adicionou o a informação como um item do DBCombo ?
Tente esta sequência que tem que funcionar, senão, posta seu código para podermos verificar:

dbComboemite_uf.Items.Add(Generico.cdsClienteFornecedor.FieldByName('estado').AsString);

dbComboemite_uf.Style := csDropDownList;

dbComboemite_uf.ItemIndex := dbComboemite_uf.Items.IndexOf(Generico.cdsClienteFornecedor.FieldByName('estado').AsString));
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar