ФорматированноеПолеВвода.ПолосыПрокрутки (RichTextBox.ScrollBars) Свойство

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

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

Значение

Тип: ПолосыПрокрутки (ScrollBars).

Возвращает или задает тип полос прокрутки для отображения в элементе управления ФорматированноеПолеВвода (RichTextBox).

Примечание

Горизонтальные полосы прокрутки не отображаются если свойство Перенос (WordWrap) установлено в значение Истина, независимо от значения свойства ПолосыПрокрутки (ScrollBars).

Пример

ФорматированноеПолеВвода1.ПолосыПрокрутки = Ф.ПолосыПрокрутки.Обе;
Полный пример кода

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

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 450; Форма1.Высота = 400; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ФорматированноеПолеВвода1 = Ф.ФорматированноеПолеВвода(); ФорматированноеПолеВвода1.Родитель = Форма1; ФорматированноеПолеВвода1.Границы = Ф.Прямоугольник(10, 10, Форма1.Ширина - 20, Форма1.Высота - 50); Стр = "ТекущаяУниверсальнаяДатаВМиллисекундах равна = " + ТекущаяУниверсальнаяДатаВМиллисекундах(); Для А = 0 По 100 Цикл Стр = Стр + Символы.ПС + "ТекущаяУниверсальнаяДатаВМиллисекундах равна = " + ТекущаяУниверсальнаяДатаВМиллисекундах(); КонецЦикла; ФорматированноеПолеВвода1.Текст = ФорматированноеПолеВвода1.Текст + Стр; ФорматированноеПолеВвода1.Перенос = Ложь; ФорматированноеПолеВвода1.ПолосыПрокрутки = Ф.ПолосыПрокрутки.Обе; Ф.ЗапуститьОбработкуСобытий();

Тестовый код

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

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 450; Форма1.Высота = 400; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ФорматированноеПолеВвода1 = Ф.ФорматированноеПолеВвода(); ФорматированноеПолеВвода1.Родитель = Форма1; ФорматированноеПолеВвода1.Границы = Ф.Прямоугольник(10, 10, Форма1.Ширина - 20, Форма1.Высота - 50); Стр = "ТекущаяУниверсальнаяДатаВМиллисекундах равна = " + ТекущаяУниверсальнаяДатаВМиллисекундах(); Для А = 0 По 100 Цикл Стр = Стр + Символы.ПС + "ТекущаяУниверсальнаяДатаВМиллисекундах равна = " + ТекущаяУниверсальнаяДатаВМиллисекундах(); КонецЦикла; ФорматированноеПолеВвода1.Текст = ФорматированноеПолеВвода1.Текст + Стр; ФорматированноеПолеВвода1.Перенос = Ложь; ФорматированноеПолеВвода1.ПолосыПрокрутки = Ф.ПолосыПрокрутки.Обе; Сообщить(?( ФорматированноеПолеВвода1.ПолосыПрокрутки = Ф.ПолосыПрокрутки.Обе , "", "!!! ") + "ФорматированноеПолеВвода.ПолосыПрокрутки (RichTextBox.ScrollBars) Свойство" + " " + ТекущаяДата());

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

ФорматированноеПолеВвода (RichTextBox) Класс | Библиотека OneScriptForms