From 02455161f40b8071f9f4e1ce606d53da50dfcbe8 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Micha=C3=ABl=20Van=20Canneyt?= Date: Wed, 24 Jul 2024 14:10:52 +0200 Subject: [PATCH] * Add replaceChildren. Fixes issue #39282 --- packages/rtl/src/web.pas | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/packages/rtl/src/web.pas b/packages/rtl/src/web.pas index 774150a..a78116c 100644 --- a/packages/rtl/src/web.pas +++ b/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;