Fórum Problema ainda persiste em consulta SQL #265154
13/01/2005
0
Galera,
Venho novamente postar uma dúvida.
Recentemente um amigo da comunidade, deu uma dica muito importante para mim, aqui no fórum.
Gostaria de agradece-lo e a todos que se dispuseram a ajudar.
Mas estou ainda encontrando problemas,
É o seguinte:
Numa pesquisa, gostaria de digitar uma parte do nome de um cliente, e me retornar em um Grid todos os clientes encontrados com a string passada, então recebi o seguinte exemplo:
begin
with Dm.cds_Predatado do
begin
Close;
CommandText := ´select * from Predatado where upper(favorecido) like upper( :1 )´;
Params[0].AsString := ´¬´+TxtLocalizar.Text+´¬´;
Open;
if IsEmpty then
begin
Application.MessageBox(´Erro 1001 - Favorecido não encontrado !´,´Erro procura´, mb_ok + mb_IconWarning);
TxtLocalizar.Text := ´´;
end;
end;
Beleza, o código funciona perfeitamente, retornando os dados necessários, mas preciso parametrizar o componente DataSetProvider (poAllowCommandText:=True), para que esta função funcione corretamente, mas acontece um pequeno problema, se consulto o dado necessário e fecho o Form de consulta, e ativo logo em seguida o Form de Alteração dos dados o programa me retorna o erro, informando que a tabela Predatado não foi encontrada. Bom, já achei o problema, é que eu uso uma rotina retirada da revista ClubeDelphi #29, que permite incluir um registro na tabela, incrementando o campo CodPredatado (key primary) toda vez que é iniciado um novo registro. Isto funciona perfeitamente nos modos de inclusão, alteração e exclusão, sem parametrizar o componente DataSetProvider, se parametrizar o componente dá erro na Função retirada da revista.
Então gostaria se possível alguém disponibilizar um exemplo de código para autoincrementar o campo ( CodProdatado tipo Integer), usando a parametrização para poder fazer a pesquisa, ou indicar algum programa de exemplo que inclua, altere e permita a consulta nestes moldes.
Grato a todos que puderem ajudar.
Valnei.
Venho novamente postar uma dúvida.
Recentemente um amigo da comunidade, deu uma dica muito importante para mim, aqui no fórum.
Gostaria de agradece-lo e a todos que se dispuseram a ajudar.
Mas estou ainda encontrando problemas,
É o seguinte:
Numa pesquisa, gostaria de digitar uma parte do nome de um cliente, e me retornar em um Grid todos os clientes encontrados com a string passada, então recebi o seguinte exemplo:
begin
with Dm.cds_Predatado do
begin
Close;
CommandText := ´select * from Predatado where upper(favorecido) like upper( :1 )´;
Params[0].AsString := ´¬´+TxtLocalizar.Text+´¬´;
Open;
if IsEmpty then
begin
Application.MessageBox(´Erro 1001 - Favorecido não encontrado !´,´Erro procura´, mb_ok + mb_IconWarning);
TxtLocalizar.Text := ´´;
end;
end;
Beleza, o código funciona perfeitamente, retornando os dados necessários, mas preciso parametrizar o componente DataSetProvider (poAllowCommandText:=True), para que esta função funcione corretamente, mas acontece um pequeno problema, se consulto o dado necessário e fecho o Form de consulta, e ativo logo em seguida o Form de Alteração dos dados o programa me retorna o erro, informando que a tabela Predatado não foi encontrada. Bom, já achei o problema, é que eu uso uma rotina retirada da revista ClubeDelphi #29, que permite incluir um registro na tabela, incrementando o campo CodPredatado (key primary) toda vez que é iniciado um novo registro. Isto funciona perfeitamente nos modos de inclusão, alteração e exclusão, sem parametrizar o componente DataSetProvider, se parametrizar o componente dá erro na Função retirada da revista.
Então gostaria se possível alguém disponibilizar um exemplo de código para autoincrementar o campo ( CodProdatado tipo Integer), usando a parametrização para poder fazer a pesquisa, ou indicar algum programa de exemplo que inclua, altere e permita a consulta nestes moldes.
Grato a todos que puderem ajudar.
Valnei.
Objetivacreator
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)