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://www.msisolucoes.com.br ----- Original Message ----- From: Alan Vieceli To: delphi-br@yahoogrupos.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@yahoogrupos.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> > 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://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> > > 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]
