Splitter Constructor

Синтаксис

Разделитель()

Параметры

Описание

Создаёт новый экземпляр класса Разделитель (Splitter).

Примечание

При добавлении разделителя на форму необходимо соблюдать определенную последовательность добавления объектов и правильно указывать их свойство СтильГраницы (BorderStyle).

Если у нас есть панель на форме и мы хотим разбить её на три области с помощью вертикально расположенных разделителей, тогда последовательность действий должна быть такой:

1. Добавить разделитель, задав свойству Стыковка значение Ф.СтильСтыковки.Лево.

2. Добавить панель, задав свойству Стыковка значение Ф.СтильСтыковки.Лево.

3. Добавить разделитель, задав свойству Стыковка значение Ф.СтильСтыковки.Лево.

4. Добавить панель, задав свойству Стыковка значение Ф.СтильСтыковки.Лево.

5. Добавить панель, задав свойству Стыковка значение Ф.СтильСтыковки.Заполнение.

Разберем подробнее. Подготовим форму с панелью, которую будем делить разделителями на три части.

Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Размер = Ф.Размер(300, 150);
Форма1.Отображать = Истина;

Панель0 = Форма1.ЭлементыУправления.Добавить(Ф.Панель());
Панель0.Размер = Ф.Размер(Форма1.КлиентШирина, Форма1.КлиентВысота);
Панель0.СтильГраницы = Ф.СтильГраницы.Трехмерная;

Добавим разделитель, задав свойству Стыковка значение Ф.СтильСтыковки.Лево.

Разделитель1 = Панель0.ЭлементыУправления.Добавить(Ф.Разделитель());
Разделитель1.Стыковка = Ф.СтильСтыковки.Лево;

Разделитель добавлен. Об этом свидетельствует изменение вида курсора при приближении к левому краю панели.

Добавим панель, задав свойству Стыковка значение Ф.СтильСтыковки.Лево. Для наглядности окрасим её в синий цвет.

Панель1 = Панель0.ЭлементыУправления.Добавить(Ф.Панель());
Панель1.СтильГраницы = Ф.СтильГраницы.Трехмерная;
Панель1.ЦветФона = Ф.Цвет().Синий;
Панель1.Стыковка = Ф.СтильСтыковки.Лево;

У нас есть синяя панель и справа к ней прикреплен разделитель. Об этом нам опять же говорит изменение вида курсора на правой границе синей панели. И ещё правее остается незаполненная пока область.

Добавим ещё один разделитель, задав свойству Стыковка значение Ф.СтильСтыковки.Лево.

Разделитель2 = Панель0.ЭлементыУправления.Добавить(Ф.Разделитель());
Разделитель2.Стыковка = Ф.СтильСтыковки.Лево;

Добавим ещё одну панель, задав свойству Стыковка значение Ф.СтильСтыковки.Лево. Окрасим её в красный цвет.

Панель2 = Панель0.ЭлементыУправления.Добавить(Ф.Панель());
Панель2.Ширина = 50;
Панель2.СтильГраницы = Ф.СтильГраницы.Трехмерная;
Панель2.ЦветФона = Ф.Цвет().Красный;
Панель2.Стыковка = Ф.СтильСтыковки.Лево;

Мы всё время добавляли объекты пристыковывая их слева. Они прикреплялись к левому краю вытесняя уже присутствующие объекты вправо. При этом справа оставалось незаполненное пространство. Заполнить его должна панель, добавленная последней и свойство Стыковка у неё должно быть установлено в значение Ф.СтильСтыковки.Заполнение. Добавим последнюю панель с зеленым цветом.

Панель3 = Панель0.ЭлементыУправления.Добавить(Ф.Панель());
Панель3.СтильГраницы = Ф.СтильГраницы.Трехмерная;
Панель3.ЦветФона = Ф.Цвет().Зеленый;
Панель3.Стыковка = Ф.СтильСтыковки.Заполнение;

В итоге на нашей форме мы получили панель-контейнер (Панель0), на которой находятся три панели (Панель1, Панель2, Панель3) "сшитые" разделителями.

Для областей расположенных сверху вниз, необходимо последовательно пристыковывать объекты к верхнему краю объекта-контейнера.

Комбинируя панели-контейнеры и помещая на них горизонтальные или вертикальные разделители и элементы управления (Форма, Дерево, СписокЭлементов, Панель и др.), можно получить большое количество вариантов оформления формы.

Есть ещё один способ добавления объектов, в том числе и разделителей, интуитивно более понятный, более удобный.

Можно добавлять объекты без эффекта "вытеснения", с пристыковкой к краю не родительского контейнера, а к краю уже добавленного на форму другого объекта. Для этого применяйте к объекту метод ЭлементУправления.НаПереднийПлан (Control.BringToFront) сразу после установки свойства Стыковка (Control.Dock).

Код примера деления формы разделителями с применением метода ЭлементУправления.НаПереднийПлан (Control.BringToFront):

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

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Размер = Ф.Размер(300, 150);
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

Панель1 = Форма1.ЭлементыУправления.Добавить(Ф.Панель());
Панель1.Ширина = 50;
Панель1.СтильГраницы = Ф.СтильГраницы.Трехмерная;
Панель1.ЦветФона = Ф.Цвет().Красный;
Панель1.Стыковка = Ф.СтильСтыковки.Лево;

Разделитель1 = Форма1.ЭлементыУправления.Добавить(Ф.Разделитель());
Разделитель1.Стыковка = Ф.СтильСтыковки.Лево;
Разделитель1.НаПереднийПлан();

Панель2 = Форма1.ЭлементыУправления.Добавить(Ф.Панель());
Панель2.СтильГраницы = Ф.СтильГраницы.Трехмерная;
Панель2.ЦветФона = Ф.Цвет().Синий;
Панель2.Стыковка = Ф.СтильСтыковки.Лево;
Панель2.НаПереднийПлан();

Разделитель2 = Форма1.ЭлементыУправления.Добавить(Ф.Разделитель());
Разделитель2.Стыковка = Ф.СтильСтыковки.Лево;
Разделитель2.НаПереднийПлан();

Панель3 = Форма1.ЭлементыУправления.Добавить(Ф.Панель());
Панель3.СтильГраницы = Ф.СтильГраницы.Трехмерная;
Панель3.ЦветФона = Ф.Цвет().Зеленый;
Панель3.Стыковка = Ф.СтильСтыковки.Заполнение;

Ф.ЗапуститьОбработкуСобытий();

Пример

Разделитель1 = Ф.Разделитель();

Полный пример кода

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

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Размер = Ф.Размер(300, 150);
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

Панель0 = Форма1.ЭлементыУправления.Добавить(Ф.Панель());
Панель0.Размер = Ф.Размер(Форма1.КлиентШирина, Форма1.КлиентВысота);
Панель0.СтильГраницы = Ф.СтильГраницы.Трехмерная;

Разделитель1 = Панель0.ЭлементыУправления.Добавить(Ф.Разделитель());
Разделитель1.Стыковка = Ф.СтильСтыковки.Лево;

