Question

如何在outlook的正文中加入图片（不是作为附件发送）

就是在outlook里面写邮件时候，需要对文字后面加图片说明，

Answer 1

先把邮件保存，然后在草稿箱找到，单击。然后单击邮件的左上方的“弹出”，出来后的页面就可以加入了。

const olMailItem = 0; 

var 

Outlook: OLEVariant; 

MailItem: Variant; 

begin 

try 

Outlook := GetActiveOleObject('Outlook.Application'); 

except 

Outlook := CreateOleObject('Outlook.Application'); 

end; 

MailItem := Outlook.CreateItem(olMailItem); 

MailItem.Recipients.Add('abc@123.net'); 

MailItem.Subject := 'your subject'; 

MailItem.Body := 'Your Body Text'; 

MailItem.Attachments.Add('Your Picture FileName'); 

MailItem.Send; 

Oulook := Unassigned; 

end;