diff --git a/components/cmdline/ucmdbox.pas b/components/cmdline/ucmdbox.pas index ba75cccef..b59a42e2a 100644 --- a/components/cmdline/ucmdbox.pas +++ b/components/cmdline/ucmdbox.pas @@ -2887,6 +2887,7 @@ begin ScrollBarPosition(SB_VERT, 0); ScrollBarRange(SB_VERT, 0, FPageHeight); ShowScrollBar(Handle, SB_VERT, True); { Disable the Scrollbar ! } + ShowScrollBar(Handle, SB_HORZ, False); end; end else @@ -2895,6 +2896,7 @@ begin begin ScrollBarRange(SB_VERT, FVisibleLineCount, FPageHeight); ShowScrollBar(Handle, SB_VERT, True); + ShowScrollBar(Handle, SB_HORZ, False); end; end; Invalidate;