Панель1 = Панель0.ЭлементыУправления.Добавить(Ф.Панель());
Панель1.СтильГраницы = Ф.СтильГраницы.Трехмерная;
Панель1.ЦветФона = Ф.Цвет().Синий;
Панель1.Стыковка = Ф.СтильСтыковки.Лево;

Разделитель2 = Панель0.ЭлементыУправления.Добавить(Ф.Разделитель());
Разделитель2.Стыковка = Ф.СтильСтыковки.Лево;

Панель2 = Панель0.ЭлементыУправления.Добавить(Ф.Панель());
Панель2.Ширина = 50;
Панель2.СтильГраницы = Ф.СтильГраницы.Трехмерная;
Панель2.ЦветФона = Ф.Цвет().Красный;
Панель2.Стыковка = Ф.СтильСтыковки.Лево;

Панель3 = Панель0.ЭлементыУправления.Добавить(Ф.Панель());
Панель3.СтильГраницы = Ф.СтильГраницы.Трехмерная;
Панель3.ЦветФона = Ф.Цвет().Зеленый;
Панель3.Стыковка = Ф.СтильСтыковки.Заполнение;

Ф.ЗапуститьОбработкуСобытий();

Тестовый код

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

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Размер = Ф.Размер(300, 150);
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

Панель0 = Форма1.ЭлементыУправления.Добавить(Ф.Панель());
Панель0.Размер = Ф.Размер(Форма1.КлиентШирина, Форма1.КлиентВысота);
Панель0.СтильГраницы = Ф.СтильГраницы.Трехмерная;

Разделитель1 = Панель0.ЭлементыУправления.Добавить(Ф.Разделитель());
Разделитель1.Стыковка = Ф.СтильСтыковки.Лево;

Панель1 = Панель0.ЭлементыУправления.Добавить(Ф.Панель());
Панель1.СтильГраницы = Ф.СтильГраницы.Трехмерная;
Панель1.ЦветФона = Ф.Цвет().Синий;
Панель1.Стыковка = Ф.СтильСтыковки.Лево;

Разделитель2 = Панель0.ЭлементыУправления.Добавить(Ф.Разделитель());
Разделитель2.Стыковка = Ф.СтильСтыковки.Лево;

Панель2 = Панель0.ЭлементыУправления.Добавить(Ф.Панель());
Панель2.Ширина = 50;
Панель2.СтильГраницы = Ф.СтильГраницы.Трехмерная;
Панель2.ЦветФона = Ф.Цвет().Красный;
Панель2.Стыковка = Ф.СтильСтыковки.Лево;

Панель3 = Панель0.ЭлементыУправления.Добавить(Ф.Панель());
Панель3.СтильГраницы = Ф.СтильГраницы.Трехмерная;
Панель3.ЦветФона = Ф.Цвет().Зеленый;
Панель3.Стыковка = Ф.СтильСтыковки.Заполнение;

Сообщить(?(
"" + Разделитель1 = "КлРазделитель"
, "", "!!! ") + "Разделитель (Splitter) Конструктор" + " " + ТекущаяДата());

Код примера различных вариантов деления формы с помощью разделителей:

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

Перем Ф, Панель13, Форма1;

Процедура УдалитьЭлементыУправления(ЭлементУправления)
	ЭлУпр = ЭлементУправления;
	Пока ЭлУпр.ЭлементыУправления.Количество > 0 Цикл
		Эл = ЭлУпр.ЭлементыУправления.Элемент(0);
		Если Эл.ЭлементыУправления.Количество > 0 Тогда
			УдалитьЭлементыУправления(Эл);
		КонецЕсли;
		ЭлУпр.ЭлементыУправления.Удалить(Эл);
		Эл.Освободить();
	КонецЦикла;
КонецПроцедуры


Процедура Кнопка1_Нажатие() Экспорт
	//удаляем с закладки Разделитель все панели с разделителями
	УдалитьЭлементыУправления(Панель13);
	//создаем новые панели с разделителями
	Разделитель1 = Ф.Разделитель();
	Разделитель1.Родитель = Панель13;
	Разделитель1.Стыковка = Ф.СтильСтыковки.Лево;

	Панель7 = Панель13.ЭлементыУправления.Добавить(Ф.Панель());
	Панель7.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель7.СтильГраницы = 2;
	Панель7.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель7.ЦветФона = Ф.Цвет().Белый;
	Панель7.Стыковка = Ф.СтильСтыковки.Лево;
	Надпись9 = Панель7.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись9.Текст = "Панель1";
	Надпись9.Стыковка = Ф.СтильСтыковки.Верх;
	
	Панель8 = Панель13.ЭлементыУправления.Добавить(Ф.Панель());
	Панель8.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель8.ЦветФона = Ф.Цвет().Белый;
	Панель8.Стыковка = Ф.СтильСтыковки.Заполнение;
	Надпись8 = Панель8.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись8.Текст = "Панель2";
	Надпись8.Стыковка = Ф.СтильСтыковки.Верх;
	Надпись8.ВыравниваниеТекста = Ф.ВыравниваниеСодержимого.СерединаПраво;
КонецПроцедуры

Процедура Кнопка2_Нажатие() Экспорт
	//удаляем с закладки Разделитель все панели с разделителями
	УдалитьЭлементыУправления(Панель13);
	//создаем новые панели с разделителями
	Разделитель1 = Панель13.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель1.Стыковка = Ф.СтильСтыковки.Лево;

	Панель7 = Панель13.ЭлементыУправления.Добавить(Ф.Панель());
	Панель7.Стыковка = Ф.СтильСтыковки.Лево;

	Разделитель2 = Панель13.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель2.Стыковка = Ф.СтильСтыковки.Лево;

	Панель8 = Панель13.ЭлементыУправления.Добавить(Ф.Панель());
	Панель8.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель8.ЦветФона = Ф.Цвет().Белый;
	Панель8.Стыковка = Ф.СтильСтыковки.Заполнение;
	Надпись8 = Панель8.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись8.Текст = "Панель2";
	Надпись8.Стыковка = Ф.СтильСтыковки.Верх;
	Надпись8.ВыравниваниеТекста = Ф.ВыравниваниеСодержимого.СерединаПраво;
	
	Разделитель3 = Панель7.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель3.Стыковка = Ф.СтильСтыковки.Верх;

	Панель10 = Панель7.ЭлементыУправления.Добавить(Ф.Панель());
	Панель10.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель10.ЦветФона = Ф.Цвет().Белый;
	Панель10.Стыковка = Ф.СтильСтыковки.Верх;
	Надпись10 = Панель10.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись10.Текст = "Панель3";
	Надпись10.Стыковка = Ф.СтильСтыковки.Верх;

	Разделитель4 = Панель7.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель4.Стыковка = Ф.СтильСтыковки.Верх;

	Панель11 = Панель7.ЭлементыУправления.Добавить(Ф.Панель());
	Панель11.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель11.ЦветФона = Ф.Цвет().Белый;
	Панель11.Стыковка = Ф.СтильСтыковки.Заполнение;
	Надпись11 = Панель11.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись11.Текст = "Панель4";
	Надпись11.Стыковка = Ф.СтильСтыковки.Низ;
	Надпись11.ВыравниваниеТекста = Ф.ВыравниваниеСодержимого.СерединаПраво;
