Filtrar por meio de SQL

Delphi

12/05/2003

Preciso filtrar por meio de um botão OK o código do vendedor digitado em uma edit. Após confirmar se o código do vendedor existe, teria que visualizar um outro formulário QuickReport com os dados dos clientes do códígo do vendedor checado.


Oziasl

Oziasl

Curtidas 0

Respostas

Marcelo.c

Marcelo.c

12/05/2003

Acho que poderia ser mais ou menos assim:

No evento Onclick do botão:

if tabela.Locate(´Código´, Edit1.Text, []) then
begin
SQL.Close;
SQL.Clear;
SQL.Add(´Select * from Tabela´);
SQL.Add(´Where Código=:cod´);
SQL.Params[0].AsString:=Edit1.Text;
SQL.Open;
end;

Aponte o QR para a Query e faça o preview.

Dúvidas ?

Estamos aí...


GOSTEI 0
Marcelo.c

Marcelo.c

12/05/2003

Detalhe:

Se você utiliza ADOQuery, substitua [b:6584790b71]AsString[/b:6584790b71] por [b:6584790b71]Value[/b:6584790b71]


GOSTEI 0
POSTAR