ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

[RESOLVIDO]Salvar imagem em stream

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
eduardoserrao
Novato
Novato


Registrado: Segunda-Feira, 28 de Novembro de 2016
Mensagens: 68

MensagemEnviada: Qui Set 19, 2019 11:37 am    Assunto: [RESOLVIDO]Salvar imagem em stream Responder com Citação

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
Ver o perfil de Usuários Enviar Mensagem Particular
jheckson
Novato
Novato


Registrado: Domingo, 30 de Outubro de 2016
Mensagens: 16

MensagemEnviada: Qui Set 19, 2019 11:53 am    Assunto: Re: Salvar imagem em stream Responder com Citação

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
Ver o perfil de Usuários Enviar Mensagem Particular
eduardoserrao
Novato
Novato


Registrado: Segunda-Feira, 28 de Novembro de 2016
Mensagens: 68

MensagemEnviada: Qui Set 19, 2019 12:04 pm    Assunto: Re: Salvar imagem em stream Responder com Citação

jheckson escreveu:

Testa assim
Código:

Foto.Picture.Graphic.SaveToStream(stream);


deu certo jheckson.
Obrigado pela sua resposta.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB