Enviar e-mail com imagem "sem anexo"

Bom dia pessoal, tudo ok?

Preciso desenvolver uma mala direta por e-mail e gostaria de saber de alguém já passou por isso.

Eu já fiz o arquivo HTML, juntamente com as imagens que está sendo usada na página.

Gostaria de enviar via e-mail o conteúdo da página HTML com as imagens, porém não estou conseguindo.

O e-mail até vai, mas fica com conteúdo em branco.

Estou usando os componentes Indy para o envio do e-mail e estou usando a rotina:

IdMessage1.ContentType := 'text/html';

IdMessage1.Body.Clear;

IdMessage1.Body.LoadFromFile('c:\mensagem.htm');

TIdAttachment.Create(EmailCorpo.MessageParts, TFileName('c:\imagem1.bmp'));

EmailCorpo.MessageParts.Items[Pred(EmailCorpo.MessageParts.Count)].ExtraHeaders.Values['Content-ID']:= 'c:\imagem1.bmp';

No e-mail, até aparece como anexo a imagem, porém o conteúdo da página fica em branco.

Se eu não anexo a imagem, o conteúdo do HTML aparece, porém sem as imagens.

Alguém já passou por isso ou sabe como fazer isso?

Desde já obrigado.