Get Raw Messages Source of an Email (i.e. MIME Source)

The raw message source of an email is obtained by calling the email object's GetMime method.

Download Chilkat Email ActiveX

Download 32-bit Chilkat IMAP ActiveX (.msi)

Download All 32-bit Chilkat ActiveX Components (.zip)

Download All 64-bit Chilkat ActiveX Components (.zip)

uses
    Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
    Dialogs, StdCtrls,
    CHILKATMAILLib2_TLB,
    OleCtrls;

...

procedure TForm1.Button1Click(Sender: TObject);
var
email: CHILKATMAILLib2_TLB.IChilkatEmail2;
success: Integer;
contentType: String;
mimeSource: String;

begin
email := CoChilkatEmail2.Create();

//  For demonstration purposes, create an email
//  so that GetMime may be called to get the raw MIME source.
//  Email objects received from POP3 or IMAP servers behave the same.
email.Subject := 'This is a test';
email.Body := 'This is a test';
email.From := 'support@chilkatsoft.com';
email.AddTo('Matt','matt@chilkatsoft.com');

contentType := email.AddFileAttachment('il1120.pdf');
if (contentType = NULL ) then
  begin
    Memo1.Lines.Add(email.LastErrorText);

  end;

//  Call GetMime to get the raw message source.

mimeSource := email.GetMime();

Memo1.Lines.Add(mimeSource);
end;