Obrigado

funcionou corretamente

 
 
-------Mensagem original-------
 
De: Albert Eije
Data: 02/04/2008 08:49:42
Para: Sergioinfo SP
Assunto: Re: Re: [Curso_Delphi_Iniciante] Filtro
 
OK,

Vamos a algumas considerações:

- Evento OnChange
A cada letra digitada pelo usuário uma consulta será realizada no banco. Se
a tabela de produtos tiver muitos registros seu sistema ficará muiiiiito
lento.

- Locate - Não use. Use uma consulta SQL.

Insira um botão ao lado do edit com o caption Procurar, algo assim.

No código do botão insira o seguinte código:

adoQuery.active := false;
adoQuery.sql.clear;
adoQuery.sql.add('select * from CProd where nome like ' + #39 + edtBusca.txt
+ '%' + #39);
adoQuery.active := true;


Veja o resultado e comente conosco.

Abraços

Albert Eije



Em 02/04/08, Sergioinfo SP <[EMAIL PROTECTED]> escreveu:
Eiu utilizava o evento on change de uma edit este codigo
 
  DataSourceCProd.DataSet.Locate(DBGridCProd.Columns.Items[1].FieldName
EdtBusca.Text,[LoPartialKey, loCaseInsensitive]);
 
para filtrar os produtos assim que fosse digitando...
 
mas hoje estou usando o componente ADOQuery
 
quando mandou este codigo apenas alterei o codigo
 
adoQuery.sql.add('select * from CProd where nome like ' + #39 + edtBusca.txt
+ '%' + #39);

 
 
 



----- Mensagem original ----
De: Albert Eije <[EMAIL PROTECTED]>
Para: Sergio - Jundiai / SP <[EMAIL PROTECTED]>
Enviadas: Terça-feira, 1 de Abril de 2008 23:48:40
Assunto: Re: Re: [Curso_Delphi_Iniciante] Filtro


Posta o código completo da consulta aqui pra gente ver.

Abraços

Albert Eije


Em 01/04/08, Sergio - Jundiai / SP <[EMAIL PROTECTED]> escreveu: 
Boa tarde
 
coloquei uma adquery no formulário
 
mesmo assim nao consegui...
 
quando altero a edit some todos os registro do dbgrid
 
 
 
adq2.sql.add('select * from Nome where nome like ' + #39 + edit1.text + '%'
+ #39);
 
 
 
  
 
 
   Sérgio - Jundiaí / SP
Tel.(11) 3395-7023
   [EMAIL PROTECTED]
(11) 7698-9566
   
-------Mensagem original-------
 
De: Albert Eije
Data: 31/03/2008 09:09:52
Para: [EMAIL PROTECTED]
Assunto: Re: [Curso_Delphi_Iniciante] Filtro
 
Caro Sergio,

Trabalhar com SQL é melhor:

adoQuery.sql.add('select * from CProd where nome like ' + #39 + edtBusca.txt
+ '%' + #39);

Abraços

Albert Eije


Em 30/03/08, Sergio - Jundiai / SP <[EMAIL PROTECTED]> escreveu: 
 
Pessoal
 
 
Bom dia
 
 
estou utilizando este filtro, para filtrar por nome.
 
DataSourceCProd.DataSet.Locate(DBGridCProd.Columns.Items[1].FieldName
EdtBusca.Text,[LoPartialKey, loCaseInsensitive]);
 
O poblema e que usando uma ADO query ele nao esta funcinando
alguem poderia me dar uma luz
 
 
  
 
 
  
 
 
   Sérgio - Jundiaí / SP
Tel.(11) 3395-7023
   [EMAIL PROTECTED]
(11) 7698-9566
   










 
 













Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 


 

[As partes desta mensagem que não continham texto foram removidas]

Responder a