anchor.diff:  
         if NewPos > fScrollBarH.MaxValue then
           fLeft := Left + NewPos - fScrollBarH.MaxValue; //Slightly move panel to the top, when resize near maxvalue position
  -      fScrollBarH.DoSetVisible;
  +      ShowScroll := True;
       end else begin
         fScrollBarH.Position := 0;
         if Left <> fClipRect.Left then
  
positive.code: var
    ChildsRect: TKMRect;
    NewPos: Integer;
  begin
    ChildsRect := GetChildsRect;
    //Do not set Visible, avoid trigger OnChangeVisibility
    fScrollBarV.HideSilently;
  
    if (saVertical in fScrollAxisSet) then
    begin
  
negative.code: 
        if NewPos > fScrollBarV.MaxValue then
          fTop := Top + NewPos - fScrollBarV.MaxValue; //Slightly move panel to the top, when resize near maxvalue position
        ShowScroll := True;
      end else begin
        fScrollBarV.Position := 0;
        if Top <> fClipRect.Top then
  