Вставка "красивого" текста в сообщение Outlook

[Storkich]

CREATE(objWord, TRUE);
objDocument := objWord.Documents.Open(tFileName);
objEnvelope := objDocument.MailEnvelope;
objMailItem := objEnvelope.Item;
objMailItem.Send;
objDocument.Close;
objWord.Quit;