Não entendi... você está tendo problemas com SendStream? Que sutie de componentes Sockets você está usando?
[]s
Daniel Polistchuck
Consulting Services Manager
<http://info.borland.com.br/borcon> Tel.: (55 11) 2165 - 8000 / 8196-5947
<http://info.borland.com.br/borcon> [EMAIL PROTECTED] - www.borland.com.br <http://www.borland.com.br/>
A Borland Software é líder mundial em soluções independentes de plataforma para a Criação Otimizada de Software (Software Delivery Optimization), auxiliando nossos clientes a transporem as barreiras atuais do desenvolvimento, para maximizar o valor do software para seu negócio.
<http://info.borland.com.br/delphi> <http://info.borland.com.br/delphitour> <http://info.borland.com.br/delphi>
________________________________
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Allan
Sent: Thursday, May 18, 2006 10:36 AM
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] Olha o problemão aí, estou novamente aqui com isto. Ilustríssimo Andreano Lanusse, veja se pode ajudar.
Está sendo usado WinSocket para envio de mensagens, com SendString(Texto), não poderia ser com SendStream (Imagem) por causa da perda de informações, parece simples gente, abram uma imagem jpg, ou bmp (por exemplo teste.jpb)no bloco de notas, é isso q eu preciso, agora salve esse arquivo do bloco de notas com outro nome txtjpg.JPG por exemplo. ela não abre e É JUSTAMENTE ISSO Q PRECISO, que essa imagem abra depois, a imagem será salva na verdade em um banco de dados FB num campo BLOB SUB_TYPE 1;
Vejam a resposta do Fabiano Arndt:
vou te dar uma idéia do que vc pode fazer, agora se é uma boa idéia ja
não sei dizer.Se vc colocar um TImage e jogar um arquivo do tipo bitmap nele vc
consegue acessar os pixels do bitmap. Tem uma funcao que trasnforma os
pixels (cor) para string. e tem uma funcao que transforma um texto
para uma cor. veja abaixo.
showmessage(ColorToString(Image1.Canvas.Pixels[0,0]));
o que vc pode fazer (tentar) é converter cada pixel para texto salvar
ele em um arquivo texto, enviar pra onde vc deseja, ai usando o Canvas
vc vai convertendo cada string que vc gravou em um pixel (Cor).
por exemplo;
image2.canvas.pixels[1,1] := stringToColor(variavel);
agora se a figura for muito grande o arquivo texto que vc vai ter como
resultado tbm vai ser muito grande.
a idéia tá aí, agora implementar é contigo.
obs. se vc jogar um arquivo do tipo jpg num image, a funcao acima nao
vai funcionar, vc terá que transformar o jpg para bitmap.
flw,
Fabiano.
Acho que o caminho seria este mesmo. Como desintegrar um binário transformando em texto e depois reintegrá-lo. Este seria o desafio.
Por exemplo:
Um arquivo binário tem a seguinte sequência: 01010011001010100101000101110 ... 001010011101111000101001110
Se eu pegar este monte de 1 e 0 e enviar com o sendstring dizendo que é um arquivo binário, então eu pegaria este monte de zeros e uns e remontaria o arquivo no outro lado.
O desafio seria: 1º - Transformar o binário em 0 e 1 (ou qualquer codificação que seja, mas desde que seja legível num memo por exemplo). 2º - Do outro lado, transformar estes 0 e 1 em binário novamente. Desta forma ficaria muito, mas muito fácil.
Será que é impossível fazer isso via delphi???
[]'s
Allan
----- Original Message -----
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, May 18, 2006 9:03 AM
Subject: RES: [delphi-br] Olha o problemão aí, estou novamente aqui com isto. Ilustríssimo Andreano Lanusse, veja se pode ajudar.
Allan,
Desculpa a pergunta, mas eu ainda ñ compreendi pq tem q ser em arquivo texto....pq?
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br
-----Mensagem original-----
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Allan
Enviada em: quinta-feira, 18 de maio de 2006 09:00
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Olha o problemão aí, estou novamente aqui com isto.. Ilustríssimo Andreano Lanusse, veja se pode ajudar.
Prezados,
pra quem está tentando me ajudar, vejam bem:
se eu conseguir transformar um blob (jpg,bmp) em texto e gravar num arquivo txt, depois abrir o arquivo txt num memo e transformar ele em blob novamente, o problema está resolvido. Assim o problema fica mais resumido, quem sabe alguma boa idéia e pronto, gente muitos tentaram, agora eu pergunto, será que não tem como fazer isso no delphi?, o delphi é praticamente "ilimitado!", como posso conseguir essa façanha??.
Carro Andreano Lanusse, você teria aguma sugestão?, alguma idéia de como fazer isso??.
Ansiosamente no aguardo.
Saudações a todos.
Allan Gabriel
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Links do Yahoo! Grupos
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
------------------------------------------------------------------------------
Links do Yahoo! Grupos
a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
<http://br.ard.yahoo.com/SIG=12fdtvrns/M=396559.7942981.9411633.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1147970897/A=3672775/R=2/id=noscript/SIG=154s706bs/*http://lt.dell.com/lt/lt.aspx?CID=12696&LID=338165&DGC=BA&DGSeg=DHS&DURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs>
________________________________
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! <http://br.yahoo.com/info/utos.html> .
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
| Yahoo! Grupos, um serviço oferecido por: | |
|
Links do Yahoo! Grupos
- Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
- Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
- O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.
