如何使Borderorm在BorderStyle = bsNone时显示滚动条?

时间:2011-06-27 08:18:54

标签: delphi scrollbar autoscroll tform

当BorderStyle设置为bsNone时,即使AutoScroll为True且某些子控件位置超过ClientWidth / ClientHeight值,TForms通常也不会显示滚动条。

那么,是否有任何方法/黑客“迫使”TForm显示滚动条(如果需要),即使它的BorderStyle设置为bsNone?

1 个答案:

答案 0 :(得分:9)

在表单上放置TScrollBox,将其设为Align = Client,将所有控件放在滚动框中。

我总是使用TScrollBox,因为它非常灵活。您可以向表单添加顶部对齐的面板(在滚动框外部),并且您有一个非滚动区域。拥有整个表单滚动并不总是有用,它几乎看起来不会很好。