Como faço uma pesquisa pelo nome com comandos ADO no delphi.

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.