diff --git a/components/lazutils/laz2_xmlcfg.pas b/components/lazutils/laz2_xmlcfg.pas
index 76b687bb34..5ffc6ad24a 100644
--- a/components/lazutils/laz2_xmlcfg.pas
+++ b/components/lazutils/laz2_xmlcfg.pas
@@ -623,7 +623,7 @@ procedure TXMLConfig.SetDeleteValue(const APath: String; const AValue,
   DefValue; const APTypeInfo: PTypeInfo);
 begin
   if CompareMem(@AValue, @DefValue, SizeOfTypeInfo(APTypeInfo)) then
-    DeletePath(APath)
+    DeleteValue(APath)
   else
     SetValue(APath, ValueWithTypeInfoToString(AValue, APTypeInfo));
 end;
@@ -641,7 +641,7 @@ begin
     else t := False;
   end;
   if t then
-    DeletePath(APath)
+    DeleteValue(APath)
   else
     SetValue(APath, AValue, APTypeInfo);
 end;