Pesquisa incremental usando SQL

Delphi

12/05/2004

Olá, a minha duvida é o seguinte, como posso fazer uma busca com a Query usando o OnChange do Edit, com o Table eu uso findNearest e com a SQL como posso fazer isso, lembrado que o resultado da busca irá aparecer um DBGrid?

[b:2214904ef9][color=red:2214904ef9]Título editado pelo Moderador (AZ)[/color:2214904ef9][/b:2214904ef9]
Leia as regras.


Lfsl

Lfsl

Curtidas 0

Respostas

Rômulo Barros

Rômulo Barros

12/05/2004

procedure TForm1.Edit1Change(Sender: TObject);
begin
  If(Trim(Edit1.Text) <> ´´)Then
  Begin
     ClientDataSet1.Close;
     ClientDataSet1.CommandText := ´select * from veiculo_veic where veiculo_empresa = ´+ QuotedStr(Edit1.Text);// QuotedStr --> Passa o conteúdo do edit entre aspas simples.
     ClientDataSet1.Open;
  End;
end;



GOSTEI 0
Brunoluisfa

Brunoluisfa

12/05/2004

select * from Pessoa where nome like ´edit1.text¬´


GOSTEI 0
POSTAR