КонецПроцедуры

Процедура Кнопка3_Нажатие() Экспорт
	//удаляем с закладки Разделитель все панели с разделителями
	УдалитьЭлементыУправления(Панель13);
	//создаем новые панели с разделителями
	Разделитель1 = Панель13.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель1.Стыковка = Ф.СтильСтыковки.Лево;
	
	Панель8 = Панель13.ЭлементыУправления.Добавить(Ф.Панель());
	Панель8.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель8.ЦветФона = Ф.Цвет().Белый;
	Панель8.Стыковка = Ф.СтильСтыковки.Лево;
	Надпись8 = Панель8.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись8.Текст = "Панель1";
	Надпись8.Стыковка = Ф.СтильСтыковки.Верх;
	
	Панель7 = Панель13.ЭлементыУправления.Добавить(Ф.Панель());
	Панель7.Стыковка = Ф.СтильСтыковки.Заполнение;
	
	Разделитель2 = Панель7.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель2.Стыковка = Ф.СтильСтыковки.Верх;
	
	Панель9 = Панель7.ЭлементыУправления.Добавить(Ф.Панель());
	Панель9.ЦветФона = Ф.Цвет().Белый;
	Панель9.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель9.Стыковка = Ф.СтильСтыковки.Верх;
	Надпись9 = Панель9.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись9.Текст = "Панель3";
	Надпись9.Стыковка = Ф.СтильСтыковки.Верх;
	Надпись9.ВыравниваниеТекста = Ф.ВыравниваниеСодержимого.СерединаПраво;

	Разделитель3 = Панель7.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель3.Стыковка = Ф.СтильСтыковки.Верх;

	Панель10 = Панель7.ЭлементыУправления.Добавить(Ф.Панель());
	Панель10.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель10.ЦветФона = Ф.Цвет().Белый;
	Панель10.Стыковка = Ф.СтильСтыковки.Заполнение;
	Надпись10 = Панель10.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись10.Текст = "Панель4";
	Надпись10.Стыковка = Ф.СтильСтыковки.Низ;
	Надпись10.ВыравниваниеТекста = Ф.ВыравниваниеСодержимого.СерединаПраво;
КонецПроцедуры

Процедура Кнопка4_Нажатие() Экспорт
	//удаляем с закладки Разделитель все панели с разделителями
	УдалитьЭлементыУправления(Панель13);
	//создаем новые панели с разделителями
	Разделитель1 = Панель13.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель1.Стыковка = Ф.СтильСтыковки.Лево;
	
	Панель8 = Панель13.ЭлементыУправления.Добавить(Ф.Панель());
	Панель8.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель8.ЦветФона = Ф.Цвет().Белый;
	Панель8.Стыковка = Ф.СтильСтыковки.Лево;
	Надпись8 = Панель8.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись8.Текст = "Панель1";
	Надпись8.Стыковка = Ф.СтильСтыковки.Верх;
	
	Панель7 = Панель13.ЭлементыУправления.Добавить(Ф.Панель());
	Панель7.Стыковка = Ф.СтильСтыковки.Заполнение;
	
	Разделитель2 = Панель7.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель2.Стыковка = Ф.СтильСтыковки.Верх;
	
	Панель9 = Панель7.ЭлементыУправления.Добавить(Ф.Панель());
	Панель9.ЦветФона = Ф.Цвет().Белый;
	Панель9.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель9.Стыковка = Ф.СтильСтыковки.Верх;
	Надпись9 = Панель9.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись9.Текст = "Панель3";
	Надпись9.Стыковка = Ф.СтильСтыковки.Верх;
	Надпись9.ВыравниваниеТекста = Ф.ВыравниваниеСодержимого.СерединаПраво;

	Разделитель3 = Панель7.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель3.Стыковка = Ф.СтильСтыковки.Верх;

	Панель10 = Панель7.ЭлементыУправления.Добавить(Ф.Панель());
	Панель10.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель10.ЦветФона = Ф.Цвет().Белый;
	Панель10.Стыковка = Ф.СтильСтыковки.Верх;
	Надпись10 = Панель10.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись10.Текст = "Панель4";
	Надпись10.Стыковка = Ф.СтильСтыковки.Верх;
	Надпись10.ВыравниваниеТекста = Ф.ВыравниваниеСодержимого.СерединаПраво;
	
	Разделитель4 = Панель7.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель4.Стыковка = Ф.СтильСтыковки.Верх;

	Панель11 = Панель7.ЭлементыУправления.Добавить(Ф.Панель());
	Панель11.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель11.ЦветФона = Ф.Цвет().Белый;
	Панель11.Стыковка = Ф.СтильСтыковки.Заполнение;
	Надпись11 = Панель11.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись11.Текст = "Панель5";
	Надпись11.Стыковка = Ф.СтильСтыковки.Низ;
	Надпись11.ВыравниваниеТекста = Ф.ВыравниваниеСодержимого.СерединаПраво;
КонецПроцедуры

Процедура Кнопка5_Нажатие() Экспорт
	//удаляем с закладки Разделитель все панели с разделителями
	УдалитьЭлементыУправления(Панель13);
	//создаем новые панели с разделителями
	Разделитель1 = Панель13.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель1.Стыковка = Ф.СтильСтыковки.Лево;

	Панель7 = Панель13.ЭлементыУправления.Добавить(Ф.Панель());
	Панель7.Стыковка = Ф.СтильСтыковки.Лево;

	Разделитель2 = Панель13.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель2.Стыковка = Ф.СтильСтыковки.Лево;

	Панель8 = Панель13.ЭлементыУправления.Добавить(Ф.Панель());
	Панель8.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель8.ЦветФона = Ф.Цвет().Белый;
	Панель8.Стыковка = Ф.СтильСтыковки.Лево;
	Надпись8 = Панель8.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись8.Текст = "Панель2";
	Надпись8.Стыковка = Ф.СтильСтыковки.Верх;

	Панель9 = Панель13.ЭлементыУправления.Добавить(Ф.Панель());
	Панель9.ЦветФона = Ф.Цвет().Белый;
	Панель9.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель9.Стыковка = Ф.СтильСтыковки.Заполнение;
	Надпись9 = Панель9.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись9.Текст = "Панель3";
	Надпись9.Стыковка = Ф.СтильСтыковки.Верх;
	Надпись9.ВыравниваниеТекста = Ф.ВыравниваниеСодержимого.СерединаПраво;

	Разделитель3 = Панель7.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель3.Стыковка = Ф.СтильСтыковки.Верх;

	Панель10 = Панель7.ЭлементыУправления.Добавить(Ф.Панель());
	Панель10.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель10.ЦветФона = Ф.Цвет().Белый;
	Панель10.Стыковка = Ф.СтильСтыковки.Верх;
	Надпись10 = Панель10.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись10.Текст = "Панель4";
	Надпись10.Стыковка = Ф.СтильСтыковки.Верх;

	Разделитель4 = Панель7.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель4.Стыковка = Ф.СтильСтыковки.Верх;

	Панель11 = Панель7.ЭлементыУправления.Добавить(Ф.Панель());
	Панель11.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель11.ЦветФона = Ф.Цвет().Белый;
	Панель11.Стыковка = Ф.СтильСтыковки.Заполнение;
	Надпись11 = Панель11.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись11.Текст = "Панель5";
	Надпись11.Стыковка = Ф.СтильСтыковки.Низ;
