[delphi-br] Converter arquivo
Galera, boa noite Alguem sabe como converter um arquivo de vídeo no formato avi para flv via Delphi? [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter arquivo
Felipe Lopes escreveu: Galera, boa noite Alguem sabe como converter um arquivo de vídeo no formato avi para flv via Delphi? Use o ffmpeg. Não é componente, é um software pronto escrito em C++ e dos mais fortes para mídias. Veja que os melhores players/conversores atuais usam ffmpeg. Você pode distribuir o EXE dele (é LGPL) junto com teu aplicativo. No Linux eu distribuo um script para instalá-lo caso a distro não o tenha. Ainda no Linux, eu uso isso para converter: $ ffmpeg -i origem.avi destino.flv Escreve algo que envie o parâmetro origem para o EXE do ffmpeg. Não tem erro, uso aqui (para capturar mp3 de flv) e recomento. ffmpeg - Home page: http://ffmpeg.org/ []'s Silvio Clécio -- programmer ObjectPascal - Blog: http://blog.silvioprog.com.br programmer ObjectPascal - Site: http://www.silvioprog.com.br programmer ObjectPascal - Twitter: http://twitter.com/silvioprog -- grupo Lazarus-BR no Google - http://groups.google.com/group/lazarus-br/ -- °oO[ Mensagem assinada digitalmente ]Oo° [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Converter PDF para TXT
Pessoal, estou precisando converter um arquivo PDF em texto via delphi, sem uso de programas externos. O PDF é bem simples, apenas com texto, sem qualquer tipo de restrição. Já procurei na net mas não encontrei nenhum componente VCL que faça isso, apenas programas, o que não funcionaria pra mim, já que essa conversão será feita automaticamente pelo meu programa, sem a interferência do usuário. Alguem conhece algum componente que faça isso? Ou ainda alguma maneira de eu fazer um parse nesse PDF? Ja tentei abrir ele em texto, mas o texto não aparece (existem alguns arquivos PDF que as partes de texto são texto puros, acessados por txt mesmo). Testei este PDF com esses programas que fazem a conversão e funcionou certinho, ou seja, existe uma maneira de ler.. Obrigado [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter PDF para TXT
Amigo, o formato pdf funciona como um container. Dentro dele tanto pode haver conteúdo em forma de texto como também imagens. Alguns programas de conversão de pdf para texto tambem lêem as imagens neles contidas e as convertem para texto. O teu aplicativo terá que agir como um OCR para conseguir realizar esta ação nos casos em que o pdf for constituido de imagens. From: Alemão forumdel...@gmail.com To: delphi-br delphi-br@yahoogrupos.com.br Sent: Tue, January 19, 2010 11:19:34 AM Subject: [delphi-br] Converter PDF para TXT Pessoal, estou precisando converter um arquivo PDF em texto via delphi, sem uso de programas externos. O PDF é bem simples, apenas com texto, sem qualquer tipo de restrição. Já procurei na net mas não encontrei nenhum componente VCL que faça isso, apenas programas, o que não funcionaria pra mim, já que essa conversão será feita automaticamente pelo meu programa, sem a interferência do usuário. Alguem conhece algum componente que faça isso? Ou ainda alguma maneira de eu fazer um parse nesse PDF? Ja tentei abrir ele em texto, mas o texto não aparece (existem alguns arquivos PDF que as partes de texto são texto puros, acessados por txt mesmo). Testei este PDF com esses programas que fazem a conversão e funcionou certinho, ou seja, existe uma maneira de ler.. Obrigado [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter PDF para TXT
A muito teeemmmpo atrás eu disponibilizei os fontes de um programa que faz o inverso (sem precisar que o Reader estivesse instalado), não me lembro se também faz o que você deseja, procura na seção arquivos. blz Em 19/01/2010 10:19, Alemão escreveu: Pessoal, estou precisando converter um arquivo PDF em texto via delphi, sem uso de programas externos. O PDF é bem simples, apenas com texto, sem qualquer tipo de restrição. Já procurei na net mas não encontrei nenhum componente VCL que faça isso, apenas programas, o que não funcionaria pra mim, já que essa conversão será feita automaticamente pelo meu programa, sem a interferência do usuário. Alguem conhece algum componente que faça isso? Ou ainda alguma maneira de eu fazer um parse nesse PDF? Ja tentei abrir ele em texto, mas o texto não aparece (existem alguns arquivos PDF que as partes de texto são texto puros, acessados por txt mesmo). Testei este PDF com esses programas que fazem a conversão e funcionou certinho, ou seja, existe uma maneira de ler.. Obrigado [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [Converter JPEG para PDF]
Na gnuwin32 tem um aplicativo jpeg2ps.exe que transforma o jpeg para postscript. E aqui ( http://pages.cs.wisc.edu/~ghost/doc/cvs/Ps2pdf.htm ) vc consegue o pdf a partir do ps. Veja se te atende. 2009/8/28 Ricardo César Cardoso ricardo_engs...@yahoo.com.br: Acho que o mais próximo é usar um gerador de relatórios como o FortesReports por exemplo... Ou algum componente de terceiros. []'sRicardo. 1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS. 2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor compreendida. 3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em sex, 28/8/09, Marcio mar...@sulfabril.com.br escreveu: De: Marcio mar...@sulfabril.com.br Assunto: [delphi-br] [Converter JPEG para PDF] Para: delphi-br@yahoogrupos.com.br Data: Sexta-feira, 28 de Agosto de 2009, 11:29 Oi pessoal.. Algum conhece alguma maneira de converter uma imagem JPEG em PDF ?? Em DELPHI 7 . __ Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- Timeo hominem unius libri Cogito ergo sum - Carpe diem []s Guionardo Furlan http://guionardo.blogspot.com http://www.guionardofurlan.com.br
[delphi-br] [Converter JPEG para PDF]
Oi pessoal.. Algum conhece alguma maneira de converter uma imagem JPEG em PDF ?? Em DELPHI 7 .
Re: [delphi-br] [Converter JPEG para PDF]
Acho que o mais próximo é usar um gerador de relatórios como o FortesReports por exemplo... Ou algum componente de terceiros. []'sRicardo. 1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS. 2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor compreendida. 3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em sex, 28/8/09, Marcio mar...@sulfabril.com.br escreveu: De: Marcio mar...@sulfabril.com.br Assunto: [delphi-br] [Converter JPEG para PDF] Para: delphi-br@yahoogrupos.com.br Data: Sexta-feira, 28 de Agosto de 2009, 11:29 Oi pessoal.. Algum conhece alguma maneira de converter uma imagem JPEG em PDF ?? Em DELPHI 7 . Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] converter HTML em texto
Pessoal, Estou criando um aplicativo para baixar as mensagens de uma conta de email e salvar no banco de dados. Estou usando para isso o Indy10. O meu problema é o seguinte: preciso converter o corpo do email que vem em HTML para texto puro. Alguém tem alguma idéia de como fazer isso? Agradeço pela ajuda! [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Converter double para byte
Em Object Pascal, um dado do tipo double ocupa 8 bytes. Portanto, se vc quer um valor do tipo double representado por bytes, vc vai precisar de um array de 8 bytes, e não apenas de um único byte. Veja exemplo abaixo (crie uma nova aplicação Console e depois copie, cole e execute o código a seguir): program DoubleToBytes; {$APPTYPE CONSOLE} procedure DoubleToByte(value: Double; var Result); var BufValue: double; Buffer: array[1..8] of byte absolute BufValue; begin Move(Buffer, Result, 8); end; var i: integer; Valor: Double; Resultado: array[1..8] of Byte; begin FillChar(Resultado, SizeOf(Resultado), 0); Valor := 1234.56; WriteLn(Valor:8:2); WriteLn; DoubleToByte(Valor, Resultado); for i := 1 to 8 do WriteLn(Resultado[i]); WriteLn; WriteLn(Eoln); end. Para saber mais sobre a palavra reservada absolute e a rotina FillChar(), consulte o help do Delphi. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br From: rodrigooj...@hotmail.com Date: Sat, 18 Jul 2009 23:13:54 + Subject: [delphi-br] Converter double para byte Alguem sabe como eu posso fazer para converter um double para byte . _ Novo Internet Explorer 8. Baixe agora, é grátis! http://brasil.microsoft.com.br/IE8/mergulhe/?utm_source=MSN%3BHotmailutm_medium=Taglineutm_campaign=IE8 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter double para byte
On Sat, Jul 18, 2009 at 8:13 PM, rodrigoojaparodrigooj...@hotmail.com wrote: Alguem sabe como eu posso fazer para converter um double para byte Com Round se você quiser arredondamento da parte fracionária, ou com... Trunc, acho, que ignora a parte fracionária. Vale lembrar que dependendo do valor guardado no double, você pode ter um resultado errado tal como foi colocado pelo Rubem. Joao Morais
RE: [delphi-br] Converter double para byte
Resultado errado? Sds. To: delphi-br@yahoogrupos.com.br From: jcmorai...@gmail.com Date: Sun, 19 Jul 2009 13:57:31 -0300 Subject: Re: [delphi-br] Converter double para byte On Sat, Jul 18, 2009 at 8:13 PM, rodrigoojaparodrigooj...@hotmail.com wrote: Alguem sabe como eu posso fazer para converter um double para byte Com Round se você quiser arredondamento da parte fracionária, ou com... Trunc, acho, que ignora a parte fracionária. Vale lembrar que dependendo do valor guardado no double, você pode ter um resultado errado tal como foi colocado pelo Rubem. Joao Morais . _ Descubra todas as novidades do novo Internet Explorer 8 http://brasil.microsoft.com.br/IE8/mergulhe/?utm_source=MSN%3BHotmailutm_medium=Taglineutm_campaign=IE8 [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Converter double para byte
Mais uma coisa, se for pra fazer um typecast do trunc do valor double, vc terá o byte mais baixo. Cast direto de um double não é permitido; na hora de compilar, vai dar o erro 'invalid typecast'. Sds. To: delphi-br@yahoogrupos.com.br From: djpardalro...@hotmail.com Date: Sun, 19 Jul 2009 17:02:50 + Subject: RE: [delphi-br] Converter double para byte Resultado errado? Sds. To: delphi-br@yahoogrupos.com.br From: jcmorai...@gmail.com Date: Sun, 19 Jul 2009 13:57:31 -0300 Subject: Re: [delphi-br] Converter double para byte On Sat, Jul 18, 2009 at 8:13 PM, rodrigoojaparodrigooj...@hotmail.com wrote: Alguem sabe como eu posso fazer para converter um double para byte Com Round se você quiser arredondamento da parte fracionária, ou com... Trunc, acho, que ignora a parte fracionária. Vale lembrar que dependendo do valor guardado no double, você pode ter um resultado errado tal como foi colocado pelo Rubem. Joao Morais . __ Descubra todas as novidades do novo Internet Explorer 8 http://brasil.microsoft.com.br/IE8/mergulhe/?utm_source=MSN%3BHotmailutm_medium=Taglineutm_campaign=IE8 [As partes desta mensagem que não continham texto foram removidas] _ Descubra todas as novidades do novo Internet Explorer 8 http://brasil.microsoft.com.br/IE8/mergulhe/?utm_source=MSN%3BHotmailutm_medium=Taglineutm_campaign=IE8 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter double para byte
2009/7/19 Rubem Nascimento da Rocha djpardalro...@hotmail.com: 2009/7/19 Joao Morais jcmorai...@gmail.com: On Sat, Jul 18, 2009 at 8:13 PM, rodrigoojaparodrigooj...@hotmail.com wrote: Alguem sabe como eu posso fazer para converter um double para byte Com Round se você quiser arredondamento da parte fracionária, ou com... Trunc, acho, que ignora a parte fracionária. Vale lembrar que dependendo do valor guardado no double, você pode ter um resultado errado tal como foi colocado pelo Rubem. Resultado errado? Sim. Mais uma coisa, se for pra fazer um typecast do trunc do valor double, vc terá o byte mais baixo. Cast direto de um double não é permitido; na hora de compilar, vai dar o erro 'invalid typecast'. Não estou falando de typecast, nem faz muito sentido cast entre tipos primitivos. Eu estou falando de: var a: double; b: byte; begin a := 1000; b := trunc(a); writeln(b); end. Joao Morais
RE: [delphi-br] Converter double para byte
Ok, não disse pq seria um Resultado Errado, mas tudo bem! Vou recolher-me a minha 'insignificância'! Sds. To: delphi-br@yahoogrupos.com.br From: jcmorai...@gmail.com Date: Sun, 19 Jul 2009 16:43:02 -0300 Subject: Re: [delphi-br] Converter double para byte 2009/7/19 Rubem Nascimento da Rocha djpardalro...@hotmail.com: 2009/7/19 Joao Morais jcmorai...@gmail.com: On Sat, Jul 18, 2009 at 8:13 PM, rodrigoojaparodrigooj...@hotmail.com wrote: Alguem sabe como eu posso fazer para converter um double para byte Com Round se você quiser arredondamento da parte fracionária, ou com... Trunc, acho, que ignora a parte fracionária. Vale lembrar que dependendo do valor guardado no double, você pode ter um resultado errado tal como foi colocado pelo Rubem. Resultado errado? Sim. Mais uma coisa, se for pra fazer um typecast do trunc do valor double, vc terá o byte mais baixo. Cast direto de um double não é permitido; na hora de compilar, vai dar o erro 'invalid typecast'. Não estou falando de typecast, nem faz muito sentido cast entre tipos primitivos. Eu estou falando de: var a: double; b: byte; begin a := 1000; b := trunc(a); writeln(b); end. Joao Morais . _ Com o Windows Live, você pode organizar, editar e compartilhar suas fotos. http://www.microsoft.com/brasil/windows/windowslive/products/photo-gallery-edit.aspx [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter double para byte
2009/7/19 Rubem Nascimento da Rocha djpardalro...@hotmail.com: Ok, não disse pq seria um Resultado Errado, mas tudo bem! Vou recolher-me a minha 'insignificância'! Rubem, é errado porque não é certo. Você entra 1000 de um lado e sai 232 do outro porque byte não suporta 1000. Joao Morais To: delphi-br@yahoogrupos.com.br From: jcmorai...@gmail.com Date: Sun, 19 Jul 2009 16:43:02 -0300 Subject: Re: [delphi-br] Converter double para byte 2009/7/19 Rubem Nascimento da Rocha djpardalro...@hotmail.com: 2009/7/19 Joao Morais jcmorai...@gmail.com: On Sat, Jul 18, 2009 at 8:13 PM, rodrigoojaparodrigooj...@hotmail.com wrote: Alguem sabe como eu posso fazer para converter um double para byte Com Round se você quiser arredondamento da parte fracionária, ou com... Trunc, acho, que ignora a parte fracionária. Vale lembrar que dependendo do valor guardado no double, você pode ter um resultado errado tal como foi colocado pelo Rubem. Resultado errado? Sim. Mais uma coisa, se for pra fazer um typecast do trunc do valor double, vc terá o byte mais baixo. Cast direto de um double não é permitido; na hora de compilar, vai dar o erro 'invalid typecast'. Não estou falando de typecast, nem faz muito sentido cast entre tipos primitivos. Eu estou falando de: var a: double; b: byte; begin a := 1000; b := trunc(a); writeln(b); end. Joao Morais . _ Com o Windows Live, você pode organizar, editar e compartilhar suas fotos. http://www.microsoft.com/brasil/windows/windowslive/products/photo-gallery-edit.aspx [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
RE: [delphi-br] Converter double para byte
Por um momento, estava imaginando que meus comentários estavam sendo retaliados. A colocação 'Resultado Errado' havia me dado a impressão de que meu comentário inicial estava errado. Deixa quieto. Sds. To: delphi-br@yahoogrupos.com.br From: jcmorai...@gmail.com Date: Sun, 19 Jul 2009 18:09:27 -0300 Subject: Re: [delphi-br] Converter double para byte 2009/7/19 Rubem Nascimento da Rocha djpardalro...@hotmail.com: Ok, não disse pq seria um Resultado Errado, mas tudo bem! Vou recolher-me a minha 'insignificância'! Rubem, é errado porque não é certo. Você entra 1000 de um lado e sai 232 do outro porque byte não suporta 1000. Joao Morais To: delphi-br@yahoogrupos.com.br From: jcmorai...@gmail.com Date: Sun, 19 Jul 2009 16:43:02 -0300 Subject: Re: [delphi-br] Converter double para byte 2009/7/19 Rubem Nascimento da Rocha djpardalro...@hotmail.com: 2009/7/19 Joao Morais jcmorai...@gmail.com: On Sat, Jul 18, 2009 at 8:13 PM, rodrigoojaparodrigooj...@hotmail.com wrote: Alguem sabe como eu posso fazer para converter um double para byte Com Round se você quiser arredondamento da parte fracionária, ou com... Trunc, acho, que ignora a parte fracionária. Vale lembrar que dependendo do valor guardado no double, você pode ter um resultado errado tal como foi colocado pelo Rubem. Resultado errado? Sim. Mais uma coisa, se for pra fazer um typecast do trunc do valor double, vc terá o byte mais baixo. Cast direto de um double não é permitido; na hora de compilar, vai dar o erro 'invalid typecast'. Não estou falando de typecast, nem faz muito sentido cast entre tipos primitivos. Eu estou falando de: var a: double; b: byte; begin a := 1000; b := trunc(a); writeln(b); end. Joao Morais . __ Com o Windows Live, você pode organizar, editar e compartilhar suas fotos. http://www.microsoft.com/brasil/windows/windowslive/products/photo-gallery-edit.aspx [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM _ Compartilhe os momentos mais importantes da sua vida. http://www.microsoft.com/brasil/windows/windowslive/products/photos-share.aspx?tab=1 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter double para byte
2009/7/19 Rubem Nascimento da Rocha djpardalro...@hotmail.com: Por um momento, estava imaginando que meus comentários estavam sendo retaliados. A colocação 'Resultado Errado' havia me dado a impressão de que meu comentário inicial estava errado. Deixa quieto. Cara, entendi. Eu sou uma anta mesmo, não expliquei direito. Eu quis te dar um crédito, pois antes de mim foi você quem falou que um não suporta o outro por causa das respectivas capacidades. E btw eu não sou de ficar retaliando pelas beiradas. Se na minha opinião você estiver errado, eu vou responder para você com o que eu acho que é certo. Acho que agora estamos entendidos. Joao Morais Sds. To: delphi-br@yahoogrupos.com.br From: jcmorai...@gmail.com Date: Sun, 19 Jul 2009 18:09:27 -0300 Subject: Re: [delphi-br] Converter double para byte 2009/7/19 Rubem Nascimento da Rocha djpardalro...@hotmail.com: Ok, não disse pq seria um Resultado Errado, mas tudo bem! Vou recolher-me a minha 'insignificância'! Rubem, é errado porque não é certo. Você entra 1000 de um lado e sai 232 do outro porque byte não suporta 1000. Joao Morais To: delphi-br@yahoogrupos.com.br From: jcmorai...@gmail.com Date: Sun, 19 Jul 2009 16:43:02 -0300 Subject: Re: [delphi-br] Converter double para byte 2009/7/19 Rubem Nascimento da Rocha djpardalro...@hotmail.com: 2009/7/19 Joao Morais jcmorai...@gmail.com: On Sat, Jul 18, 2009 at 8:13 PM, rodrigoojaparodrigooj...@hotmail.com wrote: Alguem sabe como eu posso fazer para converter um double para byte Com Round se você quiser arredondamento da parte fracionária, ou com... Trunc, acho, que ignora a parte fracionária. Vale lembrar que dependendo do valor guardado no double, você pode ter um resultado errado tal como foi colocado pelo Rubem. Resultado errado? Sim. Mais uma coisa, se for pra fazer um typecast do trunc do valor double, vc terá o byte mais baixo. Cast direto de um double não é permitido; na hora de compilar, vai dar o erro 'invalid typecast'. Não estou falando de typecast, nem faz muito sentido cast entre tipos primitivos. Eu estou falando de: var a: double; b: byte; begin a := 1000; b := trunc(a); writeln(b); end. Joao Morais . __ Com o Windows Live, você pode organizar, editar e compartilhar suas fotos. http://www.microsoft.com/brasil/windows/windowslive/products/photo-gallery-edit.aspx [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM _ Compartilhe os momentos mais importantes da sua vida. http://www.microsoft.com/brasil/windows/windowslive/products/photos-share.aspx?tab=1 [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
RE: [delphi-br] Converter double para byte
Tá vendo? Se os governantes tivessem o seu bom senso e, principalmente, diálogo, teríamos um mundo melhor para todos vivermos. Estamos entendidos sim, João. Sem grilo. Sds. :) Sds. To: delphi-br@yahoogrupos.com.br From: jcmorai...@gmail.com Date: Sun, 19 Jul 2009 18:21:16 -0300 Subject: Re: [delphi-br] Converter double para byte 2009/7/19 Rubem Nascimento da Rocha djpardalro...@hotmail.com: Por um momento, estava imaginando que meus comentários estavam sendo retaliados. A colocação 'Resultado Errado' havia me dado a impressão de que meu comentário inicial estava errado. Deixa quieto. Cara, entendi. Eu sou uma anta mesmo, não expliquei direito. Eu quis te dar um crédito, pois antes de mim foi você quem falou que um não suporta o outro por causa das respectivas capacidades. E btw eu não sou de ficar retaliando pelas beiradas. Se na minha opinião você estiver errado, eu vou responder para você com o que eu acho que é certo. Acho que agora estamos entendidos. Joao Morais Sds. To: delphi-br@yahoogrupos.com.br From: jcmorai...@gmail.com Date: Sun, 19 Jul 2009 18:09:27 -0300 Subject: Re: [delphi-br] Converter double para byte 2009/7/19 Rubem Nascimento da Rocha djpardalro...@hotmail.com: Ok, não disse pq seria um Resultado Errado, mas tudo bem! Vou recolher-me a minha 'insignificância'! Rubem, é errado porque não é certo. Você entra 1000 de um lado e sai 232 do outro porque byte não suporta 1000. Joao Morais To: delphi-br@yahoogrupos.com.br From: jcmorai...@gmail.com Date: Sun, 19 Jul 2009 16:43:02 -0300 Subject: Re: [delphi-br] Converter double para byte 2009/7/19 Rubem Nascimento da Rocha djpardalro...@hotmail.com: 2009/7/19 Joao Morais jcmorai...@gmail.com: On Sat, Jul 18, 2009 at 8:13 PM, rodrigoojaparodrigooj...@hotmail.com wrote: Alguem sabe como eu posso fazer para converter um double para byte Com Round se você quiser arredondamento da parte fracionária, ou com... Trunc, acho, que ignora a parte fracionária. Vale lembrar que dependendo do valor guardado no double, você pode ter um resultado errado tal como foi colocado pelo Rubem. Resultado errado? Sim. Mais uma coisa, se for pra fazer um typecast do trunc do valor double, vc terá o byte mais baixo. Cast direto de um double não é permitido; na hora de compilar, vai dar o erro 'invalid typecast'. Não estou falando de typecast, nem faz muito sentido cast entre tipos primitivos. Eu estou falando de: var a: double; b: byte; begin a := 1000; b := trunc(a); writeln(b); end. Joao Morais . __ Com o Windows Live, você pode organizar, editar e compartilhar suas fotos. http://www.microsoft.com/brasil/windows/windowslive/products/photo-gallery-edit.aspx [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM __ Compartilhe os momentos mais importantes da sua vida. http://www.microsoft.com/brasil/windows/windowslive/products/photos-share.aspx?tab=1 [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM . _ Descubra todas as novidades do novo Internet Explorer 8 http://brasil.microsoft.com.br/IE8/mergulhe/?utm_source=MSN%3BHotmailutm_medium=Taglineutm_campaign=IE8 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Converter double para byte
Alguem sabe como eu posso fazer para converter um double para byte
RES: [delphi-br] converter .DOC para .PDF
Colega que gerador de relatório esta usando? O QuickReport? Na versão QuickReport 4.07 de 2007 ele tem alguns componentes pra exportar nos formatos PDF, DOC, HTML, XLS. De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Elvis L. Zoz Enviada em: quarta-feira, 21 de janeiro de 2009 23:08 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] converter .DOC para .PDF Boa noite, Alguem poderia me indicar um componente para Delphi 7 que converta texto com formatação(.RTF ou .DOC) para o formato .PDF? Tentei com o filtro do fortes report mas ele não tem muita fidelidade na conversão. obrigado, Elvis [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: RES: [delphi-br] converter .DOC para .PDF
Cleiton, consegui a solução justamente usando o QuickReport.. com umas dicas do nosso amigo Jorge aqui da lista obrigado a todos, Elvis From: Cleiton Maciel - Yahoo Sent: Monday, January 26, 2009 9:06 AM To: delphi-br@yahoogrupos.com.br Subject: RES: [delphi-br] converter .DOC para .PDF Colega que gerador de relatório esta usando? O QuickReport? Na versão QuickReport 4.07 de 2007 ele tem alguns componentes pra exportar nos formatos PDF, DOC, HTML, XLS. De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Elvis L. Zoz Enviada em: quarta-feira, 21 de janeiro de 2009 23:08 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] converter .DOC para .PDF Boa noite, Alguem poderia me indicar um componente para Delphi 7 que converta texto com formatação(.RTF ou .DOC) para o formato .PDF? Tentei com o filtro do fortes report mas ele não tem muita fidelidade na conversão. obrigado, Elvis [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]
Re: [delphi-br] converter .DOC para .PDF
Olá Elvis, Eu utilizo o QRPDFFilt do QuickReport para converte meus relatórios para PDF e enviar por e-mail. Não sei se te ajudaria, mas caso queira testar eu te mando o pacote em PVT para vc testar. eu uso da seguinte forma: Declaro na uses principal a unit QRPDFFilt Na unit QRPrev.pas eu acrescento um botão para dispara a procedure abaixo: procedure TQRStandardPreview.TbtnPDFClick(Sender: TObject); var PDFFilt: TQRPDFDocumentFilter; vRelatorio : String; begin try Screen.Cursor := crSqlWait; if DirectoryExists(ExtractFilePath(Application.ExeName)+'PDFTemp') then DeleteDir(ExtractFilePath(Application.ExeName)+'PDFTemp'); CreateDir(ExtractFilePath(Application.ExeName)+'PDFTemp'); vRelatorio := Self.Caption+Copy(DateToStr(Now),1,2)+Copy(DateToStr(Now),4,2)+Copy(DateToStr(Now),7,4)+Copy(TimeToStr(Now),1,2)+Copy(TimeToStr(Now),4,2); vRelatorio := UpperCase(ExtractFilePath(Application.ExeName)+vRelatorio+'.pdf'); PDFFilt := TQRPDFDocumentFilter.Create( vRelatorio ); PDFFilt.AddFontMap( 'Bookman-Old-Style:Times' ); PDFFilt.TextOnTop := true; QRPrinter.ExportToFilter( PDFFilt ); PDFFilt.Free; Screen.Cursor := crDefault; Application.MessageBox(Pchar('Relatório PDF gerado com sucesso em: '+vRelatorio+'.'),'Aviso do Sistema',MB_OK + MB_ICONINFORMATION); except PDFFilt.Free; end; end; Nunca tentei de um campo memo ou rtf, mas pode ser que funcione depois de uma boa pesquisar no código. Abraços. [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] converter .DOC para .PDF
Boa noite, Alguem poderia me indicar um componente para Delphi 7 que converta texto com formatação(.RTF ou .DOC) para o formato .PDF? Tentei com o filtro do fortes report mas ele não tem muita fidelidade na conversão. obrigado, Elvis [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] converter campo ttime para integer
Olá Estou desenvolvendo um projeto de locação de garagem na faculdade. Tenho um bd em access e o aplicativo em delphi, no bd tenho dois campos data/hora onde só obtenho a hora. No delphi recebo em duas variáveis tipo ttime a hora do sistema. O problema aparece quando tento converter os valores ttime para integer. Preciso subtrair a hora de saída da hora de entrada e multiplicar por um valor qualquer para obter um valor final de pagamento. Desde já agradeço a ajuda
Res: [delphi-br] converter campo ttime para integer
Dica: trabalhe com segundos, ou milisegundos. Faça uma função para converter de segundos para TTime e vice-versa. Assim fica fácil fazer qualquer conta. De: asandro1501 [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Sexta-feira, 24 de Outubro de 2008 20:36:50 Assunto: [delphi-br] converter campo ttime para integer Olá Estou desenvolvendo um projeto de locação de garagem na faculdade. Tenho um bd em access e o aplicativo em delphi, no bd tenho dois campos data/hora onde só obtenho a hora. No delphi recebo em duas variáveis tipo ttime a hora do sistema. O problema aparece quando tento converter os valores ttime para integer. Preciso subtrair a hora de saída da hora de entrada e multiplicar por um valor qualquer para obter um valor final de pagamento. Desde já agradeço a ajuda Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Converter codigo delphi para php
Você falou em delphi para VB. Será que poderia citar o nome do programa ou algo que conhece. Obrigado até o momento. Atenciosamente, Rômulo C. Scampini --- On Fri, 8/22/08, Rubem Nascimento da Rocha [EMAIL PROTECTED] wrote: From: Rubem Nascimento da Rocha [EMAIL PROTECTED] Subject: RE: [delphi-br] Converter codigo delphi para php To: delphi-br@yahoogrupos.com.br Date: Friday, August 22, 2008, 10:06 PM Já vi Delphi pra VB e Delphi pra Java, mas acredito q nem em sonho exista esse delírio. Em todo caso, vou procurar por alguma coisa pra te ajudar. Mas tenho 99,99% de certeza de que isso não existe! Sds. _ _ _ To: [EMAIL PROTECTED] os.com.br From: romulo.scampini@ yahoo.com Date: Fri, 22 Aug 2008 15:03:11 + Subject: [delphi-br] Converter codigo delphi para php Bom dia a todos, Gostaria de saber se existe alguma ferramenta que converta um código ou um programa em delphi para php. URGENTE! Atenciosamente, Romulo C. Scampini _ _ _ _ _ _ Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos com até 6,000 fotos! http://www.amigosdo messenger. com.br [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Converter codigo delphi para php
Perdão, cometi um equívoco! Eu vi conversores de VB pra Delphi e de Delphi para Java! Consultando no Google ou no AltaVista vc consegue chegar a referências de softwares. Apenas pesquisei rapidamente, mas achei muitas referências de produtos que fazem essas conversões citadas! Sds. P.S.: Até onde pesquisei, realmente, não existe esse negócio de conversor de PHP pra Delphi! To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Mon, 25 Aug 2008 04:28:53 -0700 Subject: RE: [delphi-br] Converter codigo delphi para php Você falou em delphi para VB. Será que poderia citar o nome do programa ou algo que conhece. Obrigado até o momento. Atenciosamente, Rômulo C. Scampini --- On Fri, 8/22/08, Rubem Nascimento da Rocha [EMAIL PROTECTED] wrote: From: Rubem Nascimento da Rocha [EMAIL PROTECTED] Subject: RE: [delphi-br] Converter codigo delphi para php To: delphi-br@yahoogrupos.com.br Date: Friday, August 22, 2008, 10:06 PM Já vi Delphi pra VB e Delphi pra Java, mas acredito q nem em sonho exista esse delírio. Em todo caso, vou procurar por alguma coisa pra te ajudar. Mas tenho 99,99% de certeza de que isso não existe! Sds. _ _ _ To: [EMAIL PROTECTED] os.com.br From: romulo.scampini@ yahoo.com Date: Fri, 22 Aug 2008 15:03:11 + Subject: [delphi-br] Converter codigo delphi para php Bom dia a todos, Gostaria de saber se existe alguma ferramenta que converta um código ou um programa em delphi para php. URGENTE! Atenciosamente, Romulo C. Scampini _ Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos com até 6,000 fotos! http://www.amigosdomessenger.com.br
Re: [delphi-br] Converter codigo delphi para php
Mas, Como poderia se as bibliotecas são diferentes e tbm os componentes?? - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br Sent: Monday, August 25, 2008 9:46 AM Subject: RE: [delphi-br] Converter codigo delphi para php Perdão, cometi um equívoco! Eu vi conversores de VB pra Delphi e de Delphi para Java! Consultando no Google ou no AltaVista vc consegue chegar a referências de softwares. Apenas pesquisei rapidamente, mas achei muitas referências de produtos que fazem essas conversões citadas! Sds. P.S.: Até onde pesquisei, realmente, não existe esse negócio de conversor de PHP pra Delphi! To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Mon, 25 Aug 2008 04:28:53 -0700 Subject: RE: [delphi-br] Converter codigo delphi para php Você falou em delphi para VB. Será que poderia citar o nome do programa ou algo que conhece. Obrigado até o momento. Atenciosamente, Rômulo C. Scampini --- On Fri, 8/22/08, Rubem Nascimento da Rocha [EMAIL PROTECTED] wrote: From: Rubem Nascimento da Rocha [EMAIL PROTECTED] Subject: RE: [delphi-br] Converter codigo delphi para php To: delphi-br@yahoogrupos.com.br Date: Friday, August 22, 2008, 10:06 PM Já vi Delphi pra VB e Delphi pra Java, mas acredito q nem em sonho exista esse delírio. Em todo caso, vou procurar por alguma coisa pra te ajudar. Mas tenho 99,99% de certeza de que isso não existe! Sds. _ _ _ To: [EMAIL PROTECTED] os.com.br From: romulo.scampini@ yahoo.com Date: Fri, 22 Aug 2008 15:03:11 + Subject: [delphi-br] Converter codigo delphi para php Bom dia a todos, Gostaria de saber se existe alguma ferramenta que converta um código ou um programa em delphi para php. URGENTE! Atenciosamente, Romulo C. Scampini __ Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos com até 6,000 fotos! http://www.amigosdomessenger.com.br [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Converter codigo delphi para php
Cara, deduzo eu que ele deve ter tabelas de equivalência, ou seja, o componente 'X' no VB equivale ao componente 'Y' no Delphi. Tem que pegar e pesquisar mais informações sobre tais conversores. É só o q posso dizer, pois foi até onde, na época, eu averiguei! Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Mon, 25 Aug 2008 12:07:12 -0300 Subject: Re: [delphi-br] Converter codigo delphi para php Mas, Como poderia se as bibliotecas são diferentes e tbm os componentes?? - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br Sent: Monday, August 25, 2008 9:46 AM Subject: RE: [delphi-br] Converter codigo delphi para php Perdão, cometi um equívoco! Eu vi conversores de VB pra Delphi e de Delphi para Java! Consultando no Google ou no AltaVista vc consegue chegar a referências de softwares. Apenas pesquisei rapidamente, mas achei muitas referências de produtos que fazem essas conversões citadas! Sds. P.S.: Até onde pesquisei, realmente, não existe esse negócio de conversor de PHP pra Delphi! To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Mon, 25 Aug 2008 04:28:53 -0700 Subject: RE: [delphi-br] Converter codigo delphi para php Você falou em delphi para VB. Será que poderia citar o nome do programa ou algo que conhece. Obrigado até o momento. Atenciosamente, Rômulo C. Scampini --- On Fri, 8/22/08, Rubem Nascimento da Rocha [EMAIL PROTECTED] wrote: From: Rubem Nascimento da Rocha [EMAIL PROTECTED] Subject: RE: [delphi-br] Converter codigo delphi para php To: delphi-br@yahoogrupos.com.br Date: Friday, August 22, 2008, 10:06 PM Já vi Delphi pra VB e Delphi pra Java, mas acredito q nem em sonho exista esse delírio. Em todo caso, vou procurar por alguma coisa pra te ajudar. Mas tenho 99,99% de certeza de que isso não existe! Sds. _ _ _ To: [EMAIL PROTECTED] os.com.br From: romulo.scampini@ yahoo.com Date: Fri, 22 Aug 2008 15:03:11 + Subject: [delphi-br] Converter codigo delphi para php Bom dia a todos, Gostaria de saber se existe alguma ferramenta que converta um código ou um programa em delphi para php. URGENTE! Atenciosamente, Romulo C. Scampini _ Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger! http://www.amigosdomessenger.com.br/
Re: [delphi-br] Converter codigo delphi para php
Pelo jeito não tem ainda assim algo BOM Mas talvez venha ter: procure sobre delphi2php ou delphitophp numa olhada rapida achei isso. mas pelo jeito ainda nao ta pronto http://wiki.rilnet.com/wiki/RIL_DelphiToPHP_Converter []s Luiz Escobar - Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/ASSEMBLY/MySQL/xBase SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP HARBOUR -- Borland C++ 5.5.1 (32 bit) Harbour 1.0.0 Intl. (Rev. 9029) xHarbour Compile build 1.1.0 (Simplex) Harbour MiniGUI 1.5 Extended Edition (Build 54) - 2008.07.30 --- From: Rubem Nascimento da Rocha Sent: Monday, August 25, 2008 12:21 PM To: delphi-br@yahoogrupos.com.br Subject: RE: [delphi-br] Converter codigo delphi para php Cara, deduzo eu que ele deve ter tabelas de equivalência, ou seja, o componente 'X' no VB equivale ao componente 'Y' no Delphi. Tem que pegar e pesquisar mais informações sobre tais conversores. É só o q posso dizer, pois foi até onde, na época, eu averiguei! Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Mon, 25 Aug 2008 12:07:12 -0300 Subject: Re: [delphi-br] Converter codigo delphi para php Mas, Como poderia se as bibliotecas são diferentes e tbm os componentes?? - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br Sent: Monday, August 25, 2008 9:46 AM Subject: RE: [delphi-br] Converter codigo delphi para php Perdão, cometi um equívoco! Eu vi conversores de VB pra Delphi e de Delphi para Java! Consultando no Google ou no AltaVista vc consegue chegar a referências de softwares. Apenas pesquisei rapidamente, mas achei muitas referências de produtos que fazem essas conversões citadas! Sds. P.S.: Até onde pesquisei, realmente, não existe esse negócio de conversor de PHP pra Delphi! To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Mon, 25 Aug 2008 04:28:53 -0700 Subject: RE: [delphi-br] Converter codigo delphi para php Você falou em delphi para VB. Será que poderia citar o nome do programa ou algo que conhece. Obrigado até o momento. Atenciosamente, Rômulo C. Scampini --- On Fri, 8/22/08, Rubem Nascimento da Rocha [EMAIL PROTECTED] wrote: From: Rubem Nascimento da Rocha [EMAIL PROTECTED] Subject: RE: [delphi-br] Converter codigo delphi para php To: delphi-br@yahoogrupos.com.br Date: Friday, August 22, 2008, 10:06 PM Já vi Delphi pra VB e Delphi pra Java, mas acredito q nem em sonho exista esse delírio. Em todo caso, vou procurar por alguma coisa pra te ajudar. Mas tenho 99,99% de certeza de que isso não existe! Sds. _ _ _ To: [EMAIL PROTECTED] os.com.br From: romulo.scampini@ yahoo.com Date: Fri, 22 Aug 2008 15:03:11 + Subject: [delphi-br] Converter codigo delphi para php Bom dia a todos, Gostaria de saber se existe alguma ferramenta que converta um código ou um programa em delphi para php. URGENTE! Atenciosamente, Romulo C. Scampini __ Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger! http://www.amigosdomessenger.com.br/ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Converter codigo delphi para php
Bom dia a todos, Gostaria de saber se existe alguma ferramenta que converta um código ou um programa em delphi para php. URGENTE! Atenciosamente, Romulo C. Scampini
RE: [delphi-br] Converter codigo delphi para php
Já vi Delphi pra VB e Delphi pra Java, mas acredito q nem em sonho exista esse delírio. Em todo caso, vou procurar por alguma coisa pra te ajudar. Mas tenho 99,99% de certeza de que isso não existe! Sds. ___ To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Fri, 22 Aug 2008 15:03:11 + Subject: [delphi-br] Converter codigo delphi para php Bom dia a todos, Gostaria de saber se existe alguma ferramenta que converta um código ou um programa em delphi para php. URGENTE! Atenciosamente, Romulo C. Scampini _ Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos com até 6,000 fotos! http://www.amigosdomessenger.com.br
Re: [delphi-br] Converter Access Para Firebird...
Uma vez converti uma base Access usando o IBDatapump da CleverComponents. Coloquei um mini tutorial sobre pump de dados usando este programa na seção arquivos da lista. Deve estar chegando um mail pra lista em alguns instantes. Você vai ter que criar um alias BDE para o seu arquivo Access, dá pra fazer via ODBC, procure no google que tem várias dicas de como proceder. Ou via ADO, este nunca usei. [] Andrei 2008/7/1 Onjahyr - GMAIL [EMAIL PROTECTED]: E ae pessoal Meu ponto fraco: Banco de Dados Só faço projetos científicos e qdo preciso gravar algo uso arquivos tipados do Pascal (TRecord). Bom, estou precisando usar um Banco de Dados e escolhi usar o Firebird. Tenho uma tabela pronta em Access (Trata-se da Bíblia completa), sempre tive vontade de criar um programinha da Bíblia, sei que existe centenas, mas quero fazer um. Existe uma forma prática de converter uma tabela em Access para o Firebird? Vou usar o Firebird 2.1 (não me importo, não é para empresa, sei que o pessoal tá usando a versão 2.0, mas vou usar a 2.1 mesmo). Uso o Delphi 7.1. Agradeço qualquer ajuda, dica, link, etc... :) Blz. Onjahyr [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Converter Access Para Firebird...
No site http://www.firebase.com.br, na área de downloads, seção Diversos, tem um item 'Access to SQL', que é um utilitário Open Source para converter a estrutura e os dados de tabelas do MS Access (97/2000) para SQL para utiliza-los com outros bancos de dados. Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Tue, 1 Jul 2008 09:24:20 -0300 Subject: Re: [delphi-br] Converter Access Para Firebird... Uma vez converti uma base Access usando o IBDatapump da CleverComponents. Coloquei um mini tutorial sobre pump de dados usando este programa na seção arquivos da lista. Deve estar chegando um mail pra lista em alguns instantes. Você vai ter que criar um alias BDE para o seu arquivo Access, dá pra fazer via ODBC, procure no google que tem várias dicas de como proceder. Ou via ADO, este nunca usei. [] Andrei 2008/7/1 Onjahyr - GMAIL [EMAIL PROTECTED]: E ae pessoal Meu ponto fraco: Banco de Dados Só faço projetos científicos e qdo preciso gravar algo uso arquivos tipados do Pascal (TRecord). Bom, estou precisando usar um Banco de Dados e escolhi usar o Firebird. Tenho uma tabela pronta em Access (Trata-se da Bíblia completa), sempre tive vontade de criar um programinha da Bíblia, sei que existe centenas, mas quero fazer um. Existe uma forma prática de converter uma tabela em Access para o Firebird? Vou usar o Firebird 2.1 (não me importo, não é para empresa, sei que o pessoal tá usando a versão 2.0, mas vou usar a 2.1 mesmo). Uso o Delphi 7.1. Agradeço qualquer ajuda, dica, link, etc... :) Blz. Onjahyr _ Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger! http://www.amigosdomessenger.com.br/
RE: [delphi-br] Converter Access Para Firebird...
Link direto do projeto: http://sourceforge.net/projects/access2sql/ Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Tue, 1 Jul 2008 12:35:56 + Subject: RE: [delphi-br] Converter Access Para Firebird... No site http://www.firebase.com.br, na área de downloads, seção Diversos, tem um item 'Access to SQL', que é um utilitário Open Source para converter a estrutura e os dados de tabelas do MS Access (97/2000) para SQL para utiliza-los com outros bancos de dados. Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Tue, 1 Jul 2008 09:24:20 -0300 Subject: Re: [delphi-br] Converter Access Para Firebird... Uma vez converti uma base Access usando o IBDatapump da CleverComponents. Coloquei um mini tutorial sobre pump de dados usando este programa na seção arquivos da lista. Deve estar chegando um mail pra lista em alguns instantes. Você vai ter que criar um alias BDE para o seu arquivo Access, dá pra fazer via ODBC, procure no google que tem várias dicas de como proceder. Ou via ADO, este nunca usei. [] Andrei 2008/7/1 Onjahyr - GMAIL [EMAIL PROTECTED]: E ae pessoal Meu ponto fraco: Banco de Dados Só faço projetos científicos e qdo preciso gravar algo uso arquivos tipados do Pascal (TRecord). Bom, estou precisando usar um Banco de Dados e escolhi usar o Firebird. Tenho uma tabela pronta em Access (Trata-se da Bíblia completa), sempre tive vontade de criar um programinha da Bíblia, sei que existe centenas, mas quero fazer um. Existe uma forma prática de converter uma tabela em Access para o Firebird? Vou usar o Firebird 2.1 (não me importo, não é para empresa, sei que o pessoal tá usando a versão 2.0, mas vou usar a 2.1 mesmo). Uso o Delphi 7.1. Agradeço qualquer ajuda, dica, link, etc... :) Blz. Onjahyr _ Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos com até 6,000 fotos! http://www.amigosdomessenger.com.br
Re: [delphi-br] Converter Access Para Firebird...
Blz, vou baixar e lêr, tb vou baixar o outro que o Rubem informou... Andrei Luís escreveu: Uma vez converti uma base Access usando o IBDatapump da CleverComponents. Coloquei um mini tutorial sobre pump de dados usando este programa na seção arquivos da lista. Deve estar chegando um mail pra lista em alguns instantes. Você vai ter que criar um alias BDE para o seu arquivo Access, dá pra fazer via ODBC, procure no google que tem várias dicas de como proceder. Ou via ADO, este nunca usei. [] Andrei 2008/7/1 Onjahyr - GMAIL [EMAIL PROTECTED] mailto:onjahyr%40gmail.com: E ae pessoal Meu ponto fraco: Banco de Dados Só faço projetos científicos e qdo preciso gravar algo uso arquivos tipados do Pascal (TRecord). Bom, estou precisando usar um Banco de Dados e escolhi usar o Firebird. Tenho uma tabela pronta em Access (Trata-se da Bíblia completa), sempre tive vontade de criar um programinha da Bíblia, sei que existe centenas, mas quero fazer um. Existe uma forma prática de converter uma tabela em Access para o Firebird? Vou usar o Firebird 2.1 (não me importo, não é para empresa, sei que o pessoal tá usando a versão 2.0, mas vou usar a 2.1 mesmo). Uso o Delphi 7.1. Agradeço qualquer ajuda, dica, link, etc... :) Blz. Onjahyr [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Converter Access Para Firebird...
E ae pessoal Meu ponto fraco: Banco de Dados Só faço projetos científicos e qdo preciso gravar algo uso arquivos tipados do Pascal (TRecord). Bom, estou precisando usar um Banco de Dados e escolhi usar o Firebird. Tenho uma tabela pronta em Access (Trata-se da Bíblia completa), sempre tive vontade de criar um programinha da Bíblia, sei que existe centenas, mas quero fazer um. Existe uma forma prática de converter uma tabela em Access para o Firebird? Vou usar o Firebird 2.1 (não me importo, não é para empresa, sei que o pessoal tá usando a versão 2.0, mas vou usar a 2.1 mesmo). Uso o Delphi 7.1. Agradeço qualquer ajuda, dica, link, etc... :) Blz. Onjahyr
[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';
Re: [delphi-br] Converter Ascii para String
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://www.msisolucoes.com.br - Original Message - From: Alan Vieceli To: delphi-br@yahoogrupos.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]
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://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: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]
RES: [delphi-br] Converter Ascii para String
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:[EMAIL PROTECTED] Em nome de Alan Vieceli Enviada em: sexta-feira, 23 de maio de 2008 14:22 Para: delphi-br@yahoogrupos.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://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 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]
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]
Re: [delphi-br] Converter Ascii para String
Eu ACHO que entendi... A sua rotina de criptografia está retornando valores como '#10#15', etc...certo ? Se for isso, poste a sua rotina, talvez podemos ajudar, mas tente ser mais claro ! Como diz o outro: Uma pergunta bem feita, vale mais da metade da resposta. Vinicius dos Santos Blog: http://tuplas.blogspot.com http://www.msisolucoes.com.br - Original Message - From: Davi Eduardo Borges Wall To: delphi-br@yahoogrupos.com.br Sent: Friday, May 23, 2008 2:25 PM Subject: RES: [delphi-br] Converter Ascii para String 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:[EMAIL PROTECTED] Em nome de Alan Vieceli Enviada em: sexta-feira, 23 de maio de 2008 14:22 Para: delphi-br@yahoogrupos.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://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 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]
Re: [delphi-br] Converter Ascii para String
Ai vai a bendita function Criptografar(const S: string; Key: Word): string; var I: Integer; OutValue : String; begin OutValue := ''; for I := 1 to Length(S) do OutValue := OutValue + char(Not(ord(S[I])-Key)); Result := OutValue; end; Vinicius Santos - MSI escreveu: Eu ACHO que entendi... A sua rotina de criptografia está retornando valores como '#10#15', etc...certo ? Se for isso, poste a sua rotina, talvez podemos ajudar, mas tente ser mais claro ! Como diz o outro: Uma pergunta bem feita, vale mais da metade da resposta. 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: Davi Eduardo Borges Wall To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Friday, May 23, 2008 2:25 PM Subject: RES: [delphi-br] Converter Ascii para String 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]
Re: RES: [delphi-br] Converter Ascii para String
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]
Re: [delphi-br] Converter Ascii para String
Como, vc está fazendo a chamada da Função ? 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:35 PM Subject: Re: [delphi-br] Converter Ascii para String Ai vai a bendita function Criptografar(const S: string; Key: Word): string; var I: Integer; OutValue : String; begin OutValue := ''; for I := 1 to Length(S) do OutValue := OutValue + char(Not(ord(S[I])-Key)); Result := OutValue; end; Vinicius Santos - MSI escreveu: Eu ACHO que entendi... A sua rotina de criptografia está retornando valores como '#10#15', etc...certo ? Se for isso, poste a sua rotina, talvez podemos ajudar, mas tente ser mais claro ! Como diz o outro: Uma pergunta bem feita, vale mais da metade da resposta. 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: Davi Eduardo Borges Wall To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Friday, May 23, 2008 2:25 PM Subject: RES: [delphi-br] Converter Ascii para String 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] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter Ascii para String
Criptografar('ALESANDRA',59) por exemplo... Vinicius Santos - MSI escreveu: Como, vc está fazendo a chamada da Função ? 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:35 PM Subject: Re: [delphi-br] Converter Ascii para String Ai vai a bendita function Criptografar(const S: string; Key: Word): string; var I: Integer; OutValue : String; begin OutValue := ''; for I := 1 to Length(S) do OutValue := OutValue + char(Not(ord(S[I])-Key)); Result := OutValue; end; Vinicius Santos - MSI escreveu: Eu ACHO que entendi... A sua rotina de criptografia está retornando valores como '#10#15', etc...certo ? Se for isso, poste a sua rotina, talvez podemos ajudar, mas tente ser mais claro ! Como diz o outro: Uma pergunta bem feita, vale mais da metade da resposta. 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: Davi Eduardo Borges Wall To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Friday, May 23, 2008 2:25 PM Subject: RES: [delphi-br] Converter Ascii para String 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] [As partes desta mensagem que não continham texto foram removidas]
Re: RES: [delphi-br] Converter Ascii para String
já tentei subtituir, não roloupq 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]
Re: [delphi-br] Converter Ascii para String
Cara, eu usei a tua função e fiz uma chamada assim: var wVar: string; begin wVar := 'Alan Vieceli'; wVar := Criptografar(wVar, 59); ShowMessage(wVar); end; Obtive os seguintes caracteres: ùÎÙÌäÑÕ×ÕÎÑ Existe mais alguma particularidade ? 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:40 PM Subject: Re: [delphi-br] Converter Ascii para String Criptografar('ALESANDRA',59) por exemplo... Vinicius Santos - MSI escreveu: Como, vc está fazendo a chamada da Função ? 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:35 PM Subject: Re: [delphi-br] Converter Ascii para String Ai vai a bendita function Criptografar(const S: string; Key: Word): string; var I: Integer; OutValue : String; begin OutValue := ''; for I := 1 to Length(S) do OutValue := OutValue + char(Not(ord(S[I])-Key)); Result := OutValue; end; Vinicius Santos - MSI escreveu: Eu ACHO que entendi... A sua rotina de criptografia está retornando valores como '#10#15', etc...certo ? Se for isso, poste a sua rotina, talvez podemos ajudar, mas tente ser mais claro ! Como diz o outro: Uma pergunta bem feita, vale mais da metade da resposta. 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: Davi Eduardo Borges Wall To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Friday, May 23, 2008 2:25 PM Subject: RES: [delphi-br] Converter Ascii para String 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] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter Ascii para String
ta certo, esse caracteres q voltou os valores de cada Ascii se tu depurar e ver o conteúdo da tua variavel, tu vai ver q são uns valores #$12#$12 por ai vai... o showmessage não vai adiantar pra ver, tem q ser na depuração Vinicius Santos - MSI escreveu: Cara, eu usei a tua função e fiz uma chamada assim: var wVar: string; begin wVar := 'Alan Vieceli'; wVar := Criptografar(wVar, 59); ShowMessage(wVar); end; Obtive os seguintes caracteres: ùÎÙÌäÑÕ×ÕÎÑ Existe mais alguma particularidade ? 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:40 PM Subject: Re: [delphi-br] Converter Ascii para String Criptografar('ALESANDRA',59) por exemplo... Vinicius Santos - MSI escreveu: Como, vc está fazendo a chamada da Função ? 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 Sent: Friday, May 23, 2008 2:35 PM Subject: Re: [delphi-br] Converter Ascii para String Ai vai a bendita function Criptografar(const S: string; Key: Word): string; var I: Integer; OutValue : String; begin OutValue := ''; for I := 1 to Length(S) do OutValue := OutValue + char(Not(ord(S[I])-Key)); Result := OutValue; end; Vinicius Santos - MSI escreveu: Eu ACHO que entendi... A sua rotina de criptografia está retornando valores como '#10#15', etc...certo ? Se for isso, poste a sua rotina, talvez podemos ajudar, mas tente ser mais claro ! Como diz o outro: Uma pergunta bem feita, vale mais da metade da resposta. 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: Davi Eduardo Borges Wall 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:25 PM Subject: RES: [delphi-br] Converter Ascii para String 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%40yahoogrupos.com.br [mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.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 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://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 http://www.msisolucoes.com.br http://www.msisolucoes.com.br
RES: [delphi-br] Converter Ascii para String
Mas não se faz assim, e sim assim: wVar := 'teste'#13#0; _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Vinicius Santos - MSI Enviada em: sexta-feira, 23 de maio de 2008 14:18 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Converter Ascii para String Agh ?? Pra que isso cara ? Não seria mais fácil, vc fazer: wVar = 'teste#13+#0'; Direto ?? Vinicius dos Santos Blog: http://tuplas. http://tuplas.blogspot.com blogspot.com http://www.msisoluc http://www.msisolucoes.com.br oes.com.br - Original Message - From: Alan Vieceli To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.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]
RES: [delphi-br] Converter Ascii para String
Por favor desconsidere minha resposta, compreendi erradamente! Mas qual a sua real necessidade? _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alan Vieceli Enviada em: sexta-feira, 23 de maio de 2008 14:07 Para: delphi-br@yahoogrupos.com.br Assunto: [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]
RES: RES: [delphi-br] Converter Ascii para String
Tah, entendi agora cara. Faça o seguinte, esta tua function retornar o seguinte: Result := QuotedStr(dadoCriptografado); _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alan Vieceli Enviada em: sexta-feira, 23 de maio de 2008 14:32 Para: delphi-br@yahoogrupos.com.br Assunto: 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: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.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: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.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. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br - Original Message - From: Alan Vieceli To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.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]
RES: [delphi-br] Converter Ascii para String
Vê se assim não dá certo: function Criptografar(const S: string; Key: Word): string; var I: Integer; OutValue : String; begin OutValue := ''; for I := 1 to Length(S) do OutValue := OutValue + char(Not(ord(S[I])-Key)); Result := QuotedStr(OutValue); end; _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alan Vieceli Enviada em: sexta-feira, 23 de maio de 2008 14:41 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Converter Ascii para String Criptografar('ALESANDRA',59) por exemplo... Vinicius Santos - MSI escreveu: Como, vc está fazendo a chamada da Função ? Vinicius dos Santos Blog: http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br - Original Message - From: Alan Vieceli To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Friday, May 23, 2008 2:35 PM Subject: Re: [delphi-br] Converter Ascii para String Ai vai a bendita function Criptografar(const S: string; Key: Word): string; var I: Integer; OutValue : String; begin OutValue := ''; for I := 1 to Length(S) do OutValue := OutValue + char(Not(ord(S[I])-Key)); Result := OutValue; end; Vinicius Santos - MSI escreveu: Eu ACHO que entendi... A sua rotina de criptografia está retornando valores como '#10#15', etc...certo ? Se for isso, poste a sua rotina, talvez podemos ajudar, mas tente ser mais claro ! Como diz o outro: Uma pergunta bem feita, vale mais da metade da resposta. Vinicius dos Santos Blog: http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br - Original Message - From: Davi Eduardo Borges Wall To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Friday, May 23, 2008 2:25 PM Subject: RES: [delphi-br] Converter Ascii para String Eu não entendi NADA! Tente ler o que vc escreveu, acho que você não vai entender Tb. De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.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: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.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. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br - Original Message - From: Alan Vieceli To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br
Re: RES: [delphi-br] Converter Ascii para String
Valeu pela resposta Antonio..já fiz isso, não rolou tambem.. ele não converte os Ascii para string, continua vindo os caracteres correspondete ao codigo ascii Antonio ney.Silva escreveu: Vê se assim não dá certo: function Criptografar(const S: string; Key: Word): string; var I: Integer; OutValue : String; begin OutValue := ''; for I := 1 to Length(S) do OutValue := OutValue + char(Not(ord(S[I])-Key)); Result := QuotedStr(OutValue); end; _ 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:41 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Converter Ascii para String Criptografar('ALESANDRA',59) por exemplo... Vinicius Santos - MSI escreveu: Como, vc está fazendo a chamada da Função ? Vinicius dos Santos Blog: http://tuplas. http://tuplas.blogspot.com http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com http://tuplas.blogspot.com blogspot.com http://www.msisoluc http://www.msisolucoes.com.br http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br http://www.msisolucoes.com.br oes.com.br - Original Message - From: Alan Vieceli To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Friday, May 23, 2008 2:35 PM Subject: Re: [delphi-br] Converter Ascii para String Ai vai a bendita function Criptografar(const S: string; Key: Word): string; var I: Integer; OutValue : String; begin OutValue := ''; for I := 1 to Length(S) do OutValue := OutValue + char(Not(ord(S[I])-Key)); Result := OutValue; end; Vinicius Santos - MSI escreveu: Eu ACHO que entendi... A sua rotina de criptografia está retornando valores como '#10#15', etc...certo ? Se for isso, poste a sua rotina, talvez podemos ajudar, mas tente ser mais claro ! Como diz o outro: Uma pergunta bem feita, vale mais da metade da resposta. Vinicius dos Santos Blog: http://tuplas. http://tuplas.blogspot.com http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com http://tuplas.blogspot.com blogspot.com http://www.msisoluc http://www.msisolucoes.com.br http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br http://www.msisolucoes.com.br oes.com.br - Original Message - From: Davi Eduardo Borges Wall To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Friday, May 23, 2008 2:25 PM Subject: RES: [delphi-br] Converter Ascii para String Eu não entendi NADA! Tente ler o que vc escreveu, acho que você não vai entender Tb. De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.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: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.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. http://tuplas.blogspot.com http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com http://tuplas.blogspot.com blogspot.com http://tuplas. http
Re: [delphi-br] Converter Ascii para String
Certo, eu vi os caracteres ASCII, mesmo...vc grava esses valores em BD, certo ??? Eu tenho uma situação parecida e gravo tais valores em campos BLOB, eu uso PostgreSQL, pq vc não tenta usar BLOB no seu BD, já tentou ?? 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:59 PM Subject: Re: [delphi-br] Converter Ascii para String ta certo, esse caracteres q voltou os valores de cada Ascii se tu depurar e ver o conteúdo da tua variavel, tu vai ver q são uns valores #$12#$12 por ai vai... o showmessage não vai adiantar pra ver, tem q ser na depuração Vinicius Santos - MSI escreveu: Cara, eu usei a tua função e fiz uma chamada assim: var wVar: string; begin wVar := 'Alan Vieceli'; wVar := Criptografar(wVar, 59); ShowMessage(wVar); end; Obtive os seguintes caracteres: ùÎÙÌäÑÕ×ÕÎÑ Existe mais alguma particularidade ? 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:40 PM Subject: Re: [delphi-br] Converter Ascii para String Criptografar('ALESANDRA',59) por exemplo... Vinicius Santos - MSI escreveu: Como, vc está fazendo a chamada da Função ? 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 Sent: Friday, May 23, 2008 2:35 PM Subject: Re: [delphi-br] Converter Ascii para String Ai vai a bendita function Criptografar(const S: string; Key: Word): string; var I: Integer; OutValue : String; begin OutValue := ''; for I := 1 to Length(S) do OutValue := OutValue + char(Not(ord(S[I])-Key)); Result := OutValue; end; Vinicius Santos - MSI escreveu: Eu ACHO que entendi... A sua rotina de criptografia está retornando valores como '#10#15', etc...certo ? Se for isso, poste a sua rotina, talvez podemos ajudar, mas tente ser mais claro ! Como diz o outro: Uma pergunta bem feita, vale mais da metade da resposta. 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: Davi Eduardo Borges Wall 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:25 PM Subject: RES: [delphi-br] Converter Ascii para String 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%40yahoogrupos.com.br [mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.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 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
Re: [delphi-br] Converter Ascii para String
pois é..eu tinha pensando nisso...mas é q seguinte... o BD ta pronto..meu chefe vai encher meu ouvidos c eu falar pra ele trocar o tipo do campo... por isso queria tentar converter esses Ascii pra string..mas eu ja consegui um solução quebra galho eu tava tendo probleam quando vinha #0 dai eu só retiro esse caracter #0 da string q dai rola...até eu descobrir como, se é q tem como, converter os ascii pra string eu vo usando assim.. valeu pela ajuda cara, grade abraço. Vinicius Santos - MSI escreveu: Certo, eu vi os caracteres ASCII, mesmo...vc grava esses valores em BD, certo ??? Eu tenho uma situação parecida e gravo tais valores em campos BLOB, eu uso PostgreSQL, pq vc não tenta usar BLOB no seu BD, já tentou ?? 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:59 PM Subject: Re: [delphi-br] Converter Ascii para String ta certo, esse caracteres q voltou os valores de cada Ascii se tu depurar e ver o conteúdo da tua variavel, tu vai ver q são uns valores #$12#$12 por ai vai... o showmessage não vai adiantar pra ver, tem q ser na depuração Vinicius Santos - MSI escreveu: Cara, eu usei a tua função e fiz uma chamada assim: var wVar: string; begin wVar := 'Alan Vieceli'; wVar := Criptografar(wVar, 59); ShowMessage(wVar); end; Obtive os seguintes caracteres: ùÎÙÌäÑÕ×ÕÎÑ Existe mais alguma particularidade ? 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 Sent: Friday, May 23, 2008 2:40 PM Subject: Re: [delphi-br] Converter Ascii para String Criptografar('ALESANDRA',59) por exemplo... Vinicius Santos - MSI escreveu: Como, vc está fazendo a chamada da Função ? 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 Sent: Friday, May 23, 2008 2:35 PM Subject: Re: [delphi-br] Converter Ascii para String Ai vai a bendita function Criptografar(const S: string; Key: Word): string; var I: Integer; OutValue : String; begin OutValue := ''; for I := 1 to Length(S) do OutValue := OutValue + char(Not(ord(S[I])-Key)); Result := OutValue; end; Vinicius Santos - MSI escreveu: Eu ACHO que entendi... A sua rotina de criptografia está retornando valores como '#10#15', etc...certo ? Se for isso, poste a sua rotina, talvez podemos ajudar, mas tente ser mais claro ! Como diz o outro: Uma pergunta bem feita, vale mais da metade da resposta. 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://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 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: Davi Eduardo Borges Wall 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
RES: RES: [delphi-br] Converter Ascii para String
Putz, que loucura rapaz. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alan Vieceli Enviada em: sexta-feira, 23 de maio de 2008 15:07 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] Converter Ascii para String Valeu pela resposta Antonio..já fiz isso, não rolou tambem.. ele não converte os Ascii para string, continua vindo os caracteres correspondete ao codigo ascii Antonio ney.Silva escreveu: Vê se assim não dá certo: function Criptografar(const S: string; Key: Word): string; var I: Integer; OutValue : String; begin OutValue := ''; for I := 1 to Length(S) do OutValue := OutValue + char(Not(ord(S[I])-Key)); Result := QuotedStr(OutValue); end; _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br] Em nome de Alan Vieceli Enviada em: sexta-feira, 23 de maio de 2008 14:41 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Converter Ascii para String Criptografar('ALESANDRA',59) por exemplo... Vinicius Santos - MSI escreveu: Como, vc está fazendo a chamada da Função ? Vinicius dos Santos Blog: http://tuplas. http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com blogspot.com http://tuplas. http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com blogspot.com http://www.msisoluc http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br oes.com.br http://www.msisoluc http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br oes.com.br - Original Message - From: Alan Vieceli To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Friday, May 23, 2008 2:35 PM Subject: Re: [delphi-br] Converter Ascii para String Ai vai a bendita function Criptografar(const S: string; Key: Word): string; var I: Integer; OutValue : String; begin OutValue := ''; for I := 1 to Length(S) do OutValue := OutValue + char(Not(ord(S[I])-Key)); Result := OutValue; end; Vinicius Santos - MSI escreveu: Eu ACHO que entendi... A sua rotina de criptografia está retornando valores como '#10#15', etc...certo ? Se for isso, poste a sua rotina, talvez podemos ajudar, mas tente ser mais claro ! Como diz o outro: Uma pergunta bem feita, vale mais da metade da resposta. Vinicius dos Santos Blog: http://tuplas. http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com blogspot.com http://tuplas. http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com blogspot.com http://tuplas. http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com blogspot.com http://tuplas. http://tuplas. http://tuplas.blogspot.com blogspot.com http://tuplas. http://tuplas.blogspot.com blogspot.com blogspot.com http://www.msisoluc http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br oes.com.br http://www.msisoluc http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br oes.com.br http://www.msisoluc http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br oes.com.br http://www.msisoluc http://www.msisoluc http://www.msisolucoes.com.br oes.com.br http://www.msisoluc http://www.msisolucoes.com.br oes.com.br oes.com.br - Original Message - From: Davi Eduardo Borges Wall To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Friday, May 23, 2008 2:25 PM Subject: RES: [delphi-br] Converter Ascii para String Eu não entendi NADA! Tente ler o que vc escreveu, acho que você não vai entender Tb. De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.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: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Assunto
Re: [delphi-br] Converter Ascii para String
E se vc tentasse usar outra rotina de Criptografia ?? Enfim, a questão é delicada mesmo...Eu tentaria trilhar outro caminho mais prático. Mas é isso ae, se conseguir outra coisa, compartilhe conosco. :) 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 3:28 PM Subject: Re: [delphi-br] Converter Ascii para String pois é..eu tinha pensando nisso...mas é q seguinte... o BD ta pronto..meu chefe vai encher meu ouvidos c eu falar pra ele trocar o tipo do campo... por isso queria tentar converter esses Ascii pra string..mas eu ja consegui um solução quebra galho eu tava tendo probleam quando vinha #0 dai eu só retiro esse caracter #0 da string q dai rola...até eu descobrir como, se é q tem como, converter os ascii pra string eu vo usando assim.. valeu pela ajuda cara, grade abraço. Vinicius Santos - MSI escreveu: Certo, eu vi os caracteres ASCII, mesmo...vc grava esses valores em BD, certo ??? Eu tenho uma situação parecida e gravo tais valores em campos BLOB, eu uso PostgreSQL, pq vc não tenta usar BLOB no seu BD, já tentou ?? 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:59 PM Subject: Re: [delphi-br] Converter Ascii para String ta certo, esse caracteres q voltou os valores de cada Ascii se tu depurar e ver o conteúdo da tua variavel, tu vai ver q são uns valores #$12#$12 por ai vai... o showmessage não vai adiantar pra ver, tem q ser na depuração Vinicius Santos - MSI escreveu: Cara, eu usei a tua função e fiz uma chamada assim: var wVar: string; begin wVar := 'Alan Vieceli'; wVar := Criptografar(wVar, 59); ShowMessage(wVar); end; Obtive os seguintes caracteres: ùÎÙÌäÑÕ×ÕÎÑ Existe mais alguma particularidade ? 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 Sent: Friday, May 23, 2008 2:40 PM Subject: Re: [delphi-br] Converter Ascii para String Criptografar('ALESANDRA',59) por exemplo... Vinicius Santos - MSI escreveu: Como, vc está fazendo a chamada da Função ? 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 Sent: Friday, May 23, 2008 2:35 PM Subject: Re: [delphi-br] Converter Ascii para String Ai vai a bendita function Criptografar(const S: string; Key: Word): string; var I: Integer; OutValue : String; begin OutValue := ''; for I := 1 to Length(S) do OutValue := OutValue + char(Not(ord(S[I])-Key)); Result := OutValue; end; Vinicius Santos - MSI escreveu: Eu ACHO que entendi... A sua rotina de criptografia está retornando valores como '#10#15', etc...certo ? Se for isso, poste a sua rotina, talvez podemos ajudar, mas tente ser mais claro ! Como diz o outro: Uma pergunta bem feita, vale mais da metade da resposta. 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://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
Re: [delphi-br] Converter Ascii para String
Alan Vieceli wrote: 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 Converte sua string em hexa, mais ou menos assim: function Converte(const AEntrada: string): string; var I: Integer; begin SetLength(Result, 2 * Length(AEntrada)); for I := 1 to Length(AEntrada) do Move(IntToHex(Ord(AEntrada[I]), 2)[1], Result[2 * I - 1], 2); end; Depois 'desconverte', mais ou menos assim: function Desconverte(const ASaida: string): string; var I: Integer; begin SetLength(Result, Length(ASaida) div 2); for I := 1 to Length(Result) do Result[I] := Chr(StrToInt('$' + Copy(ASaida, 2 * I - 1, 2))); end; Nem preciso dizer que você vai precisar do dobro do espaço no campo. E nem preciso dizer também que fiz só um rascunho, daí depois você conta se funcionou. Joao Morais
Re: [delphi-br] Converter Ascii para String
valeu pela dica..vo testar Joao Morais escreveu: Alan Vieceli wrote: 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 Converte sua string em hexa, mais ou menos assim: function Converte(const AEntrada: string): string; var I: Integer; begin SetLength(Result, 2 * Length(AEntrada)); for I := 1 to Length(AEntrada) do Move(IntToHex(Ord(AEntrada[I]), 2)[1], Result[2 * I - 1], 2); end; Depois 'desconverte', mais ou menos assim: function Desconverte(const ASaida: string): string; var I: Integer; begin SetLength(Result, Length(ASaida) div 2); for I := 1 to Length(Result) do Result[I] := Chr(StrToInt('$' + Copy(ASaida, 2 * I - 1, 2))); end; Nem preciso dizer que você vai precisar do dobro do espaço no campo. E nem preciso dizer também que fiz só um rascunho, daí depois você conta se funcionou. Joao Morais
Re: [delphi-br] Converter Centimetros em Inteiro
Tranquilo, me desculpe. Alex - Original Message - From: Sergio Eurico To: delphi-br@yahoogrupos.com.br Sent: Saturday, January 26, 2008 3:35 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro hahahahaha O Alexandre, eu nao escrevi INHO nao... calma ai. Eu escrevi IMHO ( Veja no GOOGLE http://www.google.com.br/search?hl=pt-BRq=IMHObtnG=Pesquisa+Googlemeta= ) IMHO = In my humble Opinion... NA MINHA HUMILDE OPINIAO. Ja agora, sugiro que leia com mais calma, de guarda baixa... Me parece que voce esta se achando ofendido sem ninguem ter lhe dito nada demais. Bom final de semana, Sergio Eurico, Em 26/01/08, Alexandre [EMAIL PROTECTED] escreveu: Engraçado, não sou matémático, justamente por isto estou tentando ajuda dos companheiros, parece que tem pessoas neste forum que não sabem respeitar a ignorâncias as pessoas com relação a certos assuntos, enfim, não estamos aqui para discutir leis evolutivas, um já disse vamos voltar a quarta série, o ou chama de INHO, acho meio infantil e arrogante isso, mas fazer o que, Faz parte da evolução moral de cada um, bom, vamos a questão, esse valor esquisito eu achei em vários foruns, engraçado que foram em foruns diferentes, alguem da lista tem algum valor correto para eu resolver esta questão?porque agora vi muita teoria, mas o resultado final infelizmente não vi ainda, abraço a todos da lista e obrigado pela atenção. Alex - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Friday, January 25, 2008 7:23 PM Subject: RE: [delphi-br] Converter Centimetros em Inteiro Sim, companheiro. A lista é para ajudar a todos. Se vc recebeu ajuda, pelo menos nos forneça os detalhes de como vc chegou a esse magic number para resolver o seu problema. Na lista, é bom cultivar a cultura de sempre retribuir a ajuda dos colegas. Como vc chegou a esse valor cabalístico? Sds. To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br From: [EMAIL PROTECTED] alexandresoaressp%40yahoo.com.br Date: Fri, 25 Jan 2008 10:52:16 -0200 Subject: Re: [delphi-br] Converter Centimetros em Inteiro Pessoal, resolvi o problema simplesmente multiplicando o valor em centimetros por 28. obrigado! - Original Message - From: Apoio To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:30 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro certo mas a propriedade top,left esta em inteiro mas left = 10 não é igual a 10 cm eu faço isso aqui tb mas deixo em inteiro pro usuario . acho besteira vc ficar tranformando em cm aquilo que deve ser inteiro ! isso é minha opinião ... - Original Message - From: Alexandre To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:14 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Deixa eu explicar melhor, fiz uma opção no meu sistema, para o usuário fazer a impressão da nota fiscal, ele define a margem superior e margem lateral de cada campo na impressão, estou usando o QuickReport, quero pegar o que o usuário colocou no programa em centimetros e passar para a propriedade TOP e LEFT do componente da impressão, entenderam?Só que a propriedade Top e Left do componente do QuickReport recebe um valor inteiro, e é óbvio que se o usuário colocar 4,5 cms vai dar pau na conversão, entendeu? Alex - Original Message - From: Alexandre Rodrigues To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:00 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ __ Information from ESET NOD32
Re: RES: [delphi-br] Converter Centimetros em Inteiro
Acho que isso tbm da certo http://www.sosdesigners.com/forum/viewtopic.php?t=56 Velhinho acho q consegui o q vc queria, tipo assim 1 centímetro tem 38 pixels, o q vc faz vc pega o o valor em centimetros e multiplica por 38(equivale a 1 centímetro). Ex: [code:1] % cm = 13 pixels = 38 response.write bO tamanho em pixels é:/b Int(cm) * Int (pixels) px. % [/code:1] vê se isso resolve --- Em delphi-br@yahoogrupos.com.br, Ricardo César Cardoso [EMAIL PROTECTED] escreveu Bom dia! O certo então seria perguntar quantos centímetros valem 1 pixel ou o inverso. Procurei no Google por converter pixel em centímetros [ http://www.google.com.br/search?hl=pt-BRq=converter+pixel+em+cent%C3% ADmetrosbtnG=Pesquisa+Googlemeta= ] e lá pelas tantas achei esta tabela de equivalências: [ http://www.cotacaografica.com.br/cg/publier4.0/texto.asp?id=30 ] Espero que seja útil. Saudações, Ricardo. Davi Eduardo Borges Wall [EMAIL PROTECTED] escreveu: Pessoal !! Top e Left = valores em pixel! Cm é uma coisa! Inteiro é outra! Não se transforma CM em inteiro, mas sim um arredondamento de float, ou mesmo a parte inteira de um float. Onde Float corresponde a um valor em CM. De: delphi-br@yahoogrupos.com.br [mailto:delphi- [EMAIL PROTECTED] Em nome de Apoio Enviada em: quinta-feira, 24 de janeiro de 2008 16:31 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Converter Centimetros em Inteiro certo mas a propriedade top,left esta em inteiro mas left = 10 não é igual a 10 cm eu faço isso aqui tb mas deixo em inteiro pro usuario . acho besteira vc ficar tranformando em cm aquilo que deve ser inteiro ! isso é minha opinião ... - Original Message - From: Alexandre To: delphi-br@yahoogrupos.com.br mailto:delphi-br% 40yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:14 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Deixa eu explicar melhor, fiz uma opção no meu sistema, para o usuário fazer a impressão da nota fiscal, ele define a margem superior e margem lateral de cada campo na impressão, estou usando o QuickReport, quero pegar o que o usuário colocou no programa em centimetros e passar para a propriedade TOP e LEFT do componente da impressão, entenderam?Só que a propriedade Top e Left do componente do QuickReport recebe um valor inteiro, e é óbvio que se o usuário colocar 4,5 cms vai dar pau na conversão, entendeu? Alex - Original Message - From: Alexandre Rodrigues To: delphi-br@yahoogrupos.com.br mailto:delphi-br% 40yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:00 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [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] - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: RES: [delphi-br] Converter Centimetros em Inteiro
é como o Sérgio Eurico falou, a resolução interfere nisso, quem usa 800x600 1cm vai ser mais que 38pixels, diferente de quem usa 1280x1024 Em 28/01/08, Karla [EMAIL PROTECTED] escreveu: Acho que isso tbm da certo http://www.sosdesigners.com/forum/viewtopic.php?t=56 Velhinho acho q consegui o q vc queria, tipo assim 1 centímetro tem 38 pixels, o q vc faz vc pega o o valor em centimetros e multiplica por 38(equivale a 1 centímetro). Ex: [code:1] % cm = 13 pixels = 38 response.write bO tamanho em pixels é:/b Int(cm) * Int (pixels) px. % [/code:1] vê se isso resolve --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br, Ricardo César Cardoso [EMAIL PROTECTED] escreveu Bom dia! O certo então seria perguntar quantos centímetros valem 1 pixel ou o inverso. Procurei no Google por converter pixel em centímetros [ http://www.google.com.br/search?hl=pt-BRq=converter+pixel+em+cent%C3%http://www.google.com.br/search?hl=pt-BRq=converter+pixel+em+cent%C3%25 ADmetrosbtnG=Pesquisa+Googlemeta= ] e lá pelas tantas achei esta tabela de equivalências: [ http://www.cotacaografica.com.br/cg/publier4.0/texto.asp?id=30 ] Espero que seja útil. Saudações, Ricardo. Davi Eduardo Borges Wall [EMAIL PROTECTED] escreveu: Pessoal !! Top e Left = valores em pixel! Cm é uma coisa! Inteiro é outra! Não se transforma CM em inteiro, mas sim um arredondamento de float, ou mesmo a parte inteira de um float. Onde Float corresponde a um valor em CM. De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br[mailto: delphi- [EMAIL PROTECTED] br%40yahoogrupos.com.br] Em nome de Apoio Enviada em: quinta-feira, 24 de janeiro de 2008 16:31 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Converter Centimetros em Inteiro certo mas a propriedade top,left esta em inteiro mas left = 10 não é igual a 10 cm eu faço isso aqui tb mas deixo em inteiro pro usuario . acho besteira vc ficar tranformando em cm aquilo que deve ser inteiro ! isso é minha opinião ... - Original Message - From: Alexandre To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brmailto: delphi-br% delphi-br%25 40yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:14 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Deixa eu explicar melhor, fiz uma opção no meu sistema, para o usuário fazer a impressão da nota fiscal, ele define a margem superior e margem lateral de cada campo na impressão, estou usando o QuickReport, quero pegar o que o usuário colocou no programa em centimetros e passar para a propriedade TOP e LEFT do componente da impressão, entenderam?Só que a propriedade Top e Left do componente do QuickReport recebe um valor inteiro, e é óbvio que se o usuário colocar 4,5 cms vai dar pau na conversão, entendeu? Alex - Original Message - From: Alexandre Rodrigues To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brmailto: delphi-br% delphi-br%25 40yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:00 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [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] - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http
Re: [delphi-br] Converter Centimetros em Inteiro
Sérgio, quando fiz minhas pesquisas aqui cheguei a mesma confusão que vc expôs, mas tive medo de complicar ainda mais a cabeça do amigo, já que o problema aí vai longe, são várias linhas de pensamento. Por este mesmo motivo não quis cravar um número cabalistico (uma constante), já que pode dar certo pra ele enquanto estiver com o projeto no seu equipamento, mas pode mudar toda a realidade em ambiente de produção. Por isso achei melhor passar um link para uma tabela de referência e a string de consulta que fiz ao mestre Google. Ah... os links que vc colocou são um bom adendo pra estudar o assunto. Atte, Ricardo. Sergio Eurico [EMAIL PROTECTED] escreveu: Senhores, boa noite! Rubem, eu acredito que ele chegou ao numero 28 baseando-se no monitor dele, que provavelmente tem resolucao .28 Dpi rrsrsr IMHO, pode estar certo e errado ao mesmo tempo, vejamos. Converter diretamente de Centimetros para Polegadas é simples. Para converter Polegadas por Centimetros, mutiplicamos por 2.54. Para converter Centimetros para Polegadas, multiplicamos por 0.3937. FONTE: http://knitit.com/cgi-bin/faq-search.cgi?faqKey=102store=/stores/eyarn Mas ha de se considerar o caso de impressoras e suas diferentes densidades de impressao, vejamos: Algumas densidades de impressão típicas (horizontal×vertical em pontos por polegada) - Impressora matricial com cabeçote de 9 pinos: 60×60 a 240×120. - Impressora matricial qualidade carta (*letter quality, LQ*) com cabeçote de 24 pinos: 60×60 a 360×180. - Impressora jato de tinta: 75×150 a 600×300 ou 1440×720 (e até 9600, dependendo do modelo). - Impressora laser: 600×300 a 1200×1200. FONTE: http://pt.wikipedia.org/wiki/Pontos_por_polegada Bom, sem querer complicar ainda mais, nao basta medir na tela com uma regua e fazer a conversao, por que ai temos que considerar a resolução em pixels da imagem na tela. Falando mais claramente, uma determinada imagem ( uma logomarca por exemplo ) pode POR EXEMPLO medir (com a regua encostada no monitor) 10 ou 2 centimetros, depende da resolucao do monitor estar POR EXEMPLO em 1680x1050 ou em 640x480. Ou seja IMHO nao ha uma resposta simples e direta, é preciso considerar a resolucao da imagem (neste caso, na tela) e a resolucao em que será impressa. Pode-se até trabalhar com o padrao de 72 DPI, mas deve-se ficar atento que varios parametros estao presentes para equacionar a resposta certa. Um abraco, Sergio Eurico. Em 25/01/08, Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu: Sim, companheiro. A lista é para ajudar a todos. Se vc recebeu ajuda, pelo menos nos forneça os detalhes de como vc chegou a esse magic number para resolver o seu problema. Na lista, é bom cultivar a cultura de sempre retribuir a ajuda dos colegas. Como vc chegou a esse valor cabalístico? Sds. [As partes desta mensagem que não continham texto foram removidas] _ - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter Centimetros em Inteiro
Engraçado, não sou matémático, justamente por isto estou tentando ajuda dos companheiros, parece que tem pessoas neste forum que não sabem respeitar a ignorâncias as pessoas com relação a certos assuntos, enfim, não estamos aqui para discutir leis evolutivas, um já disse vamos voltar a quarta série, o ou chama de INHO, acho meio infantil e arrogante isso, mas fazer o que, Faz parte da evolução moral de cada um, bom, vamos a questão, esse valor esquisito eu achei em vários foruns, engraçado que foram em foruns diferentes, alguem da lista tem algum valor correto para eu resolver esta questão?porque agora vi muita teoria, mas o resultado final infelizmente não vi ainda, abraço a todos da lista e obrigado pela atenção. Alex - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br Sent: Friday, January 25, 2008 7:23 PM Subject: RE: [delphi-br] Converter Centimetros em Inteiro Sim, companheiro. A lista é para ajudar a todos. Se vc recebeu ajuda, pelo menos nos forneça os detalhes de como vc chegou a esse magic number para resolver o seu problema. Na lista, é bom cultivar a cultura de sempre retribuir a ajuda dos colegas. Como vc chegou a esse valor cabalístico? Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Fri, 25 Jan 2008 10:52:16 -0200 Subject: Re: [delphi-br] Converter Centimetros em Inteiro Pessoal, resolvi o problema simplesmente multiplicando o valor em centimetros por 28. obrigado! - Original Message - From: Apoio To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:30 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro certo mas a propriedade top,left esta em inteiro mas left = 10 não é igual a 10 cm eu faço isso aqui tb mas deixo em inteiro pro usuario . acho besteira vc ficar tranformando em cm aquilo que deve ser inteiro ! isso é minha opinião ... - Original Message - From: Alexandre To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:14 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Deixa eu explicar melhor, fiz uma opção no meu sistema, para o usuário fazer a impressão da nota fiscal, ele define a margem superior e margem lateral de cada campo na impressão, estou usando o QuickReport, quero pegar o que o usuário colocou no programa em centimetros e passar para a propriedade TOP e LEFT do componente da impressão, entenderam?Só que a propriedade Top e Left do componente do QuickReport recebe um valor inteiro, e é óbvio que se o usuário colocar 4,5 cms vai dar pau na conversão, entendeu? Alex - Original Message - From: Alexandre Rodrigues To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:00 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas] __ Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver offline. Conheça o MSN Mobile! http://mobile.live.com/signup/signup2.aspx?lc=pt-br __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter Centimetros em Inteiro
Fiz o teste multiplicando por 2.54 e na visualização da folha, saiu totalmente errado, com 28 saiu perfeitamente na posição correta, errado, errado e meio, multiplicando por 28 o resultado foi mil vezez melhor, creio que não seja um valor inteligente para todas as situações. Alex - Original Message - From: Ricardo César Cardoso To: delphi-br@yahoogrupos.com.br Sent: Saturday, January 26, 2008 9:28 AM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Sérgio, quando fiz minhas pesquisas aqui cheguei a mesma confusão que vc expôs, mas tive medo de complicar ainda mais a cabeça do amigo, já que o problema aí vai longe, são várias linhas de pensamento. Por este mesmo motivo não quis cravar um número cabalistico (uma constante), já que pode dar certo pra ele enquanto estiver com o projeto no seu equipamento, mas pode mudar toda a realidade em ambiente de produção. Por isso achei melhor passar um link para uma tabela de referência e a string de consulta que fiz ao mestre Google. Ah... os links que vc colocou são um bom adendo pra estudar o assunto. Atte, Ricardo. Sergio Eurico [EMAIL PROTECTED] escreveu: Senhores, boa noite! Rubem, eu acredito que ele chegou ao numero 28 baseando-se no monitor dele, que provavelmente tem resolucao .28 Dpi rrsrsr IMHO, pode estar certo e errado ao mesmo tempo, vejamos. Converter diretamente de Centimetros para Polegadas é simples. Para converter Polegadas por Centimetros, mutiplicamos por 2.54. Para converter Centimetros para Polegadas, multiplicamos por 0.3937. FONTE: http://knitit.com/cgi-bin/faq-search.cgi?faqKey=102store=/stores/eyarn Mas ha de se considerar o caso de impressoras e suas diferentes densidades de impressao, vejamos: Algumas densidades de impressão típicas (horizontal×vertical em pontos por polegada) - Impressora matricial com cabeçote de 9 pinos: 60×60 a 240×120. - Impressora matricial qualidade carta (*letter quality, LQ*) com cabeçote de 24 pinos: 60×60 a 360×180. - Impressora jato de tinta: 75×150 a 600×300 ou 1440×720 (e até 9600, dependendo do modelo). - Impressora laser: 600×300 a 1200×1200. FONTE: http://pt.wikipedia.org/wiki/Pontos_por_polegada Bom, sem querer complicar ainda mais, nao basta medir na tela com uma regua e fazer a conversao, por que ai temos que considerar a resolução em pixels da imagem na tela. Falando mais claramente, uma determinada imagem ( uma logomarca por exemplo ) pode POR EXEMPLO medir (com a regua encostada no monitor) 10 ou 2 centimetros, depende da resolucao do monitor estar POR EXEMPLO em 1680x1050 ou em 640x480. Ou seja IMHO nao ha uma resposta simples e direta, é preciso considerar a resolucao da imagem (neste caso, na tela) e a resolucao em que será impressa. Pode-se até trabalhar com o padrao de 72 DPI, mas deve-se ficar atento que varios parametros estao presentes para equacionar a resposta certa. Um abraco, Sergio Eurico. Em 25/01/08, Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu: Sim, companheiro. A lista é para ajudar a todos. Se vc recebeu ajuda, pelo menos nos forneça os detalhes de como vc chegou a esse magic number para resolver o seu problema. Na lista, é bom cultivar a cultura de sempre retribuir a ajuda dos colegas. Como vc chegou a esse valor cabalístico? Sds. [As partes desta mensagem que não continham texto foram removidas] _ - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter Centimetros em Inteiro
Legal que conseguiu resolver Alexandre! Mas fique atento quando for imprimir em produção. Pode ser que vc ainda tenha que fazer alguns ajustes, pelo menos é a conclusão que cheguei já que a cada link que visitei (sinceramente, não foram muitos) parecia que cada um tinha uma opinião diferente. Atte, Ricardo. Alexandre [EMAIL PROTECTED] escreveu: Fiz o teste multiplicando por 2.54 e na visualização da folha, saiu totalmente errado, com 28 saiu perfeitamente na posição correta, errado, errado e meio, multiplicando por 28 o resultado foi mil vezez melhor, creio que não seja um valor inteligente para todas as situações. Alex - Original Message - From: Ricardo César Cardoso To: delphi-br@yahoogrupos.com.br Sent: Saturday, January 26, 2008 9:28 AM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Sérgio, quando fiz minhas pesquisas aqui cheguei a mesma confusão que vc expôs, mas tive medo de complicar ainda mais a cabeça do amigo, já que o problema aí vai longe, são várias linhas de pensamento. Por este mesmo motivo não quis cravar um número cabalistico (uma constante), já que pode dar certo pra ele enquanto estiver com o projeto no seu equipamento, mas pode mudar toda a realidade em ambiente de produção. Por isso achei melhor passar um link para uma tabela de referência e a string de consulta que fiz ao mestre Google. Ah... os links que vc colocou são um bom adendo pra estudar o assunto. Atte, Ricardo. Sergio Eurico [EMAIL PROTECTED] escreveu: Senhores, boa noite! Rubem, eu acredito que ele chegou ao numero 28 baseando-se no monitor dele, que provavelmente tem resolucao .28 Dpi rrsrsr IMHO, pode estar certo e errado ao mesmo tempo, vejamos. Converter diretamente de Centimetros para Polegadas é simples. Para converter Polegadas por Centimetros, mutiplicamos por 2.54. Para converter Centimetros para Polegadas, multiplicamos por 0.3937. FONTE: http://knitit.com/cgi-bin/faq-search.cgi?faqKey=102store=/stores/eyarn Mas ha de se considerar o caso de impressoras e suas diferentes densidades de impressao, vejamos: Algumas densidades de impressão típicas (horizontal×vertical em pontos por polegada) - Impressora matricial com cabeçote de 9 pinos: 60×60 a 240×120. - Impressora matricial qualidade carta (*letter quality, LQ*) com cabeçote de 24 pinos: 60×60 a 360×180. - Impressora jato de tinta: 75×150 a 600×300 ou 1440×720 (e até 9600, dependendo do modelo). - Impressora laser: 600×300 a 1200×1200. FONTE: http://pt.wikipedia.org/wiki/Pontos_por_polegada Bom, sem querer complicar ainda mais, nao basta medir na tela com uma regua e fazer a conversao, por que ai temos que considerar a resolução em pixels da imagem na tela. Falando mais claramente, uma determinada imagem ( uma logomarca por exemplo ) pode POR EXEMPLO medir (com a regua encostada no monitor) 10 ou 2 centimetros, depende da resolucao do monitor estar POR EXEMPLO em 1680x1050 ou em 640x480. Ou seja IMHO nao ha uma resposta simples e direta, é preciso considerar a resolucao da imagem (neste caso, na tela) e a resolucao em que será impressa. Pode-se até trabalhar com o padrao de 72 DPI, mas deve-se ficar atento que varios parametros estao presentes para equacionar a resposta certa. Um abraco, Sergio Eurico. Em 25/01/08, Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu: Sim, companheiro. A lista é para ajudar a todos. Se vc recebeu ajuda, pelo menos nos forneça os detalhes de como vc chegou a esse magic number para resolver o seu problema. Na lista, é bom cultivar a cultura de sempre retribuir a ajuda dos colegas. Como vc chegou a esse valor cabalístico? Sds. [As partes desta mensagem que não continham texto foram removidas] _ - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas] - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter Centimetros em Inteiro
hahahahaha O Alexandre, eu nao escrevi INHO nao... calma ai. Eu escrevi IMHO ( Veja no GOOGLE http://www.google.com.br/search?hl=pt-BRq=IMHObtnG=Pesquisa+Googlemeta= ) IMHO = In my humble Opinion... NA MINHA HUMILDE OPINIAO. Ja agora, sugiro que leia com mais calma, de guarda baixa... Me parece que voce esta se achando ofendido sem ninguem ter lhe dito nada demais. Bom final de semana, Sergio Eurico, Em 26/01/08, Alexandre [EMAIL PROTECTED] escreveu: Engraçado, não sou matémático, justamente por isto estou tentando ajuda dos companheiros, parece que tem pessoas neste forum que não sabem respeitar a ignorâncias as pessoas com relação a certos assuntos, enfim, não estamos aqui para discutir leis evolutivas, um já disse vamos voltar a quarta série, o ou chama de INHO, acho meio infantil e arrogante isso, mas fazer o que, Faz parte da evolução moral de cada um, bom, vamos a questão, esse valor esquisito eu achei em vários foruns, engraçado que foram em foruns diferentes, alguem da lista tem algum valor correto para eu resolver esta questão?porque agora vi muita teoria, mas o resultado final infelizmente não vi ainda, abraço a todos da lista e obrigado pela atenção. Alex - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Friday, January 25, 2008 7:23 PM Subject: RE: [delphi-br] Converter Centimetros em Inteiro Sim, companheiro. A lista é para ajudar a todos. Se vc recebeu ajuda, pelo menos nos forneça os detalhes de como vc chegou a esse magic number para resolver o seu problema. Na lista, é bom cultivar a cultura de sempre retribuir a ajuda dos colegas. Como vc chegou a esse valor cabalístico? Sds. To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br From: [EMAIL PROTECTED] alexandresoaressp%40yahoo.com.br Date: Fri, 25 Jan 2008 10:52:16 -0200 Subject: Re: [delphi-br] Converter Centimetros em Inteiro Pessoal, resolvi o problema simplesmente multiplicando o valor em centimetros por 28. obrigado! - Original Message - From: Apoio To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:30 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro certo mas a propriedade top,left esta em inteiro mas left = 10 não é igual a 10 cm eu faço isso aqui tb mas deixo em inteiro pro usuario . acho besteira vc ficar tranformando em cm aquilo que deve ser inteiro ! isso é minha opinião ... - Original Message - From: Alexandre To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:14 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Deixa eu explicar melhor, fiz uma opção no meu sistema, para o usuário fazer a impressão da nota fiscal, ele define a margem superior e margem lateral de cada campo na impressão, estou usando o QuickReport, quero pegar o que o usuário colocou no programa em centimetros e passar para a propriedade TOP e LEFT do componente da impressão, entenderam?Só que a propriedade Top e Left do componente do QuickReport recebe um valor inteiro, e é óbvio que se o usuário colocar 4,5 cms vai dar pau na conversão, entendeu? Alex - Original Message - From: Alexandre Rodrigues To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:00 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http
Re: RES: [delphi-br] Converter Centimetros em Inteiro
Ricardo César Cardoso wrote: O certo então seria perguntar quantos centímetros valem 1 pixel ou o inverso. Justo, e para isto é necessário uma medida: dpi. Com o dpi é possível passar entre estas grandezas diferentes. Procurei no Google por converter pixel em centímetros [ http://www.google.com.br/search?hl=pt-BRq=converter+pixel+em+cent%C3%ADmetrosbtnG=Pesquisa+Googlemeta= ] e lá pelas tantas achei esta tabela de equivalências: [ http://www.cotacaografica.com.br/cg/publier4.0/texto.asp?id=30 ] Que usa 72 dpi, padrão para o monitor. Mas se você fala dos pontos da impressora, pode ser 200, 300, 600, 1200 dpi. Dpi é ponto (pixel) por polegada, então sabendo que 1 polegada tem 2,54 cm, converter cm para pixel fica: pixel := dpi * cm / 2,54 -- Joao Morais
Re: RES: [delphi-br] Converter Centimetros em Inteiro
Bom dia! O certo então seria perguntar quantos centímetros valem 1 pixel ou o inverso. Procurei no Google por converter pixel em centímetros [ http://www.google.com.br/search?hl=pt-BRq=converter+pixel+em+cent%C3%ADmetrosbtnG=Pesquisa+Googlemeta= ] e lá pelas tantas achei esta tabela de equivalências: [ http://www.cotacaografica.com.br/cg/publier4.0/texto.asp?id=30 ] Espero que seja útil. Saudações, Ricardo. Davi Eduardo Borges Wall [EMAIL PROTECTED] escreveu: Pessoal !! Top e Left = valores em pixel! Cm é uma coisa! Inteiro é outra! Não se transforma CM em inteiro, mas sim um arredondamento de float, ou mesmo a parte inteira de um float. Onde Float corresponde a um valor em CM. De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Apoio Enviada em: quinta-feira, 24 de janeiro de 2008 16:31 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Converter Centimetros em Inteiro certo mas a propriedade top,left esta em inteiro mas left = 10 não é igual a 10 cm eu faço isso aqui tb mas deixo em inteiro pro usuario . acho besteira vc ficar tranformando em cm aquilo que deve ser inteiro ! isso é minha opinião ... - Original Message - From: Alexandre To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:14 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Deixa eu explicar melhor, fiz uma opção no meu sistema, para o usuário fazer a impressão da nota fiscal, ele define a margem superior e margem lateral de cada campo na impressão, estou usando o QuickReport, quero pegar o que o usuário colocou no programa em centimetros e passar para a propriedade TOP e LEFT do componente da impressão, entenderam?Só que a propriedade Top e Left do componente do QuickReport recebe um valor inteiro, e é óbvio que se o usuário colocar 4,5 cms vai dar pau na conversão, entendeu? Alex - Original Message - From: Alexandre Rodrigues To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:00 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [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] - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: RES: [delphi-br] Converter Centimetros em Inteiro
João, vc matou muito bem a charada... eu passei a tabela de equivalência pq não consegui chegar nessa relação pois do pouco que eu li acabei atolado na discussão de que o certo era trabalhar com com Pixel Per Inch (PPI) ao invés de Dot Per Inch (DPI)... aí então parti pra tabela de equivalência. Mas foi bem melhor pq aí já tem o esboço de uma função de conversão. Sds, Ricardo. Joao Morais [EMAIL PROTECTED] escreveu: Que usa 72 dpi, padrão para o monitor. Mas se você fala dos pontos da impressora, pode ser 200, 300, 600, 1200 dpi. Dpi é ponto (pixel) por polegada, então sabendo que 1 polegada tem 2,54 cm, converter cm para pixel fica: pixel := dpi * cm / 2,54 -- Joao Morais - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter Centimetros em Inteiro
Senhores, boa noite! Rubem, eu acredito que ele chegou ao numero 28 baseando-se no monitor dele, que provavelmente tem resolucao .28 Dpi rrsrsr IMHO, pode estar certo e errado ao mesmo tempo, vejamos. Converter diretamente de Centimetros para Polegadas é simples. Para converter Polegadas por Centimetros, mutiplicamos por 2.54. Para converter Centimetros para Polegadas, multiplicamos por 0.3937. FONTE: http://knitit.com/cgi-bin/faq-search.cgi?faqKey=102store=/stores/eyarn Mas ha de se considerar o caso de impressoras e suas diferentes densidades de impressao, vejamos: Algumas densidades de impressão típicas (horizontal×vertical em pontos por polegada) - Impressora matricial com cabeçote de 9 pinos: 60×60 a 240×120. - Impressora matricial qualidade carta (*letter quality, LQ*) com cabeçote de 24 pinos: 60×60 a 360×180. - Impressora jato de tinta: 75×150 a 600×300 ou 1440×720 (e até 9600, dependendo do modelo). - Impressora laser: 600×300 a 1200×1200. FONTE: http://pt.wikipedia.org/wiki/Pontos_por_polegada Bom, sem querer complicar ainda mais, nao basta medir na tela com uma regua e fazer a conversao, por que ai temos que considerar a resolução em pixels da imagem na tela. Falando mais claramente, uma determinada imagem ( uma logomarca por exemplo ) pode POR EXEMPLO medir (com a regua encostada no monitor) 10 ou 2 centimetros, depende da resolucao do monitor estar POR EXEMPLO em 1680x1050 ou em 640x480. Ou seja IMHO nao ha uma resposta simples e direta, é preciso considerar a resolucao da imagem (neste caso, na tela) e a resolucao em que será impressa. Pode-se até trabalhar com o padrao de 72 DPI, mas deve-se ficar atento que varios parametros estao presentes para equacionar a resposta certa. Um abraco, Sergio Eurico. Em 25/01/08, Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu: Sim, companheiro. A lista é para ajudar a todos. Se vc recebeu ajuda, pelo menos nos forneça os detalhes de como vc chegou a esse magic number para resolver o seu problema. Na lista, é bom cultivar a cultura de sempre retribuir a ajuda dos colegas. Como vc chegou a esse valor cabalístico? Sds. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter Centimetros em Inteiro
Pessoal, resolvi o problema simplesmente multiplicando o valor em centimetros por 28. obrigado! - Original Message - From: Apoio To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:30 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro certo mas a propriedade top,left esta em inteiro mas left = 10 não é igual a 10 cm eu faço isso aqui tb mas deixo em inteiro pro usuario . acho besteira vc ficar tranformando em cm aquilo que deve ser inteiro ! isso é minha opinião ... - Original Message - From: Alexandre To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:14 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Deixa eu explicar melhor, fiz uma opção no meu sistema, para o usuário fazer a impressão da nota fiscal, ele define a margem superior e margem lateral de cada campo na impressão, estou usando o QuickReport, quero pegar o que o usuário colocou no programa em centimetros e passar para a propriedade TOP e LEFT do componente da impressão, entenderam?Só que a propriedade Top e Left do componente do QuickReport recebe um valor inteiro, e é óbvio que se o usuário colocar 4,5 cms vai dar pau na conversão, entendeu? Alex - Original Message - From: Alexandre Rodrigues To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:00 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Converter Centimetros em Inteiro
Sim, companheiro. A lista é para ajudar a todos. Se vc recebeu ajuda, pelo menos nos forneça os detalhes de como vc chegou a esse magic number para resolver o seu problema. Na lista, é bom cultivar a cultura de sempre retribuir a ajuda dos colegas. Como vc chegou a esse valor cabalístico? Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Fri, 25 Jan 2008 10:52:16 -0200 Subject: Re: [delphi-br] Converter Centimetros em Inteiro Pessoal, resolvi o problema simplesmente multiplicando o valor em centimetros por 28. obrigado! - Original Message - From: Apoio To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:30 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro certo mas a propriedade top,left esta em inteiro mas left = 10 não é igual a 10 cm eu faço isso aqui tb mas deixo em inteiro pro usuario . acho besteira vc ficar tranformando em cm aquilo que deve ser inteiro ! isso é minha opinião ... - Original Message - From: Alexandre To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:14 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Deixa eu explicar melhor, fiz uma opção no meu sistema, para o usuário fazer a impressão da nota fiscal, ele define a margem superior e margem lateral de cada campo na impressão, estou usando o QuickReport, quero pegar o que o usuário colocou no programa em centimetros e passar para a propriedade TOP e LEFT do componente da impressão, entenderam?Só que a propriedade Top e Left do componente do QuickReport recebe um valor inteiro, e é óbvio que se o usuário colocar 4,5 cms vai dar pau na conversão, entendeu? Alex - Original Message - From: Alexandre Rodrigues To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:00 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas] _ Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver offline. Conheça o MSN Mobile! http://mobile.live.com/signup/signup2.aspx?lc=pt-br
[delphi-br] Converter Centimetros em Inteiro
Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter Centimetros em Inteiro
onde esta esse valor? q formato? explica melhor ae pois ta brabo a pergunta ... - Original Message - From: Alexandre To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 1:57 PM Subject: [delphi-br] Converter Centimetros em Inteiro Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter Centimetros em Inteiro
Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/
Re: [delphi-br] Converter Centimetros em Inteiro
Deixa eu explicar melhor, fiz uma opção no meu sistema, para o usuário fazer a impressão da nota fiscal, ele define a margem superior e margem lateral de cada campo na impressão, estou usando o QuickReport, quero pegar o que o usuário colocou no programa em centimetros e passar para a propriedade TOP e LEFT do componente da impressão, entenderam?Só que a propriedade Top e Left do componente do QuickReport recebe um valor inteiro, e é óbvio que se o usuário colocar 4,5 cms vai dar pau na conversão, entendeu? Alex - Original Message - From: Alexandre Rodrigues To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:00 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Converter Centimetros em Inteiro
Então, na realidade, o que vc quer é converter centímetros em pixels, meu caro. Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Thu, 24 Jan 2008 16:14:44 -0200 Subject: Re: [delphi-br] Converter Centimetros em Inteiro Deixa eu explicar melhor, fiz uma opção no meu sistema, para o usuário fazer a impressão da nota fiscal, ele define a margem superior e margem lateral de cada campo na impressão, estou usando o QuickReport, quero pegar o que o usuário colocou no programa em centimetros e passar para a propriedade TOP e LEFT do componente da impressão, entenderam?Só que a propriedade Top e Left do componente do QuickReport recebe um valor inteiro, e é óbvio que se o usuário colocar 4,5 cms vai dar pau na conversão, entendeu? Alex - Original Message - From: Alexandre Rodrigues To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:00 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas] _ Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger! http://www.amigosdomessenger.com.br/
Re: [delphi-br] Converter Centimetros em Inteiro
certo mas a propriedade top,left esta em inteiro mas left = 10 não é igual a 10 cm eu faço isso aqui tb mas deixo em inteiro pro usuario . acho besteira vc ficar tranformando em cm aquilo que deve ser inteiro ! isso é minha opinião ... - Original Message - From: Alexandre To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:14 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Deixa eu explicar melhor, fiz uma opção no meu sistema, para o usuário fazer a impressão da nota fiscal, ele define a margem superior e margem lateral de cada campo na impressão, estou usando o QuickReport, quero pegar o que o usuário colocou no programa em centimetros e passar para a propriedade TOP e LEFT do componente da impressão, entenderam?Só que a propriedade Top e Left do componente do QuickReport recebe um valor inteiro, e é óbvio que se o usuário colocar 4,5 cms vai dar pau na conversão, entendeu? Alex - Original Message - From: Alexandre Rodrigues To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:00 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Converter Centimetros em Inteiro
No link http://www.devmedia.com.br/articles/viewcomp.asp?comp=2677hl=delphi tem uma dica muito boa de uma função para converter milímetros para pixels. Se usada adequadamente, pode ser usada para converter centímetros em pixels. Mais moleza do que isso, só pudim! E, pra não perder o costume, quem procura acha! Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Thu, 24 Jan 2008 16:30:40 -0200 Subject: Re: [delphi-br] Converter Centimetros em Inteiro certo mas a propriedade top,left esta em inteiro mas left = 10 não é igual a 10 cm eu faço isso aqui tb mas deixo em inteiro pro usuario . acho besteira vc ficar tranformando em cm aquilo que deve ser inteiro ! isso é minha opinião ... - Original Message - From: Alexandre To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:14 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Deixa eu explicar melhor, fiz uma opção no meu sistema, para o usuário fazer a impressão da nota fiscal, ele define a margem superior e margem lateral de cada campo na impressão, estou usando o QuickReport, quero pegar o que o usuário colocou no programa em centimetros e passar para a propriedade TOP e LEFT do componente da impressão, entenderam?Só que a propriedade Top e Left do componente do QuickReport recebe um valor inteiro, e é óbvio que se o usuário colocar 4,5 cms vai dar pau na conversão, entendeu? Alex - Original Message - From: Alexandre Rodrigues To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:00 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] _ Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver offline. Conheça o MSN Mobile! http://mobile.live.com/signup/signup2.aspx?lc=pt-br
RES: [delphi-br] Converter Centimetros em Inteiro
Pessoal !! Top e Left = valores em pixel! Cm é uma coisa! Inteiro é outra! Não se transforma CM em inteiro, mas sim um arredondamento de float, ou mesmo a parte inteira de um float. Onde Float corresponde a um valor em CM. De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Apoio Enviada em: quinta-feira, 24 de janeiro de 2008 16:31 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Converter Centimetros em Inteiro certo mas a propriedade top,left esta em inteiro mas left = 10 não é igual a 10 cm eu faço isso aqui tb mas deixo em inteiro pro usuario . acho besteira vc ficar tranformando em cm aquilo que deve ser inteiro ! isso é minha opinião ... - Original Message - From: Alexandre To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:14 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Deixa eu explicar melhor, fiz uma opção no meu sistema, para o usuário fazer a impressão da nota fiscal, ele define a margem superior e margem lateral de cada campo na impressão, estou usando o QuickReport, quero pegar o que o usuário colocou no programa em centimetros e passar para a propriedade TOP e LEFT do componente da impressão, entenderam?Só que a propriedade Top e Left do componente do QuickReport recebe um valor inteiro, e é óbvio que se o usuário colocar 4,5 cms vai dar pau na conversão, entendeu? Alex - Original Message - From: Alexandre Rodrigues To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:00 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [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]
Re: [delphi-br] Converter Centimetros em Inteiro
Isso mesmo!, desculpem, acho que me expressei mal - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:30 PM Subject: RE: [delphi-br] Converter Centimetros em Inteiro Então, na realidade, o que vc quer é converter centímetros em pixels, meu caro. Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Thu, 24 Jan 2008 16:14:44 -0200 Subject: Re: [delphi-br] Converter Centimetros em Inteiro Deixa eu explicar melhor, fiz uma opção no meu sistema, para o usuário fazer a impressão da nota fiscal, ele define a margem superior e margem lateral de cada campo na impressão, estou usando o QuickReport, quero pegar o que o usuário colocou no programa em centimetros e passar para a propriedade TOP e LEFT do componente da impressão, entenderam?Só que a propriedade Top e Left do componente do QuickReport recebe um valor inteiro, e é óbvio que se o usuário colocar 4,5 cms vai dar pau na conversão, entendeu? Alex - Original Message - From: Alexandre Rodrigues To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 24, 2008 4:00 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas] __ Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger! http://www.amigosdomessenger.com.br/ __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Converter Centimetros em Inteiro
Você está indo pelo caminho errado, se eu entendi o que você quer fazer. Você deve usar as margens de impressão do componente, e não as propriedades left e top, que são para posicionamento no formulário. No QuickReport as propriedades de Margem ficam em Page, experimente fazer um teste com elas. Mas outra dica, se for para impressão de notas fiscais, utilize componentes que imprimam em matriciais, como o RDPrint, conhecidos de todos aqui, que é pago, ou o VDOPrint... Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alexandre Enviada em: quinta-feira, 24 de janeiro de 2008 15:15 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Converter Centimetros em Inteiro Deixa eu explicar melhor, fiz uma opção no meu sistema, para o usuário fazer a impressão da nota fiscal, ele define a margem superior e margem lateral de cada campo na impressão, estou usando o QuickReport, quero pegar o que o usuário colocou no programa em centimetros e passar para a propriedade TOP e LEFT do componente da impressão, entenderam?Só que a propriedade Top e Left do componente do QuickReport recebe um valor inteiro, e é óbvio que se o usuário colocar 4,5 cms vai dar pau na conversão, entendeu? Alex - Original Message - From: Alexandre Rodrigues To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Thursday, January 24, 2008 4:00 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo. http://br.yahoo.com/mailbeta/tudonovo/ com/mailbeta/tudonovo/ __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset. http://www.eset.com com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Converter RichText p/ PDF
Boa tarde, Preciso converter o conteúdo de um RichEdit p/ PDF. Alguém conhece algum componente Free que faça isso? []´s Valdir
[delphi-br] converter db2 para mysql
Tem como transportar as tabelas do db2 para mysql ?
Re: [delphi-br] converter db2 para mysql
Olá bene, tem sim, da uma procurada no google por DB2 to MySQL que vc vai achar.. sucesso ae.. ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... - Original Message - From: bene20032004 To: delphi-br@yahoogrupos.com.br Sent: Wednesday, December 26, 2007 10:29 AM Subject: [delphi-br] converter db2 para mysql Tem como transportar as tabelas do db2 para mysql ? [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] converter unit em objeto com+
Pessoal, alguma dica de como converter uma unit comum (OOP) em objeto COM+ ?
Re: [delphi-br] Converter rtf em html
Rubem, peguei o exemploque vc falou. Achei interessante, mas tem um problema se colocar uma palavra acentuada, ele bagunça todo o texto! Será q vc nao tem algo mais aprimorado? Grato - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br Sent: Wednesday, September 26, 2007 12:50 PM Subject: RE: [delphi-br] Converter rtf em html Registre no site CodeGear CodeCentral (http://cc.codegear.com). Na área de exemplos, vc vai encontrar um projeto para converter de RTF para HTML e vice-versa. Sds. To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Wed, 26 Sep 2007 11:59:34 -0300Subject: [delphi-br] Converter rtf em html Boa tarde!Algum dos nobres companheiros tem um componente free ou uma rotina para converter textos rtf em html?GratoMárcio[As partes desta mensagem que não continham texto foram removidas] __ Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver offline. Conheça o MSN Mobile! http://mobile.live.com/signup/signup2.aspx?lc=pt-br [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Converter rtf em html
Faça uma tratativa no texto pra remover os caracteres acentuados antes de jogá-los no RTF []s Walter Alves Chagas Junior Projeto e desenvolvimento de sistemas Telemont Engenharia de telecomunicações S/A Belo Horizonte - MG - Brasil [EMAIL PROTECTED] Fone: (31) 3389-8217 Fax: (31) 3389-8215 Code Gear: http://cc.codegear.com/Author/46502 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Marcio Henrique A. dos Santos Enviada em: quinta-feira, 27 de setembro de 2007 03:28 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Converter rtf em html Rubem, peguei o exemploque vc falou. Achei interessante, mas tem um problema se colocar uma palavra acentuada, ele bagunça todo o texto! Será q vc nao tem algo mais aprimorado? Grato - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br Sent: Wednesday, September 26, 2007 12:50 PM Subject: RE: [delphi-br] Converter rtf em html Registre no site CodeGear CodeCentral (http://cc.codegear.com). Na área de exemplos, vc vai encontrar um projeto para converter de RTF para HTML e vice-versa. Sds. To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Wed, 26 Sep 2007 11:59:34 -0300Subject: [delphi-br] Converter rtf em html Boa tarde!Algum dos nobres companheiros tem um componente free ou uma rotina para converter textos rtf em html?GratoMárcio[As partes desta mensagem que não continham texto foram removidas] __ Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver offline. Conheça o MSN Mobile! http://mobile.live.com/signup/signup2.aspx?lc=pt-br [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos
[delphi-br] Converter rtf em html
Boa tarde! Algum dos nobres companheiros tem um componente free ou uma rotina para converter textos rtf em html? Grato Márcio [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Converter rtf em html
Registre no site CodeGear CodeCentral (http://cc.codegear.com). Na área de exemplos, vc vai encontrar um projeto para converter de RTF para HTML e vice-versa. Sds. To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Wed, 26 Sep 2007 11:59:34 -0300Subject: [delphi-br] Converter rtf em html Boa tarde!Algum dos nobres companheiros tem um componente free ou uma rotina para converter textos rtf em html?GratoMárcio[As partes desta mensagem que não continham texto foram removidas] _ Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver offline. Conheça o MSN Mobile! http://mobile.live.com/signup/signup2.aspx?lc=pt-br [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Converter String para SET
Olá. Estou querendo converter uma string para um item de um set. Alguém sabe como? Estou tentando usar StringToSet, mas está dando erro de acesso a memória. Valeu -- Leodinei Bielak http://leodinei.blogspot.com/ In theory, there is no difference between theory and practice. In practice, however..
[delphi-br] CONVERTER APLICACAO COMPILADA EM 32 bits para 64 bits
Olá Pessoal, Bom como sabemos hj no mercado existem versões do SO Windows XP e 2003 server rodando em x64 (64 bits), Alguém já enfrentou algum problema relacionado a uma aplicação compilada em D7 (32 bits), rodar em um SO 64 bits, Pois não estou conseguindo fazer funcionar, o sistema não abre! Por favor se alguém poder me ajudar fico grato... Desde já agradeço a atenção, Fábio. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] CONVERTER APLICACAO COMPILADA EM 32 bits para 64 bits
Veja se você não está usando algum componente sem fonte. Acredito que o funcionamento em 64 bits deva ser integral. O ideal é um build all sob o Delphi rodando em 64. De qq forma, passe para nós os erros para que possamos ajudar. [ ]'s P.S: Isso é um caso para o Walter... - Original Message - From: Fabio [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Monday, June 04, 2007 4:53 PM Subject: [delphi-br] CONVERTER APLICACAO COMPILADA EM 32 bits para 64 bits Olá Pessoal, Bom como sabemos hj no mercado existem versões do SO Windows XP e 2003 server rodando em x64 (64 bits), Alguém já enfrentou algum problema relacionado a uma aplicação compilada em D7 (32 bits), rodar em um SO 64 bits, Pois não estou conseguindo fazer funcionar, o sistema não abre! Por favor se alguém poder me ajudar fico grato... Desde já agradeço a atenção, Fábio. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos
RES: [delphi-br] CONVERTER APLICACAO COMPILADA EM 32 bits para 64 bits
Até aonde se sabe, uma aplicação 32 bits rodaria em um SO 64. Só não iria usufruir dos recuros oferecidos pela arquitetura 64. Agora, se o processador for de arquitetura diferente da x86, os Alpha por exemplo, aí não dá mesmo não pois o Alpha usa arquitetura Risk, a qual um projeto no Delphi não está apto para o mesmo. Mas se for x86, entao, verifique se o problema não seria outro. []s Walter Alves Chagas Junior Projeto e desenvolvimento de sistemas Telemont Engenharia de telecomunicações S/A Belo Horizonte - MG - Brasil [EMAIL PROTECTED] Fone: (31) 3389-8217 Fax: (31) 3389-8215 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Fabio Enviada em: segunda-feira, 4 de junho de 2007 16:54 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] CONVERTER APLICACAO COMPILADA EM 32 bits para 64 bits Olá Pessoal, Bom como sabemos hj no mercado existem versões do SO Windows XP e 2003 server rodando em x64 (64 bits), Alguém já enfrentou algum problema relacionado a uma aplicação compilada em D7 (32 bits), rodar em um SO 64 bits, Pois não estou conseguindo fazer funcionar, o sistema não abre! Por favor se alguém poder me ajudar fico grato... Desde já agradeço a atenção, Fábio. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos
Re: Res: Res: [delphi-br] Converter RXLib para JEDI
Desculpe Anderson, mas eu é que me equivoquei. O conversor que apresenta o recurso que eu descrevi é o do GExperts. Me perdoe pelo tom rude. Sds, Ricardo. Anderson Furtilho [EMAIL PROTECTED] escreveu: Aqui deu erro dizendo que a classo do rxlib nao existia pra ele pegar e fazer a troca por jedi. Mas blz, eu usei o proprio conversor do jedi e funcionou legal. Valeu - Mensagem original De: Ricardo César Cardoso [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 23 de Maio de 2007 16:47:37 Assunto: Re: Res: [delphi-br] Converter RXLib para JEDI Nada a ver isso... vc simplesmente escolhe o componente e a classe para a qual quer fazer a troca. Anderson Furtilho andersonfurtilhobr3 @yahoo.com. br escreveu: Mas pelo que vi o GExpert eu preciso ter o RXLib instalado e o Jedi tb para que ele possa buscar um e trocar por outro. No meu caso eu só tenho o Jedi. - Mensagem original De: Ricardo César Cardoso ricardo_engsoft@ yahoo.com. br Para: [EMAIL PROTECTED] os.com.br Enviadas: Sexta-feira, 18 de Maio de 2007 15:53:42 Assunto: Re: [delphi-br] Converter RXLib para JEDI Olha, sinceramente nunca usei o conversor, portanto nada posso falar dele. Quando precisei usei o recurso Replace Components da suíte GExperts. Aqui sim posso dizer que foi fácil até demais fazer a conversão, pq como a RXLib foi incorporada pela JEDI VCL, não precisei fazer alteração no código. Sds, Ricardo. Eduardo Silva dos Santos eduardo.drd@ gmail.com escreveu: Não sei se ja comentaram mas existe a Suit GExperts que é ótima para esse tipo de coisa, mudar componentes, modificar DFM. Em 18/05/07, Mario Lucio marioluciovs@ bol.com.br escreveu: Eu tb estou com o mesmo problema se achar algo te passo. Mario Lucio - Original Message - From: Anderson Furtilho To: [EMAIL PROTECTED] os.com.br delphi-br%40yahoog rupos.com. br Sent: Friday, May 18, 2007 2:51 PM Subject: Res: [delphi-br] Converter RXLib para JEDI Ricardo, vc ja usou este conversor ? Como que eu faço, pra usar o bicho. Desde ja obrigado! - Mensagem original De: Ricardo César Cardoso ricardo_engsoft@ yahoo.com. brricardo_engsoft% 40yahoo.com. br Para: [EMAIL PROTECTED] os.com.br delphi-br%40yahoog rupos.com. br Enviadas: Sexta-feira, 18 de Maio de 2007 14:13:02 Assunto: Re: [delphi-br] Converter RXLib para JEDI Eu acho muuuito bom mesmo. Pena que falte mais documentação dele mas também, com algo em torno de 600 componentes dá pra entender pq não há tanta documentação. Mas a respeito da pergunta existe algo para a conversão sim, e está no link abaixo: http://sourceforge. net/project/ showfiles. php?group_ id=45786 package_id= 53825 Sds, Ricardo. Ismair Alves [EMAIL PROTECTED] com escreveu: Uma pergunta, esse JEDI e bom mesmo? Em 18/05/07, Anderson Furtilho andersonfurtilhobr 3 @yahoo.com. br escreveu: Olá amigos da lista! Existe algum aplicativo que altera os componentes RXLib para JEDI, tipo aquele convesor de IBX para MDO ? Estou usando atualmente o RXLib, agora instalei o JEDI e quero remover os componentes RXLib e usar os que vem com o Jedi. Qualquer dica ficarei agradecido. Anderson _ _ _ _ __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger .yahoo.com/ -- Ismair C. Alves msn: ismair_alves@ hotmail.com PontoConf Soluções em Software Livre. [As partes desta mensagem que não continham texto foram removidas] _ _ _ _ __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger .yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] !-- #ygrp-mlmsg {font-size:13px; font-family: arial, helvetica, clean, sans-serif;} #ygrp-mlmsg table {font-size:inherit; font:100% ;} #ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean, sans-serif;} #ygrp-mlmsg pre, code {font:115% monospace;} #ygrp-mlmsg * {line-height: 1.22em;} #ygrp-text{ font-family: Georgia; } #ygrp-text p{ margin:0 0 1em 0;} #ygrp-tpmsgs{ font-family: Arial; clear:both;} #ygrp-vitnav{ padding-top: 10px;font- family:Verdana; font-size: 77%;margin: 0;} #ygrp-vitnav a{ padding:0 1px;} #ygrp-actbar{ clear:both;margin: 25px 0;white-space: nowrap;color: #666;text- align:right; } #ygrp-actbar .left{ float:left;white- space:nowrap
Res: Res: Res: [delphi-br] Converter RXLib para JEDI
Sussegado amigo, tranquilo...rsrsrs Um forte abraço - Mensagem original De: Ricardo César Cardoso [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Sexta-feira, 25 de Maio de 2007 9:52:57 Assunto: Re: Res: Res: [delphi-br] Converter RXLib para JEDI Desculpe Anderson, mas eu é que me equivoquei. O conversor que apresenta o recurso que eu descrevi é o do GExperts. Me perdoe pelo tom rude. Sds, Ricardo. Anderson Furtilho andersonfurtilhobr3 @yahoo.com. br escreveu: Aqui deu erro dizendo que a classo do rxlib nao existia pra ele pegar e fazer a troca por jedi. Mas blz, eu usei o proprio conversor do jedi e funcionou legal. Valeu - Mensagem original De: Ricardo César Cardoso ricardo_engsoft@ yahoo.com. br Para: [EMAIL PROTECTED] os.com.br Enviadas: Quarta-feira, 23 de Maio de 2007 16:47:37 Assunto: Re: Res: [delphi-br] Converter RXLib para JEDI Nada a ver isso... vc simplesmente escolhe o componente e a classe para a qual quer fazer a troca. Anderson Furtilho andersonfurtilhobr 3 @yahoo.com. br escreveu: Mas pelo que vi o GExpert eu preciso ter o RXLib instalado e o Jedi tb para que ele possa buscar um e trocar por outro. No meu caso eu só tenho o Jedi. - Mensagem original De: Ricardo César Cardoso ricardo_engsoft@ yahoo.com. br Para: [EMAIL PROTECTED] os.com.br Enviadas: Sexta-feira, 18 de Maio de 2007 15:53:42 Assunto: Re: [delphi-br] Converter RXLib para JEDI Olha, sinceramente nunca usei o conversor, portanto nada posso falar dele. Quando precisei usei o recurso Replace Components da suíte GExperts. Aqui sim posso dizer que foi fácil até demais fazer a conversão, pq como a RXLib foi incorporada pela JEDI VCL, não precisei fazer alteração no código. Sds, Ricardo. Eduardo Silva dos Santos eduardo.drd@ gmail.com escreveu: Não sei se ja comentaram mas existe a Suit GExperts que é ótima para esse tipo de coisa, mudar componentes, modificar DFM. Em 18/05/07, Mario Lucio marioluciovs@ bol.com.br escreveu: Eu tb estou com o mesmo problema se achar algo te passo. Mario Lucio - Original Message - From: Anderson Furtilho To: [EMAIL PROTECTED] os.com.br delphi-br%40yahoog rupos.com. br Sent: Friday, May 18, 2007 2:51 PM Subject: Res: [delphi-br] Converter RXLib para JEDI Ricardo, vc ja usou este conversor ? Como que eu faço, pra usar o bicho. Desde ja obrigado! - Mensagem original De: Ricardo César Cardoso ricardo_engsoft@ yahoo.com. brricardo_engsoft% 40yahoo.com. br Para: [EMAIL PROTECTED] os.com.br delphi-br%40yahoog rupos.com. br Enviadas: Sexta-feira, 18 de Maio de 2007 14:13:02 Assunto: Re: [delphi-br] Converter RXLib para JEDI Eu acho muuuito bom mesmo. Pena que falte mais documentação dele mas também, com algo em torno de 600 componentes dá pra entender pq não há tanta documentação. Mas a respeito da pergunta existe algo para a conversão sim, e está no link abaixo: http://sourceforge. net/project/ showfiles. php?group_ id=45786 package_id= 53825 Sds, Ricardo. Ismair Alves [EMAIL PROTECTED] com escreveu: Uma pergunta, esse JEDI e bom mesmo? Em 18/05/07, Anderson Furtilho andersonfurtilhobr 3 @yahoo.com. br escreveu: Olá amigos da lista! Existe algum aplicativo que altera os componentes RXLib para JEDI, tipo aquele convesor de IBX para MDO ? Estou usando atualmente o RXLib, agora instalei o JEDI e quero remover os componentes RXLib e usar os que vem com o Jedi. Qualquer dica ficarei agradecido. Anderson _ _ _ _ __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger .yahoo.com/ -- Ismair C. Alves msn: ismair_alves@ hotmail.com PontoConf Soluções em Software Livre. [As partes desta mensagem que não continham texto foram removidas] _ _ _ _ __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger .yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] !-- #ygrp-mlmsg {font-size:13px; font-family: arial, helvetica, clean, sans-serif;} #ygrp-mlmsg table {font-size:inherit; font:100% ;} #ygrp-mlmsg select, input, textarea {font