ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Problemas DBgridviewer com firebird e fibplus

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
Suykoden
Novato
Novato


Registrado: Sexta-Feira, 22 de Agosto de 2014
Mensagens: 1

MensagemEnviada: Sex Ago 22, 2014 5:27 pm    Assunto: Problemas DBgridviewer com firebird e fibplus Responder com Citação

Boa tarde estou tentando desenvolver um formulário de pesquisa no banco para retorno do resultado em um dbgrid,porém mesmo usando a sentença like o mesmo me retorna todos os valores da tabela e quando eu aciono o evento clicando no botão pesquisar novamente o mesmo não atualiza a lista da dbgrid novamente.

Segue o código:
Citação:
DmConexao.FBDatabase.DefaultTransaction:=DmConexao.Transaction;
DmConexao.FBDatabase.StartTransaction;
pesqDataset.Close;

sql:='select * from equipamento where nome like'+QuotedStr(dbPesquisa.Text+'%') ;
pesqDataset.SQLs.SelectSQL.Text:=sql;

pesqDataset.Open;
//
//
DmConexao.pesQuery.Close;
DmConexao.pesQuery.SQL.Text:=pesqDataset.SQLs.SelectSQL.Text;
pesqDataset.Open;
DmConexao.pesQuery.ExecQuery;
frmCadastro.bdDataset.Open;
DmConexao.pesQuery.Transaction:=DmConexao.Transaction;
DmConexao.Transaction.Active:=true;

dbGridPesquisa.DataSource:=dataSourcePesquisa;
dataSourcePesquisa.DataSet:=pesqDataset;


tentei desta forma tb:
Citação:
DmConexao.pesQuery.Close;
DmConexao.pesQuery.ParamByName('PNOME').Value:=dbPesquisa.Text+'%';
DmConexao.pesQuery.ExecQuery;

dbGridPesquisa.DataSource:=dataSourcePesquisa;



e desta forma:
Citação:

pesqDataset.Close;
pesqDataset.ParamByName('pnome').Value:='%'+dbPesquisa.Text+'%';
pesqDataset.SelectSQL;
pesqDataset.Open;
dbGridPesquisa.DataSource:=dataSourcePesquisa;



porém nenhuma delas funcionou se alguém puder me ajudar Shocked
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB