auto completar

Delphi

21/03/2003

Como digitar um nome e saber se existe no banco de dados , antes de acabar de digitar ?
Como se fosse o auto completar .
O edit dá pra fazer isto?


Obrigado
Claudio Silveira


Anonymous

Anonymous

Curtidas 0

Respostas

Anonymous

Anonymous

21/03/2003

Amigo, no evento ONKEYDOWN acho, do Edit, coloque o código:

Tabela.FindNearest([edit1.text+Key]);

A variável KEY é a letra que você acabou de digitar e é enviada automaticamente pelo delphi ao evento.

Deve funcionar!

Valeu

Rodrigo


GOSTEI 0
Marcelo

Marcelo

21/03/2003

Voce pode tentar assim:

procedure TForm1.Edit1Change(Sender: TObject);
begin
Tabela.IndexName:=´iNome´;
Tabela.FindNearest([Edit1.text]);
end;

Valeu?

at+...


GOSTEI 0
Anonymous

Anonymous

21/03/2003

No Evento OnChange do tedit digite:

tabela.locate(´campo_da_tabela´,edit1.text,[lopartialkey]);


Não esqueça de colocar na Clausula Uses a Unit DB.

Caso Você precise utilizar um componente excelente para esse tipo de pesquisa, já com autocomplemento (Tabelas Paradox), entre no Site no Elivaldo, lá existe vários componentes, e tem um exatamente com esta função sem qualquer necessidade de programação.
www.elivaldo.com.br


Espero ter Ajudado!
salomaosoares@bol.com.br


GOSTEI 0
Roberto_conetsys

Roberto_conetsys

21/03/2003

O Componente do Elivaldo só funciona se consultarmos a mesma ´Table´ no meu caso estou precisando consultar em outra ´table´ porque a ´table´ em edição/inserção esta amarradaa um Data source Master então utilizo outra ´table´ que acessa a mesma tabela mas não esta amarrada a nehum DS master.


GOSTEI 0
POSTAR