(Delphi DLL) 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>

Chilkat for Delphi Downloads Chilkat non-ActiveX DLL for Delphi Chilkat ActiveX DLL for Delphi * The examples here use the non-ActiveX DLL.

uses
    Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
    Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Xml;

...

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

begin
xml := CkXml_Create();

CkXml_putTag(xml,'abc');

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

childNode := CkXml_NewChild(xml,'xyz','');

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

CkXml_Dispose(childNode);

Memo1.Lines.Add(CkXml__getXml(xml));

CkXml_Dispose(xml);

end;