Strings ?

Delphi

05/12/2005

Olá Pessoal, Boa tarde !

tenho um problema pra resolver, alguém pode me dar uma ajudinha ?

Gostaria de montar uma função para procurar uma ou mais frases dentro de uma string.

Exmplo:

tenho uma string:
´www.meusite.com.br´

queria montar uma function para procurar nessa string se existe a palavra [color=red:240698a4fb]meu[/color:240698a4fb] por exemplo, em qualquer parte da string.


e retornar true se achar ou false se não achar.

Alguém sabe como faço essa pesquisar na string ?


Obrigada.


Renatacoimbra

Renatacoimbra

Curtidas 0

Respostas

Emerson Nascimento

Emerson Nascimento

05/12/2005

não serve a função Pos()?

por exemplo:

frase := ´www.meusite.com.br´;

if pos(´meu´,frase) = 0 // não achou
then ShowMessage(´Não achou´)
else ShowMessage(´achou!´);


GOSTEI 0
Michael

Michael

05/12/2005

Existe ainda a função [b:a072e34f35]PosEx[/b:a072e34f35], que permite buscar a string começando a partir de uma determinada posição.

function PosEx(const SubStr, S: string; Offset: Cardinal = 1): Integer;


[]´s


GOSTEI 0
Nildo

Nildo

05/12/2005

Existe ainda a função [b:98ea7bca2c]PosEx[/b:98ea7bca2c], que permite buscar a string começando a partir de uma determinada posição.
function PosEx(const SubStr, S: string; Offset: Cardinal = 1): Integer;
[]´s


De que Delphi estamos falando michael? No 6 não tem não... pelo menos nas units convencionais não. Tinha ficado até feliz! rsrs Se bem que é simples fazer uma, mas fazer em todos os projetos é triste!

Falowss


GOSTEI 0
Michael

Michael

05/12/2005

De fato, esta função foi implementada apenas a partir da versão 7. Já tá na hora de vc fazer um upgrade não? Estamos no Delphi 2006 já... ;-)

[]´s


GOSTEI 0
Nildo

Nildo

05/12/2005

De fato, esta função foi implementada apenas a partir da versão 7. Já tá na hora de vc fazer um upgrade não? Estamos no Delphi 2006 já... ;-) []´s


Isso tem que ser dito a meus superiores hehehe
Falows!!


GOSTEI 0
Renatacoimbra

Renatacoimbra

05/12/2005

Obrigada pessoal pela ajuda.

estou trabalhando com D2005

vou testar as funções.


GOSTEI 0
POSTAR