ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Verificar se existe String

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
AlanP
Novato
Novato


Registrado: Terça-Feira, 19 de Novembro de 2013
Mensagens: 25

MensagemEnviada: Qua Jan 29, 2014 7:49 am    Assunto: Verificar se existe String Responder com Citação

Bom Dia

Preciso verificar se existe string em um campo para que o ADO faça o filtro e informe. E assim ele vai filtrar todos os clientes que possuam observações. Segue o Code:


Código:
var
ListObs: String;
begin
  ListObs:= '';
  Modulo.ADOCliente.Filtered:= False;
 if (ListObs > '') then
  Modulo.ADOCliente.Filter:= 'Obs=' +QuotedStr(ListObs)
 else
  Modulo.ADOCliente.Filter:= '';
  Modulo.ADOCliente.Filtered:= True;
end;
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
johnny-walker
Moderador
Moderador


Registrado: Sábado, 4 de Outubro de 2003
Mensagens: 10653
Localização: Contagem/MG - BRAZIL

MensagemEnviada: Qua Jan 29, 2014 10:46 am    Assunto: Responder com Citação

Basta você verificar se o campo está vazio na sql, ficando atento aos campos nulos.
Tem certos bancos que trabalham de modo diferente com null e vazio.


Bye
_________________
P.O.W.E.R B.Y D.E.L.P.H.I
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular MSN Messenger
AlanP
Novato
Novato


Registrado: Terça-Feira, 19 de Novembro de 2013
Mensagens: 25

MensagemEnviada: Qua Jan 29, 2014 11:14 am    Assunto: Responder com Citação

johnny-walker

o DB que estou utilizando é access, somente para suprir minhas necessidades, o que estou tentando fazer é ele filtrar todos os usuário que tenham alguma observação.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
AndersonWorkInfo
Aprendiz
Aprendiz


Registrado: Segunda-Feira, 14 de Outubro de 2013
Mensagens: 222
Localização: Belém - Pará

MensagemEnviada: Qua Jan 29, 2014 11:57 am    Assunto: Re: Verificar se existe String Responder com Citação

AlanP,

Dê uma olhada nesse link que eu deixei a resposta lá já que é muito comum essa pergunta de filtro, eu fiz um filtro na pesquisa da query, deve resolver o seu problema.

http://andersonworkinfo.wordpress.com/2014/01/29/verificando/

Espero ter ajudado.

NÃO DEIXE DE COLOCAR [RESOLVIDO] NO TÓPICO PARA FINALIZAR.

AlanP escreveu:
Bom Dia

Preciso verificar se existe string em um campo para que o ADO faça o filtro e informe. E assim ele vai filtrar todos os clientes que possuam observações. Segue o Code:


Código:
var
ListObs: String;
begin
  ListObs:= '';
  Modulo.ADOCliente.Filtered:= False;
 if (ListObs > '') then
  Modulo.ADOCliente.Filter:= 'Obs=' +QuotedStr(ListObs)
 else
  Modulo.ADOCliente.Filter:= '';
  Modulo.ADOCliente.Filtered:= True;
end;
[/b]
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Visitar a homepage do Usuário MSN Messenger
AndersonWorkInfo
Aprendiz
Aprendiz


Registrado: Segunda-Feira, 14 de Outubro de 2013
Mensagens: 222
Localização: Belém - Pará

MensagemEnviada: Qua Jan 29, 2014 12:07 pm    Assunto: Responder com Citação

Mas você está usando somente a base de dados access ou tá fazendo o programa também em access?

porque da pra utilizar a base de dados access fazendo o programa em Delphi, só vi a sua questão agora. já que estamos num forum de Delphi respondi a respeito do assunto do forum.

Mas especifica legal ai que agente ajuda.

AlanP escreveu:
johnny-walker

o DB que estou utilizando é access, somente para suprir minhas necessidades, o que estou tentando fazer é ele filtrar todos os usuário que tenham alguma observação.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Visitar a homepage do Usuário MSN Messenger
AlanP
Novato
Novato


Registrado: Terça-Feira, 19 de Novembro de 2013
Mensagens: 25

MensagemEnviada: Qua Jan 29, 2014 1:39 pm    Assunto: Responder com Citação

oi AndersonWorkInfo


somente estou usando db do access o programa é no delphi.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
AndersonWorkInfo
Aprendiz
Aprendiz


Registrado: Segunda-Feira, 14 de Outubro de 2013
Mensagens: 222
Localização: Belém - Pará

MensagemEnviada: Qua Jan 29, 2014 9:48 pm    Assunto: Responder com Citação

Acessa o link que eu deixei e dá uma olhada que resolve o teu caso.

Abraço.

AlanP escreveu:
oi AndersonWorkInfo


somente estou usando db do access o programa é no delphi.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Visitar a homepage do Usuário MSN Messenger
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB