ПолосаПрокрутки.БольшоеИзменение (ScrollBar.LargeChange) Свойство

Использование

Чтение и запись.

Значение

Тип: Число.

Возвращает или задает значение, добавляемое или вычитаемое из свойства ПолосаПрокрутки.Значение (ScrollBar.Value) при перемещении ползунка на большое расстояние.

Значение по умолчанию: 1.

Примечание

Когда пользователь щелкает на полосе прокрутки, то свойство Значение (Value) изменяется в соответствии со значением, заданным в свойстве БольшоеИзменение (LargeChange). Когда пользователь нажимает на кнопку навигации со стрелкой, то свойство Значение (Value) изменяется в соответствии со значением, заданным в свойстве МалоеИзменение (SmallChange). Следует обратить внимание на то, что если ползунок находится в положении, определяемом свойством Максимум (Maximum), то свойство Значение (Value) не равно значению Максимум (Maximum). В этом случае значение свойства Значение (Value) вычисляется по формуле Максимум (Maximum) - БольшоеИзменение (LargeChange) + 1.

Пример

ГоризонтальнаяПрокрутка1.БольшоеИзменение = 1;
Полный пример кода

Копировать     Выделить всё

Перем Ф, Панель14, Надпись14, Надпись17, ВертикальнаяПрокрутка1, ГоризонтальнаяПрокрутка1; Процедура ВертикальнаяПрокрутка1_ПриПрокручивании() Экспорт Панель14.Высота = ВертикальнаяПрокрутка1.Значение * 3.0; Надпись14.Текст = "" + ВертикальнаяПрокрутка1.Значение; КонецПроцедуры Процедура ГоризонтальнаяПрокрутка1_ПриПрокручивании() Экспорт Панель14.Ширина = ГоризонтальнаяПрокрутка1.Значение * 3.9; Надпись17.Текст = "" + ГоризонтальнаяПрокрутка1.Значение; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 900; Форма1.Высота = 400; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ВертикальнаяПрокрутка1 = Форма1.ЭлементыУправления.Добавить(Ф.ВертикальнаяПрокрутка()); ВертикальнаяПрокрутка1.Положение = Ф.Точка(20, 20); ВертикальнаяПрокрутка1.Размер = Ф.Размер(25, Форма1.Высота - 80); ВертикальнаяПрокрутка1.УстановитьГраницы(20, 20, 25, Форма1.Высота - 80); ВертикальнаяПрокрутка1.Минимум = 0; ВертикальнаяПрокрутка1.Максимум = 100; ВертикальнаяПрокрутка1.БольшоеИзменение = 1; // задаем равным 1 для возможности достижения ползунком максимума ВертикальнаяПрокрутка1.ПриПрокручивании = Ф.Действие(ЭтотОбъект, "ВертикальнаяПрокрутка1_ПриПрокручивании"); ГоризонтальнаяПрокрутка1 = Форма1.ЭлементыУправления.Добавить(Ф.ГоризонтальнаяПрокрутка()); ГоризонтальнаяПрокрутка1.Положение = Ф.Точка(100, ВертикальнаяПрокрутка1.Верх); ГоризонтальнаяПрокрутка1.Размер = Ф.Размер(ВертикальнаяПрокрутка1.Высота, 20); ГоризонтальнаяПрокрутка1.ПриПрокручивании = Ф.Действие(ЭтотОбъект, "ГоризонтальнаяПрокрутка1_ПриПрокручивании"); ГоризонтальнаяПрокрутка1.Минимум = 0; ГоризонтальнаяПрокрутка1.Максимум = 100; ГоризонтальнаяПрокрутка1.БольшоеИзменение = 1; Надпись13 = Форма1.ЭлементыУправления.Добавить(Ф.Надпись()); Надпись13.Положение = Ф.Точка(ВертикальнаяПрокрутка1.Право + 20, 70); Надпись13.Размер = Ф.Размер(400, 20); Надпись13.Текст = "Позиция вертикальной прокрутки (Min = " + ВертикальнаяПрокрутка1.Минимум + ", Max = " + ВертикальнаяПрокрутка1.Максимум + "):"; Панель14 = Форма1.ЭлементыУправления.Добавить(Ф.Панель()); Панель14.Центр(); Панель14.Правее(Надпись13, 5); Панель14.Верх = ГоризонтальнаяПрокрутка1.Верх; Панель14.СтильГраницы = Ф.СтильГраницы.Трехмерная; Панель14.Ширина = ГоризонтальнаяПрокрутка1.Значение; Панель14.Высота = ВертикальнаяПрокрутка1.Значение; Панель14.ЦветФона = Ф.Цвет().МорскаяВолна; Надпись14 = Форма1.ЭлементыУправления.Добавить(Ф.Надпись()); Надпись14.Положение = Ф.Точка(Надпись13.Лево + 20, Надпись13.Низ + 10); Надпись14.Размер = Ф.Размер(250, 25); Надпись14.Текст = "" + ВертикальнаяПрокрутка1.Значение; Надпись14.Шрифт = Ф.Шрифт(, 12, ); Надпись16 = Форма1.ЭлементыУправления.Добавить(Ф.Надпись()); Надпись16.Положение = Ф.Точка(ВертикальнаяПрокрутка1.Право + 20, Надпись14.Низ + 30); Надпись16.Размер = Ф.Размер(Надпись13.Ширина, 20); Надпись16.Текст = "Позиция горизонтальной прокрутки (Min = " + ГоризонтальнаяПрокрутка1.Минимум + ", Max = " + ГоризонтальнаяПрокрутка1.Максимум + "):"; Надпись17 = Форма1.ЭлементыУправления.Добавить(Ф.Надпись()); Надпись17.Положение = Ф.Точка(Надпись13.Лево + 20, Надпись16.Низ + 10); Надпись17.Размер = Ф.Размер(250, 25); Надпись17.Текст = "" + ГоризонтальнаяПрокрутка1.Значение; Надпись17.Шрифт = Ф.Шрифт(, 12, ); ГоризонтальнаяПрокрутка1.Значение = 60; // задаем после установки управляемых свойств ВертикальнаяПрокрутка1.Значение = 40; Надпись14.Текст = "" + ВертикальнаяПрокрутка1.Значение; Надпись17.Текст = "" + ГоризонтальнаяПрокрутка1.Значение; Панель14.Высота = ВертикальнаяПрокрутка1.Значение * 3.0; Панель14.Ширина = ГоризонтальнаяПрокрутка1.Значение * 3.9; Ф.ЗапуститьОбработкуСобытий();

