Pesquisa por CODIGO e NOME (URGENTISSIMOOOOOOO!!)

Delphi

26/02/2003

Preciso buscar CODIGO ou NOME num banco de dados via QUERY, vou explicar:

Tenho codigos: 001, 002, 003 ao digitar num edit e apertar um botao ele pegue o registro do codigo digitado.

Tenho nomes: roberto luis, roberto silva, eduardo marcos, felipe... ao digitar roberto o DBGRID aparece os robertos, so que se eu digitar roberto luis ele aparece somente esse roberto luis.

[u:460f51a883][i:460f51a883][b:460f51a883]Os códigos acima usam o mesmo edit e o mesmo botao de busca.[/b:460f51a883][/i:460f51a883][/u:460f51a883]

Poooo eu to precisando dessa ajuda com urgencia.. por favor, que seja em SQL e coloque o codigo aqui com urgenciaa!!

:?: :?: :?: :?: :?: :?: :?: :?:

Agradeço, desde já

Nelson


Anonymous

Anonymous

Curtidas 0

Respostas

Jycn

Jycn

26/02/2003

Caro Amigo,

Eu utilizo a seguinte forma:

Ponho um combobox com as opções de pesquisa, ex:

Codigo
Nome

No Evento OnChange do Edit faço:

Case ComboBox1.ItemIndex of
0:Query1.Locate(´codigo´, edit1.text,[lopartialkey]);
1:Query1.Locate(´nome´, edit1.text,[lopartialkey]);
End;

Se entendi bem, espero ter ajudado


GOSTEI 0
Eniorm

Eniorm

26/02/2003

Tente usar SQL para tal.
use:
Query.Close;
Query.SQL.Clear;
Query.SQL.Add(´select * from nometabela where codigo = ´+edit1.text);
Query.Open;


Com o nome, use:

Query.Close;
Query.SQL.Clear;
Query.SQL.Add(´select * from nometabela where nome like ´´´+edit1.text+´¬´´´);
Query.Open;



GOSTEI 0
POSTAR