检查TScrollBox滚动条实际上是可见的

Question

我有一个简单的TScrollBox (Align := alClient)表单和一些设置在TScrollBox上的控件。如果用户更改了表单大小，TScrollBox将显示和隐藏HorzScrollBar和VertScrollBar (取决于实际的客户端表单大小)。

如何在运行时检查HorzScrollBar或VertScrollBar现在是可见的吗？

TControlScrollBar.Visible不是一个答案，因为它只是一个调节功能。

Answer 1

使用TControlScrollBar.IsScrollBarVisible对此进行测试。

调用IsScrollBarVisible以确定滚动条是否可见。如果可见属性为true，并且关联的滚动窗口控件包含位于边缘边缘像素范围内的子控件，则IsScrollBarVisible返回true。