diff --git a/lcl/include/imglist.inc b/lcl/include/imglist.inc
index df0a3a0261..716c79d264 100644
--- a/lcl/include/imglist.inc
+++ b/lcl/include/imglist.inc
@@ -388,6 +388,9 @@ begin
   if FCount = 0 then Exit;
   if HandleAllocated
   then TWSCustomImageListClass(WidgetSetClass).Clear(Self);
+  {$ifdef windows}
+  DestroyReference; //Issue #0029905: images added after clear aren't shown if width or height changed
+  {$endif}
   SetLength(FData, 0);
   FAllocCount := 0;
   ClearOverlays;