delphi - 当BorderStyle = bsNone时如何使TForm显示滚动条？

Question

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

那么，即使它的 BorderStyle 设置为 bsNone，是否有任何方法/黑客“强制”TForm 显示滚动条（在需要时）？

Answer 1

在表单上放一个TScrollBox，使其对齐=客户端，将所有控件放在滚动框上。

我总是使用 aTScrollBox因为它非常灵活。您可以向表单添加一个顶部对齐的面板（在滚动框之外），并且您有一个非滚动区域。拥有整个表单滚动并不总是有帮助，而且它几乎永远不会看起来很好。