Тестовый код

Копировать     Выделить всё

Перем Ф, Панель14, Надпись14, Надпись17, ВертикальнаяПрокрутка1, ГоризонтальнаяПрокрутка1; Процедура ВертикальнаяПрокрутка1_ПриПрокручивании() Экспорт Панель14.Высота = ВертикальнаяПрокрутка1.Значение * 3.0; Надпись14.Текст = "" + ВертикальнаяПрокрутка1.Значение; КонецПроцедуры Процедура ГоризонтальнаяПрокрутка1_ПриПрокручивании() Экспорт Панель14.Ширина = ГоризонтальнаяПрокрутка1.Значение * 3.9; Надпись17.Текст = "" + ГоризонтальнаяПрокрутка1.Значение; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 900; Форма1.Высота = 400; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ВертикальнаяПрокрутка1 = Форма1.ЭлементыУправления.Добавить(Ф.ВертикальнаяПрокрутка()); ВертикальнаяПрокрутка1.Положение = Ф.Точка(20, 20); ВертикальнаяПрокрутка1.Размер = Ф.Размер(25, Форма1.Высота - 80); ВертикальнаяПрокрутка1.УстановитьГраницы(20, 20, 25, Форма1.Высота - 80); ВертикальнаяПрокрутка1.Минимум = 0; ВертикальнаяПрокрутка1.Максимум = 100; ВертикальнаяПрокрутка1.БольшоеИзменение = 1; // задаем равным 1 для возможности достижения ползунком максимума ВертикальнаяПрокрутка1.ПриПрокручивании = Ф.Действие(ЭтотОбъект, "ВертикальнаяПрокрутка1_ПриПрокручивании"); ГоризонтальнаяПрокрутка1 = Форма1.ЭлементыУправления.Добавить(Ф.ГоризонтальнаяПрокрутка()); ГоризонтальнаяПрокрутка1.Положение = Ф.Точка(100, ВертикальнаяПрокрутка1.Верх); ГоризонтальнаяПрокрутка1.Размер = Ф.Размер(ВертикальнаяПрокрутка1.Высота, 20); ГоризонтальнаяПрокрутка1.ПриПрокручивании = Ф.Действие(ЭтотОбъект, "ГоризонтальнаяПрокрутка1_ПриПрокручивании"); ГоризонтальнаяПрокрутка1.Минимум = 0; ГоризонтальнаяПрокрутка1.Максимум = 100; ГоризонтальнаяПрокрутка1.БольшоеИзменение = 1; Надпись13 = Форма1.ЭлементыУправления.Добавить(Ф.Надпись()); Надпись13.Положение = Ф.Точка(ВертикальнаяПрокрутка1.Право + 20, 70); Надпись13.Размер = Ф.Размер(400, 20); Надпись13.Текст = "Позиция вертикальной прокрутки (Min = " + ВертикальнаяПрокрутка1.Минимум + ", Max = " + ВертикальнаяПрокрутка1.Максимум + "):"; Панель14 = Форма1.ЭлементыУправления.Добавить(Ф.Панель()); Панель14.Центр(); Панель14.Правее(Надпись13, 5); Панель14.Верх = ГоризонтальнаяПрокрутка1.Верх; Панель14.СтильГраницы = Ф.СтильГраницы.Трехмерная; Панель14.Ширина = ГоризонтальнаяПрокрутка1.Значение; Панель14.Высота = ВертикальнаяПрокрутка1.Значение; Панель14.ЦветФона = Ф.Цвет().МорскаяВолна; Надпись14 = Форма1.ЭлементыУправления.Добавить(Ф.Надпись()); Надпись14.Положение = Ф.Точка(Надпись13.Лево + 20, Надпись13.Низ + 10); Надпись14.Размер = Ф.Размер(250, 25); Надпись14.Текст = "" + ВертикальнаяПрокрутка1.Значение; Надпись14.Шрифт = Ф.Шрифт(, 12, ); Надпись16 = Форма1.ЭлементыУправления.Добавить(Ф.Надпись()); Надпись16.Положение = Ф.Точка(ВертикальнаяПрокрутка1.Право + 20, Надпись14.Низ + 30); Надпись16.Размер = Ф.Размер(Надпись13.Ширина, 20); Надпись16.Текст = "Позиция горизонтальной прокрутки (Min = " + ГоризонтальнаяПрокрутка1.Минимум + ", Max = " + ГоризонтальнаяПрокрутка1.Максимум + "):"; Надпись17 = Форма1.ЭлементыУправления.Добавить(Ф.Надпись()); Надпись17.Положение = Ф.Точка(Надпись13.Лево + 20, Надпись16.Низ + 10); Надпись17.Размер = Ф.Размер(250, 25); Надпись17.Текст = "" + ГоризонтальнаяПрокрутка1.Значение; Надпись17.Шрифт = Ф.Шрифт(, 12, ); ГоризонтальнаяПрокрутка1.Значение = 60; // задаем после установки управляемых свойств ВертикальнаяПрокрутка1.Значение = 40; Надпись14.Текст = "" + ВертикальнаяПрокрутка1.Значение; Надпись17.Текст = "" + ГоризонтальнаяПрокрутка1.Значение; Панель14.Высота = ВертикальнаяПрокрутка1.Значение * 3.0; Панель14.Ширина = ГоризонтальнаяПрокрутка1.Значение * 3.9; Сообщить(?( ВертикальнаяПрокрутка1.БольшоеИзменение = 1 , "", "!!! ") + "ПолосаПрокрутки.БольшоеИзменение (ScrollBar.LargeChange) Свойство" + " " + ТекущаяДата());

Смотрите также

ПолосаПрокрутки (ScrollBar) Класс | Библиотека OneScriptForms