Carlos, Ou então vc pode usar a função StringReplace do Delphi ;-)
Ex.: Var Troca : String; E no seu código utilize assim: Troca:= StringReplace(Edit3.Text,' ','%',[rfReplaceAll]); [ ]´s Moacir carlos alberto do amaral escreveu: >Olá Willian Jerônymo, > > Vivendo e Aprendendo, muito legal !!! > > Um abraço, > > Carlos > > >--- Em delphi-br@yahoogrupos.com.br, Willian Jerônymo - Yahoo ><[EMAIL PROTECTED]> escreveu > > >>Você pode usar assim: >> >>Crie essa function: >> >>Function BuscaTroca(Text,Busca : String) : String; >>Var N : Integer; >>begin >> For N := 1 to Length(Text) do >> begin >> if Copy(Text,N,1) = ' ' then >> begin >> Delete(Text,N,1); >> Insert('%',Text,N); >> end; >> end; >> Result := '%' + Text + '%'; >>end; >> >>Depois declare uma variável: >>Var >> Troca : String; >> >>E no seu código utilize assim: >> >>Troca:= BuscaTroca(Edit3.Text,' '); //Para fazer a substituição dos >> >> >espaços em branco por % > > >>Begin >> Close; >> SQL.Clear; >> SQL.Add('SELECT * from Produtos'); >> SQL.Add('Where DescProd LIKE QuotedStr(Troca)); >> Open; >> if DBEdit1.Text='' then >> ShowMessage('Nome não cadastrado'); >> Edit3.Setfocus; >>end; >> >> >>Willian Jerônymo >>----- Original Message ----- >> From: Eduardo Silva ® >> To: delphi-br@yahoogrupos.com.br >> Sent: Wednesday, January 26, 2005 1:27 PM >> Subject: RES: [delphi-br] Pesquisa SQL >> >> >> Willian passa essa função pra mim que eu tentei fazer do jeito >> >> >que colocaram > > >> com e não to conseguindo.... >> >> -----Mensagem original----- >> De: Willian Jerônymo - Yahoo [mailto:[EMAIL PROTECTED] >> Enviada em: quarta-feira, 26 de janeiro de 2005 13:19 >> Para: delphi-br@yahoogrupos.com.br >> Assunto: Re: [delphi-br] Pesquisa SQL >> >> >> >> O que você pode fazer é quando alguém for consultar alguma >> >> >coisa você pode > > >> instruir a pessoal a digitar da seguinte maneira >> >> no seu Edit: %SHAMPOO%300ML% que irá dar certo, ou você pode >> >> >fazer de uma > > >> maneira automática >> >> trocando os espaços em branco por % que fica melhor para o >> >> >usuário. > > >> Se quiser te passo uma função que faz essa troca. >> >> >> Willian Jerônymo >> ----- Original Message ----- >> From: fabianojd >> To: delphi-br@yahoogrupos.com.br >> Sent: Wednesday, January 26, 2005 2:18 AM >> Subject: [delphi-br] Pesquisa SQL >> >> >> >> Gostaria de fazer pesquisa SQL por partes do nome >> >> >completo. Ex. > > >> quero achar um SHAMPOO com 300ML, mas não sei o nome >> >> >completo. Então > > >> digitaria: SHAMPOO 300ML. >> Normalmente o nome é: SHAMPOO NOME 300ML. >> >> a funcção que uso é: >> >> Begin >> Close; >> SQL.Clear; >> SQL.Add('SELECT * from Produtos'); >> SQL.Add('Where DescProd >> >> >LIKE ''%'+Edit3.text+'%'' '); > > >> Open; >> if DBEdit1.Text='' then >> ShowMessage('Nome não cadastrado'); >> Edit3.Setfocus; >> end; >> >> >> Obrigado. >> >> >> >> >> >> -- >> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >> >> >> Para ver as mensagens antigas, acesse: >> http://br.groups.yahoo.com/group/delphi-br/messages >> >> Para falar com o moderador, envie um e-mail para: >> [EMAIL PROTECTED] ou [EMAIL PROTECTED] >> >> >> >> Yahoo! Grupos, um serviço oferecido por: >> >> São Paulo Rio de Janeiro Curitiba Porto >> >> >Alegre Belo > > >> Horizonte Brasília >> >> >> >> >> ---------------------------------------------------------------- >> >> >---------- > > >> ---- >> Links do Yahoo! Grupos >> >> a.. Para visitar o site do seu grupo na web, acesse: >> http://br.groups.yahoo.com/group/delphi-br/ >> >> b.. Para sair deste grupo, envie um e-mail para: >> [EMAIL PROTECTED] >> >> c.. O uso que você faz do Yahoo! Grupos está sujeito aos >> >> >Termos do > > >> Serviço do Yahoo!. >> >> >> >> [As partes desta mensagem que não continham texto foram >> >> >removidas] > > >> >> -- >> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> >> >> Para ver as mensagens antigas, acesse: >> http://br.groups.yahoo.com/group/delphi-br/messages >> >> Para falar com o moderador, envie um e-mail para: >> [EMAIL PROTECTED] ou [EMAIL PROTECTED] >> >> >> >> Yahoo! Grupos, um serviço oferecido por: >> >> >> >> >> >> >> >> ------------------------------------------------------------------ >> >> >---------- > > >> -- >> Links do Yahoo! Grupos >> >> a.. Para visitar o site do seu grupo na web, acesse: >> http://br.groups.yahoo.com/group/delphi-br/ >> >> b.. Para sair deste grupo, envie um e-mail para: >> [EMAIL PROTECTED] >> >> c.. O uso que você faz do Yahoo! Grupos está sujeito aos >> >> >Termos do > > >> Serviço do Yahoo!. >> >> >> >> >> [As partes desta mensagem que não continham texto foram removidas] >> >> >> >> -- >> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> >> >> Para ver as mensagens antigas, acesse: >> http://br.groups.yahoo.com/group/delphi-br/messages >> >> Para falar com o moderador, envie um e-mail para: >> [EMAIL PROTECTED] ou [EMAIL PROTECTED] >> >> >> >> Yahoo! Grupos, um serviço oferecido por: >> >> São Paulo Rio de Janeiro Curitiba Porto Alegre >> >> >Belo Horizonte Brasília > > >> >> >> >> >>-------------------------------------------------------------------- >> >> >---------- > > >> Links do Yahoo! Grupos >> >> a.. Para visitar o site do seu grupo na web, acesse: >> http://br.groups.yahoo.com/group/delphi-br/ >> >> b.. Para sair deste grupo, envie um e-mail para: >> [EMAIL PROTECTED] >> >> c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos >> >> >do Serviço do Yahoo!. > > >> >>[As partes desta mensagem que não continham texto foram removidas] >> >> > > > > > > > -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.3 - Release Date: 24/1/2005 -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html