diff --git a/lcl/intfgraphics.pas b/lcl/intfgraphics.pas
index fb62913f1c..9dedc4744c 100644
--- a/lcl/intfgraphics.pas
+++ b/lcl/intfgraphics.pas
@@ -2325,6 +2325,8 @@ begin
   SetCount(0);
   FAVLPalette.Free;
   FAVLPalette:=nil;
+  if FCapacity>0 then
+    FreeMem(FAVLNodes);
   inherited Destroy;
 end;