XML Copiar parte de un XML en otro

[Neftali [Germán.Estévez]]

Si has "parseado" el contenido original hasta llegar a obtener el TAG clientes:

Código Delphi [-]
var
  Doc, Newdoc: IXMLDocument;
  clientes:IXMLNode;
begin
  ...
  clientes := ....ChildNodes['clientes'];

Puedes generar el nuevo contenido utilizando lo siguiente:

Código Delphi [-]

  // Create
  NewDoc := NewXMLDocument;
  NewDoc.DocumentElement := clientes;
  Memo3.Lines.Text := NewDoc.XML.Text;