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 

colocar na sequência: imagem e texto no corpo do email

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


Registrado: Quinta-Feira, 16 de Outubro de 2014
Mensagens: 3

MensagemEnviada: Qui Out 16, 2014 2:45 pm    Assunto: colocar na sequência: imagem e texto no corpo do email Responder com Citação

como posso enviar uma mensagem com Indy, onde a estrutura seria : no corpo do e-mail 1. uma figura jpg e logo abaixo também no corpo do e-mail um texto qualquer. segue meu código :
// cria a parte HTML
Html:= TIdText.Create(IdMessage.MessageParts);
Html.ContentType:= 'text/plain';
Html.Body.Text:= '<html><body>'+'<h2>Este é um exemplo para incorporar<br>'+
'uma imagem no corpo do e-mail</h2></br></body></html>';
Html.ContentType:= 'text/html';
// Html.ContentType:= 'text/RTF';
// inclui no email a imagem usada na parte HTML
// Anexo:= TIdAttachmentFile.Create(IdMessage.MessageParts,OpenPictureDialog1.FileName);
Anexo:= TIdAttachmentFile.Create(IdMessage.MessageParts,'C:/log_emails_vinci/MKT6083_arquivos/image002.jpg');
Anexo.ContentType := 'image/jpg';
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail
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