Delphi ActiveX

Check Whether an Email Has a Plain-Text Body

Demonstrates the Chilkat Email.HasPlainTextBody method, which returns true only when a text/plain body is present in the current email object. This example sets a plain-text body and confirms its presence.

Background: The plain-text body is the fallback representation used when HTML is unavailable or unwanted — and the form usually preferred for search, indexing, and accessibility. HasPlainTextBody is the counterpart to HasHtmlBody; testing both lets a program handle every combination (text-only, HTML-only, both, or neither) gracefully.

Chilkat Delphi ActiveX Downloads

Download Chilkat for Delphi ActiveX

Delphi ActiveX

var
email: TChilkatEmail;

begin
//  Demonstrates the HasPlainTextBody method, which returns true only when a text/plain body
//  is present in the current email object.

email := TChilkatEmail.Create(Self);
email.Subject := 'HasPlainTextBody example';

email.SetTextBody('Hello, this is the plain-text body.','text/plain');

if (email.HasPlainTextBody() = 1) then
  begin
    Memo1.Lines.Add('The email has a plain-text body.');
  end
else
  begin
    Memo1.Lines.Add('The email does not have a plain-text body.');
  end;