Delphi ActiveX

Serialize MIME to a String

Demonstrates the Chilkat Mime.GetMime method, which serializes and returns the complete MIME entity — headers, body, multipart boundaries, and all descendants — as a string. It takes no arguments.

Background: This produces the finished MIME text ready to send, store, or hand to another component — the inverse of loading. The whole tree is emitted, including generated multipart boundaries. Because it returns a string, it is best for text-safe content; when the body may contain raw binary bytes, serialize with GetMimeBd to a BinData instead so nothing is altered.

Chilkat Delphi ActiveX Downloads

Download Chilkat for Delphi ActiveX

Delphi ActiveX

var
success: Integer;
mime: TChilkatMime;
mimeText: WideString;

begin
success := 0;

//  Demonstrates the Mime.GetMime method, which serializes and returns the complete MIME entity
//  (headers, body, multipart boundaries, and all descendants) as a string.  It takes no
//  arguments.

mime := TChilkatMime.Create(Self);

//  Build a simple MIME entity.
success := mime.SetBodyFromPlainText('Hello, this is the message body.');
if (success = 0) then
  begin
    Memo1.Lines.Add(mime.LastErrorText);
    Exit;
  end;

//  Serialize it to a string.
mimeText := mime.GetMime();
if (mime.LastMethodSuccess = 0) then
  begin
    Memo1.Lines.Add(mime.LastErrorText);
    Exit;
  end;
Memo1.Lines.Add(mimeText);