Пример отсылки письма используя COM объект Outlook

uses
 Outlook_TLB;

var

  outlook: _application;

procedure
 Init;
begin

  outlook := Coapplication_.Create;
end
;

procedure
 SendEmail;
begin

  with
 Outlook.CreateItem(olMailItem) as
 mailitem do

  begin

    To_ := 'email@email.com';
    cc := 'email2@email.com';
    Subject := 'This is subject line';
    Attachments.Add('FileName', 1, 1, 'This is attachment');
    Body := 'This is email body';
    Send;
  end
;
end
;

Другое по теме:

• Извлечь Email адреса из DBX файлов Outlook
• Как написать Outlook AddIn
• Как отправить Email, используя почтовую программу по умолчанию