powered by simpleCommunicator - 2.0.41     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Отображение ScrollBars на форме
2 сообщений из 2, страница 1 из 1
Отображение ScrollBars на форме
    #39069687
9IKOB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Доброго времени суток!

Столкнулся с такой проблемой: в свойстве формы ScrollBars выставил значение 3 (Both), но скроллбары на форме почему-то не появляются. Что ещё нужно сделать для возможности прокручивать форму вниз и вправо, если она целиком не умещается на экране?
...
Рейтинг: 0 / 0
Отображение ScrollBars на форме
    #39071910
9IKOB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Сам нашёл решение.
Дело в том, что ScrollBars отображаются "по мере необходимости", т.е. если нет объектов ниже нижнего края формы, то вертикальный ScrollBar отображен не будет. Соответственно если нет объектов правее правого края формы, то горизонтальный ScrollBar не будет отображаться. Вроде как в остальных случаях смысла в прокрутке нет - всё и так видно.
Поэтому для того, чтобы ScrollBars отображались в тех случаях, когда все объекты на форме не выходят за её пределы, но сама форма целиком не помещается на экране, нужно в событии Init формы прописать проверку: поместится ли форма целиком на экране. Если размеры формы больше размеров экрана (SYSMETRIC(1) - ширина экрана, SYSMETRIC(2) - высота экрана), то нужно уменьшить размеры формы под размер экрана, тогда и отобразятся ScrollBars.

P.S. SYSMETRIC(2) возвращает высоту экрана, включая высоту панели задач. Т.е. если высота формы = 600 и высота экрана 600, то нижняя часть формы окажется закрыта панелью задач.
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Отображение ScrollBars на форме
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]