Delphi DLL

Load an Email from MIME Text in a String

Demonstrates the Chilkat Email.SetFromMimeText method, which loads the email from MIME text (such as the contents of a .eml file) held in a string. On success, it replaces the entire current email. This example serializes one email to MIME with GetMime, then reconstructs it in a second object.

Background: This is the in-memory (string) counterpart to LoadEml, which reads MIME from a file. It is handy when the raw message text arrives from somewhere other than the filesystem — a database column, an HTTP response, or a message queue — letting you parse it straight into a fully populated Email object.

Chilkat Delphi DLL Downloads

Download Chilkat for Delphi DLL

Delphi DLL

var
success: Boolean;
source: HCkEmail;
mimeText: PWideChar;
email: HCkEmail;

begin
success := False;

//  Demonstrates the SetFromMimeText method, which loads the email from MIME text (such as
//  the contents of a .eml file) held in a string.  On success, it replaces the entire
//  current email.

//  Build a source email and get its MIME text.
source := CkEmail_Create();
CkEmail_putSubject(source,'Source message');
CkEmail_putFrom(source,'alice@example.com');
CkEmail_putBody(source,'Hello from MIME text.');
mimeText := CkEmail__getMime(source);

//  Load a new email object from the MIME text.
email := CkEmail_Create();
success := CkEmail_SetFromMimeText(email,mimeText);
if (success = False) then
  begin
    Memo1.Lines.Add(CkEmail__lastErrorText(email));
    Exit;
  end;

Memo1.Lines.Add('Loaded subject: ' + CkEmail__subject(email));

CkEmail_Dispose(source);
CkEmail_Dispose(email);