[delphi-br] Re: String com caracteres estranhos, como removê-los?

Tue, 05 Jun 2007 15:11:53 -0700 

Boa noite!
Cara, neste caso tão simples recomendo a função StringReplace do
próprio Delphi. Consulte no help o uso da mesma, é fácil fácil!
Fraterno abraço!
Carlos
--- Em delphi-br@yahoogrupos.com.br, "Fellipe Henrique" <[EMAIL PROTECTED]>
escreveu
>
> Valeu amigo,
> 
> []s
> 
> Em 05/06/07, Eduardo Silva dos Santos <[EMAIL PROTECTED]> escreveu:
> >
> >   lá vai.. ai é so vc adaptar..
> >
> > function remove_carcter(sString:String):String;
> > var
> > cSpecial: String;
> > nPos, nConta: Integer;
> > begin
> >
> > cSpecial :=
> >
> >
';~ø.`''''()[EMAIL PROTECTED]&*_-+=}{[]|\/".,<>?*-+EUR`,.Æ'„…†‡ˆ‰Š
‹Å'Ž''""o--~TMs>oez"Y
> > ¡¢£¤¥¦§¨(c)ª«¬­(r)¯°±²³´µ¶·¸¹º»¼½¾¿ÆÐ';
> > Result := '';
> > for nConta := 1 to Length(cSpecial) do begin
> > while Pos(cSpecial[nConta],sString ) > 0 do
> > System.Delete(sString, Pos(cSpecial[nConta],sString ) ,1);
> > end;
> > Result := sString;
> >
> > end;
> >
> > Em 05/06/07, Fellipe Henrique <[EMAIL PROTECTED] <fellipeh%40gmail.com>>
> > escreveu:
> > >
> > > Olá amigos, estou pegando uma string num Buffer, mas ela vem assim:
> > > 'Fellipe'#0#0#0#0
> > > Como faço pra remover os #0 dela? ficando somente o texto mesmo?
> > >
> > > Desde já agradeço...
> > >
> > > --
> > > _________________________________
> > > Fellipe Henrique
> > > [EMAIL PROTECTED] <fellipeh%40gmail.com> <fellipeh%40gmail.com>
> > > "Você valoriza a existêcia das pessoas extraordinárias e
momentos em que
> > a
> > > história avança graças a elas. Tudo o que se imagina pode ser
alcançado.
> > > Deve-se ousar sonhar. Mas não há substituto para perseverança e
> > > trabalho...
> > > e trabalho em equipe. Por que ninguém consegue sozinho. Se
comemoramos a
> > > grandeza desses eventos e as pessoas que os realizam... não podemos
> > > esquecer
> > > o sacrifício daqueles que tornam possíveis tais realizações."
> > >
> > > [As partes desta mensagem que não continham texto foram removidas]
> > >
> > >
> > >
> >
> > --
> > Eduardo Silva dos Santos
> > DRD Sistemas.
> > (27) 3218-4201
> > MSN: [EMAIL PROTECTED] <eduardo.drd%40gmail.com>
> > Site: http://www.drdsistemas.com/
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >  
> >
> 
> 
> 
> -- 
> _________________________________
> Fellipe Henrique
> [EMAIL PROTECTED]
> "Você valoriza a existêcia das pessoas extraordinárias e momentos em
que a
> história avança graças a elas. Tudo o que se imagina pode ser alcançado.
> Deve-se ousar sonhar. Mas não há substituto para perseverança e
trabalho...
> e trabalho em equipe. Por que ninguém consegue sozinho. Se comemoramos a
> grandeza desses eventos e as pessoas que os realizam... não podemos
esquecer
> o sacrifício daqueles que tornam possíveis tais realizações."
> 
> 
> [As partes desta mensagem que não continham texto foram removidas]
>

Responder a