Delphi ActiveX

Repair MIME Formatting Problems in an Email

Demonstrates the Chilkat Email.ApplyFixups method, which repairs selected MIME-formatting problems commonly found in email produced by other software. The argument is a comma-separated list of fixup keywords. The currently defined keyword is FixRelated, which relocates HTML-related items (such as embedded images) into the appropriate MIME structure so they are not incorrectly presented as ordinary attachments. This example loads an email and applies that fixup.

Background: Not every mail program builds strictly correct MIME. A common defect is placing an inline image as a loose attachment instead of nesting it in a multipart/related enclosure, which makes it show up as a downloadable file rather than displaying in the HTML. ApplyFixups corrects such structural issues so the message renders as intended.

Chilkat Delphi ActiveX Downloads

Download Chilkat for Delphi ActiveX

Delphi ActiveX

var
success: Integer;
email: TChilkatEmail;

begin
success := 0;

//  Demonstrates the ApplyFixups method, which repairs selected MIME-formatting problems
//  commonly found in email produced by other software.  The argument is a comma-separated
//  list of fixup keywords.

email := TChilkatEmail.Create(Self);

success := email.LoadEml('qa_data/eml/message.eml');
if (success = 0) then
  begin
    Memo1.Lines.Add(email.LastErrorText);
    Exit;
  end;

//  Apply the "FixRelated" fixup, which relocates HTML-related items (such as embedded
//  images) into the proper MIME structure so they are not shown as ordinary attachments.
success := email.ApplyFixups('FixRelated');
if (success = 0) then
  begin
    Memo1.Lines.Add(email.LastErrorText);
    Exit;
  end;

Memo1.Lines.Add('Applied MIME fixups.');

//  Note: The path "qa_data/..." is a relative local filesystem path,
//  relative to the current working directory of the running application.