Delphi ActiveX
Delphi ActiveX
Add a Plain-Text Alternative Body to an Email
See more Email Object Examples
Demonstrates the Chilkat Email.AddPlainTextAlternativeBody method, which adds a plain-text alternative body. Combined with an HTML body, it produces a multipart/alternative email that carries both representations. This example sets an HTML body, adds a plain-text alternative, and prints the alternative count.
Background: This is the companion to
AddHtmlAlternativeBody. A polished email provides both an HTML body (for rich display) and a plain-text fallback, and the receiving client picks whichever it prefers. Including a real plain-text alternative — rather than letting the HTML stand alone — improves accessibility, helps with spam scoring, and guarantees the message is readable in text-only environments.Chilkat Delphi ActiveX Downloads
var
email: TChilkatEmail;
begin
// Demonstrates the AddPlainTextAlternativeBody method, which adds a plain-text alternative
// body. Combined with an HTML body, this produces a multipart/alternative email offering
// both representations of the same content.
email := TChilkatEmail.Create(Self);
email.Subject := 'HTML with a plain-text alternative';
// Set an HTML body.
email.SetHtmlBody('<html><body><b>This is the HTML version.</b></body></html>');
// Add a plain-text alternative.
email.AddPlainTextAlternativeBody('This is the plain-text version.');
Memo1.Lines.Add('NumAlternatives = ' + IntToStr(email.NumAlternatives));