Como faço uma pesquisa pelo nome com comandos ADO no delphi.
31/03/2003
0
Como faço uma pesquisa pelo nome com comandos ADO no delphi.
Anonymous
Curtir tópico
+ 0
Responder
Posts
31/03/2003
Hatiro
Olá simples como matar uma barata!
na propriedade SQL do componente ADOquery1 inclua as seguintes linhas:
select * from cliente
where 1=1
obs: lembre-se a propriedade sql[0] é a primeira linha e a segunda é a sql[1]
ou seja sql[0] corresponde a ´select * from cliente´
e sql[1] a linha ´where 1=1´
agora no seu evento do button inclua o seguinte codigo abaixo:
ADOquery1.SQL[1] := ´WHERE CL_NOME LIKE ´+QUOTEDSTR(´¬´+TRIM(EDIT1.Text)+´¬´);
ADOquery1.Execute;
if ADOquery1.RecordCount = 0 then
showmessage(´nenhum registro´);
existem n maneiras de fazer isso inclusive usando parametros so q acho q a forma mais dinamica é o melhor caminho a seguir! 8)
Hatiro.
na propriedade SQL do componente ADOquery1 inclua as seguintes linhas:
select * from cliente
where 1=1
obs: lembre-se a propriedade sql[0] é a primeira linha e a segunda é a sql[1]
ou seja sql[0] corresponde a ´select * from cliente´
e sql[1] a linha ´where 1=1´
agora no seu evento do button inclua o seguinte codigo abaixo:
ADOquery1.SQL[1] := ´WHERE CL_NOME LIKE ´+QUOTEDSTR(´¬´+TRIM(EDIT1.Text)+´¬´);
ADOquery1.Execute;
if ADOquery1.RecordCount = 0 then
showmessage(´nenhum registro´);
existem n maneiras de fazer isso inclusive usando parametros so q acho q a forma mais dinamica é o melhor caminho a seguir! 8)
Hatiro.
Como faço uma pesquisa pelo nome com comandos ADO no delphi.
Responder
Clique aqui para fazer login e interagir na Comunidade :)