Pesquisa em Campo Codigo

17/12/2003

1

Alguem pode me ajudar com um código mais profissional?

ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(´SELECT * FROM TabCliente´);
if Trim(Edit2.text) <> ´´ then
ADOQuery1.sql.Add(´ where matricula like ´´¬´ + edit2.text + ´¬´´´);

Uso este codigo pra pesquisar por matricula que e um campo integer, quero uma persquisa exata, que ele so me amostre exatamente oque eu digitar.


Responder

Posts

17/12/2003

Tnaires

Olá uoquisala, não posso dizer q minha sugestão é mais ´profissional´, mas aí vai:

Coloque no query o seguinte código:
´SELECT * FROM TabCliente WHERE matricula = :matricula´

No seu programa, faça o seguinte:
ADOQuery1.Close;
ADOQuery1.Parameters.ParamByName(´matricula´).Value := StrToInt(Edit2.Text);
ADOQuery1.Open;


Espero ter ajudado, sucesso


Responder