E-Mail in Outlook erstellen als plain text

[DieHardMan]

Ne E-Mail erstell ich ja so, aber die E-Mail hat trotz Standardeinstellung "Text" in Outlook, immer das Rich-Text Format, wie kann ich das ändern.

Hab mir schon die MailItem Eigenschaften angeschaut, aber da auch nix gefunden.

Delphi-Quellcode:

const
  olMailItem = 0;
  olByValue = 1;
var
  OutlookApp, MailItem, MyAttachments: OLEVariant; 
begin
  try 
    OutlookApp := GetActiveOleObject('Outlook.Application');
  except 
    OutlookApp := CreateOleObject('Outlook.Application');
  end; 
  try 
    MailItem := OutlookApp.CreateItem(olMailItem);
    MailItem.Recipients.Add('[e-mail]'); 
    MailItem.Subject := 'Your Subject';
    MailItem.Body    := 'Your Message'; 
    myAttachments    := MailItem.Attachments;
    MailItem.Display;
  finally
    myAttachments := VarNull; 
    OutlookApp    := VarNull;
  end;