КонецПроцедуры

Процедура Кнопка6_Нажатие() Экспорт
	//удаляем с закладки Разделитель все панели с разделителями
	УдалитьЭлементыУправления(Панель13);
	//создаем новые панели с разделителями
	Разделитель1 = Панель13.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель1.Стыковка = Ф.СтильСтыковки.Лево;

	Панель7 = Панель13.ЭлементыУправления.Добавить(Ф.Панель());
	Панель7.Стыковка = Ф.СтильСтыковки.Лево;
	Панель7.Имя = "Панель1";

	Разделитель2 = Панель13.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель2.Стыковка = Ф.СтильСтыковки.Лево;

	Панель8 = Панель13.ЭлементыУправления.Добавить(Ф.Панель());
	Панель8.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель8.ЦветФона = Ф.Цвет().Белый;
	Панель8.Стыковка = Ф.СтильСтыковки.Лево;
	Надпись8 = Панель8.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись8.Текст = "Панель2";
	Надпись8.Стыковка = Ф.СтильСтыковки.Верх;

	Панель9 = Панель13.ЭлементыУправления.Добавить(Ф.Панель());
	Панель9.ЦветФона = Ф.Цвет().Белый;
	Панель9.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель9.Стыковка = Ф.СтильСтыковки.Заполнение;
	Надпись9 = Панель9.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись9.Текст = "Панель3";
	Надпись9.Стыковка = Ф.СтильСтыковки.Верх;
	Надпись9.ВыравниваниеТекста = Ф.ВыравниваниеСодержимого.СерединаПраво;

	Разделитель3 = Панель7.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель3.Стыковка = Ф.СтильСтыковки.Верх;

	Панель10 = Панель7.ЭлементыУправления.Добавить(Ф.Панель());
	Панель10.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель10.ЦветФона = Ф.Цвет().Белый;
	Панель10.Стыковка = Ф.СтильСтыковки.Верх;
	Надпись10 = Панель10.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись10.Текст = "Панель4";
	Надпись10.Стыковка = Ф.СтильСтыковки.Верх;

	Разделитель4 = Панель7.ЭлементыУправления.Добавить(Ф.Разделитель());
	Разделитель4.Стыковка = Ф.СтильСтыковки.Верх;

	Панель11 = Панель7.ЭлементыУправления.Добавить(Ф.Панель());
	Панель11.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель11.ЦветФона = Ф.Цвет().Белый;
	Панель11.Стыковка = Ф.СтильСтыковки.Верх;
	Надпись11 = Панель11.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись11.Текст = "Панель5";
	Надпись11.Стыковка = Ф.СтильСтыковки.Верх;

	Панель12 = Панель7.ЭлементыУправления.Добавить(Ф.Панель());
	Панель12.СтильГраницы = Ф.СтильГраницы.Трехмерная;
	Панель12.ЦветФона = Ф.Цвет().Белый;
	Панель12.Стыковка = Ф.СтильСтыковки.Заполнение;
	Надпись6 = Панель12.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись6.Текст = "Панель6";
	Надпись6.Стыковка = Ф.СтильСтыковки.Низ;
КонецПроцедуры

