Delphi ActiveX

Load MIME from BinData

Demonstrates the Chilkat Mime.LoadMimeBd method, which parses complete MIME bytes from a BinData and replaces the current MIME. The only argument is the BinData.

Note: The file paths are relative to the application's current working directory. Absolute paths may also be used. Supply the paths appropriate to your own environment.

Background: This is the safest loader because it works on raw bytes: MIME can carry 8-bit content and even embedded NUL bytes that a text string would mangle, so loading from a BinData preserves the message exactly. Prefer it whenever the input is binary or of uncertain encoding — a downloaded message, a file read as bytes — over the string-based loaders.

Chilkat Delphi ActiveX Downloads

Download Chilkat for Delphi ActiveX

Delphi ActiveX

var
success: Integer;
bd: TChilkatBinData;
mime: TChilkatMime;

begin
success := 0;

//  Demonstrates the Mime.LoadMimeBd method, which parses complete MIME bytes from a BinData and
//  replaces the current MIME.  The only argument is the BinData.  This is the preferred loader
//  when the MIME may contain arbitrary 8-bit or embedded NUL bytes.

bd := TChilkatBinData.Create(Self);
success := bd.LoadFile('qa_data/message.eml');
if (success = 0) then
  begin
    Memo1.Lines.Add(bd.LastErrorText);
    Exit;
  end;

mime := TChilkatMime.Create(Self);
success := mime.LoadMimeBd(bd.ControlInterface);
if (success = 0) then
  begin
    Memo1.Lines.Add(mime.LastErrorText);
    Exit;
  end;

Memo1.Lines.Add('Content-Type: ' + mime.ContentType);