Socorro gente! Trocando String em um Arquivo
Pessoal realmente estou precisando deste processo para entregar o sistema a um cliente que esta aguardando, por favor, me ajudem!
Será que ninguém sabe uma função que faça leitura em uma string procurando por um parâmetro passado a ela e troque apenas a string que eu passei como parâmetro quando encontrada.
Rodrigo Ferreira
Será que ninguém sabe uma função que faça leitura em uma string procurando por um parâmetro passado a ela e troque apenas a string que eu passei como parâmetro quando encontrada.
Rodrigo Ferreira
Rodrigo Ferreira
Curtidas 0
Respostas
Dor_poa
19/03/2003
amigo use o comando Pos...
exemp:
variavelStr := ´AQUI ESTA O VALOR DA STRING´
CampoAProcurar := ´VALOR´
IF Pos(CampoAProcurar, variavelStr ) > 0 Then //Quer diser que tem o procurado
begin
variavel1 := Copy(variavelStr, 0, Pos(´VALOR´, variavelStr));
variavel2 := Copy(variavelStr, Pos(´VALOR´, variavelStr)+leght(CampoAProcurar), 1500 );
resultado := variavel1 + ´VALOR SUBST´ + variavel2
end;
exemp:
variavelStr := ´AQUI ESTA O VALOR DA STRING´
CampoAProcurar := ´VALOR´
IF Pos(CampoAProcurar, variavelStr ) > 0 Then //Quer diser que tem o procurado
begin
variavel1 := Copy(variavelStr, 0, Pos(´VALOR´, variavelStr));
variavel2 := Copy(variavelStr, Pos(´VALOR´, variavelStr)+leght(CampoAProcurar), 1500 );
resultado := variavel1 + ´VALOR SUBST´ + variavel2
end;
GOSTEI 0