Preciso de função para pegar strings entre quot;[]quot;
14/04/2003
0
Preciso de uma função para pegar strings que ficam entre [ ]
por exemplo
temos a frase
[Homem] é fogo, mulher é [estopa] e o diabo [assopra]
eu queria pegar essas palavras entre [ ] e mudá-las... inverter a ordem, por exemplo...
[memoH] é fogo, mulher é [apotse] e o diabo [arpossa]
ajudem!!!
-----
Também preciso disso
imagine a frase
[1] elefante incomoda muita gente, [3] elefantes incomoda,;;;
[7] elefantes ...
queria pegar os NÚMEROS entre [] e somá-los a, por exemplo, 2
ficando
[3] elefante incomoda muita gente, [5] elefantes incomoda,;;;
[9] elefantes ...
Ajudem pelo amor de Deus
OBS: A segunda(dos números) é mais importante!
por exemplo
temos a frase
[Homem] é fogo, mulher é [estopa] e o diabo [assopra]
eu queria pegar essas palavras entre [ ] e mudá-las... inverter a ordem, por exemplo...
[memoH] é fogo, mulher é [apotse] e o diabo [arpossa]
ajudem!!!
-----
Também preciso disso
imagine a frase
[1] elefante incomoda muita gente, [3] elefantes incomoda,;;;
[7] elefantes ...
queria pegar os NÚMEROS entre [] e somá-los a, por exemplo, 2
ficando
[3] elefante incomoda muita gente, [5] elefantes incomoda,;;;
[9] elefantes ...
Ajudem pelo amor de Deus
OBS: A segunda(dos números) é mais importante!
Senhorbizarro
Curtir tópico
+ 0
Responder
Posts
14/04/2003
Marcelo Saviski
var
ppos1,ppos2 : integer;
begin
ppos1 := pos(´[´, texto ´);
while ppos1 <> 0 do
begin
ppos2 := pos(´]´, copy( texto, ppos + 1, 255));
if ppos2 <> then
begin
delete( texto , ppos1 , ppos2 - ppos1);
insert( ´[outra coisa]´, ppos1);
end;
ppos1 := pos(´[´, copy( texto , ppos1 + 1, 255));
end;
end;
isso é só uma parte do que você quer, procura coisas dentro de ´[---]´ e escreve outra coisa
ppos1,ppos2 : integer;
begin
ppos1 := pos(´[´, texto ´);
while ppos1 <> 0 do
begin
ppos2 := pos(´]´, copy( texto, ppos + 1, 255));
if ppos2 <> then
begin
delete( texto , ppos1 , ppos2 - ppos1);
insert( ´[outra coisa]´, ppos1);
end;
ppos1 := pos(´[´, copy( texto , ppos1 + 1, 255));
end;
end;
isso é só uma parte do que você quer, procura coisas dentro de ´[---]´ e escreve outra coisa
Responder
Clique aqui para fazer login e interagir na Comunidade :)