Процедура Разделитель()
	Панель13 = Форма1.ЭлементыУправления.Добавить(Ф.Панель());//Панель0
	Панель13.Размер = Ф.Размер(Форма1.Размер.Ширина - 250, Форма1.Размер.Высота - 50);
	Панель13.Имя = "Панель0";

	Имя1 = Ф.Цвет().ИзRgb(255, 255, 255).Имя;
	Имя2 = Ф.Цвет().Зеленый.Имя;
	СтрОбщая = "/9j/4AAQSkZJRgABAQEAeAB4AAD/2wBDAAgGBgcGBQgHBwcJCQgKDBQNDAsLDBkSEw8UHRofHh0aHBwgJC4nICIsIxwcKDcpLDAxNDQ0Hyc5PTgyPC4zNDL/2wBDAQkJCQwLDBgNDR
	|gyIRwhMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjL/wAARCABGAF8DASIAAhEBAxEB/8QAHwAAAQUBAQEBAQEAAAAAAAAAAAECAwQFBgcICQoL/8QAtRAAAgEDAwI
	|EAwUFBAQAAAF9AQIDAAQRBRIhMUEGE1FhByJxFDKBkaEII0KxwRVS0fAkM2JyggkKFhcYGRolJicoKSo0NTY3ODk6Q0RFRkdISUpTVFVWV1hZWmNkZWZnaGlqc3R1dnd4eXqDhIWGh4iJipKTlJWWl5iZmqKj
	|pKWmp6ipqrKztLW2t7i5usLDxMXGx8jJytLT1NXW19jZ2uHi4+Tl5ufo6erx8vP09fb3+Pn6/8QAHwEAAwEBAQEBAQEBAQAAAAAAAAECAwQFBgcICQoL/8QAtREAAgECBAQDBAcFBAQAAQJ3AAECAxEEBSExB
	|hJBUQdhcRMiMoEIFEKRobHBCSMzUvAVYnLRChYkNOEl8RcYGRomJygpKjU2Nzg5OkNERUZHSElKU1RVVldYWVpjZGVmZ2hpanN0dXZ3eHl6goOEhYaHiImKkpOUlZaXmJmaoqOkpaanqKmqsrO0tba3uLm6ws
	|PExcbHyMnK0tPU1dbX2Nna4uPk5ebn6Onq8vP09fb3+Pn6/9oADAMBAAIRAxEAPwDg";
	СтрРазделитель0 = СтрОбщая + "Phn8NP8AhYv9qf8AE2/s/wCw+V/y7ebv37/9tcY2e/Wu/wD+GZf+pu/8pv8A9to/Zl/5mn/t0/8Aa1e/0AeAf8My/wD
	|U3f8AlN/+20f8My/9Td/5Tf8A7bXv9FAHyh8R/g//AMK/8PW+rf279v8AOu1tvK+yeVjKO27O9v7mMY710Ghfs8/234e0zVv+Eo8n7daRXPlf2fu2b0Dbc+YM4zjOBXX/ALR3/JPNP/7Csf8A6Klr0DwJ/wAk
	|88M/9gq1/wDRS0AeQf8ADMv/AFN3/lN/+20f8My/9Td/5Tf/ALbXv9FAHgH/AAzL/wBTd/5Tf/ttH/DMv/U3f+U3/wC217/RQB4B/wAMy/8AU3f+U3/7bXmPxF8D/wDCA+ILfSv7Q+3edaLc+b5Hl4y7rtxub
	|+5nOe9fZtfMH7Rv/JQtP/7BUf8A6NloA6D9mX/maf8At0/9rV7/AF4B+zL/AMzT/wBun/tavf6ACiiigDx/9o7/AJJ5p/8A2FY//RUtegeBP+SeeGf+wVa/+ilrz/8AaO/5J5p//YVj/wDRUtegeBP+SeeGf+
	|wVa/8AopaAOgooooAKKKKACvmD9o3/AJKFp/8A2Co//RstfT9fMH7Rv/JQtP8A+wVH/wCjZaAOg/Zl/wCZp/7dP/a1e/14B+zL/wAzT/26f+1q9/oAKKKKAPH/ANo7/knmn/8AYVj/APRUtegeBP8Aknnhn/s
	|FWv8A6KWvP/2jv+Seaf8A9hWP/wBFS16B4E/5J54Z/wCwVa/+iloA6CiiigAooooAK+YP2jf+Shaf/wBgqP8A9Gy19P18wftG/wDJQtP/AOwVH/6NloA6D9mX/maf+3T/ANrV7/XgH7Mv/M0/9un/ALWr3+gA
	|ooooA8f/AGjv+Seaf/2FY/8A0VLXoHgT/knnhn/sFWv/AKKWvP8A9o7/AJJ5p/8A2FY//RUtegeBP+SeeGf+wVa/+iloA6CiiigAooooAK+YP2jf+Shaf/2Co/8A0bLX0/XzB+0b/wAlC0//ALBUf/o2WgDgf
	|DXjTxD4P+0/2FqH2T7Xs879zHJu252/fU4xuPT1rf8A+F2fEP8A6GD/AMkrf/43RRQAf8Ls+If/AEMH/klb/wDxuj/hdnxD/wChg/8AJK3/APjdFFAGP4k+Ifirxbp0dhrmqfa7WOUTKn2eJMOAQDlFB6Mfzr
	|QsPi9470zTraws9c8u1tYlhhT7JAdqKAFGSmTgAdaKKALH/C7PiH/0MH/klb//ABuj/hdnxD/6GD/ySt//AI3RRQAf8Ls+If8A0MH/AJJW/wD8bo/4XZ8Q/wDoYP8AySt//jdFFAB/wuz4h/8AQwf+SVv/APG
	|65jxF4o1jxbqEd/rV59quY4hCsnlJHhASQMIAOrH86KKAP//Z";
	СтрРазделитель1 = СтрОбщая + "fhp8Nf8AhYg1T/ibf2f9h8r/AJdvN379/wDtrjGz36133/DMv/U3f+U3/wC20fsy/wDM0/8Abp/7Wr3+gDwD/hmX/qb
	|v/Kb/APbaP+GZf+pu/wDKb/8Aba9/ooA+UfiL8If+EA8P2+rHXPt3nXa23lfZPKxlHbdne39zGMd639D/AGfP7b8P6bqv/CT+T9utIrnyvsG7ZvQNtz5gzjOM4Fdf+0b/AMk90/8A7Csf/oqWu/8AAn/JPPDP
	|/YKtf/RS0AeQ/wDDMv8A1N3/AJTf/ttH/DMv/U3f+U3/AO217/RQB4B/wzL/ANTd/wCU3/7bR/wzL/1N3/lN/wDtte/0UAeAf8My/wDU3f8AlN/+215l8RPBH/CB+ILfSv7Q+2+daLc+b5Hl4y7rtxub+5nOe
	|9fZlfMH7Rv/ACUHT/8AsFR/+jZaAOg/Zl/5mn/t0/8Aa1e/14B+zL/zNP8A26f+1q9/oAKKKKAPH/2jf+Se6f8A9hWP/wBFS13/AIE/5J54Z/7BVr/6KWuA/aN/5J7p/wD2FY//AEVLXf8AgT/knnhn/sFWv/
	|opaAOhooooAKKKKACvmD9o3/koOn/9gqP/ANGy19P18wftG/8AJQdP/wCwVH/6NloAPgZ428O+Dv7e/t7UPsf2r7P5P7mSTdt8zd9xTjG4dfWvX/8Ahdvw8/6GH/ySuP8A43XkHwM8E+HfGP8Ab39vaf8AbPs
	|v2fyf30ke3d5m77jDOdo6+lev/wDCkvh5/wBC9/5O3H/xygA/4Xb8PP8AoYf/ACSuP/jdH/C7fh5/0MP/AJJXH/xuj/hSXw8/6F7/AMnbj/45R/wpL4ef9C9/5O3H/wAcoA83+NXxE8K+LfBtnYaHqn2u6j1B
	|JmT7PLHhBHICcuoHVh+dez+BP+SeeGf+wVa/+ilrxj41fDvwr4S8G2d/oel/ZLqTUEhZ/tEsmUMchIw7EdVH5V7P4E/5J54Z/wCwVa/+iloA6GiiigAooooAK+YP2jf+Sg6f/wBgqP8A9Gy19P18wftG/wDJQ
	|dP/AOwVH/6NloA6D9mX/maf+3T/ANrV7/XgH7Mv/M0/9un/ALWr3+gAooooA8f/AGjf+Se6f/2FY/8A0VLXf+BP+SeeGf8AsFWv/opa4D9o3/knun/9hWP/ANFS13/gT/knnhn/ALBVr/6KWgDoaKKKACiiig
	|Ar5g/aN/5KDp//AGCo/wD0bLX0/XzB+0b/AMlB0/8A7BUf/o2WgDg/DfjPxD4P+0f2HqH2T7XsMv7mOTdtzt++pxjcenrW7/wuv4h/9DB/5J2//wAboooAP+F1/EP/AKGD/wAk7f8A+N0f8Lr+If8A0MH/AJJ
	|2/wD8boooAyPEXxD8U+LbCPT9b1T7XbpKJlQ28SYcAgHKKD0Y/nWhZ/Fzxzpdjb6faa55dtaxLDFH9khOxFACjJTJwAOtFFAE/wDwuv4h/wDQwf8Aknb/APxuj/hdfxD/AOhg/wDJO3/+N0UUAH/C6/iH/wBD
	|B/5J2/8A8bo/4XX8Q/8AoYP/ACTt/wD43RRQAf8AC6/iH/0MH/knb/8Axuua8Q+J9Y8W6jFfazefarmOIQpJ5SR4QEkDCADqT+dFFAH/2Q==";
	СтрРазделитель2 = СтрОбщая + "fhp8Nf8AhYg1T/ibf2f9h8r/AJdvN379/wDtrjGz36133/DMv/U3f+U3/wC20fsy/wDM0/8Abp/7Wr3+gDwD/hmX/qb
	|v/Kb/APbaP+GZf+pu/wDKb/8Aba9/ooA+UfiL8If+EA8P2+rHXPt3nXa23lfZPKxlHbdne39zGMd639D/AGfP7b8P6bqv/CT+T9utIrnyvsG7ZvQNtz5gzjOM4Fdf+0b/AMk90/8A7Csf/oqWu/8AAn/JPPDP
	|/YKtf/RS0AeQ/wDDMv8A1N3/AJTf/ttH/DMv/U3f+U3/AO217/RQB4B/wzL/ANTd/wCU3/7bR/wzL/1N3/lN/wDtte/0UAeAf8My/wDU3f8AlN/+215l8RPBH/CB+ILfSv7Q+2+daLc+b5Hl4y7rtxub+5nOe
	|9fZlfMH7Rv/ACUHT/8AsFR/+jZaAOg/Zl/5mn/t0/8Aa1e/14B+zL/zNP8A26f+1q9/oAKKKKAPH/2jf+Se6f8A9hWP/wBFS13/AIE/5J54Z/7BVr/6KWuA/aN/5J7p/wD2FY//AEVLXf8AgT/knnhn/sFWv/
	|opaAOhooooAKKKKACvmD9o3/koOn/9gqP/ANGy19P18wftG/8AJQdP/wCwVH/6NloA6D9mX/maf+3T/wBrV7/XgH7Mv/M0/wDbp/7Wr3+gAooooA8f/aN/5J7p/wD2FY//AEVLXH6D+zz/AG34e0zVv+Eo8n7
	|daxXPlf2fu2b0Dbc+YM4zjOBXYftG/wDJPdP/AOwrH/6Klrv/AAJ/yTzwz/2CrX/0UtAHkP8AwzL/ANTd/wCU3/7bR/wzL/1N3/lN/wDtte/0UAeAf8My/wDU3f8AlN/+20f8My/9Td/5Tf8A7bXv9FAHgH/D
	|Mv8A1N3/AJTf/tteX/EbwL/wr/xDb6V/aP2/zrVbnzfI8rGWdduNzf3M5z3r7Pr5g/aN/wCSg6f/ANgqP/0bLQB0H7Mv/M0/9un/ALWr3+vAP2Zf+Zp/7dP/AGtXv9ABRRRQB4/+0b/yT3T/APsKx/8AoqWu/
	|wDAn/JPPDP/AGCrX/0UtcB+0b/yT3T/APsKx/8AoqWu/wDAn/JPPDP/AGCrX/0UtAHQ0UUUAFFFFABXzB+0b/yUHT/+wVH/AOjZa+n6+YP2jf8AkoOn/wDYKj/9Gy0AcH4b8Z+IfB/2j+w9Q+yfa9hl/cxybt
	|udv31OMbj09a3f+F1/EP8A6GD/AMk7f/43RRQAf8Lr+If/AEMH/knb/wDxuj/hdfxD/wChg/8AJO3/APjdFFAGR4i+IfinxbYR6freqfa7dJRMqG3iTDgEA5RQejH860LP4ueOdLsbfT7TXPLtrWJYYo/skJ2
	|IoAUZKZOAB1oooAn/AOF1/EP/AKGD/wAk7f8A+N0f8Lr+If8A0MH/AJJ2/wD8boooAP8AhdfxD/6GD/yTt/8A43R/wuv4h/8AQwf+Sdv/APG6KKAD/hdfxD/6GD/yTt//AI3XNeIfE+seLdRivtZvPtVzHEIU
	|k8pI8ICSBhAB1J/OiigD/9k=";
	СтрРазделитель3 = СтрОбщая + "fhp8Nf8AhYg1T/ibf2f9h8r/AJdvN379/wDtrjGz36133/DMv/U3f+U3/wC20fsy/wDM0/8Abp/7Wr3+gDwD/hmX/qb
	|v/Kb/APbaP+GZf+pu/wDKb/8Aba9/ooA+UfiL8If+EA8P2+rHXPt3nXa23lfZPKxlHbdne39zGMd639D/AGfP7b8P6bqv/CT+T9utIrnyvsG7ZvQNtz5gzjOM4Fdf+0b/AMk90/8A7Csf/oqWu/8AAn/JPPDP
	|/YKtf/RS0AeQ/wDDMv8A1N3/AJTf/ttH/DMv/U3f+U3/AO217/RQB4B/wzL/ANTd/wCU3/7bR/wzL/1N3/lN/wDtte/0UAeAf8My/wDU3f8AlN/+215l8RPBH/CB+ILfSv7Q+2+daLc+b5Hl4y7rtxub+5nOe
	|9fZlfMH7Rv/ACUHT/8AsFR/+jZaAOg/Zl/5mn/t0/8Aa1e/14B+zL/zNP8A26f+1q9/oAKKKKAPH/2jf+Se6f8A9hWP/wBFS10ngvxn4WtfAvh63uPEujQzxabbJJHJfxKyMI1BBBbIIPaub/aN/wCSe6f/AN
	|hWP/0VLWX4a+AfhbWfCukapcX+srPe2UNxIsc0QUM6BiBmMnGT6mgD1T/hO/B//Q16H/4MYf8A4qj/AITvwf8A9DXof/gxh/8Aiq8//wCGcfB//QS1z/v/AA//ABqj/hnHwf8A9BLXP+/8P/xqgD0D/hO/B/8
	|A0Neh/wDgxh/+Ko/4Tvwf/wBDXof/AIMYf/iq8/8A+GcfB/8A0Etc/wC/8P8A8ao/4Zx8H/8AQS1z/v8Aw/8AxqgD0D/hO/B//Q16H/4MYf8A4qvnT496tpuseObG40vULS+gXTURpLWZZVDeZIcEqSM4I49x
	|Xpf/AAzj4P8A+glrn/f+H/41XjnxY8Fab4E8U2ul6XPdzQS2S3DNdOrMGLuuBtVRjCjt60Aeifsy/wDM0/8Abp/7Wr3+vAP2Zf8Amaf+3T/2tXv9ABRRRQB4/wDtG/8AJPdP/wCwrH/6Klrv/An/ACTzwz/2C
	|rX/ANFLXAftG/8AJPdP/wCwrH/6KlrL8NfHzwto3hXSNLuLDWWnsrKG3kaOGIqWRApIzIDjI9BQB7pRXj//AA0d4P8A+gbrn/fiH/47R/w0d4P/AOgbrn/fiH/47QB7BRXj/wDw0d4P/wCgbrn/AH4h/wDjtH
	|/DR3g//oG65/34h/8AjtAHsFfMH7Rv/JQdP/7BUf8A6Nlrv/8Aho7wf/0Ddc/78Q//AB2vHPix4103x34ptdT0uC7hgislt2W6RVYsHdsjazDGGHf1oA9E/Zl/5mn/ALdP/a1e/wBeAfsy/wDM0/8Abp/7Wr3
	|+gAooooA8f/aN/wCSe6f/ANhWP/0VLXSeC/Bnha68C+Hri48NaNNPLpts8kklhEzOxjUkklckk965v9o3/knun/8AYVj/APRUtd/4E/5J54Z/7BVr/wCiloAX/hBPB/8A0Kmh/wDguh/+Jo/4QTwf/wBCpof/
	|AILof/ia6CigDn/+EE8H/wDQqaH/AOC6H/4mj/hBPB//AEKmh/8Aguh/+JroKKAOf/4QTwf/ANCpof8A4Lof/ia+dPj3pOm6P45sbfS9PtLGBtNR2jtYViUt5kgyQoAzgDn2FfVdfMH7Rv8AyUHT/wDsFR/+j
	|ZaAOD8N+M/EPg/7R/YeofZPtewy/uY5N23O376nGNx6etbv/C6/iH/0MH/knb//ABuiigA/4XX8Q/8AoYP/ACTt/wD43R/wuv4h/wDQwf8Aknb/APxuiigDI8RfEPxT4tsI9P1vVPtdukomVDbxJhwCAcooPR
	|j+daFn8XPHOl2Nvp9prnl21rEsMUf2SE7EUAKMlMnAA60UUAT/APC6/iH/ANDB/wCSdv8A/G6P+F1/EP8A6GD/AMk7f/43RRQAf8Lr+If/AEMH/knb/wDxuj/hdfxD/wChg/8AJO3/APjdFFAB/wALr+If/Qw
	|f+Sdv/wDG65rxD4n1jxbqMV9rN59quY4hCknlJHhASQMIAOpP50UUAf/Z";
	СтрРазделитель4 = СтрОбщая + "Phn8NP8AhYv9qf8AE2/s/wCw+V/y7ebv37/9tcY2e/Wu/wD+GZf+pu/8pv8A9to/Zl/5mn/t0/8Aa1e/0AeAf8My/wD
	|U3f8AlN/+215/4q+GX/CM/EPRfCn9r/af7T8j/Svs2zy/MlaP7u45xtz1Gc4r6/rwD4p/8nC+Cv8Atx/9K3oAP+GZf+pu/wDKb/8AbaP+GZf+pu/8pv8A9tr3+igDwD/hmX/qbv8Aym//AG2uP+I/wf8A+Ff+
	|HrfVv7d+3+ddrbeV9k8rGUdt2d7f3MYx3r6vrx/9o7/knmn/APYVj/8ARUtAHIaF+zz/AG34e0zVv+Eo8n7daRXPlf2fu2b0Dbc+YM4zjOBWh/wzL/1N3/lN/wDttev+BP8Aknnhn/sFWv8A6KWugoA8A/4Zl
	|/6m7/ym/wD22vMfiL4H/wCEB8QW+lf2h9u860W583yPLxl3Xbjc39zOc96+za+YP2jf+Shaf/2Co/8A0bLQB0H7Mv8AzNP/AG6f+1q9/rwD9mX/AJmn/t0/9rV7/QAV4B8U/wDk4XwV/wBuP/pW9e/18+fFue
	|G1+Pvg+4uJY4YIksnkkkYKqKLpySSeAAO9AH0HRXP/APCd+D/+hr0P/wAGMP8A8VR/wnfg/wD6GvQ//BjD/wDFUAdBXj/7R3/JPNP/AOwrH/6Klr0D/hO/B/8A0Neh/wDgxh/+Kryz4+eJdB1nwLY2+l63pt9
	|Oupxu0drdJKwXypRkhSTjJHPuKAPU/An/ACTzwz/2CrX/ANFLXQVz/gT/AJJ54Z/7BVr/AOilroKACvmD9o3/AJKFp/8A2Co//RstfT9fMH7Rv/JQtP8A+wVH/wCjZaAOg/Zl/wCZp/7dP/a1e/14B+zL/wAz
	|T/26f+1q9/oAK+dPjTpsOs/Gzwxpdw0iwXtva28jRkBgr3MikjIIzg+hr6LrwD4p/wDJwvgr/tx/9K3oA3/+GcfB/wD0Etc/7/w//GqP+GcfB/8A0Etc/wC/8P8A8ar2CigDx/8A4Zx8H/8AQS1z/v8Aw/8Ax
	|quE+LPwm0HwJ4VtdU0u71KaeW9S3ZbqRGUKUdsjainOUHf1r6brx/8AaO/5J5p//YVj/wDRUtAHoHgT/knnhn/sFWv/AKKWugrn/An/ACTzwz/2CrX/ANFLXQUAFfMH7Rv/ACULT/8AsFR/+jZa+n6+YP2jf+
	|Shaf8A9gqP/wBGy0AdB+zL/wAzT/26f+1q9/rwD9mX/maf+3T/ANrV7/QAV4B8U/8Ak4XwV/24/wDpW9e/14B8U/8Ak4XwV/24/wDpW9AHv9FFFABXj/7R3/JPNP8A+wrH/wCipa9grx/9o7/knmn/APYVj/8
	|ARUtAHoHgT/knnhn/ALBVr/6KWugrn/An/JPPDP8A2CrX/wBFLXQUAFfMH7Rv/JQtP/7BUf8A6Nlr6fr5g/aN/wCShaf/ANgqP/0bLQBwPhrxp4h8H/af7C1D7J9r2ed+5jk3bc7fvqcY3Hp61v8A/C7PiH/0
	|MH/klb//ABuiigA/4XZ8Q/8AoYP/ACSt/wD43XP6r418Ra34hste1DUPO1Ox2fZ5/JjXZscuvyqoU4Yk8g0UUAdB/wALs+If/Qwf+SVv/wDG6P8AhdnxD/6GD/ySt/8A43RRQAf8Ls+If/Qwf+SVv/8AG6x/E
	|nxD8VeLdOjsNc1T7XaxyiZU+zxJhwCAcooPRj+dFFAGhYfF7x3pmnW1hZ655draxLDCn2SA7UUAKMlMnAA61Y/4XZ8Q/wDoYP8AySt//jdFFAB/wuz4h/8AQwf+SVv/APG65jxF4o1jxbqEd/rV59quY4hCsn
	|lJHhASQMIAOrH86KKAP//Z";
	СтрРазделитель5 = СтрОбщая + "fhp8Nf8AhYg1T/ibf2f9h8r/AJdvN379/wDtrjGz36133/DMv/U3f+U3/wC20fsy/wDM0/8Abp/7Wr3+gDwD/hmX/qb
	|v/Kb/APba4HxR8M/+Ea+IOjeFRqwuf7T8j/Sfs2zy/MlaP7u45xtz1Gc4r69rwD4p/wDJwngr/tx/9K3oAP8AhmX/AKm7/wApv/22j/hmX/qbv/Kb/wDba9/ooA8A/wCGZf8Aqbv/ACm//ba5D4i/CH/hAPD9
	|vqx1z7d512tt5X2TysZR23Z3t/cxjHevq6vH/wBo3/knun/9hWP/ANFS0Achof7Pn9t+H9N1X/hJ/J+3WkVz5X2Dds3oG258wZxnGcCtD/hmX/qbv/Kb/wDba9e8Cf8AJPPDP/YKtf8A0UtdDQB4B/wzL/1N3
	|/lN/wDtteZfETwR/wAIH4gt9K/tD7b51otz5vkeXjLuu3G5v7mc5719mV8wftG/8lB0/wD7BUf/AKNloA6D9mX/AJmn/t0/9rV7/XgH7Mv/ADNP/bp/7Wr3+gAr5w+OGp/2J8Y/Duq+T532K0trnyt23fsuJG
	|25wcZxjODX0fXgHxRBP7QXgvGP+XH/ANKnoAP+Gmv+pR/8qX/2qj/hpr/qUf8Aypf/AGqvf6KAPAP+Gmv+pR/8qX/2quP+I/xg/wCFgeHrfSv7C+weTdLc+b9r83OEdcY2L/fznPavq+vIP2jB/wAW/wBP6c6
	|rH/6KloA77wJ/yTzwz/2CrX/0UtdDXPeBP+SeeGf+wVa/+ilroaACvmD9o3/koOn/APYKj/8ARstfT9fMH7Rv/JQdP/7BUf8A6NloA6D9mX/maf8At0/9rV7/AF4B+zL/AMzT/wBun/tavf6ACvAPigcftB+C
	|8jj/AELv/wBPT17/AF84fHC6vLH4x+HbzTrf7RfQWltLbw7C/mSLcSFV2ryckAYHJoA+j6K8A/4Wn8X/APoQv/KPd/8AxdH/AAtP4v8A/Qhf+Ue7/wDi6APf68h/aLOPh9YH/qKx/wDoqWue/wCFp/F//oQv/
	|KPd/wDxdcf8R/GnjzxH4et7PxR4Z/suxS6WVJvsE8O6QI4C7pGIPBY468UAfR3gT/knnhn/ALBVr/6KWuhrnvAn/JPPDP8A2CrX/wBFLXQ0AFfMH7Rv/JQdP/7BUf8A6Nlr6fr5g/aN/wCSg6f/ANgqP/0bLQ
	|B0H7Mv/M0/9un/ALWr3+vAP2Zf+Zp/7dP/AGtXv9ABXgHxT/5OE8Ff9uP/AKVvXv8AXgHxT/5OE8Ff9uP/AKVvQB7/AEUUUAFeP/tG/wDJPdP/AOwrH/6Klr2CvH/2jf8Aknun/wDYVj/9FS0Ad/4E/wCSeeG
	|f+wVa/wDopa6Gue8Cf8k88M/9gq1/9FLXQ0AFfMH7Rv8AyUHT/wDsFR/+jZa+n6+YP2jf+Sg6f/2Co/8A0bLQBwfhvxn4h8H/AGj+w9Q+yfa9hl/cxybtudv31OMbj09a3f8AhdfxD/6GD/yTt/8A43RRQAf8
	|Lr+If/Qwf+Sdv/8AG6wdU8b+Ida1+y12/v8AztTstn2efyY12bHLr8qqFOGJPINFFAG9/wALr+If/Qwf+Sdv/wDG6P8AhdfxD/6GD/yTt/8A43RRQAf8Lr+If/Qwf+Sdv/8AG6yPEXxD8U+LbCPT9b1T7XbpK
	|JlQ28SYcAgHKKD0Y/nRRQBoWfxc8c6XY2+n2mueXbWsSwxR/ZITsRQAoyUycADrU/8Awuv4h/8AQwf+Sdv/APG6KKAD/hdfxD/6GD/yTt//AI3XNeIfE+seLdRivtZvPtVzHEIUk8pI8ICSBhAB1J/OiigD/9k=";

	Кнопка1 = Форма1.ЭлементыУправления.Добавить(Ф.Кнопка());
	Кнопка1.Размер = Ф.Размер(100, 75);
	Кнопка1.Верх = Панель13.Верх + 70;
	Кнопка1.Лево = Панель13.Ширина + 20;
	Кнопка1.Изображение = Ф.Картинка(СтрРазделитель0);
	Кнопка1.ВыравниваниеИзображения = Ф.ВыравниваниеСодержимого.СерединаЦентр;
	Кнопка1.Нажатие = Ф.Действие(ЭтотОбъект, "Кнопка1_Нажатие");

	Кнопка2 = Форма1.ЭлементыУправления.Добавить(Ф.Кнопка());
	Кнопка2.Размер = Ф.Размер(100, 75);
	Кнопка2.Верх = Кнопка1.Верх;
	Кнопка2.Лево = Кнопка1.Право + 10;
	Кнопка2.Изображение = Ф.Картинка(СтрРазделитель1);
	Кнопка2.ВыравниваниеИзображения = Ф.ВыравниваниеСодержимого.СерединаЦентр;
	Кнопка2.Нажатие = Ф.Действие(ЭтотОбъект, "Кнопка2_Нажатие");

	Кнопка3 = Форма1.ЭлементыУправления.Добавить(Ф.Кнопка());
	Кнопка3.Размер = Ф.Размер(100, 75);
	Кнопка3.Верх = Кнопка1.Низ + 10;
	Кнопка3.Лево = Кнопка1.Лево;
	Кнопка3.Изображение = Ф.Картинка(СтрРазделитель2);
	Кнопка3.ВыравниваниеИзображения = Ф.ВыравниваниеСодержимого.СерединаЦентр;
	Кнопка3.Нажатие = Ф.Действие(ЭтотОбъект, "Кнопка3_Нажатие");

	Кнопка4 = Форма1.ЭлементыУправления.Добавить(Ф.Кнопка());
	Кнопка4.Размер = Ф.Размер(100, 75);
	Кнопка4.Верх = Кнопка3.Верх;
	Кнопка4.Лево = Кнопка2.Лево;
	Кнопка4.Изображение = Ф.Картинка(СтрРазделитель3);
	Кнопка4.ВыравниваниеИзображения = Ф.ВыравниваниеСодержимого.СерединаЦентр;
	Кнопка4.Нажатие = Ф.Действие(ЭтотОбъект, "Кнопка4_Нажатие");

	Кнопка5 = Форма1.ЭлементыУправления.Добавить(Ф.Кнопка());
	Кнопка5.Размер = Ф.Размер(100, 75);
	Кнопка5.Верх = Кнопка4.Низ + 10;
	Кнопка5.Лево = Кнопка3.Лево;
	Кнопка5.Изображение = Ф.Картинка(СтрРазделитель4);
	Кнопка5.ВыравниваниеИзображения = Ф.ВыравниваниеСодержимого.СерединаЦентр;
	Кнопка5.Нажатие = Ф.Действие(ЭтотОбъект, "Кнопка5_Нажатие");

	Кнопка6 = Форма1.ЭлементыУправления.Добавить(Ф.Кнопка());
	Кнопка6.Размер = Ф.Размер(100, 75);
	Кнопка6.Верх = Кнопка5.Верх;
	Кнопка6.Лево = Кнопка4.Лево;
	Кнопка6.Изображение = Ф.Картинка(СтрРазделитель5);
	Кнопка6.ВыравниваниеИзображения = Ф.ВыравниваниеСодержимого.СерединаЦентр;
	Кнопка6.Нажатие = Ф.Действие(ЭтотОбъект, "Кнопка6_Нажатие");

	Надпись1 = Форма1.ЭлементыУправления.Добавить(Ф.Надпись());
	Надпись1.Текст = "Выберите один из примеров.";
	Надпись1.Размер = Ф.Размер(200, 50);
	Надпись1.Положение = Ф.Точка(Форма1.Ширина - 220, 10);
	Надпись1.Шрифт = Ф.Шрифт(, 10, );
	Надпись1.ВыравниваниеТекста = Ф.ВыравниваниеСодержимого.СерединаЦентр;
	
	Кнопка6_Нажатие() Экспорт;
КонецПроцедуры

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Размер = Ф.Размер(800, 400);
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

Разделитель();

Ф.ЗапуститьОбработкуСобытий();

Разделитель (Splitter) Конструктор

Синтаксис

Параметры

Описание

Примечание

Пример

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