Create mail message in Outlook

Create mail message in Outlook

Var 
  mail,mailitem;

mail:=OutlookApplication.createItem(olMailItem);


var Message,outlook:Variant;
begin
  outlook:=CreateOleObject('Outlook.Application');
  message:=Outlook.createItem(olMailItem);
  message.display;
end;