Exibir mensagem anterior :: Exibir próxima mensagem |
Autor |
Mensagem |
eduardoserrao Novato


Registrado: Segunda-Feira, 28 de Novembro de 2016 Mensagens: 78
|
Enviada: Qui Set 19, 2019 11:37 am Assunto: [RESOLVIDO]Salvar imagem em stream |
|
|
Boa dia pessoal,
Estou querendo guardar em memória uma imagem que está em um TImage (imagem inserida em tempo de design).
A imagem é um jpg(TJPEGImage). Estou tentando fazer da seguinte forma:
Código: | Stream := TMemoryStream.Create;
Foto.Picture.Bitmap.SaveToStream(Stream);
Stream.Position := 0;
ShowMessage(IntToStr(Stream.Size)); |
mas não esta funcionando, o show message esta vindo 0
Alguém sabe como posso fazer isso?
Editado pela última vez por eduardoserrao em Qui Set 19, 2019 12:14 pm, num total de 1 vez |
|
Voltar ao Topo |
|
 |
jheckson Novato

Registrado: Domingo, 30 de Outubro de 2016 Mensagens: 27
|
Enviada: Qui Set 19, 2019 11:53 am Assunto: Re: Salvar imagem em stream |
|
|
eduardoserrao escreveu: | Boa dia pessoal,
Estou querendo guardar em memória uma imagem que está em um TImage (imagem inserida em tempo de design).
A imagem é um jpg(TJPEGImage). Estou tentando fazer da seguinte forma:
Código: | Stream := TMemoryStream.Create;
Foto.Picture.Bitmap.SaveToStream(Stream);
Stream.Position := 0;
ShowMessage(IntToStr(Stream.Size)); |
mas não esta funcionando, o show message esta vindo 0
Alguém sabe como posso fazer isso? |
Testa assim
Código: |
Foto.Picture.Graphic.SaveToStream(stream);
|
|
|
Voltar ao Topo |
|
 |
eduardoserrao Novato


Registrado: Segunda-Feira, 28 de Novembro de 2016 Mensagens: 78
|
Enviada: Qui Set 19, 2019 12:04 pm Assunto: Re: Salvar imagem em stream |
|
|
jheckson escreveu: |
Testa assim
Código: |
Foto.Picture.Graphic.SaveToStream(stream);
|
|
deu certo jheckson.
Obrigado pela sua resposta. |
|
Voltar ao Topo |
|
 |
|