SQL

Delphi

17/09/2003

Ola

Tem como Fazer Um Filtro em SQL Com um determinado campo que tenha o mesmo numero. mas esse numero sera dado apartir de um edit.

Exe

No edit contem o numero ´1´

Então o filtro ficaria assim.

codigo caixa marca
1 001 Zanthus
1 002 Zanthus
1 003 Zamthus

Se no edit for ´2´

codigo caixa marca
2 010 Sweda
2 020 Sweda
2 001 Sweda

Tem como fazer


Dart


Dart

Dart

Curtidas 0

Respostas

Marcelo.c

Marcelo.c

17/09/2003

Query.Close;
Query.SQL.Clear;
Query.SQL.Add(´Select * from tabela where codigo= ´);
Query.SQL.Add(Edit1.Text);
Query.Open;


ou 

Query.Close;
Query.SQL.Clear;
Query.SQL.Add(´Select * from tabela where codigo= ´+Edit1.Text);
Query.Open;



GOSTEI 0
Rodrigo Coutinho

Rodrigo Coutinho

17/09/2003

Olá amigo tem sim:

No evento onkeypress faça o seguinte:

Var Qry: tQuery;
Begin
Qry := tQuery.Create(Application);
With Qry do
Begin
DataBaseName := PathBase;
Close;
Sql.Clear;
Sql.Add(´Select * From Tbl Where Codigo = :Cod´);
ParamByName(´Cod´).AsInteger := StrtoInt(Edit1.Text);
Open;
End;
End;
Isso deve te ajudar um pouco, ou vc deixa o codigo sql dentro de um componente query.

[]s, Rodrigo Coutinho


GOSTEI 0
Logo

Logo

17/09/2003

segue um exemplo para fazer um filtro por parametros na query

Query.Close;
Query.SQL.Clear;
Query.SQL.text := ´select * from cliente where ((cod_cli =:dcod))´;
Query.ParamByName(´dcod´).Asinteger := strtoint(Edit1.text);
Query.Prepare;
Query.Open;


GOSTEI 0
POSTAR