minimize the scrollbar optimal size for the variable direction

Change-Id: Iae8647f5827bee1f0939d3da4e03b5312588bbfd

1 files changed, 15 insertions, 1 deletions

diff --git a/vcl/source/control/scrbar.cxx b/vcl/source/control/scrbar.cxx
index 1b39450baf27..fcb92e2a8a19 100644
--- a/vcl/source/control/scrbar.cxx
+++ b/vcl/source/control/scrbar.cxx
@@ -1455,7 +1455,21 @@ Size ScrollBar::GetOptimalSize() const
 {
     if (mbCalcSize)
         const_cast<ScrollBar*>(this)->ImplCalc(sal_False);
-    return getCurrentCalcSize();
+
+    Size aRet = getCurrentCalcSize();
+
+    const long nMinThumbSize = GetSettings().GetStyleSettings().GetMinThumbSize();
+
+    if (GetStyle() & WB_HORZ)
+    {
+        aRet.Width() = maBtn1Rect.GetWidth() + nMinThumbSize + maBtn2Rect.GetWidth();
+    }
+    else
+    {
+        aRet.Height() = maBtn1Rect.GetHeight() + nMinThumbSize + maBtn2Rect.GetHeight();
+    }
+
+    return aRet;
 }
 
 Size ScrollBar::getCurrentCalcSize() const