Pascal 7 & Objects


Модификация полос прокрутки


-----------------------------------------------------------------

Модификация полос прокрутки - это скорее работа для пользо- вателя вашей программы, и часто это действительно так. Однако, ваша программа также может модифицировать полосу прокрутки. Ис- пользуемые для этого методы перечислены в следующей таблице.

Методы модификации полос прокрутки Таблица 12.6 +--------------------------------------+------------------------+ | Выполняемое действие | Вызываемый метод | +--------------------------------------+------------------------| | Задание диапазона прокрутки | SetRange | | Установка позиции маркера | SetPosition | | Перемещение позиции маркера | DeltaPos | +--------------------------------------+------------------------+

SetRange - это процедура, которая воспринимает два целочис- ленных аргумента, наименьшую и наибольшую позицию диапазона. По умолчанию новая полоса прокрутки имеет диапазон от 1 до 100. Вы можете изменить этот диапазон для наилучшего расположения управ- ляющих элементов полос прокрутки. Например, полоса прокрутки в приложении для термостата может иметь диапазон от 32 до 120 гра- дусов Фаренгейта:

ThermScroll^.SetRange(32, 120);

SetPosition - это процедура, которая воспринимает один цело- численый аргумент - позицию, в которую нужно переместить указа- тель полосы прокрутки. В рассмотренном ранее приложении для тер- мостата, ваша программа может непосредственно установить темпера- туру 78 градусов:

ThermScroll^.SetPosition(78);

Третий метод DeltaPos передвигает позицию указателя полосы прокрутки вверх (налево) или вниз (направо) на величину, заданную целым аргументом. Положительная целая величина перемещает указа- тель вниз (направо). Отрицательная целая величина перемещает его вверх (налево). Например, для уменьшения температуры термостата на 5 градусов используется:

ThermScroll^.DeltaPos(-5);




Начало  Назад  Вперед