problema com query URGENTE!!!!

Delphi

09/05/2003

tenho uma tabela do tipo TDBGrid, onde configurei para exibir os dados de uma certa tabela, e junto a tabela coloquei um campo EDIT, onde eu quero que ao decorrer do digitar liste na tabela somente os registros que contiveremo texto digitado no EDIT

exemplo

tenho uma tabela de clientes, e nesta tabela tenho 1000 cliente cadastrados com vários nomes, e quero um nome específico, e digito esse nome no EDIT, e enquanto eu digito ele liste todos os nomes que contenham os caracteres digitados, se eu digitar apenas a letra A, liste todos os nome que comecem com a letra A, se eu digitar AN, liste todos os nomes que comecem com AN e assim por diante
desde já agradeço


Felipe.palucoski

Felipe.palucoski

Curtidas 0

Respostas

Leandronanet

Leandronanet

09/05/2003

Coloque isso no evento OnChance do Edit

if Edit.Text =´´ then begin Nome_da_Tabela.Filtered:=false; exit; end; Nome_da_Tabela.Filter:=´Nome_do_Campo ´ + quotedstr(Edit.text+´*´); Nome_da_Tabela.Filtered:=true;


Espero ter ajudado. :D


GOSTEI 0
Edmar Zatarin

Edmar Zatarin

09/05/2003

No evento onchange do edit escreva:

procedure TFmSQL01.Edit1Change(Sender: TObject);
begin
With Consulta do
begin
Active := false;
SQL.Clear;
SQL.ADD (´Select * From BioLife Where Category like upper(´´¬+EdLetra.Text+´¬´)´);
Active := true;
end;
Edit1.SetFocus;
end;


esse exemplo busca todas as palavras que contenham o valor digitado no edit.

Veja:

PRIMEIRA LETRA ´LETRA¬´

ULTIMA LETRA ´¬LETRA´

QUE CONTENHA A LETRA ´¬LETRA¬´


ok, espero que sirva pra vc e boa sorte....


GOSTEI 0
POSTAR