Ik wil graag een E-mail versturen met daarin een image direct zichtbaar, dus niet als bijlage.

Wat moet ik aan onderstaande programmaregels veranderen om dit te bewerkstelligen?

Code:
  MailItem1: TMailItem;
  OutlookApplication1: TOutlookApplication;


  OutlookApplication1.Connect;
  MailItem1.ConnectTo(OutlookApplication1.CreateItem(olMailItem) as MailItem);
  MailItem1.Display;
  MailItem1.Recipients.Add('voorbeeld@mail.nl') ;
  MailItem1.Subject:='Outlook Mail From Delphi';
  MailItem1.Attachments.Add('D:\image001.jpg',olEmbeddeditem,'1','Logo');
  MailItem1.HTMLBody:='<DIV align=center><IMG height=65 src="cid:Logo" width=339 align=left>Test HTML </DIV>';
  OutlookApplication1.Disconnect;