(Delphi) Creating a New Child Node

Demonstrates how to create a new child in an XML document.

The following XML sample code produces this output:

<abc>
    <xyz>
        <mmm>123</mmm>
    </xyz>
</abc>

Download Chilkat XML ActiveX

uses
    Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
    Dialogs, StdCtrls,
    CHILKATXMLLib_TLB,
    OleCtrls;

...

procedure TForm1.Button1Click(Sender: TObject);
var
xml: CHILKATXMLLib_TLB.IChilkatXml;
childNode: CHILKATXMLLib_TLB.IChilkatXml;

begin
xml := TChilkatXml.Create(Self).ControlInterface;

xml.Tag := 'abc';

//  Create a new child  with no content
//  and return the newly created child node:

childNode := xml.NewChild('xyz','');

//  Create a child under childNode, but instead call
//  NewChild2 which doesn't return the newly created child node:
childNode.NewChild2('mmm','123');

Memo1.Lines.Add(xml.GetXml());
end;