LCL: TCustomSplitter, fixed bug with dangling pointer of rubber band. issue #27559

git-svn-id: trunk@48047 -

lcl/include/customsplitter.inc

@@ -590,7 +590,10 @@ begin
 
     if Assigned(OnMoved) then OnMoved(Self);
     if ResizeStyle in [rsLine, rsPattern] then
+    begin
       DestroyRubberBand(FSplitterWindow);
+      FSplitterWindow := 0;
+    end;
   end;
 end;