Fórum Busca por palavra , como fazer? #165157

06/06/2003

0

A í galera

Alguém aí conhece o DtDelphi 800 Dicas, aquele tutorial feito pelo Lloyd, O DtDelphi possui uma pesquisa onde vc digita a palavra e aparece logo abaixo na grid a relação de coincidências referentes a palavra digitada e quando vc clica em algum item na grid aparece ao lado o texto referente ao item, alguém sabe fazer uma busca desse tipo ou parecida, No Delphi ????

Valeu Galera... :wink:


Giovani

Giovani

Responder

Posts

06/06/2003

Aroldo Zanela

Colega,

Você está usando TTable ou TQuery?

Com TTable:

procedure TForm1.Edit1Change(Sender: TObject);
begin
  Table1.FindNearest([Edit1.Text]);
end;



Responder

Gostei + 0

07/06/2003

Ajmsistemas

meu mano... ou assim pela query

QUERY.ACTIVE := FALSE;
QUERY.SQL.Clear;
QUERY.SQL.Add(´Select * from SUA_TABELA Where CAMPO_A_BUSCAR Like ´´+Edit1.text+´¬´´);
QUERY.Active := TRUE;


:D


Responder

Gostei + 0

07/06/2003

Ajmsistemas

meu mano... ou assim pela query QUERY.ACTIVE := FALSE; QUERY.SQL.Clear; QUERY.SQL.Add(´Select * from SUA_TABELA Where CAMPO_A_BUSCAR Like ´´+Edit1.text+´¬´´); QUERY.Active := TRUE; :D


desculpa eu esquci de avisar.. o comando acima ficar entre :

procedure TForm1.Edit1Change(Sender: TObject);
begin
//o comando acima...
End;

blz...
espero ter te ajudado.


Responder

Gostei + 0

13/06/2003

Giovani

Aí galera, valeu as dicas só que é o seguinte:

o campo onde eu quero dar o Like é do tipo FMTMEMO e este campo está
lincado a um DBRichEdit será quo o Like vai percorrer o Campo FTMEMO?

exemplo: o campo FTMEMO está lincado a um DBRICHEDIT, suponhamos que
neste campo contenha o seguinte: ´Hoje é dia de festa!´.
Agora eu digito no Edit de busca o seguinte: ´festa´ e a busca é feita
neste campo que contenha ´festa´ e a Query somente me retornará os registros que contenham a palavra ´festa´, será que é dificil???

UM abraço galerão... :wink: :wink: :wink: :roll:

Giovani reis


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar