Email Body - Plain Text and/or HTML

Any given email may have a plain-text body, an HTML body, or both. The Body property will return the HTML body by default (if it exists) otherwise it will return the plain-text body. There are methods for checking to see if an email has a particular body (HasPlainTextBody and HasHtmlBody) and there are methods for getting a specific body: GetHtmlBody, GetPlainTextBody.

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;
bText: Integer;
bHtml: Integer;

begin
email := CoChilkatEmail2.Create();

//  Load an email from a .eml

success := email.LoadEml('something.eml');
if (success <> 1) then
  begin
    ShowMessage(email.LastErrorText);
    Exit;
  end;

//  Display the default Body:
Memo1.Lines.Add(email.Body);

//  If a plain-text body is present, display it:

bText := email.HasPlainTextBody();
if (bText) then
  begin
    Memo1.Lines.Add(email.GetPlainTextBody());
  end;

//  If an HTML body is present, display the HTML source:

bHtml := email.HasHtmlBody();
if (bHtml) then
  begin
    Memo1.Lines.Add(email.GetHtmlBody());
  end;
end;