procedure NodeInsertAfter(ANode: TXmlNode; AOther: TXmlNode);