delphi - NativeXML - 创建处理指令（xml-stylesheet）

Question

我知道如何使用“经典”XML 对象来做到这一点

begin
  piNode := XMLDocument1.DOMDocument.createProcessingInstruction('xml-stylesheet', 'type="text/xsl"  href="CDA2.xsl"');
  XMLDocument1.DOMDocument.insertBefore(piNode, XMLDocument1.DOMDocument.childNodes[1]);
end;

但是现在我有一个使用NativeXML的项目；而且我不想混合代码；我想使用 NativeXML 来完成这个任务。

所以......我的问题是：是否有使用 NativeXML 执行此操作的功能/方法/解决方法。

谢谢！