Убедитесь, что полосы прокрутки TScrollBox действительно видны

Question

Убедитесь, что полосы прокрутки TScrollBox действительно видны

У меня есть простая значительная форма с TScrollBox (Align := alClient) и некоторые элементы управления помещены в TScrollBox. Если пользователь изменяет размер формы, TScrollBox показывает и скрывает HorzScrollBar и VertScrollBar (зависит от фактического размера клиентской формы).

Как проверить во время выполнения - HorzScrollBar или VertScrollBar видны прямо сейчас?

TControlScrollBar.Visible это не ответ, потому что он имеет только регулирующую функцию.

5

delphi tscrollbox

Источник

user3578861 18 сен '15 в 06:03

1 ответ

Решение

Другие вопросы по тегам delphi tscrollbox

user505088 18 сен '15 в 06:09 2015-09-18 06:09 · Accepted Answer · 2015-09-18 06:09

Использование TControlScrollBar.IsScrollBarVisible чтобы проверить это.

Вызовите IsScrollBarVisible, чтобы определить, видна ли полоса прокрутки.IsScrollBarVisible возвращает true, если свойство Visible имеет значение true, а связанный оконный элемент управления с прокруткой содержит дочерние элементы управления, которые находятся в пределах пикселей поля от края.