Fórum Pesquisar em campo memo #314402
25/02/2006
0
Amigos,
Esse código aí em baixo é do meu botão pesquisar e está funcionando beleza, mas só que estou restrito, pois só consigo fazer a pesquisar pelas iniciais que estão gravadas neste campo (memo). Gostaria de digitar o ´NOME´ e a pesquisa ser em todo o campo, encontrar a palavra pesquisada em qualquer parte do campo (inicio/ meio/ fim). Então como eu poderei fazer? Continuaria usando LIKE?
O resultado é apresentado em um DBGrid.
[b:98807f3778]procedure TFrmPesquisaMinuta.BtnPesquisarClick(Sender: TObject);
begin
if MemoK_P.Text<>´´ then
begin
with QryConsulta do // Evita colocar o QryConsulta na frente do comando
begin
Close;
Sql.Clear;
Sql.Add(´Select ID_M, K_P from TabCadastroMinuta where K_P like ´+#39+MemoK_P.Text+´¬´+39);
Open;
end;
end;
end;[/b:98807f3778]
Obrigado
[color=green:98807f3778]Título editado por gandalf.nho. Não poste totalmente em maiúsculas.[/color:98807f3778]
Esse código aí em baixo é do meu botão pesquisar e está funcionando beleza, mas só que estou restrito, pois só consigo fazer a pesquisar pelas iniciais que estão gravadas neste campo (memo). Gostaria de digitar o ´NOME´ e a pesquisa ser em todo o campo, encontrar a palavra pesquisada em qualquer parte do campo (inicio/ meio/ fim). Então como eu poderei fazer? Continuaria usando LIKE?
O resultado é apresentado em um DBGrid.
[b:98807f3778]procedure TFrmPesquisaMinuta.BtnPesquisarClick(Sender: TObject);
begin
if MemoK_P.Text<>´´ then
begin
with QryConsulta do // Evita colocar o QryConsulta na frente do comando
begin
Close;
Sql.Clear;
Sql.Add(´Select ID_M, K_P from TabCadastroMinuta where K_P like ´+#39+MemoK_P.Text+´¬´+39);
Open;
end;
end;
end;[/b:98807f3778]
Obrigado
[color=green:98807f3778]Título editado por gandalf.nho. Não poste totalmente em maiúsculas.[/color:98807f3778]
Jrcosmoluis
Curtir tópico
+ 0
Responder
Posts
26/02/2006
Aroldo Zanela
Colega,
Use o sinal ¬ (percente) antes também. Veja:
Use o sinal ¬ (percente) antes também. Veja:
Sql.Add(´Select ID_M, K_P from TabCadastroMinuta where K_P like ´+#39+´¬´+MemoK_P.Text+´¬´+39);
Responder
Gostei + 0
26/02/2006
Jrcosmoluis
Amigo,
obrigado pela grande dica.
Valeu
obrigado pela grande dica.
Valeu
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)