Delphi ActiveX

Load MIME from a StringBuilder

Demonstrates the Chilkat Mime.LoadMimeSb method, which parses complete MIME text from a StringBuilder and replaces the current MIME. The only argument is the StringBuilder.

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: When the MIME text already lives in a StringBuilder — assembled in memory, or read and lightly edited — this loads it directly without an intermediate string copy. Its parsing behavior matches LoadMime; the difference is purely the source. For content that might include arbitrary binary bytes, use the BinData loader instead.

Chilkat Delphi ActiveX Downloads

Download Chilkat for Delphi ActiveX

Delphi ActiveX

var
success: Integer;
sb: TChilkatStringBuilder;
mime: TChilkatMime;

begin
success := 0;

//  Demonstrates the Mime.LoadMimeSb method, which parses complete MIME text from a StringBuilder
//  and replaces the current MIME.  The only argument is the StringBuilder.

//  Put the MIME text into a StringBuilder (here loaded from a file, but it could come from
//  anywhere).
sb := TChilkatStringBuilder.Create(Self);
success := sb.LoadFile('qa_data/message.eml','utf-8');
if (success = 0) then
  begin
    Memo1.Lines.Add(sb.LastErrorText);
    Exit;
  end;

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

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