Delphi ActiveX

Save MIME as an XML File

Demonstrates the Chilkat Mime.SaveXml method, which writes Chilkat's MIME XML representation to a local file. The only argument is the file path; the file can later be loaded by LoadXmlFile.

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: The file-writing form of GetXml, for persisting a message's structure as XML that LoadXmlFile can reconstruct. This XML round-trip is a convenient way to store or version a message in a format editable with standard XML tooling.

Chilkat Delphi ActiveX Downloads

Download Chilkat for Delphi ActiveX

Delphi ActiveX

var
success: Integer;
mime: TChilkatMime;

begin
success := 0;

//  Demonstrates the Mime.SaveXml method, which writes Chilkat's MIME XML representation to a local
//  file.  The only argument is the file path.  The file can later be loaded by LoadXmlFile.

mime := TChilkatMime.Create(Self);

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

success := mime.SaveXml('qa_output/message_mime.xml');
if (success = 0) then
  begin
    Memo1.Lines.Add(mime.LastErrorText);
    Exit;
  end;
Memo1.Lines.Add('Saved XML.');