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 

Comparando Strings [Resolvido]

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


Registrado: Quinta-Feira, 12 de Novembro de 2009
Mensagens: 33

MensagemEnviada: Seg Jan 18, 2010 9:39 am    Assunto: Comparando Strings [Resolvido] Responder com Citação

estou querendo comparar em um if se uma certa String está dentro de um grupo de Strings.

por exemplo
if ('São Paulo' in ('São Bernardo do Campo','São Paulo','Arthur Nogueira')) then

com "in" não dá certo, então pesquisei e usei a função pos(),

if Pos(('São Paulo'),'São Bernardo do Campo São Paulo Arthur Nogueira')=1 then

os valores acima no caso não são fixos.
só que ele pega a partir da primeira posição,
então ele só acha sempre "São Bernardo do Campo". mas eu precisaria que ele achasse "São Paulo". alguem tem outra maneira de comparar se uma String está no meio de outras?


Editado pela última vez por dannysan em Seg Jan 18, 2010 10:29 am, num total de 1 vez
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
neidl
Profissional
Profissional


Registrado: Segunda-Feira, 28 de Julho de 2008
Mensagens: 501
Localização: São Paulo

MensagemEnviada: Seg Jan 18, 2010 9:50 am    Assunto: Responder com Citação

Se você quiser apenas verificar se existe uma substring:

1º) Declare StrUtils;
2º) utilize a seguinte sintax:

if AnsiContainsText(ONDEPROCURA, OQUEPROCURA) then
...
else
...

Mais informações:

http://www.delphibasics.co.uk/RTL.asp?Name=AnsiContainsText
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
gilsonnrodrigues
Moderador
Moderador


Registrado: Quinta-Feira, 14 de Abril de 2005
Mensagens: 9009
Localização: Governador Valadares-MG

MensagemEnviada: Seg Jan 18, 2010 9:58 am    Assunto: Responder com Citação

use assim:

Código:
if MatchText('São Paulo', ['São Bernardo do Campo', 'São Paulo', 'Arthur Nogueira']) then


ps.

tem q declar StrUtils;
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
dannysan
Novato
Novato


Registrado: Quinta-Feira, 12 de Novembro de 2009
Mensagens: 33

MensagemEnviada: Seg Jan 18, 2010 10:28 am    Assunto: Comparando Strings Responder com Citação

o que o neidl colocou deu certo, muito obrigada.

o outro não deu certo.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
gilsonnrodrigues
Moderador
Moderador


Registrado: Quinta-Feira, 14 de Abril de 2005
Mensagens: 9009
Localização: Governador Valadares-MG

MensagemEnviada: Seg Jan 18, 2010 10:34 am    Assunto: Responder com Citação

deu algum erro?
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
dannysan
Novato
Novato


Registrado: Quinta-Feira, 12 de Novembro de 2009
Mensagens: 33

MensagemEnviada: Seg Jan 18, 2010 12:40 pm    Assunto: Comparando Strings [Resolvido] Responder com Citação

gilsonnrodrigues escreveu:
deu algum erro?


ele não aceitou a função MatchText mesmo declarando o StrUtils.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
gilsonnrodrigues
Moderador
Moderador


Registrado: Quinta-Feira, 14 de Abril de 2005
Mensagens: 9009
Localização: Governador Valadares-MG

MensagemEnviada: Seg Jan 18, 2010 1:48 pm    Assunto: Responder com Citação

qual vesao de delphi?
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
dannysan
Novato
Novato


Registrado: Quinta-Feira, 12 de Novembro de 2009
Mensagens: 33

MensagemEnviada: Ter Jan 19, 2010 9:18 am    Assunto: Comparando Strings [Resolvido] Responder com Citação

Delphi 7
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
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