já tentei subtituir, não rolou....pq ele ententende que #13 como sendo 
um enter, ou #0 sendo espaço...

Vinicius Santos - MSI escreveu:
>
> Cara, poste a sua rotina de Criptografia, para nós analisarmos.
> Mas talvez você, poderia substituir os "#", por outros caracteres, e 
> depois na hora de usar os valores, vc faz a substituição inversa. 
> Seria uma alternativa a primeira vista.
>
> Vinicius dos Santos
> Blog: http://tuplas.blogspot.com <http://tuplas.blogspot.com>
> http://www.msisolucoes.com.br <http://www.msisolucoes.com.br>
>
> ----- Original Message -----
> From: Alan Vieceli
> To: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
> Sent: Friday, May 23, 2008 2:32 PM
> Subject: Re: RES: [delphi-br] Converter Ascii para String
>
> vamos lá denovo
>
> eu tenho um rotina q faz uma criptografia numa string
>
> wVar : string
>
> wVar := 'Alan Vieceli'
>
> wVar := Criptografa(wVar);
>
> wVar = #$A#$1B#1#$1C#$A#$1D#0#$1E#$8#$1F;
>
> se eu der um showmessage ou salvar em um arquivo texto esse valor ele
> vai aparecer uns troços nada a ver...
> e eu gostaria q aparecesse exatamente o que tem ali..como texto. Queria
> transformar essa variavel em:
>
> wVar = '#$A#$1B#1#$1C#$A#$1D#0#$1E#$8#$1F'
>
> Davi Eduardo Borges Wall escreveu:
> >
> > Eu não entendi NADA! Tente ler o que vc escreveu, acho que você não
> > vai entender Tb.
> >
> > De: delphi-br@yahoogrupos.com.br 
> <mailto:delphi-br%40yahoogrupos.com.br>
> > <mailto:delphi-br%40yahoogrupos.com.br>
> > [mailto:delphi-br@yahoogrupos.com.br 
> <mailto:delphi-br%40yahoogrupos.com.br>
> > <mailto:delphi-br%40yahoogrupos.com.br>] Em nome de Alan Vieceli
> > Enviada em: sexta-feira, 23 de maio de 2008 14:22
> > Para: delphi-br@yahoogrupos.com.br 
> <mailto:delphi-br%40yahoogrupos.com.br> 
> <mailto:delphi-br%40yahoogrupos.com.br>
> > Assunto: Re: [delphi-br] Converter Ascii para String
> >
> > até seria..só que seguinte...
> >
> > tenho uma rotina q fazer um criptografia aqui.dai ela genra um monte de
> > caracteres...tipo...
> >
> > #$4#45#$54f5'b'...
> >
> > dai se grava esse falar no banco de dados..só que...isso não são
> > strings são ascci..dai qunado chegar no #0 ele não ta gravando e da um
> > monte de problema..dai queria conversar isso tudo pra string q resolvia
> > meu problema
> >
> > Vinicius Santos - MSI escreveu:
> > >
> > > Agh ?? Pra que isso cara ? Não seria mais fácil, vc fazer:
> > >
> > > wVar = 'teste#13+#0';
> > >
> > > Direto ??
> > >
> > > Vinicius dos Santos
> > > Blog: http://tuplas.blogspot.com <http://tuplas.blogspot.com> 
> <http://tuplas.blogspot.com <http://tuplas.blogspot.com>>
> > <http://tuplas.blogspot.com <http://tuplas.blogspot.com> 
> <http://tuplas.blogspot.com <http://tuplas.blogspot.com>>>
> > > http://www.msisolucoes.com.br <http://www.msisolucoes.com.br> 
> <http://www.msisolucoes.com.br <http://www.msisolucoes.com.br>>
> > <http://www.msisolucoes.com.br <http://www.msisolucoes.com.br> 
> <http://www.msisolucoes.com.br <http://www.msisolucoes.com.br>>>
> > >
> > > ----- Original Message -----
> > > From: Alan Vieceli
> > > To: delphi-br@yahoogrupos.com.br 
> <mailto:delphi-br%40yahoogrupos.com.br>
> > <mailto:delphi-br%40yahoogrupos.com.br>
> > <mailto:delphi-br%40yahoogrupos.com.br>
> > <mailto:delphi-br%40yahoogrupos.com.br>
> > > Sent: Friday, May 23, 2008 2:07 PM
> > > Subject: [delphi-br] Converter Ascii para String
> > >
> > > Alguem sabe como eu faço pra converter uns caracteres Ascii para 
> string?
> > >
> > > tipo:
> > >
> > > wVar := 'teste'+#13+#0
> > >
> > > dai o conteudo dessa variavel ser:
> > >
> > > wVar = 'teste#13+#0';
> > >
> > > [As partes desta mensagem que não continham texto foram removidas]
> > >
> > >
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  

Responder a