关于xml中添加节点的问题！

我用的是D7，用的是dom方法来查找一个节点，如下：
procedure TTstFrm.Button3Click(Sender: TObject);
var
 dNode:IxmlDOMNode;
 rNode:IxmlDOMNode;
 dref:IxmlDOMNodeRef;
begin
 dref:=inxmlput.DOMDocument as IXMLDOMNodeRef;
 dNode:=dref.GetXMLDOMNode;
 rNode:=dNode.selectSingleNode(edit5.Text);
end;
其中inxmlput是一个txmldocument控件，现在我想在rnode下面在添加一个节点,不知道该如何添加.我不想用txmldocument控件，是因为，如果我用这个控件的话，找节点非常慢.
rnode虽然有一个appendChild方法，但是要一个ixmldomnode参数，我现在不知道如果直接创建一个ixmldomnode节点！