Form controle Financeiro

Delphi

Automação Comercial

Banco de Dados

28/05/2017

Amigos do DevMedia, mais uma vez venho pedir ajuda para resolver uma duvida,
Tenho uma form com uma dbGrid ligada a um DataSource que claro me retorna dados de uma tabela chamada TBL_DIZIMOS
Preciso Buscar o NOME na tabela MEMBRO e adicionar na TBL_DIZIMO
isso ja acontece quando eu digito nome no Edit mas eu preciso que o Edit filtre em tempo real de digitação,
Exemplo : se eu for pesquisar o JOÃO DAS COUVES
entao no dbedit eu começo a digitar [JO] e o sitema me mostre os relacionados a estes caracteres.
JONAS DAS COUVES
JOEL DAS COUVES
JONATHAN DAS COUVES
Se me resolverem isso ja resolve mas o bom mesmo é preencher o dbgrid com nome e ID

Espero sr compreendido por que eu axo que fiz uma salada de informações
Janilto Oliveira

Janilto Oliveira

Curtidas 0

Melhor post

Gabriel Baltazar

Gabriel Baltazar

29/05/2017

Não entendi bem, mas você pode filtrar no evento onChange do Edit.
cds.Filtered := False;
cds.Filter := ' NOME LIKE ' + QuotedStr('%' + edit.text + '%');
cds.Filtered := True
GOSTEI 1

Mais Respostas

Janilto Oliveira

Janilto Oliveira

28/05/2017

Esse CDS é o que ? Seria ClientDataSet ?

Me desculpe é que sou iniciante!!
GOSTEI 0
Gabriel Baltazar

Gabriel Baltazar

28/05/2017

Sim, você está usando ele? Senão, como está buscando os dados ?
GOSTEI 1
Janilto Oliveira

Janilto Oliveira

28/05/2017

por enquanto eu havia apenas colocado um DBedit direto na tabela mas sei que não é o correto e o que preciso é o seguinte
Edit Nome >> Buscando e filtrando dados da tabela MEMBROS para inserir na tabela VALORES
Minha Form tem vários Edits mas o único que pega valor de outra tabela é o Edit NOME os demais são preenchidos na própria form
Edit Nome >> Filtra dados da table Membro
Se tiver o procedimento completo pra eu fazer aqui agradeço
GOSTEI 0
Janilto Oliveira

Janilto Oliveira

28/05/2017

Boa noite , no Onchange da Edit eu add o seguinte
DM.QNome.Close;
DM.QNome.Parameters.ParamByName('pnome').Value := Edit1.Text + '%';
DM.QNome.Open;



Ma esta dando uma erro de Objeto Parameter definido incorretamente na sei o que fazer kkkk
GOSTEI 0
Marco Antônio

Marco Antônio

28/05/2017

Bom dia, é soh vc seguir a ideia do ''Baltazar'' alterando o nome do seu componente

DM.QNome.Filtered := False;
DM.QNome.Filter := '' NOME LIKE '' + QuotedStr(''%'' + edit.text + ''%'');
DM.QNome.Filtered := True

Lembrando como ele falo, deverá ser implementado na rotina ''onChange'' do edit.

Abc
GOSTEI 1
POSTAR