Bom no meu programa eu costumo fazer assim. Eu tenho um combo que eu preencho com o campos da base de dados e um edit onde o cliente digita a pesquisa, assim eu consigo localizar qualquer informação da tabela. O cliente escolhe o campo no combo e digita a pesquisa que é filtrada a cada letra digitada. Fica assim o edit:
procedure TForm2.Edit1Change(Sender: TObject); var texto1,texto2,texto3:string; begin texto1:=combobox1.Text; texto2:='%'+edit1.Text+'%'; texto3:='Select * from Alunos Where ' + texto1 + ' LIKE '+ quotedstr(texto2) + ' Order by Aluno_Código'; O combo fica assim: procedure TForm2.ComboBox1DropDown(Sender: TObject); var x:integer; begin combobox1.Items.Clear; for x:=0 to dm.adoalunos.FieldCount - 1 do begin combobox1.Items.Add(dm.adoalunos.Fields[x].FullName); end; end; Ai vc pode adaptar a sua realidade. Dessa forma fica meio lento, mas tem outras formas de fazer tb. Ainda não deu tempo para acertar o meu. T+ Icaro Ferreira escreveu: > > Na propriedade onkeypress do EditConsulta vc colocar > btnPesquisarAlun oClick(Sender) ; ou seja a cada hora q vc teclar ele > vai ativar o codigo q esta dentro do botao... e vai fazer a busca > > qq da um toke blz > > Boas Festas > > ----- Mensagem original ---- > De: itasouza <[EMAIL PROTECTED] <mailto:itasouza%40yahoo.com.br>> > Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> > Enviadas: Sexta-feira, 21 de Dezembro de 2007 11:36:20 > Assunto: Re: Res: [delphi-br] Dúvida - Tipos de Consulta na base dados > > Bom dia Amigo > > Acho que não me expressei bem, na verdade eu não quero uma busca > > automática em um intervalo de tempo definido, o que eu quis dizer > > seria uma busca ao se digitar no campo EditConsulta. > > Ex; I = todas as palavaras que começam com "I" > > T = todas as palavras que começam com "IT" > > A = todas as palavras que começam com "ITA" etc.... > > <!-- > > #ygrp-mkp{ > border:1px solid #d8d8d8;font-family:Arial;margin:14px 0px;padding:0px > 14px;} > #ygrp-mkp hr{ > border:1px solid #d8d8d8;} > #ygrp-mkp #hd{ > color:#628c2a;font-size:85%;font-weight:bold;line-height:122%;margin:10px > 0px;} > #ygrp-mkp #ads{ > margin-bottom:10px;} > #ygrp-mkp .ad{ > padding:0 0;} > #ygrp-mkp .ad a{ > color:#0000ff;text-decoration:none;} > --> > > <!-- > > #ygrp-sponsor #ygrp-lc{ > font-family:Arial;} > #ygrp-sponsor #ygrp-lc #hd{ > margin:10px 0px;font-weight:bold;font-size:78%;line-height:122%;} > #ygrp-sponsor #ygrp-lc .ad{ > margin-bottom:10px;padding:0 0;} > --> > > <!-- > > #ygrp-mlmsg {font-size:13px;font-family:arial, helvetica, clean, > sans-serif;} > #ygrp-mlmsg table {font-size:inherit;font:100%;} > #ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean, > sans-serif;} > #ygrp-mlmsg pre, code {font:115% monospace;} > #ygrp-mlmsg * {line-height:1.22em;} > #ygrp-text{ > font-family:Georgia; > } > #ygrp-text p{ > margin:0 0 1em 0;} > #ygrp-tpmsgs{ > font-family:Arial; > clear:both;} > #ygrp-vitnav{ > padding-top:10px;font-family:Verdana;font-size:77%;margin:0;} > #ygrp-vitnav a{ > padding:0 1px;} > #ygrp-actbar{ > clear:both;margin:25px 0;white-space:nowrap;color:#666;text-align:right;} > #ygrp-actbar .left{ > float:left;white-space:nowrap;} > .bld{font-weight:bold;} > #ygrp-grft{ > font-family:Verdana;font-size:77%;padding:15px 0;} > #ygrp-ft{ > font-family:verdana;font-size:77%;border-top:1px solid #666; > padding:5px 0; > } > #ygrp-mlmsg #logo{ > padding-bottom:10px;} > > #ygrp-vital{ > background-color:#e0ecee;margin-bottom:20px;padding:2px 0 8px 8px;} > #ygrp-vital #vithd{ > font-size:77%;font-family:Verdana;font-weight:bold;color:#333;text-transform:uppercase;} > #ygrp-vital ul{ > padding:0;margin:2px 0;} > #ygrp-vital ul li{ > list-style-type:none;clear:both;border:1px solid #e0ecee; > } > #ygrp-vital ul li .ct{ > font-weight:bold;color:#ff7900;float:right;width:2em;text-align:right;padding-right:.5em;} > #ygrp-vital ul li .cat{ > font-weight:bold;} > #ygrp-vital a{ > text-decoration:none;} > > #ygrp-vital a:hover{ > text-decoration:underline;} > > #ygrp-sponsor #hd{ > color:#999;font-size:77%;} > #ygrp-sponsor #ov{ > padding:6px 13px;background-color:#e0ecee;margin-bottom:20px;} > #ygrp-sponsor #ov ul{ > padding:0 0 0 8px;margin:0;} > #ygrp-sponsor #ov li{ > list-style-type:square;padding:6px 0;font-size:77%;} > #ygrp-sponsor #ov li a{ > text-decoration:none;font-size:130%;} > #ygrp-sponsor #nc{ > background-color:#eee;margin-bottom:20px;padding:0 8px;} > #ygrp-sponsor .ad{ > padding:8px 0;} > #ygrp-sponsor .ad #hd1{ > font-family:Arial;font-weight:bold;color:#628c2a;font-size:100%;line-height:122%;} > #ygrp-sponsor .ad a{ > text-decoration:none;} > #ygrp-sponsor .ad a:hover{ > text-decoration:underline;} > #ygrp-sponsor .ad p{ > margin:0;} > o{font-size:0;} > .MsoNormal{ > margin:0 0 0 0;} > #ygrp-text tt{ > font-size:120%;} > blockquote{margin:0 0 0 4px;} > .replbq{margin:4;} > --> > > Abra sua conta no Yahoo! Mail, o único sem limite de espaço para > armazenamento! > http://br.mail.yahoo.com/ <http://br.mail.yahoo.com/> > > [As partes desta mensagem que não continham texto foram removidas] > > -- Éderson Cassiano Bologna [EMAIL PROTECTED] sKYPE: edersoncassiano MSN: [EMAIL PROTECTED] www.microtechshop.com
