* Add replaceChildren. Fixes issue #39282

packages/rtl/src/web.pas

@@ -413,6 +413,10 @@ Type
     procedure removeAttribute(aName: string);
     procedure removeAttributeNS(aNameSpace,aName: string);
     function removeAttributeNode(aAttr : TJSAttr) : TJSAttr;
+    procedure replaceChildren; overload;
+    procedure replaceChildren(aNode : TJSNode); overload;
+    procedure replaceChildren(aNode1,aNode2 : TJSNode); overload;
+    procedure replaceChildren(aNode1,aNode2,aNode3 : TJSNode); overload; varargs;
     procedure setAttribute(aName : string; AValue : String);
     function setAttributeNode(aNode: TJSAttr) : TJSAttr;
     function setAttributeNodeNS(aNode: TJSAttr) : TJSAttr;