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

Question

我有一个简单的大小形式与TScrollBox（Align := alClient）和一些控件放在TScrollBox上。如果用户更改表单大小，TScrollBox将显示并隐藏HorzScrollBar和VertScrollBar（取决于实际的客户端表单大小）。

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

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

Answer 1

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

  

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