Form controle Financeiro

28/05/2017

0

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

Responder

Post mais votado

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

Gabriel Baltazar

Gabriel Baltazar
Responder

Mais Posts

29/05/2017

Janilto Oliveira

Esse CDS é o que ? Seria ClientDataSet ?

Me desculpe é que sou iniciante!!
Responder

29/05/2017

Gabriel Baltazar

Sim, você está usando ele? Senão, como está buscando os dados ?
Responder

29/05/2017

Janilto Oliveira

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
Responder

30/05/2017

Janilto Oliveira

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
Responder

30/05/2017

Marco Antônio

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
Responder

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

Aceitar