Примеры тестирования всех событий, свойств, методов всех элементов.
cssПуть_ДекларативныеФормы_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СтрНайти(ДФ.cssПуть, "styles.css") > 0
, "", "!!! ") + "ДекларативныеФормы.cssПуть (DeclarativeForms.cssPath) Свойство" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
ДФ.cssПуть = "styles.css";
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Открыть();
cssТекст_Стиль_свойство
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.cssТекст = "
| width: 100px;
| height: 100px;
|"
, "", "!!! ") + "cssТекст_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "cssТекст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Это Абзац";
Стиль1 = ДФ.Стиль();
Стиль1.cssТекст = "
| width: 100px;
| height: 100px;
|";
Абзац1.Стиль.Копировать(Стиль1);
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Форма1.Открыть();
nwПуть_ДекларативныеФормы_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СтрНайти(ДФ.nwПуть, "nw") > 0
, "", "!!! ") + "ДекларативныеФормы.nwПуть (DeclarativeForms.NwPath) Свойство" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Если СтрНайти((Новый СистемнаяИнформация()).ВерсияОС, "Windows") > 0 Тогда
ДФ.nwПуть = ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "nwjs\nw.exe");
Иначе
oscriptПуть = "oscript";
ДФ.nwПуть = ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "nwjslin/nw");
КонецЕсли;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Открыть();
Абсолютное_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().Абсолютное(-1.357) = 1.357
, "", "!!! ") + "Абсолютное_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Открыть();
Авто_Отступ_свойство.os
Перем ДФ, Отступ1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Отступ1.Авто
, "", "!!! ") + "Отступ.Авто (Margin.Auto) Свойство" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 450;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Отступ1 = ДФ.Отступ();
Отступ1.Авто = Истина;
Форма1.Открыть();
АвтоФокус_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.АвтоФокус
, "", "!!! ") + "АвтоФокус_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура ВыборВремени1_Нажатие() Экспорт
Сообщить("ВыборВремени1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборВремени1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборВремени1_Нажатие");
ВыборВремени2 = ДФ.ВыборВремени();
ВыборВремени2.Родитель = Форма1;
ВыборВремени2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборВремени1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.АвтоФокус
, "", "!!! ") + "АвтоФокус_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура ВыборДаты1_Нажатие() Экспорт
Сообщить("ВыборДаты1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборДаты1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_Нажатие");
ВыборДаты2 = ДФ.ВыборДаты();
ВыборДаты2.Родитель = Форма1;
ВыборДаты2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборДаты1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.АвтоФокус
, "", "!!! ") + "АвтоФокус_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура ВыборДатыВремени1_Нажатие() Экспорт
Сообщить("ВыборДатыВремени1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборДатыВремени1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_Нажатие");
ВыборДатыВремени2 = ДФ.ВыборДатыВремени();
ВыборДатыВремени2.Родитель = Форма1;
ВыборДатыВремени2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборДатыВремени1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.АвтоФокус
, "", "!!! ") + "АвтоФокус_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура ВыборМестнойДатыВремени1_Нажатие() Экспорт
Сообщить("ВыборМестнойДатыВремени1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборМестнойДатыВремени1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборМестнойДатыВремени1_Нажатие");
ВыборМестнойДатыВремени2 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени2.Родитель = Форма1;
ВыборМестнойДатыВремени2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборМестнойДатыВремени1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.АвтоФокус
, "", "!!! ") + "АвтоФокус_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура ВыборМесяца1_Нажатие() Экспорт
Сообщить("ВыборМесяца1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборМесяца1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_Нажатие");
ВыборМесяца2 = ДФ.ВыборМесяца();
ВыборМесяца2.Родитель = Форма1;
ВыборМесяца2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборМесяца1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.АвтоФокус
, "", "!!! ") + "АвтоФокус_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура ВыборНедели1_Нажатие() Экспорт
Сообщить("ВыборНедели1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборНедели1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_Нажатие");
ВыборНедели2 = ДФ.ВыборНедели();
ВыборНедели2.Родитель = Форма1;
ВыборНедели2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборНедели1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборФайла1.АвтоФокус
, "", "!!! ") + "АвтоФокус_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура ВыборФайла1_Нажатие() Экспорт
Сообщить("ВыборФайла1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборФайла1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборФайла1_Нажатие");
ВыборФайла2 = ДФ.ВыборФайла();
ВыборФайла2.Родитель = Форма1;
ВыборФайла2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборФайла1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборЦвета1.АвтоФокус
, "", "!!! ") + "АвтоФокус_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборЦвета1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура ВыборЦвета1_Нажатие() Экспорт
Сообщить("ВыборЦвета1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборЦвета1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборЦвета1_Нажатие");
ВыборЦвета2 = ДФ.ВыборЦвета();
ВыборЦвета2.Родитель = Форма1;
ВыборЦвета2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборЦвета1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_Кнопка_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Сообщить(?(
Кнопка1.АвтоФокус
, "", "!!! ") + "АвтоФокус_Кнопка_свойство" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = ДФ.Кнопка();
Кнопка2.Родитель = Форма1;
Кнопка2.Текст = "Это Кнопка2";
Кнопка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Кнопка1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.АвтоФокус
, "", "!!! ") + "АвтоФокус_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура ОбластьТекста1_Нажатие() Экспорт
Сообщить("ОбластьТекста1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОбластьТекста1.Нажатие = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_Нажатие");
ОбластьТекста2 = ДФ.ОбластьТекста();
ОбластьТекста2.Родитель = Форма1;
ОбластьТекста2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ОбластьТекста1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_Переключатель_свойство.os
Перем ДФ, Переключатель1;
Процедура Свойство() Экспорт
Сообщить(?(
Переключатель1.АвтоФокус
, "", "!!! ") + "АвтоФокус_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Переключатель1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Переключатель1_Нажатие() Экспорт
Сообщить("Переключатель1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Переключатель1.Нажатие = ДФ.Действие(ЭтотОбъект, "Переключатель1_Нажатие");
Переключатель2 = ДФ.Переключатель();
Переключатель2.Родитель = Форма1;
Переключатель2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Переключатель1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.АвтоФокус
, "", "!!! ") + "АвтоФокус_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура ПолеПароля1_Нажатие() Экспорт
Сообщить("ПолеПароля1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеПароля1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_Нажатие");
ПолеПароля2 = ДФ.ПолеПароля();
ПолеПароля2.Родитель = Форма1;
ПолеПароля2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеПароля1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.АвтоФокус
, "", "!!! ") + "АвтоФокус_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура ПолеПоиска1_Нажатие() Экспорт
Сообщить("ПолеПоиска1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеПоиска1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_Нажатие");
ПолеПоиска2 = ДФ.ПолеПоиска();
ПолеПоиска2.Родитель = Форма1;
ПолеПоиска2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеПоиска1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.АвтоФокус
, "", "!!! ") + "АвтоФокус_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура ПолеСписка1_Нажатие() Экспорт
Сообщить("ПолеСписка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеСписка1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеСписка1_Нажатие");
ПолеСписка2 = ДФ.ПолеСписка();
ПолеСписка2.Родитель = Форма1;
ПолеСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеСписка1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.АвтоФокус
, "", "!!! ") + "АвтоФокус_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура ПолеТекста1_Нажатие() Экспорт
Сообщить("ПолеТекста1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеТекста1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_Нажатие");
ПолеТекста2 = ДФ.ПолеТекста();
ПолеТекста2.Родитель = Форма1;
ПолеТекста2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеТекста1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.АвтоФокус
, "", "!!! ") + "АвтоФокус_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура ПолеЧисла1_Нажатие() Экспорт
Сообщить("ПолеЧисла1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеЧисла1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_Нажатие");
ПолеЧисла2 = ДФ.ПолеЧисла();
ПолеЧисла2.Родитель = Форма1;
ПолеЧисла2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеЧисла1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.АвтоФокус
, "", "!!! ") + "АвтоФокус_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Ползунок1_Нажатие() Экспорт
Сообщить("Ползунок1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ползунок1.Нажатие = ДФ.Действие(ЭтотОбъект, "Ползунок1_Нажатие");
Ползунок2 = ДФ.Ползунок();
Ползунок2.Родитель = Форма1;
Ползунок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Ползунок1.АвтоФокус = Истина;
Форма1.Открыть();
АвтоФокус_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Свойство() Экспорт
Сообщить(?(
Флажок1.АвтоФокус
, "", "!!! ") + "АвтоФокус_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "АвтоФокус", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Флажок1_Нажатие() Экспорт
Сообщить("Флажок1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Флажок1.Нажатие = ДФ.Действие(ЭтотОбъект, "Флажок1_Нажатие");
Флажок2 = ДФ.Флажок();
Флажок2.Родитель = Форма1;
Флажок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Флажок1.АвтоФокус = Истина;
Форма1.Открыть();
Адрес_Область_свойство.os
Перем ДФ, Область3;
Процедура Свойство() Экспорт
Сообщить(?(
Область3.Адрес <> ""
, "", "!!! ") + "Адрес_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Область3, "Адрес", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Карта1 = ДФ.Карта();
Форма1.ДобавитьДочерний(Карта1);
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
// Изображение1.Источник = "file:///C:/444/~Деклар Форма/maslenica10.jpg";
Изображение1.Источник = "maslenica10.jpg";
Изображение1.ИмяКарты = Карта1.Имя;
Изображение1.Стиль.Ширина = "500";
Изображение1.Стиль.Высота = "500";
Область1 = Карта1.ДобавитьДочерний(ДФ.Область());
Область1.Форма = ДФ.Круг(50, 50, 35);
Область1.Описание = "Это круг";
// Область1.Адрес = "file:///C:/444/~Деклар Форма/Motif.jpg";
Область1.Адрес = "Motif.jpg";
Область2 = Карта1.ДобавитьДочерний(ДФ.Область());
М1 = Новый Массив();
М1.Добавить(ДФ.Точка(100, 100));
М1.Добавить(ДФ.Точка(200, 80));
М1.Добавить(ДФ.Точка(300, 180));
М1.Добавить(ДФ.Точка(180, 220));
Область2.Форма = ДФ.Полигон(М1);
Область2.Описание = "Это Полигон";
// Область2.Адрес = "file:///C:/444/~Деклар Форма/Motif.jpg";
Область2.Адрес = "Motif.jpg";
Область3 = Карта1.ДобавитьДочерний(ДФ.Область());
Область3.Форма = ДФ.Прямоугольник(400, 400, 90, 90);
Область3.Описание = "Это прямоугольник";
// Область3.Адрес = "file:///C:/444/~Деклар Форма/Motif.jpg";
Область3.Адрес = "Motif.jpg";
Форма1.Открыть();
Адрес_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ссылка1.Адрес = "https://oscript.io/"
, "", "!!! ") + "Адрес_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "Адрес", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ссылка1 = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка1.Адрес = "https://oscript.io/";
Ссылка1.Текст = "Инструмент автоматизации для специалистов по 1С";
Форма1.Открыть();
АКосинус_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().АКосинус(0) = 1.5707963267949
, "", "!!! ") + "АКосинус_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Открыть();
Активен_Таймер_свойство.os
Перем ДФ, Таймер1, Кнопка1;
Перем Таймер2, Кнопка3;
Перем Блок1, Блок2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Таймер2.Активен
, "", "!!! ") + "Активен_Таймер_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Таймер1.Начать();
Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Таймер1.Остановить();
Сообщить("Кнопка2_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Блок1.Текст = "Таймер активен = " + Таймер1.Активен;
КонецПроцедуры
Процедура Таймер1_ПриСрабатыванииТаймера() Экспорт
Сообщить("Таймер1_ПриСрабатыванииТаймера");
Если Кнопка1.Стиль.Цветфона = ДФ.Цвет.МорскаяРакушка Тогда
Кнопка1.Стиль.Цветфона = ДФ.Цвет.Красный;
Иначе
Кнопка1.Стиль.Цветфона = ДФ.Цвет.МорскаяРакушка;
КонецЕсли;
Блок1.Текст = "" + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
|Таймер активен = " + Таймер1.Активен;
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
Таймер2.Начать();
Сообщить("Кнопка3_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
Таймер2.Остановить();
Сообщить("Кнопка4_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Блок2.Текст = "Таймер активен = " + Таймер2.Активен;
КонецПроцедуры
Процедура Таймер2_ПриСрабатыванииТаймера() Экспорт
Сообщить("Таймер2_ПриСрабатыванииТаймера");
Если Кнопка3.Стиль.Цветфона = ДФ.Цвет.СветлоСерый Тогда
Кнопка3.Стиль.Цветфона = ДФ.Цвет.СветлыйЗеленоватоГолубой;
Иначе
Кнопка3.Стиль.Цветфона = ДФ.Цвет.СветлоСерый;
КонецЕсли;
Блок2.Текст = "" + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
|Таймер активен = " + Таймер2.Активен;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 400;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Стиль.Высота = 100;
Абзац1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Кнопка1 = Абзац1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Начать";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Абзац1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Остановить";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Блок1 = Абзац1.ДобавитьДочерний(ДФ.Блок());
Таймер1 = ДФ.Таймер();
Таймер1.ПриСрабатыванииТаймера = ДФ.Действие(ЭтотОбъект, "Таймер1_ПриСрабатыванииТаймера");
Таймер1.Интервал = 1000;
Таймер1.Начать();
Абзац2 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац2.Стиль.Высота = 100;
Абзац2.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Кнопка3 = Абзац2.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Начать";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Абзац2.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Остановить";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок2 = Абзац2.ДобавитьДочерний(ДФ.Блок());
Таймер2 = ДФ.Таймер();
Таймер2.ПриСрабатыванииТаймера = ДФ.Действие(ЭтотОбъект, "Таймер2_ПриСрабатыванииТаймера");
Таймер2.Интервал = 1000;
Таймер2.Начать();
Форма1.Открыть();
Альфа_Контекст2d_свойство.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контекст2d1.Альфа = 0.25
, "", "!!! ") + "Альфа_Контекст2d_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Красный;
Контекст2d1.ЗаполнитьПрямоугольник(20, 20, 75, 50);
Контекст2d1.Альфа = 0.25;
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Синий;
Контекст2d1.ЗаполнитьПрямоугольник(50, 50, 75, 50);
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Зеленый;
Контекст2d1.ЗаполнитьПрямоугольник(80, 80, 75, 50);
Форма1.Открыть();
Анимация_Абзац_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Абзац_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Абзац1.Стиль.Ширина = 45;
Абзац1.Стиль.Высота = 45;
Абзац1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Абзац1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Абзац1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Абзац1";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Абзац1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Артикль_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Артикль_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Артикль1 = Форма1.ДобавитьДочерний(ДФ.Артикль());
Артикль1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Артикль1.Стиль.Ширина = 45;
Артикль1.Стиль.Высота = 45;
Артикль1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Артикль1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Артикль1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Артикль1";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Артикль1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Блок_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Блок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Блок1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_ВыборВремени_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_ВыборВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
ВыборВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
ВыборВремени1.Стиль.Ширина = 45;
ВыборВремени1.Стиль.Высота = 45;
ВыборВремени1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
ВыборВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = ВыборВремени1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_ВыборДаты_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_ВыборДаты_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДаты1 = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
ВыборДаты1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
ВыборДаты1.Стиль.Ширина = 45;
ВыборДаты1.Стиль.Высота = 45;
ВыборДаты1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
ВыборДаты1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = ВыборДаты1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_ВыборДатыВремени_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_ВыборДатыВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
ВыборДатыВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
ВыборДатыВремени1.Стиль.Ширина = 45;
ВыборДатыВремени1.Стиль.Высота = 45;
ВыборДатыВремени1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
ВыборДатыВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = ВыборДатыВремени1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_ВыборМестнойДатыВремени_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_ВыборМестнойДатыВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМестнойДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
ВыборМестнойДатыВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
ВыборМестнойДатыВремени1.Стиль.Ширина = 45;
ВыборМестнойДатыВремени1.Стиль.Высота = 45;
ВыборМестнойДатыВремени1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
ВыборМестнойДатыВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = ВыборМестнойДатыВремени1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_ВыборМесяца_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_ВыборМесяца_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМесяца1 = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
ВыборМесяца1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
ВыборМесяца1.Стиль.Ширина = 45;
ВыборМесяца1.Стиль.Высота = 45;
ВыборМесяца1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
ВыборМесяца1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = ВыборМесяца1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_ВыборНедели_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_ВыборНедели_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборНедели1 = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
ВыборНедели1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
ВыборНедели1.Стиль.Ширина = 45;
ВыборНедели1.Стиль.Высота = 45;
ВыборНедели1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
ВыборНедели1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = ВыборНедели1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_ВыборФайла_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_ВыборФайла_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборФайла1 = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
ВыборФайла1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
ВыборФайла1.Стиль.Ширина = 45;
ВыборФайла1.Стиль.Высота = 45;
ВыборФайла1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
ВыборФайла1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = ВыборФайла1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_ВыборЦвета_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_ВыборЦвета_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборЦвета1 = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
ВыборЦвета1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
ВыборЦвета1.Стиль.Ширина = 45;
ВыборЦвета1.Стиль.Высота = 45;
ВыборЦвета1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
ВыборЦвета1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = ВыборЦвета1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Группа_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Группа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Группа1 = Форма1.ДобавитьДочерний(ДФ.Группа());
Группа1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Группа1.Стиль.Ширина = 45;
Группа1.Стиль.Высота = 45;
Группа1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Группа1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Группа1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Группа1";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Группа1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Диалог_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Диалог_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Диалог1 = Форма1.ДобавитьДочерний(ДФ.Диалог());
Диалог1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Диалог1.Стиль.Ширина = 45;
Диалог1.Стиль.Высота = 45;
Диалог1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Диалог1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Диалог1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Диалог1";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Диалог1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_ДополнительныйБлок_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_ДополнительныйДополнительныйБлок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ДополнительныйБлок1 = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
ДополнительныйБлок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
ДополнительныйБлок1.Стиль.Ширина = 45;
ДополнительныйБлок1.Стиль.Высота = 45;
ДополнительныйБлок1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
ДополнительныйБлок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ДополнительныйБлок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "ДополнительныйБлок1";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = ДополнительныйБлок1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Заголовок1_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Заголовок1_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок11 = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок11.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Заголовок11.Стиль.Ширина = 45;
Заголовок11.Стиль.Высота = 45;
Заголовок11.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Заголовок11.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок11.ДобавитьДочерний(ДФ.Абзац()).Текст = "Заголовок11";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Заголовок11.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Заголовок2_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Заголовок2_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок21 = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок21.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Заголовок21.Стиль.Ширина = 45;
Заголовок21.Стиль.Высота = 45;
Заголовок21.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Заголовок21.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок21.ДобавитьДочерний(ДФ.Абзац()).Текст = "Заголовок21";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Заголовок21.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Заголовок3_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Заголовок3_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок31 = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок31.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Заголовок31.Стиль.Ширина = 45;
Заголовок31.Стиль.Высота = 45;
Заголовок31.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Заголовок31.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок31.ДобавитьДочерний(ДФ.Абзац()).Текст = "Заголовок31";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Заголовок31.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Заголовок4_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Заголовок4_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок41 = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Заголовок41.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Заголовок41.Стиль.Ширина = 45;
Заголовок41.Стиль.Высота = 45;
Заголовок41.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Заголовок41.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок41.ДобавитьДочерний(ДФ.Абзац()).Текст = "Заголовок41";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Заголовок41.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Заголовок5_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Заголовок5_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок51 = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Заголовок51.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Заголовок51.Стиль.Ширина = 45;
Заголовок51.Стиль.Высота = 45;
Заголовок51.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Заголовок51.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок51.ДобавитьДочерний(ДФ.Абзац()).Текст = "Заголовок51";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Заголовок51.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Заголовок6_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Заголовок6_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок61 = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Заголовок61.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Заголовок61.Стиль.Ширина = 45;
Заголовок61.Стиль.Высота = 45;
Заголовок61.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Заголовок61.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок61.ДобавитьДочерний(ДФ.Абзац()).Текст = "Заголовок61";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Заголовок61.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Изображение_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Изображение_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Изображение1.Стиль.Ширина = 45;
Изображение1.Стиль.Высота = 45;
Изображение1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Изображение1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Изображение1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Индикатор_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Индикатор_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Индикатор1 = Форма1.ДобавитьДочерний(ДФ.Индикатор());
Индикатор1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Индикатор1.Стиль.Ширина = 45;
Индикатор1.Стиль.Высота = 45;
Индикатор1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Индикатор1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Индикатор1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Кнопка_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Кнопка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Кнопка1.Стиль.Ширина = 45;
Кнопка1.Стиль.Высота = 45;
Кнопка1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Кнопка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кнопка1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Кнопка1";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Кнопка1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Колонтитул_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Колонтитул_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонтитул1 = Форма1.ДобавитьДочерний(ДФ.Колонтитул());
Колонтитул1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Колонтитул1.Стиль.Ширина = 45;
Колонтитул1.Стиль.Высота = 45;
Колонтитул1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Колонтитул1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Колонтитул1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Колонтитул1";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Колонтитул1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Переключатель_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Переключатель_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Переключатель1 = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Переключатель1.Стиль.Ширина = 45;
Переключатель1.Стиль.Высота = 45;
Переключатель1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Переключатель1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Переключатель1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_ПолеПароля_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_ПолеПароля_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПароля1 = Форма1.ДобавитьДочерний(ДФ.ПолеПароля());
ПолеПароля1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
ПолеПароля1.Стиль.Ширина = 45;
ПолеПароля1.Стиль.Высота = 45;
ПолеПароля1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
ПолеПароля1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = ПолеПароля1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_ПолеПоиска_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_ПолеПоиска_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПоиска1 = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
ПолеПоиска1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
ПолеПоиска1.Стиль.Ширина = 45;
ПолеПоиска1.Стиль.Высота = 45;
ПолеПоиска1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
ПолеПоиска1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = ПолеПоиска1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_ПолеСписка_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_ПолеСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеСписка1 = Форма1.ДобавитьДочерний(ДФ.ПолеСписка());
ПолеСписка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
ПолеСписка1.Стиль.Ширина = 45;
ПолеСписка1.Стиль.Высота = 45;
ПолеСписка1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
ПолеСписка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПолеСписка1.ДобавитьДочерний(ДФ.Абзац()).Текст = "ПолеСписка1";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = ПолеСписка1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_ПолеТекста_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_ПолеТекста_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеТекста1 = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
ПолеТекста1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
ПолеТекста1.Стиль.Ширина = 45;
ПолеТекста1.Стиль.Высота = 45;
ПолеТекста1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
ПолеТекста1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = ПолеТекста1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_ПолеЧисла_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_ПолеЧисла_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеЧисла1 = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
ПолеЧисла1.Стиль.Ширина = 45;
ПолеЧисла1.Стиль.Высота = 45;
ПолеЧисла1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
ПолеЧисла1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = ПолеЧисла1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Ползунок_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Ползунок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ползунок1 = Форма1.ДобавитьДочерний(ДФ.Ползунок());
Ползунок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Ползунок1.Стиль.Ширина = 45;
Ползунок1.Стиль.Высота = 45;
Ползунок1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Ползунок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Ползунок1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Стиль_свойство.os
Перем ДФ, Анимация0;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Анимация0 = "ДфСвойстваАнимации"
, "", "!!! ") + "Анимация_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Анимация1 = ДФ.СвойстваАнимации(Кадры1.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок1.Стиль.Анимация = Анимация1;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
Анимация_Флажок_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Флажок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Флажок1 = Форма1.ДобавитьДочерний(ДФ.Флажок());
Флажок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Флажок1.Стиль.Ширина = 45;
Флажок1.Стиль.Высота = 45;
Флажок1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Флажок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Флажок1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Фрейм_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Фрейм_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Фрейм1 = Форма1.ДобавитьДочерний(ДФ.Фрейм());
Фрейм1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Фрейм1.Стиль.Ширина = 45;
Фрейм1.Стиль.Высота = 45;
Фрейм1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Фрейм1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Фрейм1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Фрейм1";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Фрейм1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
Анимация_Шкала_метод.os
Перем ДФ, АнимацияВращение;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + АнимацияВращение = "ДфАнимация"
, "", "!!! ") + "Анимация_Шкала_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Шкала1 = Форма1.ДобавитьДочерний(ДФ.Шкала());
Шкала1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Шкала1.Стиль.Ширина = 45;
Шкала1.Стиль.Высота = 45;
Шкала1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Шкала1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Шкала1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Шкала1";
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Шкала1.Анимация(Кадры1, ПараметрыАнимации1);
Форма1.Открыть();
АргументыСобытия_ДекларативныеФормы_свойство.os
Перем ДФ;
Процедура Кнопка1_Нажатие() Экспорт
АргументыСобытия = ДФ.АргументыСобытия;
Параметр = АргументыСобытия.Параметр;
// Сообщить("Параметр[""Поле1""] = " + Параметр["Поле1"] + " " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Параметр["Поле1"] = "ЧтоТоТам"
, "", "!!! ") + "АргументыСобытия_ДекларативныеФормы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие", Новый Структура("Поле1","ЧтоТоТам"));
// СтрокаФункций сейчас выглядит так:
// ДФ.СтрокаФункций = createElement("button", "dzfzke12lacy");setParent("dzfzke12lacy", "mainForm");setProperty("dzfzke12lacy", "innerText", "Это Кнопка1");setEventListener("dzfzke12lacy", "click");
// createElement("button", "dzfzke12lacy"); - создание кнопки. Первый параметр - тип элемента, второй - уникальное имя элемента, сгенерированное при создании.
// setParent("dzfzke12lacy", "mainForm"); - установка для кнопки родителя. Первый параметр - имя элемента, второй - имя его родителя.
// и так далее.
// Добавим вызов обработчика события Кнопка1_Нажатие, чтобы после загрузки формы у нас автоматически нажалась Кнопка1.
ДФ.СтрокаФункций = ДФ.СтрокаФункций + "sendPost(""" + Кнопка1.КлючЭлемента + "|click"");";
// Сообщить("ДФ.СтрокаФункций = " + ДФ.СтрокаФункций);
// Теперь СтрокаФункций выглядит так:
// ДФ.СтрокаФункций = createElement("button", "dzfzke12lacy");setParent("dzfzke12lacy", "mainForm");setProperty("dzfzke12lacy", "innerText", "Это Кнопка1");setEventListener("dzfzke12lacy", "click");sendPost("dzfzke12lacy|click");
// sendPost("dzfzke12lacy|click"); - Мы добавили функцию вызова обработчика события Кнопка1_Нажатие.
Форма1.Открыть();
АСинус_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().АСинус(0.5) = 0.523598775598299
, "", "!!! ") + "АСинус_Математика_метод" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = ДФ.Математика().АСинус(0.5);
Форма1.Открыть();
Асинхронно_Скрипт_свойство.os
Перем ДФ, Скрипт1;
Процедура Свойство() Экспорт
Сообщить(?(
Не Скрипт1.Асинхронно
, "", "!!! ") + "Асинхронно_Скрипт_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Скрипт1, "Асинхронно", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Скрипт1 = Форма1.ДобавитьДочерний(ДФ.Скрипт());
Скрипт1.Текст = "
|let str;
|str = ""Добавили JavaScript-код"";
|//alert(str);
|";
Скрипт1.Асинхронно = Ложь;
// Сообщить("Скрипт1.Асинхронно = " + Скрипт1.Асинхронно);
Форма1.Открыть();
АТангенс2_Математика_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Форма1.Контент.Текст = "-2.35619449019234
|0.785398163397448"
, "", "!!! ") + "АТангенс2_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().АТангенс2(-1, -1) + "
|" + ДФ.Математика().АТангенс2(1, 1);
Форма1.Открыть();
АТангенс_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().АТангенс(1) = 0.785398163397448
, "", "!!! ") + "АТангенс_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Контент.Текст = ДФ.Математика().АТангенс(1);
Форма1.Открыть();
Бабочка.os
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 800;
Форма1.НачальнаяВысота = 450;
Контент = Форма1.Контент;
Контент.Стиль.Отступ = ДФ.Отступ(0, 0, 0, 0);
Контент.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Контент.Стиль.ФоновоеИзображение = "background32.jpg";
Заголовок1 = Контент.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок1.Текст = "3-D анимация OneScript";
Заголовок1.Стиль.СемействоШрифтов = "Monotype Corsiva,Gabriola,serif";
Заголовок1.Стиль.ЦветТекста = ДФ.Цвет.Кирпичный;
Заголовок1.Стиль.ТеньТекста = ДФ.Тень(3, 3, 0, , ДФ.Цвет.Белый);
Контейнер = Контент.ДобавитьДочерний(ДФ.Блок());
Контейнер.Идентификатор = "контейнер";
Контейнер.Текст = ".";
Контейнер.Стиль.ФоновоеИзображение = "grass.png";
Контейнер.Стиль.МозаикаКартинки = ДФ.МозаикаКартинки.НеПовторять;
Контейнер.Стиль.Перспектива = 600;
Контейнер.Стиль.ИсточникПерспективы = "50% 0%";
Контейнер.Стиль.Ширина = 660;
Контейнер.Стиль.Высота = "100%";
Контейнер.Стиль.Отступ = "50px auto 0";
Бабочка = Контейнер.ДобавитьДочерний(ДФ.Блок());
Бабочка.Текст = ".";
Бабочка.Идентификатор = "бабочка";
Бабочка.Стиль.Позиция = ДФ.Позиция.Относительно;
Бабочка.Стиль.Ширина = 350;
Бабочка.Стиль.Высота = 312;
Массив6 = Новый Массив();
Массив6.Добавить(ДФ.Поворот3Д(0, 1, 0, 0));
Массив6.Добавить(ДФ.Масштаб3Д(0.5, 0.5, 0.5));
Бабочка.Стиль.Сдвиг = Массив6;
Бабочка.Стиль.ТочкаСдвига = "100% 0%"; // Если используем число, то по умолчанию
// измерение устанавливается в пикселях. Но можно через строку задать измерение в пароцентах.
Бабочка.Стиль.СтильСдвига = ДФ.СтильСдвига.Трехмерный;
Кадр1 = ДФ.Стиль();
Массив1 = Новый Массив();
Массив1.Добавить(ДФ.Поворот3Д(0, 1, 0, 0));
Массив1.Добавить(ДФ.Масштаб3Д(0.5, 0.5, 0.5));
Массив1.Добавить(ДФ.Перевод3Д(-150, 300, 0));
Кадр1.Сдвиг = Массив1;
Кадр1.Смещение = 0;
Кадр2 = ДФ.Стиль();
Массив2 = Новый Массив();
Массив2.Добавить(ДФ.Поворот3Д(0, 1, 0, -90));
Массив2.Добавить(ДФ.Масштаб3Д(0.5, 0.5, 0.5));
Массив2.Добавить(ДФ.Перевод3Д(-150, 300, 0));
Кадр2.Сдвиг = Массив2;
Кадр2.Смещение = 0.25;
Кадр3 = ДФ.Стиль();
Массив3 = Новый Массив();
Массив3.Добавить(ДФ.Поворот3Д(0, 1, 0, -180));
Массив3.Добавить(ДФ.Масштаб3Д(0.5, 0.5, 0.5));
Массив3.Добавить(ДФ.Перевод3Д(-150, 300, 0));
Кадр3.Сдвиг = Массив3;
Кадр3.Смещение = 0.5;
Кадр4 = ДФ.Стиль();
Массив4 = Новый Массив();
Массив4.Добавить(ДФ.Поворот3Д(0, 1, 0, -270));
Массив4.Добавить(ДФ.Масштаб3Д(0.5, 0.5, 0.5));
Массив4.Добавить(ДФ.Перевод3Д(-150, 300, 0));
Кадр4.Сдвиг = Массив4;
Кадр4.Смещение = 0.75;
Кадр5 = ДФ.Стиль();
Массив5 = Новый Массив();
Массив5.Добавить(ДФ.Поворот3Д(0, 1, 0, -360));
Массив5.Добавить(ДФ.Масштаб3Д(0.5, 0.5, 0.5));
Массив5.Добавить(ДФ.Перевод3Д(-150, 300, 0));
Кадр5.Сдвиг = Массив5;
Кадр5.Смещение = 1;
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "бабочка";
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Кадры1.Добавить(Кадр5);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Анимация1 = ДФ.СвойстваАнимации(Кадры1.Имя, 5000, ДФ.ФункцияСинхронизации.Линейно, , -1, , , );
Бабочка.Стиль.Анимация = Анимация1;
ЛевоеКрыло = Бабочка.ДобавитьДочерний(ДФ.Блок());
ЛевоеКрыло.Стиль.Позиция = ДФ.Позиция.Абсолютно;
ЛевоеКрыло.Стиль.Лево = 0;
ЛевоеКрыло.Стиль.Верх = 0;
ЛевоеКрыло.Стиль.Ширина = 200;
ЛевоеКрыло.Стиль.Высота = 312;
ЛевоеКрыло.Стиль.ФоновоеИзображение = "butterfly.png";
ЛевоеКрыло.Стиль.МозаикаКартинки = ДФ.МозаикаКартинки.НеПовторять;
Массив7 = Новый Массив();
Массив7.Добавить(ДФ.ПоворотИкс(90));
Массив7.Добавить(ДФ.Поворот3Д(0, 1, 0, 0));
ЛевоеКрыло.Стиль.Сдвиг = Массив7;
ЛевоеКрыло.Стиль.ТочкаСдвига = Бабочка.Стиль.ТочкаСдвига;
Кадр6 = ДФ.Стиль();
Массив9 = Новый Массив();
Массив9.Добавить(ДФ.ПоворотИкс(90));
Массив9.Добавить(ДФ.Поворот3Д(0, 1, 0, 0));
Кадр6.Сдвиг = Массив9;
Кадр6.Смещение = 0;
Кадр7 = ДФ.Стиль();
Массив10 = Новый Массив();
Массив10.Добавить(ДФ.ПоворотИкс(90));
Массив10.Добавить(ДФ.Поворот3Д(0, 1, 0, 80));
Кадр7.Сдвиг = Массив10;
Кадр7.Смещение = 0.5;
Кадр8 = ДФ.Стиль();
Массив11 = Новый Массив();
Массив11.Добавить(ДФ.ПоворотИкс(90));
Массив11.Добавить(ДФ.Поворот3Д(0, 1, 0, 0));
Кадр8.Сдвиг = Массив11;
Кадр8.Смещение = 1;
Кадры2 = ДФ.Кадры();
Кадры2.Имя = "левоекрыло";
Кадры2.Добавить(Кадр6);
Кадры2.Добавить(Кадр7);
Кадры2.Добавить(Кадр8);
Стиль2 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль2.Кадры = Кадры2;
Анимация2 = ДФ.СвойстваАнимации(Кадры2.Имя, 200, ДФ.ФункцияСинхронизации.Линейно, , -1, , , );
ЛевоеКрыло.Стиль.Анимация = Анимация2;
ПравоеКрыло = Бабочка.ДобавитьДочерний(ДФ.Блок());
ПравоеКрыло.Стиль.Позиция = ДФ.Позиция.Абсолютно;
ПравоеКрыло.Стиль.Лево = 175;
ПравоеКрыло.Стиль.Верх = 0;
ПравоеКрыло.Стиль.Ширина = 200;
ПравоеКрыло.Стиль.Высота = 312;
ПравоеКрыло.Стиль.ФоновоеИзображение = "butterfly.png";
ПравоеКрыло.Стиль.МозаикаКартинки = ДФ.МозаикаКартинки.НеПовторять;
Массив7 = Новый Массив();
Массив7.Добавить(ДФ.ПоворотИкс(90));
Массив7.Добавить(ДФ.Перевод3Д(-178, 0, 0));
Массив7.Добавить(ДФ.Поворот3Д(0, 1, 0, 180));
ПравоеКрыло.Стиль.Сдвиг = Массив7;
ПравоеКрыло.Стиль.ТочкаСдвига = Бабочка.Стиль.ТочкаСдвига;
Кадр9 = ДФ.Стиль();
Массив14 = Новый Массив();
Массив14.Добавить(ДФ.ПоворотИкс(90));
Массив14.Добавить(ДФ.Перевод3Д(-178, 0, 0));
Массив14.Добавить(ДФ.Поворот3Д(0, 1, 0, 180));
Кадр9.Сдвиг = Массив14;
Кадр9.Смещение = 0;
Кадр10 = ДФ.Стиль();
Массив12 = Новый Массив();
Массив12.Добавить(ДФ.ПоворотИкс(90));
Массив12.Добавить(ДФ.Перевод3Д(-178, 0, 0));
Массив12.Добавить(ДФ.Поворот3Д(0, 1, 0, 100));
Кадр10.Сдвиг = Массив12;
Кадр10.Смещение = 0.5;
Кадр11 = ДФ.Стиль();
Массив13 = Новый Массив();
Массив13.Добавить(ДФ.ПоворотИкс(90));
Массив13.Добавить(ДФ.Перевод3Д(-178, 0, 0));
Массив13.Добавить(ДФ.Поворот3Д(0, 1, 0, 180));
Кадр11.Сдвиг = Массив13;
Кадр11.Смещение = 1;
Кадры3 = ДФ.Кадры();
Кадры3.Имя = "правоекрыло";
Кадры3.Добавить(Кадр9);
Кадры3.Добавить(Кадр10);
Кадры3.Добавить(Кадр11);
Стиль3 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль3.Кадры = Кадры3;
Анимация3 = ДФ.СвойстваАнимации(Кадры3.Имя, 200, ДФ.ФункцияСинхронизации.Линейно, , -1, , , );
ПравоеКрыло.Стиль.Анимация = Анимация3;
Форма1.Открыть();
Бабочка_css.os
//== Файл Стартовый.os == начало
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
ДФ.cssПуть = "butterfly.css";
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 800;
Форма1.НачальнаяВысота = 450;
Заголовок1 = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок1.Текст = "3-D анимация OneScript";
Контейнер = Форма1.ДобавитьДочерний(ДФ.Блок());
Контейнер.Идентификатор = "контейнер";
Бабочка = Контейнер.ДобавитьДочерний(ДФ.Блок());
Бабочка.Идентификатор = "бабочка";
ЛевоеКрыло = Бабочка.ДобавитьДочерний(ДФ.Блок());
ЛевоеКрыло.Идентификатор = "левоекрыло";
ПравоеКрыло = Бабочка.ДобавитьДочерний(ДФ.Блок());
ПравоеКрыло.Идентификатор = "правоекрыло";
Форма1.Открыть();
//== Файл Стартовый.os == конец
// // //== Файл butterfly.css == начало
// // body {
// // margin: 0;
// // text-align: center;
// // background: url(background32.jpg);
// // }
// // h1 {
// // font-family: Monotype Corsiva,Gabriola,serif;
// // color: #D72F2C;
// // text-shadow: 2px 2px 0 #D9D9D9, 4px 4px 0 white;
// // }
// // #контейнер {
// // background: url(grass.png);
// // background-repeat: no-repeat;
// // perspective: 600px;
// // perspective-origin: 50% 0%;
// // width: 660px;
// // height: 100%;
// // margin: 50px auto 0;
// // }
// // #бабочка {
// // position: relative;
// // width: 350px;
// // height: 312px;
// // transform: rotate3d(0, 1, 0, 0deg) scale3d(0.5, 0.5, 0.5);
// // transform-origin: 100% 0%;
// // transform-style: preserve-3d;
// // animation: butterfly 5s linear infinite;
// // }
// // #левоекрыло {
// // position: absolute;
// // left: 0px;
// // top: 0px;
// // width: 200px;
// // height: 312px;
// // background-image: url(butterfly.png);
// // background-repeat: no-repeat;
// // transform: rotateX(90deg) rotate3d(0, 1, 0, 0deg);
// // transform-origin: inherit;
// // animation: левоекрыло 0.2s linear infinite;
// // }
// // #правоекрыло {
// // position: absolute;
// // left: 175px;
// // top: 0px;
// // width: 200px;
// // height: 312px;
// // background-image: url(butterfly.png);
// // background-repeat: no-repeat;
// // transform: rotateX(90deg) translate3d(-178px, 0, 0) rotate3d(0, 1, 0, 180deg);
// // transform-origin: inherit;
// // animation: правоекрыло 0.2s linear infinite;
// // }
// // @keyframes butterfly {
// // from { transform: rotate3d(0, 1, 0, 0deg) scale3d(0.5, 0.5, 0.5) translate3d(-150px, 300px, 0); }
// // 25% { transform: rotate3d(0, 1, 0, -90deg) scale3d(0.5, 0.5, 0.5) translate3d(-150px, 300px, 0); }
// // 50% { transform: rotate3d(0, 1, 0, -180deg) scale3d(0.5, 0.5, 0.5) translate3d(-150px, 300px, 0); }
// // 75% { transform: rotate3d(0, 1, 0, -270deg) scale3d(0.5, 0.5, 0.5) translate3d(-150px, 300px, 0); }
// // to { transform: rotate3d(0, 1, 0, -360deg) scale3d(0.5, 0.5, 0.5) translate3d(-150px, 300px, 0); }
// // }
// // @keyframes правоекрыло {
// // from { transform: rotateX(90deg) translate3d(-178px, 0, 0) rotate3d(0, 1, 0, 180deg); }
// // 50% { transform: rotateX(90deg) translate3d(-178px, 0, 0) rotate3d(0, 1, 0, 100deg); }
// // to { transform: rotateX(90deg) translate3d(-178px, 0, 0) rotate3d(0, 1, 0, 180deg); }
// // }
// // @keyframes левоекрыло {
// // from { transform: rotateX(90deg) rotate3d(0, 1, 0, 0deg); }
// // 50% { transform: rotateX(90deg) rotate3d(0, 1, 0, 80deg); }
// // to { transform: rotateX(90deg) rotate3d(0, 1, 0, 00deg); }
// // }
// // //== Файл butterfly.css == конец
БазоваяДлина_Стиль_свойство.os
Перем ДФ, Блок2;
Процедура БазоваяДлина() Экспорт
Сообщить(?(
Блок2.Стиль.БазоваяДлина = 200
, "", "!!! ") + "БазоваяДлина_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок2.Стиль, "БазоваяДлина", ДФ.Действие(ЭтотОбъект, "БазоваяДлина"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент1 = Форма1.Контент;
Контент1.Стиль.Ширина = 350;
Контент1.Стиль.Высота = 100;
Контент1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет(195, 195, 195));
Контент1.Стиль.Отображать = ДФ.Отображать.Гибкий;
Стиль1 = ДФ.Стиль();
Стиль1.Увеличение = 0;
Стиль1.Уменьшение = 0;
Стиль1.БазоваяДлина = 40;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль= Стиль1;
Блок1.Текст= "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.СветлоКоралловый;
Блок2 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль= Стиль1;
Блок2.Текст= "Блок2";
Блок2.Стиль.ЦветФона = ДФ.Цвет.НебесноГолубойСветлый;
Блок2.Стиль.БазоваяДлина = 200;
Форма1.Открыть();
БазоваяЛинияТекста_Контекст2d_свойство.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Контекст2d1.БазоваяЛинияТекста = ДФ.БазоваяЛинияТекста.Низ;
Сообщить(?(
Контекст2d1.БазоваяЛинияТекста = ДФ.БазоваяЛинияТекста.Низ
, "", "!!! ") + "БазоваяЛинияТекста_Контекст2d_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 700;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 600;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.СтильОбводки = ДФ.Цвет.Красный;
Контекст2d1.ПерейтиКТочке(5, 100);
Контекст2d1.Линия(595, 100);
Контекст2d1.Начертить();
Контекст2d1.Шрифт = ДФ.Шрифт(, , , 20, , "Arial");
Контекст2d1.БазоваяЛинияТекста = ДФ.БазоваяЛинияТекста.Верх;
Контекст2d1.ЗаполнитьТекст("Верх", 5, 100);
Контекст2d1.БазоваяЛинияТекста = ДФ.БазоваяЛинияТекста.Низ;
Контекст2d1.ЗаполнитьТекст("Низ", 50, 100);
Контекст2d1.БазоваяЛинияТекста = ДФ.БазоваяЛинияТекста.Середина;
Контекст2d1.ЗаполнитьТекст("Середина", 120, 100);
Контекст2d1.БазоваяЛинияТекста = ДФ.БазоваяЛинияТекста.Алфавит;
Контекст2d1.ЗаполнитьТекст("Алфавит", 190, 100);
Контекст2d1.БазоваяЛинияТекста = ДФ.БазоваяЛинияТекста.Висячая;
Контекст2d1.ЗаполнитьТекст("Висячая", 290, 100);
Контекст2d1.БазоваяЛинияТекста = ДФ.БазоваяЛинияТекста.Идеографическая;
Контекст2d1.ЗаполнитьТекст("Идеографическая", 390, 100);
Форма1.Открыть();
Беззвучно_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Аудио1.Беззвучно
, "", "!!! ") + "Беззвучно_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "Беззвучно", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
// Аудио1.Источник = "file:///C:/444/Pic/Kaoma_Lambada.mp3";
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Беззвучно = Истина;
// Сообщить("Аудио1.Беззвучно = " + Аудио1.Беззвучно);
Форма1.Открыть();
Большее_Математика_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Форма1.Контент.Текст = "10"
, "", "!!! ") + "Большее_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().Большее(10, 3);
Форма1.Открыть();
Бросить_Абзац_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_Абзац_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.Абзац());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Перенос());
Цель = Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_Артикль_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_Артикль_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.Артикль());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Перенос());
Цель = Форма1.ДобавитьДочерний(ДФ.Артикль());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_Блок_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_Блок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.Блок());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Перенос());
Цель = Форма1.ДобавитьДочерний(ДФ.Блок());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_Группа_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_Группа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.Группа());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Перенос());
Цель = Форма1.ДобавитьДочерний(ДФ.Группа());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_Диалог_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_Диалог_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.Диалог());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Источник.Показать();
Форма1.ДобавитьДочерний(ДФ.Перенос());
Цель = Форма1.ДобавитьДочерний(ДФ.Диалог());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Цель.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Цель.Стиль.Верх = 150;
Цель.Показать();
Форма1.Открыть();
Бросить_ДополнительныйБлок_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_ДополнительныйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Перенос());
Цель = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_ЖирныйТекст_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_ЖирныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_Заголовок1_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_Заголовок1_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Перенос());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_Заголовок2_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_Заголовок2_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Перенос());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_Заголовок3_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_Заголовок3_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Перенос());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_Заголовок4_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_Заголовок4_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Перенос());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_Заголовок5_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_Заголовок5_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Перенос());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_Заголовок6_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_Заголовок6_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Перенос());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_Кнопка_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_Кнопка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_КурсивТекст_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_КурсивТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_МаркированныйТекст_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_МаркированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_МелкийТекст_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_МелкийТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_НадстрочныйТекст_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_НадстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_НаправленныйТекст_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_НаправленныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_ОбластьТекста_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_ОбластьТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Перенос());
Цель = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_ПодстрочныйТекст_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_ПодстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_ПодчеркнутыйТекст_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_ПодчеркнутыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_РаскрываемыйБлок_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_РаскрываемыйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_Результат_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_Результат_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.Результат());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Результат());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_Ссылка_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_Ссылка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_Таблица_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_Таблица_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.Таблица());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Перенос());
Цель = Форма1.ДобавитьДочерний(ДФ.Таблица());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_УдаленыйТекст_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_УдаленыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_ФорматированныйТекст_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_ФорматированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Перенос());
Цель = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
Бросить_Шкала_событие.os
Перем ДФ, Цель, Источник;
Процедура Бросить() Экспорт
ДФ.АргументыСобытия.Отправитель.ДобавитьДочерний(Источник);
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "Бросить_Шкала_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Источник = Форма1.ДобавитьДочерний(ДФ.Шкала());
Источник.Перетаскиваемый = Истина;
Форма1.ДобавитьДочерний(ДФ.Перенос());
Цель = Форма1.ДобавитьДочерний(ДФ.Шкала());
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.Бросить = ДФ.Действие(ЭтотОбъект, "Бросить");
Форма1.Открыть();
ВариантШрифта_ОкноСообщений_свойство.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОкноСообщений1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные
, "", "!!! ") + "ВариантШрифта_ОкноСообщений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.Показать();
Форма1.Открыть();
ВариантШрифта_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура ВариантШрифта() Экспорт
Сообщить(?(
Абзац1.Стиль.ВариантШрифта = ДФ.ВариантШрифта.Нормальный
, "", "!!! ") + "ВариантШрифта_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ВариантШрифта", ДФ.Действие(ЭтотОбъект, "ВариантШрифта"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шрифт1 = ДФ.Шрифт();
Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
Шрифт1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
// Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
Шрифт1.РазмерШрифта = 20;
Шрифт1.ВысотаСтроки = 50;
Шрифт1.СемействоШрифтов = "arial,serif";
Абзац1.Стиль.Шрифт = Шрифт1;
Абзац1.Стиль.ВариантШрифта = ДФ.ВариантШрифта.Нормальный;
Форма1.Открыть();
ВариантШрифта_Уведомления_свойство.os
Перем ДФ, Уведомления1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Уведомления1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные
, "", "!!! ") + "ВариантШрифта_Уведомления_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
Уведомления1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
Уведомления1.Показать();
Форма1.Открыть();
ВариантШрифта_Шрифт_свойство.os
Перем ДФ, Шрифт1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Шрифт1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные
, "", "!!! ") + "ВариантШрифта_Шрифт_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шрифт1 = ДФ.Шрифт();
Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
Шрифт1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
Шрифт1.РазмерШрифта = 20;
Шрифт1.ВысотаСтроки = 50;
Шрифт1.СемействоШрифтов = "arial,serif";
Абзац1.Стиль.Шрифт = Шрифт1;
Форма1.Открыть();
ВвестиГлобальноеСвойство_ДекларативныеФормы_метод.os
Перем ДФ, Структура1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Структура1.Число = 513
, "", "!!! ") + "ВвестиГлобальноеСвойство_ДекларативныеФормы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
//== Файл Стартовый.os == начало
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Структура1 = Новый Структура();
Структура1.Вставить("Строка", "Моя строка");
Структура1.Вставить("Число", 256);
ДФ.ВвестиГлобальноеСвойство(Структура1, "МояСтруктура", Ложь);
Путь = Новый Файл(СтартовыйСценарий().Источник).Путь;
Сценарии = ДФ.ЗагрузитьСценарии(ОбъединитьПути(Путь, "ДопСценарии" + ПолучитьРазделительПути() + "Парсер2"));
Действие = ДФ.Действие(Сценарии.Парсер2, "МояФункцияИзПарсер");
ДФ.Выполнить(Действие);
Форма1.Открыть();
//== Файл Стартовый.os == конец
// // // //== Файл .\ДопСценарии\Парсер2.os == начало
// // // Процедура МояФункцияИзПарсер() Экспорт
// // // Для Каждого эл Из МояСтруктура Цикл
// // // // Сообщить("Ключ = " + эл.Ключ + " Значение = " + эл.Значение);
// // // КонецЦикла;
// // // МояСтруктура.Число = 513;
// // // КонецПроцедуры
// // // //== Файл .\ДопСценарии\Парсер2.os == конец
Ввод_ВыборВремени_событие.os
Перем ДФ, ВыборВремени1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборВремени1.Ввод.ИмяМетода = "ВыборВремени1_Ввод"
, "", "!!! ") + "Ввод_ВыборВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборВремени1_Ввод() Экспорт
Сообщить("ВыборВремени1_Ввод");
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Ввод = ДФ.Действие(ЭтотОбъект, "ВыборВремени1_Ввод");
Форма1.Открыть();
Ввод_ВыборДаты_событие.os
Перем ДФ, ВыборДаты1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборДаты1.Ввод.ИмяМетода = "ВыборДаты1_Ввод"
, "", "!!! ") + "Ввод_ВыборДаты_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборДаты1_Ввод() Экспорт
Сообщить("ВыборДаты1_Ввод");
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Ввод = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_Ввод");
Форма1.Открыть();
Ввод_ВыборДатыВремени_событие.os
Перем ДФ, ВыборДатыВремени1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборДатыВремени1.Ввод.ИмяМетода = "ВыборДатыВремени1_Ввод"
, "", "!!! ") + "Ввод_ВыборДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборДатыВремени1_Ввод() Экспорт
Сообщить("ВыборДатыВремени1_Ввод");
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Ввод = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_Ввод");
Форма1.Открыть();
Ввод_ВыборМестнойДатыВремени_событие.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Ввод.ИмяМетода = "ВыборМестнойДатыВремени1_Ввод"
, "", "!!! ") + "Ввод_ВыборМестнойДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборМестнойДатыВремени1_Ввод() Экспорт
Сообщить("ВыборМестнойДатыВремени1_Ввод");
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Ввод = ДФ.Действие(ЭтотОбъект, "ВыборМестнойДатыВремени1_Ввод");
Форма1.Открыть();
Ввод_ВыборМесяца_событие.os
Перем ДФ, ВыборМесяца1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборМесяца1.Ввод.ИмяМетода = "ВыборМесяца1_Ввод"
, "", "!!! ") + "Ввод_ВыборМесяца_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборМесяца1_Ввод() Экспорт
Сообщить("ВыборМесяца1_Ввод");
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Ввод = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_Ввод");
Форма1.Открыть();
Ввод_ВыборНедели_событие.os
Перем ДФ, ВыборНедели1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборНедели1.Ввод.ИмяМетода = "ВыборНедели1_Ввод"
, "", "!!! ") + "Ввод_ВыборНедели_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборНедели1_Ввод() Экспорт
Сообщить("ВыборНедели1_Ввод");
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Ввод = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_Ввод");
Форма1.Открыть();
Ввод_ВыборЦвета_событие.os
Перем ДФ, ВыборЦвета1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборЦвета1.Ввод.ИмяМетода = "ВыборЦвета1_Ввод"
, "", "!!! ") + "Ввод_ВыборЦвета_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборЦвета1_Ввод() Экспорт
Сообщить("ВыборЦвета1_Ввод");
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.Значение = ДФ.Цвет.Бирюзовый;
ВыборЦвета1.Ввод = ДФ.Действие(ЭтотОбъект, "ВыборЦвета1_Ввод");
Форма1.Открыть();
Ввод_ОбластьТекста_событие.os
Перем ДФ, ОбластьТекста1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОбластьТекста1.Ввод.ИмяМетода = "ОбластьТекста1_Ввод"
, "", "!!! ") + "Ввод_ОбластьТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ОбластьТекста1_Ввод() Экспорт
Сообщить("ОбластьТекста1_Ввод");
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Значение = "85";
ОбластьТекста1.Ввод = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_Ввод");
Форма1.Открыть();
Ввод_Переключатель_событие.os
Перем ДФ, Переключатель1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Переключатель1.Ввод.ИмяМетода = "Переключатель1_Ввод"
, "", "!!! ") + "Ввод_Переключатель_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Переключатель1_Ввод() Экспорт
Сообщить("Переключатель1_Ввод");
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Переключатель1 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель1.Имя = "Цвет";
Переключатель1.Ввод = ДФ.Действие(ЭтотОбъект, "Переключатель1_Ввод");
Переключатель2 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель2.Имя = "Цвет";
Переключатель2.Ввод = ДФ.Действие(ЭтотОбъект, "Переключатель1_Ввод");
Переключатель3 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель3.Имя = "Цвет";
Переключатель3.Ввод = ДФ.Действие(ЭтотОбъект, "Переключатель1_Ввод");
Форма1.Открыть();
Ввод_Подпись_событие.os
Перем ДФ, Подпись1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Подпись1.Ввод.ИмяМетода = "Подпись1_Ввод"
, "", "!!! ") + "Ввод_Подпись_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Подпись1_Ввод() Экспорт
Сообщить("Подпись1_Ввод");
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Это Подпись";
Подпись1.Ввод = ДФ.Действие(ЭтотОбъект, "Подпись1_Ввод");
Форма1.Открыть();
Ввод_ПолеПароля_событие.os
Перем ДФ, ПолеПароля1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеПароля1.Ввод.ИмяМетода = "ПолеПароля1_Ввод"
, "", "!!! ") + "Ввод_ПолеПароля_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПолеПароля1_Ввод() Экспорт
Сообщить("ПолеПароля1_Ввод");
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Значение = "85";
ПолеПароля1.Ввод = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_Ввод");
Форма1.Открыть();
Ввод_ПолеПоиска_событие.os
Перем ДФ, ПолеПоиска1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеПоиска1.Ввод.ИмяМетода = "ПолеПоиска1_Ввод"
, "", "!!! ") + "Ввод_ПолеПоиска_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПолеПоиска1_Ввод() Экспорт
Сообщить("ПолеПоиска1_Ввод");
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Значение = "85";
ПолеПоиска1.Ввод = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_Ввод");
Форма1.Открыть();
Ввод_ПолеСписка_событие.os
Перем ДФ, ПолеСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеСписка1.Ввод.ИмяМетода = "ПолеСписка1_Ввод"
, "", "!!! ") + "Ввод_ПолеСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПолеСписка1_Ввод() Экспорт
Сообщить("ПолеСписка1_Ввод");
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Ширина = 150;
ПолеСписка1.Ввод = ДФ.Действие(ЭтотОбъект, "ПолеСписка1_Ввод");
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = ПолеСписка1;
ГруппировкаПоляСписка1.Надпись = "Жители деревни Простоквашино";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка1.Значение = "Кот";
ЭлементПоляСписка1.Текст = "Матроскин";
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Пёс";
ЭлементПоляСписка2.Текст = "Шарик";
ЭлементПоляСписка3 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка3.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка3.Значение = "Птица";
ЭлементПоляСписка3.Текст = "Галчонок";
Форма1.Открыть();
Ввод_ПолеТекста_событие.os
Перем ДФ, ПолеТекста1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеТекста1.Ввод.ИмяМетода = "ПолеТекста1_Ввод"
, "", "!!! ") + "Ввод_ПолеТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПолеТекста1_Ввод() Экспорт
Сообщить("ПолеТекста1_Ввод");
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Значение = "Поле текста";
ПолеТекста1.Ввод = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_Ввод");
Форма1.Открыть();
Ввод_ПолеЧисла_событие.os
Перем ДФ, Результат1, Ползунок1, ПолеЧисла1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеЧисла1.Ввод.ИмяМетода = "ПолеЧисла1_Ввод"
, "", "!!! ") + "Ввод_ПолеЧисла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Ползунок1_Ввод() Экспорт
Результат1.Значение = ДФ.АргументыСобытия.Значение + ПолеЧисла1.Значение;
КонецПроцедуры
Процедура ПолеЧисла1_Ввод() Экспорт
Результат1.Значение = ДФ.АргументыСобытия.Значение + Ползунок1.Значение;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
Подпись1 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Текст = "0";
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Значение = 85;
Ползунок1.Ввод = ДФ.Действие(ЭтотОбъект, "Ползунок1_Ввод");
Подпись2 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись2.Текст = "100 + ";
ПолеЧисла1 = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Значение = 20;
ПолеЧисла1.Ввод = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_Ввод");
Подпись3 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись3.Текст = " = ";
Результат1 = Форма1.ДобавитьДочерний(ДФ.Результат());
Результат1.Значение = Ползунок1.Значение + ПолеЧисла1.Значение;
Форма1.Открыть();
Ввод_Ползунок_событие.os
Перем ДФ, Результат1, Ползунок1, ПолеЧисла1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Ползунок1.Ввод.ИмяМетода = "Ползунок1_Ввод"
, "", "!!! ") + "Ввод_Ползунок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Ползунок1_Ввод() Экспорт
Результат1.Значение = ДФ.АргументыСобытия.Значение + ПолеЧисла1.Значение;
КонецПроцедуры
Процедура ПолеЧисла1_Ввод() Экспорт
Результат1.Значение = ДФ.АргументыСобытия.Значение + Ползунок1.Значение;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
Подпись1 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Текст = "0";
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Значение = 85;
Ползунок1.Ввод = ДФ.Действие(ЭтотОбъект, "Ползунок1_Ввод");
Подпись2 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись2.Текст = "100 + ";
ПолеЧисла1 = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Значение = 20;
ПолеЧисла1.Ввод = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_Ввод");
Подпись3 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись3.Текст = " = ";
Результат1 = Форма1.ДобавитьДочерний(ДФ.Результат());
Результат1.Значение = Ползунок1.Значение + ПолеЧисла1.Значение;
Форма1.Открыть();
Ввод_Флажок_событие.os
Перем ДФ, Флажок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Флажок1.Ввод.ИмяМетода = "Флажок1_Ввод"
, "", "!!! ") + "Ввод_Флажок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Флажок1_Ввод() Экспорт
Сообщить("Флажок1_Ввод");
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Значение = 85;
Флажок1.Ввод = ДФ.Действие(ЭтотОбъект, "Флажок1_Ввод");
Форма1.Открыть();
Величина_Тень_свойство.os
Перем ДФ, Тень1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Тень1.Величина = 10
, "", "!!! ") + "Величина_Тень_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Блок1";
Блок1.Стиль.Высота = 100;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Отступ = ДФ.Отступ(50, 50, 50, 50);
Тень1 = ДФ.Тень();
Тень1.Икс = 30;
Тень1.Игрек = 20;
Тень1.Размытие = 8;
Тень1.Величина = 10;
Тень1.Цвет = ДФ.Цвет.Серебристый;
Блок1.Стиль.Тень = Тень1;
Форма1.Открыть();
ВертикальноеВыравнивание_Стиль_свойство.os
Перем ДФ, Блок3;
Процедура ВертикальноеВыравнивание() Экспорт
Сообщить(?(
Блок3.Стиль.ВертикальноеВыравнивание = "-35px"
, "", "!!! ") + "ВертикальноеВыравнивание_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок3.Стиль, "ВертикальноеВыравнивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеВыравнивание"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Шрифт = ДФ.Шрифт(ДФ.СтильШрифта.Курсив, ДФ.ВариантШрифта.МаленькиеЗаглавные, ДФ.ЖирностьШрифта.Жирный, 20, 50, "arial,serif");
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Отображать = ДФ.Отображать.ВстроенныйБлок;
Блок2.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок2.Текст = "Текст до...";
Блок3 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок3.Стиль.Отображать = ДФ.Отображать.ВстроенныйБлок;
// Блок3.Стиль.ВертикальноеВыравнивание = ДФ.ВертикальноеВыравнивание.Верх;
// Блок3.Стиль.ВертикальноеВыравнивание = ДФ.ВертикальноеВыравнивание.Низ;
Блок3.Стиль.ВертикальноеВыравнивание = -35;
Блок3.Стиль.Ширина = 15;
Блок3.Стиль.Высота = 15;
Блок3.Стиль.ЦветФона = ДФ.Цвет.Красный;
Блок4 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок4.Стиль.Отображать = ДФ.Отображать.ВстроенныйБлок;
Блок4.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок4.Текст = "Текст после...";
Форма1.Открыть();
ВертикальноеПрокручивание_Артикль_свойство.os
Перем Артикль1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Артикль1.ГоризонтальноеПрокручивание = Артикль1.ГоризонтальноеПрокручивание + 5;
Артикль1.ВертикальноеПрокручивание = Артикль1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
Артикль1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Артикль1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
// Само изменение значений должно происходить в обработчике назначенном методом ПолучитьСвойство
ДФ.ПолучитьСвойство(Артикль1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Артикль1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Стиль1 = Артикль1.Стиль;
Артикль1.Стиль.Высота = 250;
Артикль1.Стиль.Ширина = 250;
Артикль1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Артикль1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Артикль2 = ДФ.Артикль();
Артикль2.Родитель = Артикль1;
Артикль2.Стиль.Высота = 850;
Артикль2.Стиль.Ширина = 950;
Артикль2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Артикль2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_Блок_свойство.os
Перем Блок1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Блок1.ГоризонтальноеПрокручивание = Блок1.ГоризонтальноеПрокручивание + 5;
Блок1.ВертикальноеПрокручивание = Блок1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
Блок1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Блок1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Блок1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Блок2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_Группа_свойство.os
Перем Группа1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Группа1.ГоризонтальноеПрокручивание = Группа1.ГоризонтальноеПрокручивание + 5;
Группа1.ВертикальноеПрокручивание = Группа1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
Группа1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Группа1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Группа1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Группа1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Стиль1 = Группа1.Стиль;
Группа1.Стиль.Высота = 250;
Группа1.Стиль.Ширина = 250;
Группа1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Группа1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Группа2 = ДФ.Группа();
Группа2.Родитель = Группа1;
Группа2.Стиль.Высота = 850;
Группа2.Стиль.Ширина = 950;
Группа2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Группа2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_ДополнительныйБлок_свойство.os
Перем ДополнительныйБлок1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
ДополнительныйБлок1.ГоризонтальноеПрокручивание = ДополнительныйБлок1.ГоризонтальноеПрокручивание + 5;
ДополнительныйБлок1.ВертикальноеПрокручивание = ДополнительныйБлок1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
ДополнительныйБлок1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_ДополнительныйДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
Стиль1 = ДополнительныйБлок1.Стиль;
ДополнительныйБлок1.Стиль.Высота = 250;
ДополнительныйБлок1.Стиль.Ширина = 250;
ДополнительныйБлок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
ДополнительныйБлок2 = ДФ.ДополнительныйБлок();
ДополнительныйБлок2.Родитель = ДополнительныйБлок1;
ДополнительныйБлок2.Стиль.Высота = 850;
ДополнительныйБлок2.Стиль.Ширина = 950;
ДополнительныйБлок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = ДополнительныйБлок2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_Заголовок1_свойство.os
Перем Заголовок11;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Заголовок11.ГоризонтальноеПрокручивание = Заголовок11.ГоризонтальноеПрокручивание + 5;
Заголовок11.ВертикальноеПрокручивание = Заголовок11.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
Заголовок11.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок11, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Заголовок11, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Заголовок11, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Стиль1 = Заголовок11.Стиль;
Заголовок11.Стиль.Высота = 250;
Заголовок11.Стиль.Ширина = 250;
Заголовок11.Стиль.Переполнение = ДФ.Переполнение.Авто;
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Заголовок12 = ДФ.Заголовок1();
Заголовок12.Родитель = Заголовок11;
Заголовок12.Стиль.Высота = 850;
Заголовок12.Стиль.Ширина = 950;
Заголовок12.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Заголовок12;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_Заголовок2_свойство.os
Перем Заголовок21;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Заголовок21.ГоризонтальноеПрокручивание = Заголовок21.ГоризонтальноеПрокручивание + 5;
Заголовок21.ВертикальноеПрокручивание = Заголовок21.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
Заголовок21.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок21, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Заголовок21, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Заголовок21, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Стиль1 = Заголовок21.Стиль;
Заголовок21.Стиль.Высота = 250;
Заголовок21.Стиль.Ширина = 250;
Заголовок21.Стиль.Переполнение = ДФ.Переполнение.Авто;
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Заголовок22 = ДФ.Заголовок2();
Заголовок22.Родитель = Заголовок21;
Заголовок22.Стиль.Высота = 850;
Заголовок22.Стиль.Ширина = 950;
Заголовок22.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Заголовок22;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_Заголовок3_свойство.os
Перем Заголовок31;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Заголовок31.ГоризонтальноеПрокручивание = Заголовок31.ГоризонтальноеПрокручивание + 5;
Заголовок31.ВертикальноеПрокручивание = Заголовок31.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
Заголовок31.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок31, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Заголовок31, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Заголовок31, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Стиль1 = Заголовок31.Стиль;
Заголовок31.Стиль.Высота = 250;
Заголовок31.Стиль.Ширина = 250;
Заголовок31.Стиль.Переполнение = ДФ.Переполнение.Авто;
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Заголовок32 = ДФ.Заголовок3();
Заголовок32.Родитель = Заголовок31;
Заголовок32.Стиль.Высота = 850;
Заголовок32.Стиль.Ширина = 950;
Заголовок32.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Заголовок32;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_Заголовок4_свойство.os
Перем Заголовок41;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Заголовок41.ГоризонтальноеПрокручивание = Заголовок41.ГоризонтальноеПрокручивание + 5;
Заголовок41.ВертикальноеПрокручивание = Заголовок41.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
Заголовок41.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок41, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Заголовок41, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Заголовок41, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Стиль1 = Заголовок41.Стиль;
Заголовок41.Стиль.Высота = 250;
Заголовок41.Стиль.Ширина = 250;
Заголовок41.Стиль.Переполнение = ДФ.Переполнение.Авто;
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Заголовок42 = ДФ.Заголовок4();
Заголовок42.Родитель = Заголовок41;
Заголовок42.Стиль.Высота = 850;
Заголовок42.Стиль.Ширина = 950;
Заголовок42.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Заголовок42;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_Заголовок5_свойство.os
Перем Заголовок51;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Заголовок51.ГоризонтальноеПрокручивание = Заголовок51.ГоризонтальноеПрокручивание + 5;
Заголовок51.ВертикальноеПрокручивание = Заголовок51.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
Заголовок51.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок51, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Заголовок51, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Заголовок51, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Стиль1 = Заголовок51.Стиль;
Заголовок51.Стиль.Высота = 250;
Заголовок51.Стиль.Ширина = 250;
Заголовок51.Стиль.Переполнение = ДФ.Переполнение.Авто;
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Заголовок52 = ДФ.Заголовок5();
Заголовок52.Родитель = Заголовок51;
Заголовок52.Стиль.Высота = 850;
Заголовок52.Стиль.Ширина = 950;
Заголовок52.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Заголовок52;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_Заголовок6_свойство.os
Перем Заголовок61;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Заголовок61.ГоризонтальноеПрокручивание = Заголовок61.ГоризонтальноеПрокручивание + 5;
Заголовок61.ВертикальноеПрокручивание = Заголовок61.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
Заголовок61.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок61, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Заголовок61, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Заголовок61, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Стиль1 = Заголовок61.Стиль;
Заголовок61.Стиль.Высота = 250;
Заголовок61.Стиль.Ширина = 250;
Заголовок61.Стиль.Переполнение = ДФ.Переполнение.Авто;
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Заголовок62 = ДФ.Заголовок6();
Заголовок62.Родитель = Заголовок61;
Заголовок62.Стиль.Высота = 850;
Заголовок62.Стиль.Ширина = 950;
Заголовок62.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Заголовок62;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_Заголовок_свойство.os
Перем Заголовок1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Заголовок1.ГоризонтальноеПрокручивание = Заголовок1.ГоризонтальноеПрокручивание + 5;
Заголовок1.ВертикальноеПрокручивание = Заголовок1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
Заголовок1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Заголовок1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Заголовок1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Стиль1 = Заголовок1.Стиль;
Заголовок1.Стиль.Высота = 250;
Заголовок1.Стиль.Ширина = 250;
Заголовок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Заголовок2 = ДФ.Заголовок();
Заголовок2.Родитель = Заголовок1;
Заголовок2.Стиль.Высота = 850;
Заголовок2.Стиль.Ширина = 950;
Заголовок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Заголовок2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_ЗаголовокГруппы_свойство.os
Перем ЗаголовокГруппы1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
ЗаголовокГруппы1.ГоризонтальноеПрокручивание = ЗаголовокГруппы1.ГоризонтальноеПрокручивание + 5;
ЗаголовокГруппы1.ВертикальноеПрокручивание = ЗаголовокГруппы1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
ЗаголовокГруппы1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
Стиль1 = ЗаголовокГруппы1.Стиль;
ЗаголовокГруппы1.Стиль.Высота = 250;
ЗаголовокГруппы1.Стиль.Ширина = 250;
ЗаголовокГруппы1.Стиль.Переполнение = ДФ.Переполнение.Авто;
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
ЗаголовокГруппы2 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы2.Родитель = ЗаголовокГруппы1;
ЗаголовокГруппы2.Стиль.Высота = 850;
ЗаголовокГруппы2.Стиль.Ширина = 950;
ЗаголовокГруппы2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = ЗаголовокГруппы2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ЗаголовокРаскрываемогоБлока1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
ЗаголовокРаскрываемогоБлока1.ГоризонтальноеПрокручивание = ЗаголовокРаскрываемогоБлока1.ГоризонтальноеПрокручивание + 5;
ЗаголовокРаскрываемогоБлока1.ВертикальноеПрокручивание = ЗаголовокРаскрываемогоБлока1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_ЗаголовокРаскрываемогоЗаголовокРаскрываемогоБлокаа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
Стиль1 = ЗаголовокРаскрываемогоБлока1.Стиль;
ЗаголовокРаскрываемогоБлока1.Стиль.Высота = 250;
ЗаголовокРаскрываемогоБлока1.Стиль.Ширина = 250;
ЗаголовокРаскрываемогоБлока1.Стиль.Переполнение = ДФ.Переполнение.Авто;
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
ЗаголовокРаскрываемогоБлока2 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока2.Родитель = ЗаголовокРаскрываемогоБлока1;
ЗаголовокРаскрываемогоБлока2.Стиль.Высота = 850;
ЗаголовокРаскрываемогоБлока2.Стиль.Ширина = 950;
ЗаголовокРаскрываемогоБлока2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = ЗаголовокРаскрываемогоБлока2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_Кнопка_свойство.os
Перем Кнопка1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Кнопка1.ГоризонтальноеПрокручивание = Кнопка1.ГоризонтальноеПрокручивание + 5;
Кнопка1.ВертикальноеПрокручивание = Кнопка1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
Кнопка1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Кнопка1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Кнопка1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Стиль1 = Кнопка1.Стиль;
Кнопка1.Стиль.Высота = 250;
Кнопка1.Стиль.Ширина = 250;
Кнопка1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Кнопка2 = ДФ.Кнопка();
Кнопка2.Родитель = Кнопка1;
Кнопка2.Стиль.Высота = 850;
Кнопка2.Стиль.Ширина = 950;
Кнопка2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Кнопка2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_Колонтитул_свойство.os
Перем Колонтитул1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Колонтитул1.ГоризонтальноеПрокручивание = Колонтитул1.ГоризонтальноеПрокручивание + 5;
Колонтитул1.ВертикальноеПрокручивание = Колонтитул1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
Колонтитул1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонтитул1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Колонтитул1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Колонтитул1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Стиль1 = Колонтитул1.Стиль;
Колонтитул1.Стиль.Высота = 250;
Колонтитул1.Стиль.Ширина = 250;
Колонтитул1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Колонтитул2 = ДФ.Колонтитул();
Колонтитул2.Родитель = Колонтитул1;
Колонтитул2.Стиль.Высота = 850;
Колонтитул2.Стиль.Ширина = 950;
Колонтитул2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Колонтитул2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_МедиаГруппа_свойство.os
Перем МедиаГруппа1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
МедиаГруппа1.ГоризонтальноеПрокручивание = МедиаГруппа1.ГоризонтальноеПрокручивание + 5;
МедиаГруппа1.ВертикальноеПрокручивание = МедиаГруппа1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
МедиаГруппа1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(МедиаГруппа1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(МедиаГруппа1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
Стиль1 = МедиаГруппа1.Стиль;
МедиаГруппа1.Стиль.Высота = 250;
МедиаГруппа1.Стиль.Ширина = 250;
МедиаГруппа1.Стиль.Переполнение = ДФ.Переполнение.Авто;
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
МедиаГруппа2 = ДФ.МедиаГруппа();
МедиаГруппа2.Родитель = МедиаГруппа1;
МедиаГруппа2.Стиль.Высота = 850;
МедиаГруппа2.Стиль.Ширина = 950;
МедиаГруппа2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = МедиаГруппа2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_НеупорядоченныйСписок_свойство.os
Перем НеупорядоченныйСписок1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
НеупорядоченныйСписок1.ГоризонтальноеПрокручивание = НеупорядоченныйСписок1.ГоризонтальноеПрокручивание + 5;
НеупорядоченныйСписок1.ВертикальноеПрокручивание = НеупорядоченныйСписок1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
Стиль1 = НеупорядоченныйСписок1.Стиль;
НеупорядоченныйСписок1.Стиль.Высота = 250;
НеупорядоченныйСписок1.Стиль.Ширина = 250;
НеупорядоченныйСписок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
НеупорядоченныйСписок2 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок2.Родитель = НеупорядоченныйСписок1;
НеупорядоченныйСписок2.Стиль.Высота = 850;
НеупорядоченныйСписок2.Стиль.Ширина = 950;
НеупорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = НеупорядоченныйСписок2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_НижнийКолонтитул_свойство.os
Перем НижнийКолонтитул1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
НижнийКолонтитул1.ГоризонтальноеПрокручивание = НижнийКолонтитул1.ГоризонтальноеПрокручивание + 5;
НижнийКолонтитул1.ВертикальноеПрокручивание = НижнийКолонтитул1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
НижнийКолонтитул1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
Стиль1 = НижнийКолонтитул1.Стиль;
НижнийКолонтитул1.Стиль.Высота = 250;
НижнийКолонтитул1.Стиль.Ширина = 250;
НижнийКолонтитул1.Стиль.Переполнение = ДФ.Переполнение.Авто;
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
НижнийКолонтитул2 = ДФ.НижнийКолонтитул();
НижнийКолонтитул2.Родитель = НижнийКолонтитул1;
НижнийКолонтитул2.Стиль.Высота = 850;
НижнийКолонтитул2.Стиль.Ширина = 950;
НижнийКолонтитул2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = НижнийКолонтитул2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_ОписаниеМедиа_свойство.os
Перем ОписаниеМедиа1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
ОписаниеМедиа1.ГоризонтальноеПрокручивание = ОписаниеМедиа1.ГоризонтальноеПрокручивание + 5;
ОписаниеМедиа1.ВертикальноеПрокручивание = ОписаниеМедиа1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
ОписаниеМедиа1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
Стиль1 = ОписаниеМедиа1.Стиль;
ОписаниеМедиа1.Стиль.Высота = 250;
ОписаниеМедиа1.Стиль.Ширина = 250;
ОписаниеМедиа1.Стиль.Переполнение = ДФ.Переполнение.Авто;
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
ОписаниеМедиа2 = ДФ.ОписаниеМедиа();
ОписаниеМедиа2.Родитель = ОписаниеМедиа1;
ОписаниеМедиа2.Стиль.Высота = 850;
ОписаниеМедиа2.Стиль.Ширина = 950;
ОписаниеМедиа2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = ОписаниеМедиа2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_Определение_свойство.os
Перем Определение1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Определение1.ГоризонтальноеПрокручивание = Определение1.ГоризонтальноеПрокручивание + 5;
Определение1.ВертикальноеПрокручивание = Определение1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
Определение1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Определение1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Определение1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Определение1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Стиль1 = Определение1.Стиль;
Определение1.Стиль.Высота = 250;
Определение1.Стиль.Ширина = 250;
Определение1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Определение1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Определение2 = ДФ.Определение();
Определение2.Родитель = Определение1;
Определение2.Стиль.Высота = 850;
Определение2.Стиль.Ширина = 950;
Определение2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Определение2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_СписокОпределений_свойство.os
Перем СписокОпределений1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
СписокОпределений1.ГоризонтальноеПрокручивание = СписокОпределений1.ГоризонтальноеПрокручивание + 5;
СписокОпределений1.ВертикальноеПрокручивание = СписокОпределений1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
СписокОпределений1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(СписокОпределений1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(СписокОпределений1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
Стиль1 = СписокОпределений1.Стиль;
СписокОпределений1.Стиль.Высота = 250;
СписокОпределений1.Стиль.Ширина = 250;
СписокОпределений1.Стиль.Переполнение = ДФ.Переполнение.Авто;
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
СписокОпределений2 = ДФ.СписокОпределений();
СписокОпределений2.Родитель = СписокОпределений1;
СписокОпределений2.Стиль.Высота = 850;
СписокОпределений2.Стиль.Ширина = 950;
СписокОпределений2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = СписокОпределений2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_Термин_свойство.os
Перем Термин1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Термин1.ГоризонтальноеПрокручивание = Термин1.ГоризонтальноеПрокручивание + 5;
Термин1.ВертикальноеПрокручивание = Термин1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
Термин1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Термин1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Термин1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Термин1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Стиль1 = Термин1.Стиль;
Термин1.Стиль.Высота = 250;
Термин1.Стиль.Ширина = 250;
Термин1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Термин1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Термин2 = ДФ.Термин();
Термин2.Родитель = Термин1;
Термин2.Стиль.Высота = 850;
Термин2.Стиль.Ширина = 950;
Термин2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Термин2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_УпорядоченныйСписок_свойство.os
Перем УпорядоченныйСписок1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
УпорядоченныйСписок1.ГоризонтальноеПрокручивание = УпорядоченныйСписок1.ГоризонтальноеПрокручивание + 5;
УпорядоченныйСписок1.ВертикальноеПрокручивание = УпорядоченныйСписок1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
УпорядоченныйСписок1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
Стиль1 = УпорядоченныйСписок1.Стиль;
УпорядоченныйСписок1.Стиль.Высота = 250;
УпорядоченныйСписок1.Стиль.Ширина = 250;
УпорядоченныйСписок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
УпорядоченныйСписок2 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок2.Родитель = УпорядоченныйСписок1;
УпорядоченныйСписок2.Стиль.Высота = 850;
УпорядоченныйСписок2.Стиль.Ширина = 950;
УпорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = УпорядоченныйСписок2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_ФорматированныйТекст_свойство.os
Перем ФорматированныйТекст1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
ФорматированныйТекст1.ГоризонтальноеПрокручивание = ФорматированныйТекст1.ГоризонтальноеПрокручивание + 5;
ФорматированныйТекст1.ВертикальноеПрокручивание = ФорматированныйТекст1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
ФорматированныйТекст1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
Стиль1 = ФорматированныйТекст1.Стиль;
ФорматированныйТекст1.Стиль.Высота = 250;
ФорматированныйТекст1.Стиль.Ширина = 250;
ФорматированныйТекст1.Стиль.Переполнение = ДФ.Переполнение.Авто;
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
ФорматированныйТекст2 = ДФ.ФорматированныйТекст();
ФорматированныйТекст2.Родитель = ФорматированныйТекст1;
ФорматированныйТекст2.Стиль.Высота = 850;
ФорматированныйТекст2.Стиль.Ширина = 950;
ФорматированныйТекст2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = ФорматированныйТекст2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ВертикальноеПрокручивание_ЭлементСписка_свойство.os
Перем ЭлементСписка1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
ЭлементСписка1.ГоризонтальноеПрокручивание = ЭлементСписка1.ГоризонтальноеПрокручивание + 5;
ЭлементСписка1.ВертикальноеПрокручивание = ЭлементСписка1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ВертикальноеПрокручивание() Экспорт
Сообщить(?(
ЭлементСписка1.ВертикальноеПрокручивание = 0
, "", "!!! ") + "ВертикальноеПрокручивание_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ВертикальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(ЭлементСписка1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(ЭлементСписка1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
Стиль1 = ЭлементСписка1.Стиль;
ЭлементСписка1.Стиль.Высота = 250;
ЭлементСписка1.Стиль.Ширина = 250;
ЭлементСписка1.Стиль.Переполнение = ДФ.Переполнение.Авто;
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
ЭлементСписка2 = ДФ.ЭлементСписка();
ЭлементСписка2.Родитель = ЭлементСписка1;
ЭлементСписка2.Стиль.Высота = 850;
ЭлементСписка2.Стиль.Ширина = 950;
ЭлементСписка2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = ЭлементСписка2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
Верх_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Верх = "" + 48 + "px"
, "", "!!! ") + "Верх_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Верх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 300;
Блок1.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Блок1.Стиль.Верх = 48;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Блок1;
Абзац1.Текст = "И снова лодочка скользит
|Неслышно по волнам,
|И солнце в зелени сквозит,
|Слетает сказка к нам.
|Как драгоценность берегу
|Тот день и нас на берегу.";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Форма1.Открыть();
ВерхняяГраница_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ВерхняяГраница = "4px double rgb(255, 0, 0)"
, "", "!!! ") + "ВерхняяГраница_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ВерхняяГраница", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 150;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.ВерхняяГраница = ДФ.ВерхняяГраница(4, ДФ.СтильГраницы.Двойная, ДФ.Цвет.Красный);
Форма1.Открыть();
Видимость_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.Видимость = ДФ.Видимость.Скрыто
, "", "!!! ") + "Видимость_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "Видимость", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 250;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "– Забавный стишок! – промолвила Алиса.
|– В нем что-то есть.
|– Честно говоря, кто этот ЧТО-ТО, Алиса объяснить не смогла бы, но ей стыдно было в этом признаться даже самой себе.";
Абзац1.Стиль.Видимость = ДФ.Видимость.Скрыто;
Форма1.Открыть();
Внутренняя_Тень_свойство.os
Перем ДФ, Тень1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Тень1.Внутренняя
, "", "!!! ") + "Внутренняя_Тень_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Блок1";
Блок1.Стиль.Высота = 100;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Отступ = ДФ.Отступ(50, 50, 50, 50);
Тень1 = ДФ.Тень();
Тень1.Икс = 30;
Тень1.Игрек = 20;
Тень1.Размытие = 8;
Тень1.Величина = 10;
Тень1.Цвет = ДФ.Цвет.Серебристый;
Тень1.Внутренняя = Истина;
Блок1.Стиль.Тень = Тень1;
Форма1.Открыть();
Воспроизвести_Аудио_метод.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Аудио1.НаПаузе = Ложь
, "", "!!! ") + "Воспроизвести_Аудио_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "НаПаузе", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Воспроизвести();
Форма1.Открыть();
Восстановить_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контекст2d1.СтильЗаполнения = "rgb(255, 0, 0)"
, "", "!!! ") + "Восстановить_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Зеленый;
Контекст2d1.ЗаполнитьПрямоугольник(10, 10, 50, 50);
Контекст2d1.Сохранить();
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Красный;
Контекст2d1.ЗаполнитьПрямоугольник(100, 10, 50, 50);
Контекст2d1.Восстановить();
Контекст2d1.ЗаполнитьПрямоугольник(200, 10, 50, 50);
Форма1.Открыть();
ВписываниеОбъекта_Стиль_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.Стиль.ВписываниеОбъекта = ДФ.ВписываниеОбъекта.Накрыть
, "", "!!! ") + "ВписываниеОбъекта_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1.Стиль, "ВписываниеОбъекта", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Изображение1 = ДФ.Изображение();
Форма1.ДобавитьДочерний(Изображение1);
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Ширина = 300;
Изображение1.Высота = 200;
Изображение1.Стиль.ВписываниеОбъекта = ДФ.ВписываниеОбъекта.Накрыть;
Изображение1.Стиль.Границы = ДФ.Границы(5, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Изображение1.Стиль.ПозицияОбъекта = ДФ.Точка(20, 10);
Форма1.Открыть();
ВремяПерехода_Переход_свойство.os
Перем ДФ, Переход1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Переход1.ВремяПерехода = 5
, "", "!!! ") + "ВремяПерехода_Переход_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Переход1 = ДФ.Переход();
Переход1.СвойствоПерехода = ДФ.СвойствоПерехода.Все;
Переход1.ВремяПерехода = 5;
Переход1.ФункцияПерехода = ДФ.ФункцияПерехода.Линейно;
Переход1.ЗадержкаПерехода = 4;
Переход2 = ДФ.Переход(ДФ.СвойствоПерехода.Все, 5, ДФ.ФункцияПерехода.Линейно, 4);
Форма1.Открыть();
ВремяПерехода_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ВремяПерехода = "500ms"
, "", "!!! ") + "ВремяПерехода_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ВремяПерехода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура МышьНадЭлементом() Экспорт
Блок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 200;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Блок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.Высота = 100;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.Высота = 100;
Блок1.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Красный);
Блок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Блок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Переход1 = ДФ.Переход();
Переход1.СвойствоПерехода = ДФ.СвойствоПерехода.Все;
Переход1.ВремяПерехода = 1500;
Переход1.ФункцияПерехода = ДФ.ФункцияПерехода.МедленноВконце;
Переход1.ЗадержкаПерехода = 100;
Блок1.Стиль.Переход = Переход1;
Блок1.Стиль.ВремяПерехода = 500;
Форма1.Открыть();
Вставить_Меню_метод.os
Перем ДФ, МенюСправка;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + МенюСправка = "ДфЭлементМеню"
, "", "!!! ") + "Вставить_Меню_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГлавноеМеню = ДФ.Меню(ДФ.ТипМеню.Главное); // Это строка главного меню.
ПодменюМенюФайл = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюФайл = ДФ.ЭлементМеню("Файл", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюФайл);
Открыть = ДФ.ЭлементМеню("Открыть", ДФ.ТипЭлементаМеню.Стандартный);
Сохранить = ДФ.ЭлементМеню("Сохранить");
Разделитель1 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Настройки = ДФ.ЭлементМеню("Настройки");
Разделитель2 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Выход = ДФ.ЭлементМеню("Выход");
ПодменюМенюФайл.Добавить(Открыть);
ПодменюМенюФайл.Добавить(Сохранить);
ПодменюМенюФайл.Добавить(Разделитель1);
ПодменюМенюФайл.Добавить(Настройки);
ПодменюМенюФайл.Добавить(Разделитель2);
ПодменюМенюФайл.Добавить(Выход);
ПодменюМенюПравка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюПравка = ДФ.ЭлементМеню("Правка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюПравка);
Отмена = ДФ.ЭлементМеню("Отмена");
Повтор = ДФ.ЭлементМеню("Повтор");
ПодменюМенюПравка.Добавить(Отмена);
ПодменюМенюПравка.Добавить(Повтор);
ПодменюМенюСправка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюСправка = ДФ.ЭлементМеню("Справка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюСправка);
ОПрограмме = ДФ.ЭлементМеню("О программе");
ПодменюМенюСправка.Добавить(ОПрограмме);
ГлавноеМеню.Добавить(МенюФайл);
ГлавноеМеню.Добавить(МенюПравка);
ГлавноеМеню.Вставить(МенюСправка, 1);
Форма1.Меню = ГлавноеМеню;
Форма1.Открыть();
ВставитьСтроку_Таблица_метод.os
Перем ДФ, Таблица1;
Процедура Строки() Экспорт
Сообщить(?(
Таблица1.Строки.Количество() = 6
, "", "!!! ") + "ВставитьСтроку_Таблица_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "Строки", ДФ.Действие(ЭтотОбъект, "Строки"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
НоваяСтрока = Таблица1.ВставитьСтроку(2);
НоваяЯчейка = НоваяСтрока.ДобавитьДочерний(ДФ.Ячейка());
НоваяЯчейка.Текст = "НоваяЯчейка";
Форма1.Открыть();
ВставитьЯчейку_СтрокаТаблицы_метод.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Сообщить(?(
Таблица1.Строки.Количество() = 6
, "", "!!! ") + "ВставитьЯчейку_СтрокаТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "Строки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
НоваяСтрока = Таблица1.ВставитьСтроку(2);
НоваяЯчейка1 = НоваяСтрока.ВставитьЯчейку(0);
НоваяЯчейка1.Текст = "НоваяЯчейка1";
НоваяЯчейка2 = НоваяСтрока.ВставитьЯчейку(0);
НоваяЯчейка2.Текст = "НоваяЯчейка2";
Форма1.Открыть();
Выбран_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка3;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементПоляСписка3.Выбран
, "", "!!! ") + "Выбран_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка3, "Выбран", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Ширина = 150;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = ПолеСписка1;
ГруппировкаПоляСписка1.Надпись = "Жители деревни Простоквашино";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка1.Значение = "Кот";
ЭлементПоляСписка1.Надпись = "Матроскин";
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Пёс";
ЭлементПоляСписка2.Надпись = "Шарик";
ЭлементПоляСписка3 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка3.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка3.Значение = "Птица";
ЭлементПоляСписка3.Надпись = "Галчонок";
ЭлементПоляСписка3.Выбран = Истина;
Форма1.Открыть();
Выбрать_ВыборВремени_метод.os
Перем ДФ;
Процедура Абзац1_ФокусПолучен() Экспорт
// Сообщить("Абзац1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Абзац_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Абзац1_ФокусПолучен");
ВыборВремени1.Значение = "21:35:09";
ВыборВремени1.Выбрать();
Форма1.Открыть();
Выбрать_ВыборДаты_метод.os
Перем ДФ, ВыборДаты1;
Процедура ВыборДаты1_ФокусПолучен() Экспорт
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Выбрать_ВыборДаты_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_ФокусПолучен");
ВыборДаты1.Значение = "2014-02-09";
ВыборДаты1.Выбрать();
Форма1.Открыть();
Выбрать_ВыборДатыВремени_метод.os
Перем ДФ, ВыборДатыВремени1;
Процедура ВыборДатыВремени1_ФокусПолучен() Экспорт
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Выбрать_ВыборДатыВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_ФокусПолучен");
ВыборДатыВремени1.Значение = "2014-02-06T22:57Z";
ВыборДатыВремени1.Выбрать();
Форма1.Открыть();
Выбрать_ВыборМесяца_метод.os
Перем ДФ, ВыборМесяца1;
Процедура ВыборМесяца1_ФокусПолучен() Экспорт
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Выбрать_ВыборМесяца_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_ФокусПолучен");
ВыборМесяца1.Значение = "2014-09";
ВыборМесяца1.Выбрать();
Форма1.Открыть();
Выбрать_ВыборНедели_метод.os
Перем ДФ, ВыборНедели1;
Процедура ВыборНедели1_ФокусПолучен() Экспорт
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Выбрать_ВыборНедели_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_ФокусПолучен");
ВыборНедели1.Значение = "2014-W19";
ВыборНедели1.Выбрать();
Форма1.Открыть();
Выбрать_ОбластьТекста_метод.os
Перем ДФ, ОбластьТекста1;
Процедура ОбластьТекста1_ФокусПолучен() Экспорт
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Выбрать_ОбластьТекста_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_ФокусПолучен");
ОбластьТекста1.Значение = "ОбластьТекста1";
ОбластьТекста1.Выбрать();
Форма1.Открыть();
Выбрать_ПолеПароля_метод.os
Перем ДФ, ПолеПароля1;
Процедура ПолеПароля1_ФокусПолучен() Экспорт
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Выбрать_ПолеПароля_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_ФокусПолучен");
ПолеПароля1.Значение = "вававва";
ПолеПароля1.Выбрать();
Форма1.Открыть();
Выбрать_ПолеПоиска_метод.os
Перем ДФ, ПолеПоиска1;
Процедура ПолеПоиска1_ФокусПолучен() Экспорт
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Выбрать_ПолеПоиска_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_ФокусПолучен");
ПолеПоиска1.Значение = "ПолеПоиска1";
ПолеПоиска1.Выбрать();
Форма1.Открыть();
Выбрать_ПолеТекста_метод.os
Перем ДФ, ПолеТекста1;
Процедура ПолеТекста1_ФокусПолучен() Экспорт
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Выбрать_ПолеТекста_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_ФокусПолучен");
ПолеТекста1.Значение = "ПолеТекста1";
ПолеТекста1.Выбрать();
Форма1.Открыть();
Выбрать_ПолеЧисла_метод.os
Перем ДФ, ПолеЧисла1;
Процедура ПолеЧисла1_ФокусПолучен() Экспорт
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Выбрать_ПолеЧисла_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_ФокусПолучен");
ПолеЧисла1.Значение = 77.33;
ПолеЧисла1.Выбрать();
Форма1.Открыть();
ВыводитьПредупреждениеПриЗапуске_ДекларативныеФормы_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.ВыводитьПредупреждениеПриЗапуске
, "", "!!! ") + "ВыводитьПредупреждениеПриЗапуске_ДекларативныеФормы_свойство.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ДФ.ОткрытьВБраузере = Истина;
ДФ.ВыводитьПредупреждениеПриЗапуске = Истина;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Форма1.Открыть();
ВыделениеПользователем_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ВыделениеПользователем = ДФ.ВыделениеПользователем.Отсутствие
, "", "!!! ") + "ВыделениеПользователем_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ВыделениеПользователем", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 250;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "– Забавный стишок! – промолвила Алиса.
|– В нем что-то есть.
|– Честно говоря, кто этот ЧТО-ТО, Алиса объяснить не смогла бы, но ей стыдно было в этом признаться даже самой себе.";
Абзац1.Стиль.ВыделениеПользователем = ДФ.ВыделениеПользователем.Отсутствие;
Форма1.Открыть();
Выполнить_ДекларативныеФормы_метод.os
//== Файл Стартовый.os == начало
Перем ДФ, МояСтруктураЧисло;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МояСтруктураЧисло = 513
, "", "!!! ") + "Выполнить_ДекларативныеФормы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Структура1 = Новый Структура();
Структура1.Вставить("Строка", "Моя строка");
Структура1.Вставить("Число", 256);
ДФ.ВвестиГлобальноеСвойство(Структура1, "МояСтруктура", Ложь);
Сценарии = ДФ.ЗагрузитьСценарии(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "ДопСценарии" + ПолучитьРазделительПути() + "Парсер2"));
Действие = ДФ.Действие(Сценарии.Парсер2, "МояФункцияИзПарсер");
ДФ.Выполнить(Действие);
МояСтруктураЧисло = Структура1.Число;
Форма1.Открыть();
//== Файл Стартовый.os == конец
// // //== Файл ..\ТестыДекларФорм\ДопСценарии\Парсер2\Парсер2.os == начало
// // Процедура МояФункцияИзПарсер() Экспорт
// // Для Каждого эл Из МояСтруктура Цикл
// // // Сообщить("Ключ = " + эл.Ключ + " Значение = " + эл.Значение);
// // КонецЦикла;
// // МояСтруктура.Число = 513;
// // КонецПроцедуры
// // //== Файл Парсер.os == конец
ВыравниваниеОтдельных_Стиль_свойство.os
Перем ДФ, Блок3;
Процедура Свойство() Экспорт
Сообщить(?(
Блок3.Стиль.ВыравниваниеОтдельных = ДФ.ВыравниваниеОтдельных.Растянуто
, "", "!!! ") + "ВыравниваниеОтдельных_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок3.Стиль, "ВыравниваниеОтдельных", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 220;
Блок1.Стиль.Высота = 300;
Блок1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Стиль.Отображать = ДФ.Отображать.Гибкий;
Блок1.Стиль.ВыравниваниеЭлементов = ДФ.ВыравниваниеЭлементов.ГибкийВначале;
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.ЦветФона = ДФ.Цвет.Коралловый;
Блок2.Стиль.Гибкость = 1;
Блок2.Текст = "RED";
Блок3 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок3.Стиль.ЦветФона = ДФ.Цвет.СветлоСиний;
Блок3.Стиль.Гибкость = 1;
Блок3.Текст = "BLUE";
Блок3.Стиль.ВыравниваниеОтдельных = ДФ.ВыравниваниеОтдельных.Растянуто;
Блок4 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок4.Стиль.ЦветФона = ДФ.Цвет.Хаки;
Блок4.Стиль.Гибкость = 1;
Блок4.Текст = "Green div with more content.";
Форма1.Открыть();
ВыравниваниеСодержимого_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ВыравниваниеСодержимого = ДФ.ВыравниваниеСодержимого.ПробелМежду
, "", "!!! ") + "ВыравниваниеСодержимого_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ВыравниваниеСодержимого", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 140;
Блок1.Стиль.Высота = 300;
Блок1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.Отображать = ДФ.Отображать.Гибкий;
Блок1.Стиль.НаправлениеЭлементов = ДФ.НаправлениеЭлементов.Строка;
Блок1.Стиль.ПереносГибких = ДФ.ПереносГибких.Перенос;
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Ширина = 70;
Блок2.Стиль.Высота = 70;
Блок2.Стиль.ЦветФона = ДФ.Цвет.Коралловый;
Блок3 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок3.Стиль.Ширина = 70;
Блок3.Стиль.Высота = 70;
Блок3.Стиль.ЦветФона = ДФ.Цвет.СветлоСиний;
Блок4 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок4.Стиль.Ширина = 70;
Блок4.Стиль.Высота = 70;
Блок4.Стиль.ЦветФона = ДФ.Цвет.Хаки;
Блок5 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок5.Стиль.Ширина = 70;
Блок5.Стиль.Высота = 70;
Блок5.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Блок6 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок6.Стиль.Ширина = 70;
Блок6.Стиль.Высота = 70;
Блок6.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСерый;
Блок7 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок7.Стиль.Ширина = 70;
Блок7.Стиль.Высота = 70;
Блок7.Стиль.ЦветФона = ДФ.Цвет.СветлоЗеленый;
Блок1.Стиль.ВыравниваниеСодержимого = ДФ.ВыравниваниеСодержимого.ПробелМежду;
Форма1.Открыть();
ВыравниваниеТекста_Контекст2d_свойство.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контекст2d1.ВыравниваниеТекста = ДФ.ВыравниваниеТекста.Право
, "", "!!! ") + "ВыравниваниеТекста_Контекст2d_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 300;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.СтильОбводки = ДФ.Цвет.Красный;
Контекст2d1.ПерейтиКТочке(150, 20);
Контекст2d1.Линия(150, 170);
Контекст2d1.Начертить();
Контекст2d1.Шрифт = ДФ.Шрифт(, , , 15, , "Arial");
Контекст2d1.ВыравниваниеТекста = ДФ.ВыравниваниеТекста.Начало;
Контекст2d1.ЗаполнитьТекст("ВыравниваниеТекста=Начало", 150, 60);
Контекст2d1.ВыравниваниеТекста = ДФ.ВыравниваниеТекста.Конец;
Контекст2d1.ЗаполнитьТекст("ВыравниваниеТекста=Конец", 150, 80);
Контекст2d1.ВыравниваниеТекста = ДФ.ВыравниваниеТекста.Лево;
Контекст2d1.ЗаполнитьТекст("ВыравниваниеТекста=Лево", 150, 100);
Контекст2d1.ВыравниваниеТекста = ДФ.ВыравниваниеТекста.Центр;
Контекст2d1.ЗаполнитьТекст("ВыравниваниеТекста=Центр",150, 120);
Контекст2d1.ВыравниваниеТекста = ДФ.ВыравниваниеТекста.Право;
Контекст2d1.ЗаполнитьТекст("ВыравниваниеТекста=Право",150, 140);
Форма1.Открыть();
ВыравниваниеЭлементов_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ВыравниваниеЭлементов = ДФ.ВыравниваниеЭлементов.Центр
, "", "!!! ") + "ВыравниваниеЭлементов_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ВыравниваниеЭлементов", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 220;
Блок1.Стиль.Высота = 300;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Стиль.Отображать = ДФ.Отображать.Гибкий;
Блок1.Стиль.ВыравниваниеЭлементов = ДФ.ВыравниваниеЭлементов.Центр;
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.ЦветФона = ДФ.Цвет.Коралловый;
Блок2.Текст = "Коралловый";
Блок3 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок3.Стиль.ЦветФона = ДФ.Цвет.СветлоСиний;
Блок3.Текст = "СветлоСиний";
Блок4 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок4.Стиль.ЦветФона = ДФ.Цвет.Хаки;
Блок4.Текст = "Хаки";
Форма1.Открыть();
Высота_ДанныеРисунка_свойство.os
Перем ДФ, ДанныеРисунка2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДанныеРисунка2.Высота = 500
, "", "!!! ") + "Высота_ДанныеРисунка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 650;
Холст1.Высота = 550;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
ДанныеРисунка1 = Контекст2d1.СоздатьДанныеРисунка(600, 500);
// Сообщить("ДанныеРисунка1.Ширина = " + ДанныеРисунка1.Ширина);
// Сообщить("ДанныеРисунка1.Высота = " + ДанныеРисунка1.Высота);
ДанныеРисунка2 = Контекст2d1.СоздатьДанныеРисунка(ДанныеРисунка1);
ДанныеРисунка2.Цвет = ДФ.Цвет.Синий;
Контекст2d1.ПоместитьДанныеРисунка(ДанныеРисунка2, 10, 10);
Форма1.Открыть();
Высота_Изображение_свойство.os
Перем ДФ, Изображение2;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение2.Высота = 32
, "", "!!! ") + "Высота_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение2, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Источник = "border.png";
Абзац2 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Изображение2 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение2.Источник = "border.png";
Изображение2.Ширина = 32;
Изображение2.Высота = 32;
Форма1.Открыть();
Высота_ОкноСообщений_свойство.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОкноСообщений1.Высота = 450
, "", "!!! ") + "Высота_ОкноСообщений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Высота = 450;
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.Показать();
Форма1.Открыть();
Высота_Прямоугольник_свойство.os
Перем ДФ, Прямоугольник1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Прямоугольник1.Высота = 150
, "", "!!! ") + "Высота_Прямоугольник_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Прямоугольник1 = ДФ.Прямоугольник();
Прямоугольник1.Икс = 10;
Прямоугольник1.Игрек = 10;
Прямоугольник1.Ширина = 100;
Прямоугольник1.Высота = 150;
Прямоугольник2 = ДФ.Прямоугольник(10, 10, 100, 150);
Форма1.Открыть();
Высота_Размер_свойство.os
Перем ДФ, Размер1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Размер1.Высота = 40
, "", "!!! ") + "Высота_Размер_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Размер1 = ДФ.Размер();
Размер1.Ширина = 20;
Размер1.Высота = 40;
Размер2 = ДФ.Размер(50, 60);
Форма1.Открыть();
Высота_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Высота = "150px"
, "", "!!! ") + "Высота_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 400;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Высота_Уведомления_свойство.os
Перем ДФ, Уведомления1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Уведомления1.Высота = 70
, "", "!!! ") + "Высота_Уведомления_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
Уведомления1.Высота = 70;
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Форма1.Открыть();
Высота_Холст_свойство.os
Перем ДФ, Холст1;
Процедура Свойство() Экспорт
Сообщить(?(
Холст1.Высота = 250
, "", "!!! ") + "Высота_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Холст1, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 250;
Холст1.Высота = 250;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Холст1.Контекст2d.ЗаполнитьПрямоугольник(20, 20, 150, 100);
Холст1.Контекст2d.Прямоугольник(180, 20, 200, 100);
Форма1.Открыть();
ВысотаОкна_АргументыСобытия_свойство.os
Перем ДФ, Форма1;
Процедура Форма1_РазмерИзменен() Экспорт
// Сообщить("Форма1_РазмерИзменен " + ДФ.АргументыСобытия.ШиринаОкна + " х " + ДФ.АргументыСобытия.ВысотаОкна);
// Сообщить("Форма1_РазмерИзменен " + Форма1.ШиринаОкна + " х " + Форма1.ВысотаОкна);
Сообщить(?(
ДФ.АргументыСобытия.ВысотаОкна > 0
, "", "!!! ") + "ВысотаОкна_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.РазмерИзменен = ДФ.Действие(ЭтотОбъект, "Форма1_РазмерИзменен");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Контент.Текст = "Измени размер формы";
// Сообщить("Начальные размеры окна " + Форма1.ШиринаОкна + " х " + Форма1.ВысотаОкна);
Форма1.Открыть();
ВысотаСтроки_ОкноСообщений_свойство.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОкноСообщений1.ВысотаСтроки = 2.55
, "", "!!! ") + "ВысотаСтроки_ОкноСообщений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Высота = 450;
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.ВысотаСтроки = 2.55;
ОкноСообщений1.Показать();
Форма1.Открыть();
ВысотаСтроки_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ВысотаСтроки = "2"
, "", "!!! ") + "ВысотаСтроки_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ВысотаСтроки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Абзац1.Стиль.ВысотаСтроки = 2;
Форма1.Открыть();
ВысотаСтроки_Уведомления_свойство.os
Перем ДФ, Уведомления1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Уведомления1.ВысотаСтроки = 2.25
, "", "!!! ") + "ВысотаСтроки_Уведомления_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
Уведомления1.Высота = 200;
Уведомления1.ВысотаСтроки = 2.25;
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Форма1.Открыть();
ВысотаСтроки_Шрифт_свойство.os
Перем ДФ, Шрифт1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Шрифт1.ВысотаСтроки = 50
, "", "!!! ") + "ВысотаСтроки_Шрифт_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шрифт1 = ДФ.Шрифт();
Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
Шрифт1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
Шрифт1.РазмерШрифта = 20;
Шрифт1.ВысотаСтроки = 50;
Шрифт1.СемействоШрифтов = "arial,serif";
Абзац1.Стиль.Шрифт = Шрифт1;
Форма1.Открыть();
Гибкость_Стиль_свойство.os
Перем ДФ, Блок3, Блок2;
Процедура Свойство() Экспорт
Сообщить(?(
Блок3.Стиль.Гибкость = 5
, "", "!!! ") + "Гибкость_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок2.Стиль, "Гибкость", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 220;
Блок1.Стиль.Высота = 300;
Блок1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Стиль.Отображать = ДФ.Отображать.Гибкий;
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.ЦветФона = ДФ.Цвет.Коралловый;
Блок2.Стиль.Гибкость = 1;
Блок3 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок3.Стиль.ЦветФона = ДФ.Цвет.СветлоСиний;
Блок3.Стиль.Гибкость = 5;
Блок4 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок4.Стиль.ЦветФона = ДФ.Цвет.Хаки;
Блок4.Стиль.Гибкость = 1;
Форма1.Открыть();
ГКосинус_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().ГКосинус(1) = 1.54308063481524
, "", "!!! ") + "ГКосинус_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Контент.Текст = "" + ДФ.Математика().ГКосинус(1);
Форма1.Открыть();
ГоризонтальноеВыравнивание_Стиль_свойство.os
Перем ДФ, Блок2;
Процедура Свойство() Экспорт
Сообщить(?(
Блок2.Стиль.ГоризонтальноеВыравнивание = ДФ.ГоризонтальноеВыравнивание.Лево
, "", "!!! ") + "ГоризонтальноеВыравнивание_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок2.Стиль, "ГоризонтальноеВыравнивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная);
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Текст = "Блок2";
Блок2.Стиль.Ширина = 150;
Блок2.Стиль.Границы = ДФ.Границы(3, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Коралловый);
Блок2.Стиль.ГоризонтальноеВыравнивание = ДФ.ГоризонтальноеВыравнивание.Лево;
Блок2.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Блок3 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок3.Текст = "Блок3";
Блок3.Стиль.Ширина = 150;
Блок3.Стиль.Границы = ДФ.Границы(3, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Коралловый);
Блок3.Стиль.ГоризонтальноеВыравнивание = ДФ.ГоризонтальноеВыравнивание.Лево;
Блок3.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Блок4 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок4.Стиль.Несвободно = ДФ.Несвободно.ЛевоПраво;
Блок2.Стиль.Калибровка = ДФ.Калибровка.Границы;
Блок3.Стиль.Калибровка = ДФ.Калибровка.Границы;
Форма1.Открыть();
ГоризонтальноеВыравниваниеТекста_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право
, "", "!!! ") + "ГоризонтальноеВыравниваниеТекста_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ГоризонтальноеВыравниваниеТекста", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 550;
Форма1.НачальнаяВысота = 250;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Текст = "– Заберусь-ка я на вершину вон того холма, – решила Алиса";
Блок1.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Форма1.Открыть();
ГоризонтальноеПрокручивание_Артикль_свойство.os
Перем Артикль1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Артикль1.ГоризонтальноеПрокручивание = Артикль1.ГоризонтальноеПрокручивание + 5;
Артикль1.ВертикальноеПрокручивание = Артикль1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
Артикль1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Артикль1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Артикль1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Артикль1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Стиль1 = Артикль1.Стиль;
Артикль1.Стиль.Высота = 250;
Артикль1.Стиль.Ширина = 250;
Артикль1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Артикль1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Артикль2 = ДФ.Артикль();
Артикль2.Родитель = Артикль1;
Артикль2.Стиль.Высота = 850;
Артикль2.Стиль.Ширина = 950;
Артикль2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Артикль2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_Блок_свойство.os
Перем Блок1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Блок1.ГоризонтальноеПрокручивание = Блок1.ГоризонтальноеПрокручивание + 5;
Блок1.ВертикальноеПрокручивание = Блок1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
Блок1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Блок1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Блок1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Блок2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_Группа_свойство.os
Перем Группа1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Группа1.ГоризонтальноеПрокручивание = Группа1.ГоризонтальноеПрокручивание + 5;
Группа1.ВертикальноеПрокручивание = Группа1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
Группа1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Группа1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Группа1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Группа1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Стиль1 = Группа1.Стиль;
Группа1.Стиль.Высота = 250;
Группа1.Стиль.Ширина = 250;
Группа1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Группа1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Группа2 = ДФ.Группа();
Группа2.Родитель = Группа1;
Группа2.Стиль.Высота = 850;
Группа2.Стиль.Ширина = 950;
Группа2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Группа2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_ДополнительныйБлок_свойство.os
Перем ДополнительныйБлок1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
ДополнительныйБлок1.ГоризонтальноеПрокручивание = ДополнительныйБлок1.ГоризонтальноеПрокручивание + 5;
ДополнительныйБлок1.ВертикальноеПрокручивание = ДополнительныйБлок1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
ДополнительныйБлок1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
Стиль1 = ДополнительныйБлок1.Стиль;
ДополнительныйБлок1.Стиль.Высота = 250;
ДополнительныйБлок1.Стиль.Ширина = 250;
ДополнительныйБлок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
ДополнительныйБлок2 = ДФ.ДополнительныйБлок();
ДополнительныйБлок2.Родитель = ДополнительныйБлок1;
ДополнительныйБлок2.Стиль.Высота = 850;
ДополнительныйБлок2.Стиль.Ширина = 950;
ДополнительныйБлок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = ДополнительныйБлок2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_Заголовок1_свойство.os
Перем Заголовок11;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Заголовок11.ГоризонтальноеПрокручивание = Заголовок11.ГоризонтальноеПрокручивание + 5;
Заголовок11.ВертикальноеПрокручивание = Заголовок11.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
Заголовок11.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок11, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Заголовок11, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Заголовок11, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Стиль1 = Заголовок11.Стиль;
Заголовок11.Стиль.Высота = 250;
Заголовок11.Стиль.Ширина = 250;
Заголовок11.Стиль.Переполнение = ДФ.Переполнение.Авто;
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Заголовок12 = ДФ.Заголовок1();
Заголовок12.Родитель = Заголовок11;
Заголовок12.Стиль.Высота = 850;
Заголовок12.Стиль.Ширина = 950;
Заголовок12.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Заголовок12;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_Заголовок2_свойство.os
Перем Заголовок21;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Заголовок21.ГоризонтальноеПрокручивание = Заголовок21.ГоризонтальноеПрокручивание + 5;
Заголовок21.ВертикальноеПрокручивание = Заголовок21.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
Заголовок21.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок21, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Заголовок21, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Заголовок21, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Стиль1 = Заголовок21.Стиль;
Заголовок21.Стиль.Высота = 250;
Заголовок21.Стиль.Ширина = 250;
Заголовок21.Стиль.Переполнение = ДФ.Переполнение.Авто;
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Заголовок22 = ДФ.Заголовок2();
Заголовок22.Родитель = Заголовок21;
Заголовок22.Стиль.Высота = 850;
Заголовок22.Стиль.Ширина = 950;
Заголовок22.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Заголовок22;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_Заголовок3_свойство.os
Перем Заголовок31;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Заголовок31.ГоризонтальноеПрокручивание = Заголовок31.ГоризонтальноеПрокручивание + 5;
Заголовок31.ВертикальноеПрокручивание = Заголовок31.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
Заголовок31.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок31, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Заголовок31, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Заголовок31, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Стиль1 = Заголовок31.Стиль;
Заголовок31.Стиль.Высота = 250;
Заголовок31.Стиль.Ширина = 250;
Заголовок31.Стиль.Переполнение = ДФ.Переполнение.Авто;
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Заголовок32 = ДФ.Заголовок3();
Заголовок32.Родитель = Заголовок31;
Заголовок32.Стиль.Высота = 850;
Заголовок32.Стиль.Ширина = 950;
Заголовок32.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Заголовок32;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_Заголовок4_свойство.os
Перем Заголовок41;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Заголовок41.ГоризонтальноеПрокручивание = Заголовок41.ГоризонтальноеПрокручивание + 5;
Заголовок41.ВертикальноеПрокручивание = Заголовок41.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
Заголовок41.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок41, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Заголовок41, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Заголовок41, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Стиль1 = Заголовок41.Стиль;
Заголовок41.Стиль.Высота = 250;
Заголовок41.Стиль.Ширина = 250;
Заголовок41.Стиль.Переполнение = ДФ.Переполнение.Авто;
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Заголовок42 = ДФ.Заголовок4();
Заголовок42.Родитель = Заголовок41;
Заголовок42.Стиль.Высота = 850;
Заголовок42.Стиль.Ширина = 950;
Заголовок42.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Заголовок42;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_Заголовок5_свойство.os
Перем Заголовок51;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Заголовок51.ГоризонтальноеПрокручивание = Заголовок51.ГоризонтальноеПрокручивание + 5;
Заголовок51.ВертикальноеПрокручивание = Заголовок51.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
Заголовок51.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок51, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Заголовок51, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Заголовок51, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Стиль1 = Заголовок51.Стиль;
Заголовок51.Стиль.Высота = 250;
Заголовок51.Стиль.Ширина = 250;
Заголовок51.Стиль.Переполнение = ДФ.Переполнение.Авто;
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Заголовок52 = ДФ.Заголовок5();
Заголовок52.Родитель = Заголовок51;
Заголовок52.Стиль.Высота = 850;
Заголовок52.Стиль.Ширина = 950;
Заголовок52.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Заголовок52;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_Заголовок6_свойство.os
Перем Заголовок61;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Заголовок61.ГоризонтальноеПрокручивание = Заголовок61.ГоризонтальноеПрокручивание + 5;
Заголовок61.ВертикальноеПрокручивание = Заголовок61.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
Заголовок61.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок61, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Заголовок61, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Заголовок61, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Стиль1 = Заголовок61.Стиль;
Заголовок61.Стиль.Высота = 250;
Заголовок61.Стиль.Ширина = 250;
Заголовок61.Стиль.Переполнение = ДФ.Переполнение.Авто;
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Заголовок62 = ДФ.Заголовок6();
Заголовок62.Родитель = Заголовок61;
Заголовок62.Стиль.Высота = 850;
Заголовок62.Стиль.Ширина = 950;
Заголовок62.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Заголовок62;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_Заголовок_свойство.os
Перем Заголовок1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Заголовок1.ГоризонтальноеПрокручивание = Заголовок1.ГоризонтальноеПрокручивание + 5;
Заголовок1.ВертикальноеПрокручивание = Заголовок1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
Заголовок1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Заголовок1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Заголовок1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Стиль1 = Заголовок1.Стиль;
Заголовок1.Стиль.Высота = 250;
Заголовок1.Стиль.Ширина = 250;
Заголовок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Заголовок2 = ДФ.Заголовок();
Заголовок2.Родитель = Заголовок1;
Заголовок2.Стиль.Высота = 850;
Заголовок2.Стиль.Ширина = 950;
Заголовок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Заголовок2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_ЗаголовокГруппы_свойство.os
Перем ЗаголовокГруппы1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
ЗаголовокГруппы1.ГоризонтальноеПрокручивание = ЗаголовокГруппы1.ГоризонтальноеПрокручивание + 5;
ЗаголовокГруппы1.ВертикальноеПрокручивание = ЗаголовокГруппы1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
ЗаголовокГруппы1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
Стиль1 = ЗаголовокГруппы1.Стиль;
ЗаголовокГруппы1.Стиль.Высота = 250;
ЗаголовокГруппы1.Стиль.Ширина = 250;
ЗаголовокГруппы1.Стиль.Переполнение = ДФ.Переполнение.Авто;
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
ЗаголовокГруппы2 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы2.Родитель = ЗаголовокГруппы1;
ЗаголовокГруппы2.Стиль.Высота = 850;
ЗаголовокГруппы2.Стиль.Ширина = 950;
ЗаголовокГруппы2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = ЗаголовокГруппы2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ЗаголовокРаскрываемогоБлока1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
ЗаголовокРаскрываемогоБлока1.ГоризонтальноеПрокручивание = ЗаголовокРаскрываемогоБлока1.ГоризонтальноеПрокручивание + 5;
ЗаголовокРаскрываемогоБлока1.ВертикальноеПрокручивание = ЗаголовокРаскрываемогоБлока1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_ЗаголовокРаскрываемогоЗаголовокРаскрываемогоБлокаа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
Стиль1 = ЗаголовокРаскрываемогоБлока1.Стиль;
ЗаголовокРаскрываемогоБлока1.Стиль.Высота = 250;
ЗаголовокРаскрываемогоБлока1.Стиль.Ширина = 250;
ЗаголовокРаскрываемогоБлока1.Стиль.Переполнение = ДФ.Переполнение.Авто;
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
ЗаголовокРаскрываемогоБлока2 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока2.Родитель = ЗаголовокРаскрываемогоБлока1;
ЗаголовокРаскрываемогоБлока2.Стиль.Высота = 850;
ЗаголовокРаскрываемогоБлока2.Стиль.Ширина = 950;
ЗаголовокРаскрываемогоБлока2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = ЗаголовокРаскрываемогоБлока2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_Кнопка_свойство.os
Перем Кнопка1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Кнопка1.ГоризонтальноеПрокручивание = Кнопка1.ГоризонтальноеПрокручивание + 5;
Кнопка1.ВертикальноеПрокручивание = Кнопка1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
Кнопка1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Кнопка1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Кнопка1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Стиль1 = Кнопка1.Стиль;
Кнопка1.Стиль.Высота = 250;
Кнопка1.Стиль.Ширина = 250;
Кнопка1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Кнопка2 = ДФ.Кнопка();
Кнопка2.Родитель = Кнопка1;
Кнопка2.Стиль.Высота = 850;
Кнопка2.Стиль.Ширина = 950;
Кнопка2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Кнопка2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_Колонтитул_свойство.os
Перем Колонтитул1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Колонтитул1.ГоризонтальноеПрокручивание = Колонтитул1.ГоризонтальноеПрокручивание + 5;
Колонтитул1.ВертикальноеПрокручивание = Колонтитул1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
Колонтитул1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонтитул1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Колонтитул1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Колонтитул1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Стиль1 = Колонтитул1.Стиль;
Колонтитул1.Стиль.Высота = 250;
Колонтитул1.Стиль.Ширина = 250;
Колонтитул1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Колонтитул2 = ДФ.Колонтитул();
Колонтитул2.Родитель = Колонтитул1;
Колонтитул2.Стиль.Высота = 850;
Колонтитул2.Стиль.Ширина = 950;
Колонтитул2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Колонтитул2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_МедиаГруппа_свойство.os
Перем МедиаГруппа1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
МедиаГруппа1.ГоризонтальноеПрокручивание = МедиаГруппа1.ГоризонтальноеПрокручивание + 5;
МедиаГруппа1.ВертикальноеПрокручивание = МедиаГруппа1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
МедиаГруппа1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(МедиаГруппа1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(МедиаГруппа1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
Стиль1 = МедиаГруппа1.Стиль;
МедиаГруппа1.Стиль.Высота = 250;
МедиаГруппа1.Стиль.Ширина = 250;
МедиаГруппа1.Стиль.Переполнение = ДФ.Переполнение.Авто;
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
МедиаГруппа2 = ДФ.МедиаГруппа();
МедиаГруппа2.Родитель = МедиаГруппа1;
МедиаГруппа2.Стиль.Высота = 850;
МедиаГруппа2.Стиль.Ширина = 950;
МедиаГруппа2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = МедиаГруппа2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_НеупорядоченныйСписок_свойство.os
Перем НеупорядоченныйСписок1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
НеупорядоченныйСписок1.ГоризонтальноеПрокручивание = НеупорядоченныйСписок1.ГоризонтальноеПрокручивание + 5;
НеупорядоченныйСписок1.ВертикальноеПрокручивание = НеупорядоченныйСписок1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
Стиль1 = НеупорядоченныйСписок1.Стиль;
НеупорядоченныйСписок1.Стиль.Высота = 250;
НеупорядоченныйСписок1.Стиль.Ширина = 250;
НеупорядоченныйСписок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
НеупорядоченныйСписок2 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок2.Родитель = НеупорядоченныйСписок1;
НеупорядоченныйСписок2.Стиль.Высота = 850;
НеупорядоченныйСписок2.Стиль.Ширина = 950;
НеупорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = НеупорядоченныйСписок2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_НижнийКолонтитул_свойство.os
Перем НижнийКолонтитул1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
НижнийКолонтитул1.ГоризонтальноеПрокручивание = НижнийКолонтитул1.ГоризонтальноеПрокручивание + 5;
НижнийКолонтитул1.ВертикальноеПрокручивание = НижнийКолонтитул1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
НижнийКолонтитул1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
Стиль1 = НижнийКолонтитул1.Стиль;
НижнийКолонтитул1.Стиль.Высота = 250;
НижнийКолонтитул1.Стиль.Ширина = 250;
НижнийКолонтитул1.Стиль.Переполнение = ДФ.Переполнение.Авто;
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
НижнийКолонтитул2 = ДФ.НижнийКолонтитул();
НижнийКолонтитул2.Родитель = НижнийКолонтитул1;
НижнийКолонтитул2.Стиль.Высота = 850;
НижнийКолонтитул2.Стиль.Ширина = 950;
НижнийКолонтитул2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = НижнийКолонтитул2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_ОписаниеМедиа_свойство.os
Перем ОписаниеМедиа1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
ОписаниеМедиа1.ГоризонтальноеПрокручивание = ОписаниеМедиа1.ГоризонтальноеПрокручивание + 5;
ОписаниеМедиа1.ВертикальноеПрокручивание = ОписаниеМедиа1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
ОписаниеМедиа1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
Стиль1 = ОписаниеМедиа1.Стиль;
ОписаниеМедиа1.Стиль.Высота = 250;
ОписаниеМедиа1.Стиль.Ширина = 250;
ОписаниеМедиа1.Стиль.Переполнение = ДФ.Переполнение.Авто;
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
ОписаниеМедиа2 = ДФ.ОписаниеМедиа();
ОписаниеМедиа2.Родитель = ОписаниеМедиа1;
ОписаниеМедиа2.Стиль.Высота = 850;
ОписаниеМедиа2.Стиль.Ширина = 950;
ОписаниеМедиа2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = ОписаниеМедиа2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_Определение_свойство.os
Перем Определение1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Определение1.ГоризонтальноеПрокручивание = Определение1.ГоризонтальноеПрокручивание + 5;
Определение1.ВертикальноеПрокручивание = Определение1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
Определение1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Определение1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Определение1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Определение1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Стиль1 = Определение1.Стиль;
Определение1.Стиль.Высота = 250;
Определение1.Стиль.Ширина = 250;
Определение1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Определение1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Определение2 = ДФ.Определение();
Определение2.Родитель = Определение1;
Определение2.Стиль.Высота = 850;
Определение2.Стиль.Ширина = 950;
Определение2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Определение2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_СписокОпределений_свойство.os
Перем СписокОпределений1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
СписокОпределений1.ГоризонтальноеПрокручивание = СписокОпределений1.ГоризонтальноеПрокручивание + 5;
СписокОпределений1.ВертикальноеПрокручивание = СписокОпределений1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
СписокОпределений1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(СписокОпределений1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(СписокОпределений1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
Стиль1 = СписокОпределений1.Стиль;
СписокОпределений1.Стиль.Высота = 250;
СписокОпределений1.Стиль.Ширина = 250;
СписокОпределений1.Стиль.Переполнение = ДФ.Переполнение.Авто;
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
СписокОпределений2 = ДФ.СписокОпределений();
СписокОпределений2.Родитель = СписокОпределений1;
СписокОпределений2.Стиль.Высота = 850;
СписокОпределений2.Стиль.Ширина = 950;
СписокОпределений2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = СписокОпределений2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_Термин_свойство.os
Перем Термин1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
Термин1.ГоризонтальноеПрокручивание = Термин1.ГоризонтальноеПрокручивание + 5;
Термин1.ВертикальноеПрокручивание = Термин1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
Термин1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Термин1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(Термин1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(Термин1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Стиль1 = Термин1.Стиль;
Термин1.Стиль.Высота = 250;
Термин1.Стиль.Ширина = 250;
Термин1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Термин1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Термин2 = ДФ.Термин();
Термин2.Родитель = Термин1;
Термин2.Стиль.Высота = 850;
Термин2.Стиль.Ширина = 950;
Термин2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Термин2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_УпорядоченныйСписок_свойство.os
Перем УпорядоченныйСписок1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
УпорядоченныйСписок1.ГоризонтальноеПрокручивание = УпорядоченныйСписок1.ГоризонтальноеПрокручивание + 5;
УпорядоченныйСписок1.ВертикальноеПрокручивание = УпорядоченныйСписок1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
УпорядоченныйСписок1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
Стиль1 = УпорядоченныйСписок1.Стиль;
УпорядоченныйСписок1.Стиль.Высота = 250;
УпорядоченныйСписок1.Стиль.Ширина = 250;
УпорядоченныйСписок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
УпорядоченныйСписок2 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок2.Родитель = УпорядоченныйСписок1;
УпорядоченныйСписок2.Стиль.Высота = 850;
УпорядоченныйСписок2.Стиль.Ширина = 950;
УпорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = УпорядоченныйСписок2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_ФорматированныйТекст_свойство.os
Перем ФорматированныйТекст1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
ФорматированныйТекст1.ГоризонтальноеПрокручивание = ФорматированныйТекст1.ГоризонтальноеПрокручивание + 5;
ФорматированныйТекст1.ВертикальноеПрокручивание = ФорматированныйТекст1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
ФорматированныйТекст1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
Стиль1 = ФорматированныйТекст1.Стиль;
ФорматированныйТекст1.Стиль.Высота = 250;
ФорматированныйТекст1.Стиль.Ширина = 250;
ФорматированныйТекст1.Стиль.Переполнение = ДФ.Переполнение.Авто;
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
ФорматированныйТекст2 = ДФ.ФорматированныйТекст();
ФорматированныйТекст2.Родитель = ФорматированныйТекст1;
ФорматированныйТекст2.Стиль.Высота = 850;
ФорматированныйТекст2.Стиль.Ширина = 950;
ФорматированныйТекст2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = ФорматированныйТекст2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГоризонтальноеПрокручивание_ЭлементСписка_свойство.os
Перем ЭлементСписка1;
Перем ДФ;
Процедура Свойство() Экспорт
// Прибавим приращение к текущим значениям ползунков.
ЭлементСписка1.ГоризонтальноеПрокручивание = ЭлементСписка1.ГоризонтальноеПрокручивание + 5;
ЭлементСписка1.ВертикальноеПрокручивание = ЭлементСписка1.ВертикальноеПрокручивание + 5;
КонецПроцедуры
Процедура ГоризонтальноеПрокручивание() Экспорт
Сообщить(?(
ЭлементСписка1.ГоризонтальноеПрокручивание = 0
, "", "!!! ") + "ГоризонтальноеПрокручивание_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "ГоризонтальноеПрокручивание"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Запросим положения ползунков, чтобы к их значениям прибавить приращение.
ДФ.ПолучитьСвойство(ЭлементСписка1, "ВертикальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
ДФ.ПолучитьСвойство(ЭлементСписка1, "ГоризонтальноеПрокручивание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Прокручивание";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
Стиль1 = ЭлементСписка1.Стиль;
ЭлементСписка1.Стиль.Высота = 250;
ЭлементСписка1.Стиль.Ширина = 250;
ЭлементСписка1.Стиль.Переполнение = ДФ.Переполнение.Авто;
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
ЭлементСписка2 = ДФ.ЭлементСписка();
ЭлементСписка2.Родитель = ЭлементСписка1;
ЭлементСписка2.Стиль.Высота = 850;
ЭлементСписка2.Стиль.Ширина = 950;
ЭлементСписка2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = ЭлементСписка2;
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ГраницаСвернута_Стиль_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Сообщить(?(
Таблица1.Стиль.ГраницаСвернута = ДФ.ГраницаСвернута.Раздельно
, "", "!!! ") + "ГраницаСвернута_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1.Стиль, "ГраницаСвернута", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 550;
Форма1.НачальнаяВысота = 250;
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Стиль.Границы = ДФ.Границы(1);
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
СтрокаШапка = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
Строка1 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Ячейка1 = Строка1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Матроскин";
Ячейка2 = Строка1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "Кот";
Строка2 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Ячейка3 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Шарик";
Ячейка4 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "Пёс";
Таблица1.Стиль.ГраницаСвернута = ДФ.ГраницаСвернута.Раздельно;
Форма1.Открыть();
Границы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Границы = "thin solid rgb(255, 0, 0)"
, "", "!!! ") + "Границы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Границы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Текст = "Блок1";
Блок1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.Заполнение = ДФ.Заполнение(50, 10, 20, 30);
Форма1.Открыть();
Громкость_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Аудио1.Громкость = 0.2
, "", "!!! ") + "Громкость_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "Громкость", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Громкость = 0.2;
Форма1.Открыть();
ГСинус_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().ГСинус(1) = 1.1752011936438
, "", "!!! ") + "ГСинус_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().ГСинус(1);
Форма1.Открыть();
ГТангенс_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().ГТангенс(1) = 0.761594155955765
, "", "!!! ") + "ГТангенс_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().ГТангенс(1);
Форма1.Открыть();
ДвойноеНажатие_Абзац_метод.os
Перем ДФ, Абзац1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Абзац1.ДвойноеНажатие.ИмяМетода = "Абзац1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Абзац_метод.os" + " " + ТекущаяДата());
Абзац1.ДвойноеНажатие();
КонецПроцедуры
Процедура Абзац1_ДвойноеНажатие() Экспорт
// Сообщить("Абзац1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Абзац";
Абзац1.Стиль.Высота = 200;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Абзац1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Абзац_событие.os
Перем ДФ, Абзац1;
Процедура Абзац1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Абзац_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Абзац";
Абзац1.Стиль.Высота = 200;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Абзац1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Артикль_метод.os
Перем ДФ, Артикль1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Артикль1.ДвойноеНажатие.ИмяМетода = "Артикль1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Артикль_метод.os" + " " + ТекущаяДата());
Артикль1.ДвойноеНажатие();
КонецПроцедуры
Процедура Артикль1_ДвойноеНажатие() Экспорт
// Сообщить("Артикль1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Текст = "Это Артикль";
Артикль1.Стиль.Высота = 200;
Артикль1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Артикль1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Артикль1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Артикль_событие.os
Перем ДФ, Артикль1;
Процедура Артикль1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Артикль_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Текст = "Это Артикль";
Артикль1.Стиль.Высота = 200;
Артикль1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Артикль1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Артикль1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Аудио_метод.os
Перем ДФ, Аудио1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Аудио1.ДвойноеНажатие.ИмяМетода = "Аудио1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Аудио_метод.os" + " " + ТекущаяДата());
Аудио1.ДвойноеНажатие();
КонецПроцедуры
Процедура Аудио1_ДвойноеНажатие() Экспорт
// Сообщить("Аудио1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Стиль.Высота = 200;
Аудио1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Аудио1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Аудио1_ДвойноеНажатие");
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";
Форма1.Открыть();
ДвойноеНажатие_Аудио_событие.os
Перем ДФ, Аудио1;
Процедура Аудио1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Аудио_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Стиль.Высота = 200;
Аудио1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Аудио1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Аудио1_ДвойноеНажатие");
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";
Форма1.Открыть();
ДвойноеНажатие_Блок_метод.os
Перем ДФ, Блок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Блок1.ДвойноеНажатие.ИмяМетода = "Блок1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Блок_метод.os" + " " + ТекущаяДата());
Блок1.ДвойноеНажатие();
КонецПроцедуры
Процедура Блок1_ДвойноеНажатие() Экспорт
// Сообщить("Блок1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Это Блок";
Блок1.Стиль.Высота = 200;
Блок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Блок1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Блок1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Блок_событие.os
Перем ДФ, Блок1;
Процедура Блок1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Блок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Это Блок";
Блок1.Стиль.Высота = 200;
Блок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Блок1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Блок1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ВыборВремени_метод.os
Перем ДФ, ВыборВремени1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборВремени1.ДвойноеНажатие.ИмяМетода = "ВыборВремени1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ВыборВремени_метод.os" + " " + ТекущаяДата());
ВыборВремени1.ДвойноеНажатие();
КонецПроцедуры
Процедура ВыборВремени1_ДвойноеНажатие() Экспорт
// Сообщить("ВыборВремени1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Стиль.Высота = 200;
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборВремени1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ВыборВремени1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ВыборВремени_событие.os
Перем ДФ, ВыборВремени1;
Процедура ВыборВремени1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ВыборВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Стиль.Высота = 200;
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборВремени1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ВыборВремени1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ВыборДаты_метод.os
Перем ДФ, ВыборДаты1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборДаты1.ДвойноеНажатие.ИмяМетода = "ВыборДаты1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ВыборДаты_метод.os" + " " + ТекущаяДата());
ВыборДаты1.ДвойноеНажатие();
КонецПроцедуры
Процедура ВыборДаты1_ДвойноеНажатие() Экспорт
// Сообщить("ВыборДаты1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Стиль.Высота = 200;
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборДаты1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ВыборДаты_событие.os
Перем ДФ, ВыборДаты1;
Процедура ВыборДаты1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ВыборДаты_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Стиль.Высота = 200;
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборДаты1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ВыборДатыВремени_метод.os
Перем ДФ, ВыборДатыВремени1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборДатыВремени1.ДвойноеНажатие.ИмяМетода = "ВыборДатыВремени1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ВыборДатыВремени_метод.os" + " " + ТекущаяДата());
ВыборДатыВремени1.ДвойноеНажатие();
КонецПроцедуры
Процедура ВыборДатыВремени1_ДвойноеНажатие() Экспорт
// Сообщить("ВыборДатыВремени1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Стиль.Высота = 200;
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборДатыВремени1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ВыборДатыВремени_событие.os
Перем ДФ, ВыборДатыВремени1;
Процедура ВыборДатыВремени1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ВыборДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Стиль.Высота = 200;
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборДатыВремени1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ВыборМестнойДатыВремени_метод.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.ДвойноеНажатие.ИмяМетода = "ВыборМестнойДатыВремени1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ВыборМестнойДатыВремени_метод.os" + " " + ТекущаяДата());
ВыборМестнойДатыВремени1.ДвойноеНажатие();
КонецПроцедуры
Процедура ВыборМестнойДатыВремени1_ДвойноеНажатие() Экспорт
// Сообщить("ВыборМестнойДатыВремени1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Стиль.Высота = 200;
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборМестнойДатыВремени1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ВыборМестнойДатыВремени1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ВыборМестнойДатыВремени_событие.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура ВыборМестнойДатыВремени1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ВыборМестнойДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Стиль.Высота = 200;
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборМестнойДатыВремени1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ВыборМестнойДатыВремени1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ВыборМесяца_метод.os
Перем ДФ, ВыборМесяца1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборМесяца1.ДвойноеНажатие.ИмяМетода = "ВыборМесяца1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ВыборМесяца_метод.os" + " " + ТекущаяДата());
ВыборМесяца1.ДвойноеНажатие();
КонецПроцедуры
Процедура ВыборМесяца1_ДвойноеНажатие() Экспорт
// Сообщить("ВыборМесяца1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Стиль.Высота = 200;
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборМесяца1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ВыборМесяца_событие.os
Перем ДФ, ВыборМесяца1;
Процедура ВыборМесяца1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ВыборМесяца_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Стиль.Высота = 200;
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборМесяца1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ВыборНедели_метод.os
Перем ДФ, ВыборНедели1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборНедели1.ДвойноеНажатие.ИмяМетода = "ВыборНедели1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ВыборНедели_метод.os" + " " + ТекущаяДата());
ВыборНедели1.ДвойноеНажатие();
КонецПроцедуры
Процедура ВыборНедели1_ДвойноеНажатие() Экспорт
// Сообщить("ВыборНедели1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Стиль.Высота = 200;
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборНедели1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ВыборНедели_событие.os
Перем ДФ, ВыборНедели1;
Процедура ВыборНедели1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ВыборНедели_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Стиль.Высота = 200;
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборНедели1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Группа_метод.os
Перем ДФ, Группа1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Группа1.ДвойноеНажатие.ИмяМетода = "Группа1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Группа_метод.os" + " " + ТекущаяДата());
Группа1.ДвойноеНажатие();
КонецПроцедуры
Процедура Группа1_ДвойноеНажатие() Экспорт
// Сообщить("Группа1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Текст = "Это Группа";
Группа1.Стиль.Высота = 200;
Группа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Группа1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Группа1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Группа_событие.os
Перем ДФ, Группа1;
Процедура Группа1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Группа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Текст = "Это Группа";
Группа1.Стиль.Высота = 200;
Группа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Группа1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Группа1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ГруппировкаПоляСписка_метод.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.ДвойноеНажатие.ИмяМетода = "ГруппировкаПоляСписка1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ГруппировкаПоляСписка_метод.os" + " " + ТекущаяДата());
ГруппировкаПоляСписка1.ДвойноеНажатие();
КонецПроцедуры
Процедура ГруппировкаПоляСписка1_ДвойноеНажатие() Экспорт
// Сообщить("ГруппировкаПоляСписка1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.Стиль.Высота = 200;
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ГруппировкаПоляСписка1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ГруппировкаПоляСписка1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ГруппировкаПоляСписка_событие.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура ГруппировкаПоляСписка1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ГруппировкаПоляСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.Стиль.Высота = 200;
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ГруппировкаПоляСписка1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ГруппировкаПоляСписка1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Диалог_метод.os
Перем ДФ, Диалог1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Диалог1.ДвойноеНажатие.ИмяМетода = "Диалог1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Диалог_метод.os" + " " + ТекущаяДата());
Диалог1.ДвойноеНажатие();
КонецПроцедуры
Процедура Диалог1_ДвойноеНажатие() Экспорт
// Сообщить("Диалог1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Текст = "Это Диалог";
Диалог1.Стиль.Высота = 200;
Диалог1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Диалог1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Диалог1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Диалог_событие.os
Перем ДФ, Диалог1;
Процедура Диалог1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Диалог_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Текст = "Это Диалог";
Диалог1.Стиль.Высота = 200;
Диалог1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Диалог1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Диалог1_ДвойноеНажатие");
Диалог1.Показать();
Форма1.Открыть();
ДвойноеНажатие_ДополнительныйБлок_метод.os
Перем ДФ, ДополнительныйБлок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДополнительныйБлок1.ДвойноеНажатие.ИмяМетода = "ДополнительныйБлок1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ДополнительныйБлок_метод.os" + " " + ТекущаяДата());
ДополнительныйБлок1.ДвойноеНажатие();
КонецПроцедуры
Процедура ДополнительныйБлок1_ДвойноеНажатие() Экспорт
// Сообщить("ДополнительныйБлок1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "Это ДополнительныйБлок";
ДополнительныйБлок1.Стиль.Высота = 200;
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ДополнительныйБлок1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ДополнительныйБлок1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ДополнительныйБлок_событие.os
Перем ДФ, ДополнительныйБлок1;
Процедура ДополнительныйБлок1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ДополнительныйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "Это ДополнительныйБлок";
ДополнительныйБлок1.Стиль.Высота = 200;
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ДополнительныйБлок1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ДополнительныйБлок1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ЖирныйТекст_метод.os
Перем ДФ, ЖирныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЖирныйТекст1.ДвойноеНажатие.ИмяМетода = "ЖирныйТекст1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ЖирныйТекст_метод.os" + " " + ТекущаяДата());
ЖирныйТекст1.ДвойноеНажатие();
КонецПроцедуры
Процедура ЖирныйТекст1_ДвойноеНажатие() Экспорт
// Сообщить("ЖирныйТекст1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Текст = "Это ЖирныйТекст";
ЖирныйТекст1.Стиль.Высота = 200;
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЖирныйТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ЖирныйТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ЖирныйТекст_событие.os
Перем ДФ, ЖирныйТекст1;
Процедура ЖирныйТекст1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ЖирныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Текст = "Это ЖирныйТекст";
ЖирныйТекст1.Стиль.Высота = 200;
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЖирныйТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ЖирныйТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Заголовок1_метод.os
Перем ДФ, Заголовок11;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок11.ДвойноеНажатие.ИмяМетода = "Заголовок11_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Заголовок1_метод.os" + " " + ТекущаяДата());
Заголовок11.ДвойноеНажатие();
КонецПроцедуры
Процедура Заголовок11_ДвойноеНажатие() Экспорт
// Сообщить("Заголовок11_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Текст = "Это Заголовок1";
Заголовок11.Стиль.Высота = 200;
Заголовок11.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок11.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Заголовок11_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Заголовок1_событие.os
Перем ДФ, Заголовок11;
Процедура Заголовок11_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Заголовок1_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Текст = "Это Заголовок1";
Заголовок11.Стиль.Высота = 200;
Заголовок11.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок11.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Заголовок11_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Заголовок2_метод.os
Перем ДФ, Заголовок21;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок21.ДвойноеНажатие.ИмяМетода = "Заголовок21_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Заголовок2_метод.os" + " " + ТекущаяДата());
Заголовок21.ДвойноеНажатие();
КонецПроцедуры
Процедура Заголовок21_ДвойноеНажатие() Экспорт
// Сообщить("Заголовок21_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Текст = "Это Заголовок2";
Заголовок21.Стиль.Высота = 200;
Заголовок21.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок21.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Заголовок21_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Заголовок2_событие.os
Перем ДФ, Заголовок21;
Процедура Заголовок21_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Заголовок2_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Текст = "Это Заголовок2";
Заголовок21.Стиль.Высота = 200;
Заголовок21.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок21.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Заголовок21_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Заголовок3_метод.os
Перем ДФ, Заголовок31;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок31.ДвойноеНажатие.ИмяМетода = "Заголовок31_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Заголовок3_метод.os" + " " + ТекущаяДата());
Заголовок31.ДвойноеНажатие();
КонецПроцедуры
Процедура Заголовок31_ДвойноеНажатие() Экспорт
// Сообщить("Заголовок31_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Текст = "Это Заголовок3";
Заголовок31.Стиль.Высота = 200;
Заголовок31.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок31.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Заголовок31_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Заголовок3_событие.os
Перем ДФ, Заголовок31;
Процедура Заголовок31_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Заголовок3_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Текст = "Это Заголовок3";
Заголовок31.Стиль.Высота = 200;
Заголовок31.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок31.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Заголовок31_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Заголовок4_метод.os
Перем ДФ, Заголовок41;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок41.ДвойноеНажатие.ИмяМетода = "Заголовок41_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Заголовок4_метод.os" + " " + ТекущаяДата());
Заголовок41.ДвойноеНажатие();
КонецПроцедуры
Процедура Заголовок41_ДвойноеНажатие() Экспорт
// Сообщить("Заголовок41_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Текст = "Это Заголовок4";
Заголовок41.Стиль.Высота = 200;
Заголовок41.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок41.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Заголовок41_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Заголовок4_событие.os
Перем ДФ, Заголовок41;
Процедура Заголовок41_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Заголовок4_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Текст = "Это Заголовок4";
Заголовок41.Стиль.Высота = 200;
Заголовок41.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок41.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Заголовок41_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Заголовок5_метод.os
Перем ДФ, Заголовок51;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок51.ДвойноеНажатие.ИмяМетода = "Заголовок51_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Заголовок5_метод.os" + " " + ТекущаяДата());
Заголовок51.ДвойноеНажатие();
КонецПроцедуры
Процедура Заголовок51_ДвойноеНажатие() Экспорт
// Сообщить("Заголовок51_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Текст = "Это Заголовок5";
Заголовок51.Стиль.Высота = 200;
Заголовок51.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок51.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Заголовок51_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Заголовок5_событие.os
Перем ДФ, Заголовок51;
Процедура Заголовок51_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Заголовок5_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Текст = "Это Заголовок5";
Заголовок51.Стиль.Высота = 200;
Заголовок51.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок51.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Заголовок51_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Заголовок6_метод.os
Перем ДФ, Заголовок61;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок61.ДвойноеНажатие.ИмяМетода = "Заголовок61_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Заголовок6_метод.os" + " " + ТекущаяДата());
Заголовок61.ДвойноеНажатие();
КонецПроцедуры
Процедура Заголовок61_ДвойноеНажатие() Экспорт
// Сообщить("Заголовок61_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Текст = "Это Заголовок6";
Заголовок61.Стиль.Высота = 200;
Заголовок61.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок61.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Заголовок61_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Заголовок6_событие.os
Перем ДФ, Заголовок61;
Процедура Заголовок61_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Заголовок6_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Текст = "Это Заголовок6";
Заголовок61.Стиль.Высота = 200;
Заголовок61.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок61.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Заголовок61_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Заголовок_метод.os
Перем ДФ, Заголовок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок1.ДвойноеНажатие.ИмяМетода = "Заголовок1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Заголовок_метод.os" + " " + ТекущаяДата());
Заголовок1.ДвойноеНажатие();
КонецПроцедуры
Процедура Заголовок1_ДвойноеНажатие() Экспорт
// Сообщить("Заголовок1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Текст = "Это Заголовок";
Заголовок1.Стиль.Высота = 200;
Заголовок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Заголовок1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Заголовок_событие.os
Перем ДФ, Заголовок1;
Процедура Заголовок1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Заголовок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Текст = "Это Заголовок";
Заголовок1.Стиль.Высота = 200;
Заголовок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Заголовок1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ЗаголовокГруппы_метод.os
Перем ДФ, ЗаголовокГруппы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЗаголовокГруппы1.ДвойноеНажатие.ИмяМетода = "ЗаголовокГруппы1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ЗаголовокГруппы_метод.os" + " " + ТекущаяДата());
ЗаголовокГруппы1.ДвойноеНажатие();
КонецПроцедуры
Процедура ЗаголовокГруппы1_ДвойноеНажатие() Экспорт
// Сообщить("ЗаголовокГруппы1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Текст = "Это ЗаголовокГруппы";
ЗаголовокГруппы1.Стиль.Высота = 200;
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЗаголовокГруппы1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ЗаголовокГруппы1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ЗаголовокГруппы_событие.os
Перем ДФ, ЗаголовокГруппы1;
Процедура ЗаголовокГруппы1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ЗаголовокГруппы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Текст = "Это ЗаголовокГруппы";
ЗаголовокГруппы1.Стиль.Высота = 200;
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЗаголовокГруппы1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ЗаголовокГруппы1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ЗаголовокРаскрываемогоБлока_метод.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.ДвойноеНажатие.ИмяМетода = "ЗаголовокРаскрываемогоБлока1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ЗаголовокРаскрываемогоБлока_метод.os" + " " + ТекущаяДата());
ЗаголовокРаскрываемогоБлока1.ДвойноеНажатие();
КонецПроцедуры
Процедура ЗаголовокРаскрываемогоБлока1_ДвойноеНажатие() Экспорт
// Сообщить("ЗаголовокРаскрываемогоБлока1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Текст = "Это ЗаголовокРаскрываемогоБлока";
ЗаголовокРаскрываемогоБлока1.Стиль.Высота = 200;
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЗаголовокРаскрываемогоБлока1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ЗаголовокРаскрываемогоБлока1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ЗаголовокРаскрываемогоБлока_событие.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура ЗаголовокРаскрываемогоБлока1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ЗаголовокРаскрываемогоБлока_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Текст = "Это ЗаголовокРаскрываемогоБлока";
ЗаголовокРаскрываемогоБлока1.Стиль.Высота = 200;
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЗаголовокРаскрываемогоБлока1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ЗаголовокРаскрываемогоБлока1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Изображение_метод.os
Перем ДФ, Изображение1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Изображение1.ДвойноеНажатие.ИмяМетода = "Изображение1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Изображение_метод.os" + " " + ТекущаяДата());
Изображение1.ДвойноеНажатие();
КонецПроцедуры
Процедура Изображение1_ДвойноеНажатие() Экспорт
// Сообщить("Изображение1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.Стиль.Высота = 200;
Изображение1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Изображение1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Изображение1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Изображение_событие.os
Перем ДФ, Изображение1;
Процедура Изображение1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Изображение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.Стиль.Высота = 200;
Изображение1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Изображение1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Изображение1_ДвойноеНажатие");
Изображение1.Источник = "maslenica10.jpg";
Форма1.Открыть();
ДвойноеНажатие_Индикатор_метод.os
Перем ДФ, Индикатор1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Индикатор1.ДвойноеНажатие.ИмяМетода = "Индикатор1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Индикатор_метод.os" + " " + ТекущаяДата());
Индикатор1.ДвойноеНажатие();
КонецПроцедуры
Процедура Индикатор1_ДвойноеНажатие() Экспорт
// Сообщить("Индикатор1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.Стиль.Высота = 200;
Индикатор1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Индикатор1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Индикатор1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Индикатор_событие.os
Перем ДФ, Индикатор1;
Процедура Индикатор1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Индикатор_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.Стиль.Высота = 200;
Индикатор1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Индикатор1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Индикатор1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Итоги_метод.os
Перем ДФ, Итоги1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Итоги1.ДвойноеНажатие.ИмяМетода = "Итоги1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Итоги_метод.os" + " " + ТекущаяДата());
Итоги1.ДвойноеНажатие();
КонецПроцедуры
Процедура Итоги1_ДвойноеНажатие() Экспорт
// Сообщить("Итоги1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Текст = "Это Итоги";
Итоги1.Стиль.Высота = 200;
Итоги1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Итоги1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Итоги1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Итоги_событие.os
Перем ДФ, Итоги1;
Процедура Итоги1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Итоги_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Текст = "Это Итоги";
Итоги1.Стиль.Высота = 200;
Итоги1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Итоги1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Итоги1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Карта_метод.os
Перем ДФ, Карта1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Карта1.ДвойноеНажатие.ИмяМетода = "Карта1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Карта_метод.os" + " " + ТекущаяДата());
Карта1.ДвойноеНажатие();
КонецПроцедуры
Процедура Карта1_ДвойноеНажатие() Экспорт
// Сообщить("Карта1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Карта1 = ДФ.Карта();
Карта1.Родитель = Форма1;
Карта1.Текст = "Это Карта";
Карта1.Стиль.Высота = 200;
Карта1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Карта1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Карта1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Карта_событие.os
Перем ДФ, Карта1;
Процедура Карта1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Карта_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Карта1 = ДФ.Карта();
Карта1.Родитель = Форма1;
Карта1.Текст = "Это Карта";
Карта1.Стиль.Высота = 200;
Карта1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Карта1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Карта1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Кнопка_метод.os
Перем ДФ, Кнопка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Кнопка1.ДвойноеНажатие.ИмяМетода = "Кнопка1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Кнопка_метод.os" + " " + ТекущаяДата());
Кнопка1.ДвойноеНажатие();
КонецПроцедуры
Процедура Кнопка1_ДвойноеНажатие() Экспорт
// Сообщить("Кнопка1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка";
Кнопка1.Стиль.Высота = 200;
Кнопка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Кнопка1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Кнопка_событие.os
Перем ДФ, Кнопка1;
Процедура Кнопка1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Кнопка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка";
Кнопка1.Стиль.Высота = 200;
Кнопка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Кнопка1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Код_метод.os
Перем ДФ, Код1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Код1.ДвойноеНажатие.ИмяМетода = "Код1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Код_метод.os" + " " + ТекущаяДата());
Код1.ДвойноеНажатие();
КонецПроцедуры
Процедура Код1_ДвойноеНажатие() Экспорт
// Сообщить("Код1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Текст = "Это Код";
Код1.Стиль.Высота = 200;
Код1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Код1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Код1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Код_событие.os
Перем ДФ, Код1;
Процедура Код1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Код_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Текст = "Это Код";
Код1.Стиль.Высота = 200;
Код1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Код1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Код1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Колонтитул_метод.os
Перем ДФ, Колонтитул1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Колонтитул1.ДвойноеНажатие.ИмяМетода = "Колонтитул1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Колонтитул_метод.os" + " " + ТекущаяДата());
Колонтитул1.ДвойноеНажатие();
КонецПроцедуры
Процедура Колонтитул1_ДвойноеНажатие() Экспорт
// Сообщить("Колонтитул1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Текст = "Это Колонтитул";
Колонтитул1.Стиль.Высота = 200;
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Колонтитул1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Колонтитул1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Колонтитул_событие.os
Перем ДФ, Колонтитул1;
Процедура Колонтитул1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Колонтитул_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Текст = "Это Колонтитул";
Колонтитул1.Стиль.Высота = 200;
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Колонтитул1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Колонтитул1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Контент_метод.os
Перем ДФ, Контент1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контент1.ДвойноеНажатие.ИмяМетода = "Контент1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Контент_метод.os" + " " + ТекущаяДата());
Контент1.ДвойноеНажатие();
КонецПроцедуры
Процедура Контент1_ДвойноеНажатие() Экспорт
// Сообщить("Контент1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент1 = Форма1.Контент;
Контент1.Текст = "Это Контент";
Контент1.Стиль.Высота = 200;
Контент1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Контент1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Контент1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Контент_событие.os
Перем ДФ, Контент1;
Процедура Контент1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Контент_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Контент1 = Форма1.Контент;
Контент1.Текст = "Это Контент";
Контент1.Стиль.Высота = 200;
Контент1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Контент1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Контент1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_КурсивТекст_метод.os
Перем ДФ, КурсивТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
КурсивТекст1.ДвойноеНажатие.ИмяМетода = "КурсивТекст1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_КурсивТекст_метод.os" + " " + ТекущаяДата());
КурсивТекст1.ДвойноеНажатие();
КонецПроцедуры
Процедура КурсивТекст1_ДвойноеНажатие() Экспорт
// Сообщить("КурсивТекст1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Текст = "Это КурсивТекст";
КурсивТекст1.Стиль.Высота = 200;
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
КурсивТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "КурсивТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_КурсивТекст_событие.os
Перем ДФ, КурсивТекст1;
Процедура КурсивТекст1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_КурсивТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Текст = "Это КурсивТекст";
КурсивТекст1.Стиль.Высота = 200;
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
КурсивТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "КурсивТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Линия_метод.os
Перем ДФ, Линия1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Линия1.ДвойноеНажатие.ИмяМетода = "Линия1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Линия_метод.os" + " " + ТекущаяДата());
Линия1.ДвойноеНажатие();
КонецПроцедуры
Процедура Линия1_ДвойноеНажатие() Экспорт
// Сообщить("Линия1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Линия1 = ДФ.Линия();
Линия1.Родитель = Форма1;
Линия1.Текст = "Это Линия";
Линия1.Стиль.Высота = 200;
Линия1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Линия1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Линия1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Линия_событие.os
Перем ДФ, Линия1;
Процедура Линия1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Линия_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Линия1 = ДФ.Линия();
Линия1.Родитель = Форма1;
Линия1.Текст = "Это Линия";
Линия1.Стиль.Высота = 200;
Линия1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Линия1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Линия1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_МаркированныйТекст_метод.os
Перем ДФ, МаркированныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МаркированныйТекст1.ДвойноеНажатие.ИмяМетода = "МаркированныйТекст1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_МаркированныйТекст_метод.os" + " " + ТекущаяДата());
МаркированныйТекст1.ДвойноеНажатие();
КонецПроцедуры
Процедура МаркированныйТекст1_ДвойноеНажатие() Экспорт
// Сообщить("МаркированныйТекст1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Текст = "Это МаркированныйТекст";
МаркированныйТекст1.Стиль.Высота = 200;
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МаркированныйТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "МаркированныйТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_МаркированныйТекст_событие.os
Перем ДФ, МаркированныйТекст1;
Процедура МаркированныйТекст1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_МаркированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Текст = "Это МаркированныйТекст";
МаркированныйТекст1.Стиль.Высота = 200;
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МаркированныйТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "МаркированныйТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_МедиаГруппа_метод.os
Перем ДФ, МедиаГруппа1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МедиаГруппа1.ДвойноеНажатие.ИмяМетода = "МедиаГруппа1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_МедиаГруппа_метод.os" + " " + ТекущаяДата());
МедиаГруппа1.ДвойноеНажатие();
КонецПроцедуры
Процедура МедиаГруппа1_ДвойноеНажатие() Экспорт
// Сообщить("МедиаГруппа1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Текст = "Это МедиаГруппа";
МедиаГруппа1.Стиль.Высота = 200;
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МедиаГруппа1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "МедиаГруппа1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_МедиаГруппа_событие.os
Перем ДФ, МедиаГруппа1;
Процедура МедиаГруппа1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_МедиаГруппа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Текст = "Это МедиаГруппа";
МедиаГруппа1.Стиль.Высота = 200;
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МедиаГруппа1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "МедиаГруппа1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_МелкийТекст_метод.os
Перем ДФ, МелкийТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МелкийТекст1.ДвойноеНажатие.ИмяМетода = "МелкийТекст1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_МелкийТекст_метод.os" + " " + ТекущаяДата());
МелкийТекст1.ДвойноеНажатие();
КонецПроцедуры
Процедура МелкийТекст1_ДвойноеНажатие() Экспорт
// Сообщить("МелкийТекст1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Текст = "Это МелкийТекст";
МелкийТекст1.Стиль.Высота = 200;
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МелкийТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "МелкийТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_МелкийТекст_событие.os
Перем ДФ, МелкийТекст1;
Процедура МелкийТекст1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_МелкийТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Текст = "Это МелкийТекст";
МелкийТекст1.Стиль.Высота = 200;
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МелкийТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "МелкийТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_НадстрочныйТекст_метод.os
Перем ДФ, НадстрочныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НадстрочныйТекст1.ДвойноеНажатие.ИмяМетода = "НадстрочныйТекст1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_НадстрочныйТекст_метод.os" + " " + ТекущаяДата());
НадстрочныйТекст1.ДвойноеНажатие();
КонецПроцедуры
Процедура НадстрочныйТекст1_ДвойноеНажатие() Экспорт
// Сообщить("НадстрочныйТекст1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Текст = "Это НадстрочныйТекст";
НадстрочныйТекст1.Стиль.Высота = 200;
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НадстрочныйТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "НадстрочныйТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_НадстрочныйТекст_событие.os
Перем ДФ, НадстрочныйТекст1;
Процедура НадстрочныйТекст1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_НадстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Текст = "Это НадстрочныйТекст";
НадстрочныйТекст1.Стиль.Высота = 200;
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НадстрочныйТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "НадстрочныйТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_НаправленныйТекст_метод.os
Перем ДФ, НаправленныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НаправленныйТекст1.ДвойноеНажатие.ИмяМетода = "НаправленныйТекст1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_НаправленныйТекст_метод.os" + " " + ТекущаяДата());
НаправленныйТекст1.ДвойноеНажатие();
КонецПроцедуры
Процедура НаправленныйТекст1_ДвойноеНажатие() Экспорт
// Сообщить("НаправленныйТекст1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Текст = "Это НаправленныйТекст";
НаправленныйТекст1.Стиль.Высота = 200;
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НаправленныйТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "НаправленныйТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_НаправленныйТекст_событие.os
Перем ДФ, НаправленныйТекст1;
Процедура НаправленныйТекст1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_НаправленныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Текст = "Это НаправленныйТекст";
НаправленныйТекст1.Стиль.Высота = 200;
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НаправленныйТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "НаправленныйТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_НеупорядоченныйСписок_метод.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.ДвойноеНажатие.ИмяМетода = "НеупорядоченныйСписок1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_НеупорядоченныйСписок_метод.os" + " " + ТекущаяДата());
НеупорядоченныйСписок1.ДвойноеНажатие();
КонецПроцедуры
Процедура НеупорядоченныйСписок1_ДвойноеНажатие() Экспорт
// Сообщить("НеупорядоченныйСписок1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Текст = "Это НеупорядоченныйСписок";
НеупорядоченныйСписок1.Стиль.Высота = 200;
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НеупорядоченныйСписок1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "НеупорядоченныйСписок1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_НеупорядоченныйСписок_событие.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура НеупорядоченныйСписок1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_НеупорядоченныйСписок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Текст = "Это НеупорядоченныйСписок";
НеупорядоченныйСписок1.Стиль.Высота = 200;
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НеупорядоченныйСписок1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "НеупорядоченныйСписок1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_НижнийКолонтитул_метод.os
Перем ДФ, НижнийКолонтитул1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НижнийКолонтитул1.ДвойноеНажатие.ИмяМетода = "НижнийКолонтитул1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_НижнийКолонтитул_метод.os" + " " + ТекущаяДата());
НижнийКолонтитул1.ДвойноеНажатие();
КонецПроцедуры
Процедура НижнийКолонтитул1_ДвойноеНажатие() Экспорт
// Сообщить("НижнийКолонтитул1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Текст = "Это НижнийКолонтитул";
НижнийКолонтитул1.Стиль.Высота = 200;
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НижнийКолонтитул1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "НижнийКолонтитул1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_НижнийКолонтитул_событие.os
Перем ДФ, НижнийКолонтитул1;
Процедура НижнийКолонтитул1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_НижнийКолонтитул_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Текст = "Это НижнийКолонтитул";
НижнийКолонтитул1.Стиль.Высота = 200;
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НижнийКолонтитул1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "НижнийКолонтитул1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Область_метод.os
Перем ДФ, Область1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Область1.ДвойноеНажатие.ИмяМетода = "Область1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Область_метод.os" + " " + ТекущаяДата());
Область1.ДвойноеНажатие();
КонецПроцедуры
Процедура Область1_ДвойноеНажатие() Экспорт
// Сообщить("Область1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Область1 = ДФ.Область();
Область1.Родитель = Форма1;
Область1.Текст = "Это Область";
Область1.Стиль.Высота = 200;
Область1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Область1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Область1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Область_событие.os
Перем ДФ, Область1;
Процедура Область1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Область_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Область1 = ДФ.Область();
Область1.Родитель = Форма1;
Область1.Текст = "Это Область";
Область1.Стиль.Высота = 200;
Область1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Область1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Область1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ОбластьТаблицы_метод.os
Перем ДФ, ОбластьТаблицы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОбластьТаблицы1.ДвойноеНажатие.ИмяМетода = "ОбластьТаблицы1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ОбластьТаблицы_метод.os" + " " + ТекущаяДата());
ОбластьТаблицы1.ДвойноеНажатие();
КонецПроцедуры
Процедура ОбластьТаблицы1_ДвойноеНажатие() Экспорт
// Сообщить("ОбластьТаблицы1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Текст = "Это ОбластьТаблицы";
ОбластьТаблицы1.Стиль.Высота = 200;
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОбластьТаблицы1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ОбластьТаблицы1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ОбластьТаблицы_событие.os
Перем ДФ, ОбластьТаблицы1;
Процедура ОбластьТаблицы1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ОбластьТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Текст = "Это ОбластьТаблицы";
ОбластьТаблицы1.Стиль.Высота = 200;
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОбластьТаблицы1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ОбластьТаблицы1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ОбластьТекста_метод.os
Перем ДФ, ОбластьТекста1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОбластьТекста1.ДвойноеНажатие.ИмяМетода = "ОбластьТекста1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ОбластьТекста_метод.os" + " " + ТекущаяДата());
ОбластьТекста1.ДвойноеНажатие();
КонецПроцедуры
Процедура ОбластьТекста1_ДвойноеНажатие() Экспорт
// Сообщить("ОбластьТекста1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Стиль.Высота = 200;
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОбластьТекста1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ОбластьТекста_событие.os
Перем ДФ, ОбластьТекста1;
Процедура ОбластьТекста1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ОбластьТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Стиль.Высота = 200;
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОбластьТекста1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ОписаниеМедиа_метод.os
Перем ДФ, ОписаниеМедиа1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОписаниеМедиа1.ДвойноеНажатие.ИмяМетода = "ОписаниеМедиа1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ОписаниеМедиа_метод.os" + " " + ТекущаяДата());
ОписаниеМедиа1.ДвойноеНажатие();
КонецПроцедуры
Процедура ОписаниеМедиа1_ДвойноеНажатие() Экспорт
// Сообщить("ОписаниеМедиа1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Текст = "Это ОписаниеМедиа";
ОписаниеМедиа1.Стиль.Высота = 200;
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОписаниеМедиа1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ОписаниеМедиа1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ОписаниеМедиа_событие.os
Перем ДФ, ОписаниеМедиа1;
Процедура ОписаниеМедиа1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ОписаниеМедиа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Текст = "Это ОписаниеМедиа";
ОписаниеМедиа1.Стиль.Высота = 200;
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОписаниеМедиа1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ОписаниеМедиа1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Определение_метод.os
Перем ДФ, Определение1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Определение1.ДвойноеНажатие.ИмяМетода = "Определение1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Определение_метод.os" + " " + ТекущаяДата());
Определение1.ДвойноеНажатие();
КонецПроцедуры
Процедура Определение1_ДвойноеНажатие() Экспорт
// Сообщить("Определение1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Текст = "Это Определение";
Определение1.Стиль.Высота = 200;
Определение1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Определение1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Определение1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Определение_событие.os
Перем ДФ, Определение1;
Процедура Определение1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Определение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Текст = "Это Определение";
Определение1.Стиль.Высота = 200;
Определение1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Определение1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Определение1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Переключатель_метод.os
Перем ДФ, Переключатель1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Переключатель1.ДвойноеНажатие.ИмяМетода = "Переключатель1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Переключатель_метод.os" + " " + ТекущаяДата());
Переключатель1.ДвойноеНажатие();
КонецПроцедуры
Процедура Переключатель1_ДвойноеНажатие() Экспорт
// Сообщить("Переключатель1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Стиль.Высота = 200;
Переключатель1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Переключатель1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Переключатель1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Переключатель_событие.os
Перем ДФ, Переключатель1;
Процедура Переключатель1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Переключатель_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Стиль.Высота = 200;
Переключатель1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Переключатель1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Переключатель1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Подпись_метод.os
Перем ДФ, Подпись1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Подпись1.ДвойноеНажатие.ИмяМетода = "Подпись1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Подпись_метод.os" + " " + ТекущаяДата());
Подпись1.ДвойноеНажатие();
КонецПроцедуры
Процедура Подпись1_ДвойноеНажатие() Экспорт
// Сообщить("Подпись1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Это Подпись";
Подпись1.Стиль.Высота = 200;
Подпись1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Подпись1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Подпись1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Подпись_событие.os
Перем ДФ, Подпись1;
Процедура Подпись1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Подпись_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Это Подпись";
Подпись1.Стиль.Высота = 200;
Подпись1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Подпись1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Подпись1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ПодстрочныйТекст_метод.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПодстрочныйТекст1.ДвойноеНажатие.ИмяМетода = "ПодстрочныйТекст1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ПодстрочныйТекст_метод.os" + " " + ТекущаяДата());
ПодстрочныйТекст1.ДвойноеНажатие();
КонецПроцедуры
Процедура ПодстрочныйТекст1_ДвойноеНажатие() Экспорт
// Сообщить("ПодстрочныйТекст1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Текст = "Это ПодстрочныйТекст";
ПодстрочныйТекст1.Стиль.Высота = 200;
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПодстрочныйТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ПодстрочныйТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ПодстрочныйТекст_событие.os
Перем ДФ, ПодстрочныйТекст1;
Процедура ПодстрочныйТекст1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ПодстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Текст = "Это ПодстрочныйТекст";
ПодстрочныйТекст1.Стиль.Высота = 200;
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПодстрочныйТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ПодстрочныйТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ПодчеркнутыйТекст_метод.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПодчеркнутыйТекст1.ДвойноеНажатие.ИмяМетода = "ПодчеркнутыйТекст1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ПодчеркнутыйТекст_метод.os" + " " + ТекущаяДата());
ПодчеркнутыйТекст1.ДвойноеНажатие();
КонецПроцедуры
Процедура ПодчеркнутыйТекст1_ДвойноеНажатие() Экспорт
// Сообщить("ПодчеркнутыйТекст1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Текст = "Это ПодчеркнутыйТекст";
ПодчеркнутыйТекст1.Стиль.Высота = 200;
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПодчеркнутыйТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ПодчеркнутыйТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ПодчеркнутыйТекст_событие.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура ПодчеркнутыйТекст1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ПодчеркнутыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Текст = "Это ПодчеркнутыйТекст";
ПодчеркнутыйТекст1.Стиль.Высота = 200;
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПодчеркнутыйТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ПодчеркнутыйТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ПолеПароля_метод.os
Перем ДФ, ПолеПароля1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеПароля1.ДвойноеНажатие.ИмяМетода = "ПолеПароля1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ПолеПароля_метод.os" + " " + ТекущаяДата());
ПолеПароля1.ДвойноеНажатие();
КонецПроцедуры
Процедура ПолеПароля1_ДвойноеНажатие() Экспорт
// Сообщить("ПолеПароля1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Стиль.Высота = 200;
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеПароля1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ПолеПароля_событие.os
Перем ДФ, ПолеПароля1;
Процедура ПолеПароля1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ПолеПароля_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Стиль.Высота = 200;
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеПароля1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ПолеПоиска_метод.os
Перем ДФ, ПолеПоиска1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеПоиска1.ДвойноеНажатие.ИмяМетода = "ПолеПоиска1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ПолеПоиска_метод.os" + " " + ТекущаяДата());
ПолеПоиска1.ДвойноеНажатие();
КонецПроцедуры
Процедура ПолеПоиска1_ДвойноеНажатие() Экспорт
// Сообщить("ПолеПоиска1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Стиль.Высота = 200;
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеПоиска1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ПолеПоиска_событие.os
Перем ДФ, ПолеПоиска1;
Процедура ПолеПоиска1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ПолеПоиска_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Стиль.Высота = 200;
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеПоиска1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ПолеСписка_метод.os
Перем ДФ, ПолеСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеСписка1.ДвойноеНажатие.ИмяМетода = "ПолеСписка1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ПолеСписка_метод.os" + " " + ТекущаяДата());
ПолеСписка1.ДвойноеНажатие();
КонецПроцедуры
Процедура ПолеСписка1_ДвойноеНажатие() Экспорт
// Сообщить("ПолеСписка1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Высота = 200;
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеСписка1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ПолеСписка1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ПолеСписка_событие.os
Перем ДФ, ПолеСписка1;
Процедура ПолеСписка1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ПолеСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Высота = 200;
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеСписка1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ПолеСписка1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ПолеТекста_метод.os
Перем ДФ, ПолеТекста1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеТекста1.ДвойноеНажатие.ИмяМетода = "ПолеТекста1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ПолеТекста_метод.os" + " " + ТекущаяДата());
ПолеТекста1.ДвойноеНажатие();
КонецПроцедуры
Процедура ПолеТекста1_ДвойноеНажатие() Экспорт
// Сообщить("ПолеТекста1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Стиль.Высота = 200;
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеТекста1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ПолеТекста_событие.os
Перем ДФ, ПолеТекста1;
Процедура ПолеТекста1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ПолеТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Стиль.Высота = 200;
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеТекста1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ПолеЧисла_метод.os
Перем ДФ, ПолеЧисла1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеЧисла1.ДвойноеНажатие.ИмяМетода = "ПолеЧисла1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ПолеЧисла_метод.os" + " " + ТекущаяДата());
ПолеЧисла1.ДвойноеНажатие();
КонецПроцедуры
Процедура ПолеЧисла1_ДвойноеНажатие() Экспорт
// Сообщить("ПолеЧисла1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Стиль.Высота = 200;
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеЧисла1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ПолеЧисла_событие.os
Перем ДФ, ПолеЧисла1;
Процедура ПолеЧисла1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ПолеЧисла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Стиль.Высота = 200;
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеЧисла1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Ползунок_метод.os
Перем ДФ, Ползунок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Ползунок1.ДвойноеНажатие.ИмяМетода = "Ползунок1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Ползунок_метод.os" + " " + ТекущаяДата());
Ползунок1.ДвойноеНажатие();
КонецПроцедуры
Процедура Ползунок1_ДвойноеНажатие() Экспорт
// Сообщить("Ползунок1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Стиль.Высота = 200;
Ползунок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ползунок1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Ползунок1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Ползунок_событие.os
Перем ДФ, Ползунок1;
Процедура Ползунок1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Ползунок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Стиль.Высота = 200;
Ползунок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ползунок1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Ползунок1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_РаскрываемыйБлок_метод.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
РаскрываемыйБлок1.ДвойноеНажатие.ИмяМетода = "РаскрываемыйБлок1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_РаскрываемыйБлок_метод.os" + " " + ТекущаяДата());
РаскрываемыйБлок1.ДвойноеНажатие();
КонецПроцедуры
Процедура РаскрываемыйБлок1_ДвойноеНажатие() Экспорт
// Сообщить("РаскрываемыйБлок1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.Стиль.Высота = 200;
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
РаскрываемыйБлок1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "РаскрываемыйБлок1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_РаскрываемыйБлок_событие.os
Перем ДФ, РаскрываемыйБлок1;
Процедура РаскрываемыйБлок1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_РаскрываемыйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.Стиль.Высота = 200;
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
РаскрываемыйБлок1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "РаскрываемыйБлок1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Результат_метод.os
Перем ДФ, Результат1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Результат1.ДвойноеНажатие.ИмяМетода = "Результат1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Результат_метод.os" + " " + ТекущаяДата());
Результат1.ДвойноеНажатие();
КонецПроцедуры
Процедура Результат1_ДвойноеНажатие() Экспорт
// Сообщить("Результат1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Текст = "Это Результат";
Результат1.Стиль.Высота = 200;
Результат1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Результат1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Результат1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Результат_событие.os
Перем ДФ, Результат1;
Процедура Результат1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Результат_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Текст = "Это Результат";
Результат1.Стиль.Высота = 200;
Результат1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Результат1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Результат1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_СписокОпределений_метод.os
Перем ДФ, СписокОпределений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СписокОпределений1.ДвойноеНажатие.ИмяМетода = "СписокОпределений1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_СписокОпределений_метод.os" + " " + ТекущаяДата());
СписокОпределений1.ДвойноеНажатие();
КонецПроцедуры
Процедура СписокОпределений1_ДвойноеНажатие() Экспорт
// Сообщить("СписокОпределений1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Текст = "Это СписокОпределений";
СписокОпределений1.Стиль.Высота = 200;
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
СписокОпределений1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "СписокОпределений1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_СписокОпределений_событие.os
Перем ДФ, СписокОпределений1;
Процедура СписокОпределений1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_СписокОпределений_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Текст = "Это СписокОпределений";
СписокОпределений1.Стиль.Высота = 200;
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
СписокОпределений1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "СписокОпределений1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Ссылка_метод.os
Перем ДФ, Ссылка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Ссылка1.ДвойноеНажатие.ИмяМетода = "Ссылка1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Ссылка_метод.os" + " " + ТекущаяДата());
Ссылка1.ДвойноеНажатие();
КонецПроцедуры
Процедура Ссылка1_ДвойноеНажатие() Экспорт
// Сообщить("Ссылка1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Текст = "Это Ссылка";
Ссылка1.Стиль.Высота = 200;
Ссылка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ссылка1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Ссылка1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Ссылка_событие.os
Перем ДФ, Ссылка1;
Процедура Ссылка1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Ссылка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Текст = "Это Ссылка";
Ссылка1.Стиль.Высота = 200;
Ссылка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ссылка1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Ссылка1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_СтрокаТаблицы_метод.os
Перем ДФ, СтрокаТаблицы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СтрокаТаблицы1.ДвойноеНажатие.ИмяМетода = "СтрокаТаблицы1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_СтрокаТаблицы_метод.os" + " " + ТекущаяДата());
СтрокаТаблицы1.ДвойноеНажатие();
КонецПроцедуры
Процедура СтрокаТаблицы1_ДвойноеНажатие() Экспорт
// Сообщить("СтрокаТаблицы1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Текст = "Это СтрокаТаблицы";
СтрокаТаблицы1.Стиль.Высота = 200;
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
СтрокаТаблицы1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "СтрокаТаблицы1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_СтрокаТаблицы_событие.os
Перем ДФ, СтрокаТаблицы1;
Процедура СтрокаТаблицы1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_СтрокаТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Текст = "Это СтрокаТаблицы";
СтрокаТаблицы1.Стиль.Высота = 200;
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
СтрокаТаблицы1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "СтрокаТаблицы1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Таблица_метод.os
Перем ДФ, Таблица1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Таблица1.ДвойноеНажатие.ИмяМетода = "Таблица1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Таблица_метод.os" + " " + ТекущаяДата());
Таблица1.ДвойноеНажатие();
КонецПроцедуры
Процедура Таблица1_ДвойноеНажатие() Экспорт
// Сообщить("Таблица1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Текст = "Это Таблица";
Таблица1.Стиль.Высота = 200;
Таблица1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Таблица1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Таблица1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Таблица_событие.os
Перем ДФ, Таблица1;
Процедура Таблица1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Таблица_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Текст = "Это Таблица";
Таблица1.Стиль.Высота = 200;
Таблица1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Таблица1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Таблица1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Термин_метод.os
Перем ДФ, Термин1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Термин1.ДвойноеНажатие.ИмяМетода = "Термин1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Термин_метод.os" + " " + ТекущаяДата());
Термин1.ДвойноеНажатие();
КонецПроцедуры
Процедура Термин1_ДвойноеНажатие() Экспорт
// Сообщить("Термин1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Текст = "Это Термин";
Термин1.Стиль.Высота = 200;
Термин1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Термин1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Термин1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Термин_событие.os
Перем ДФ, Термин1;
Процедура Термин1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Термин_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Текст = "Это Термин";
Термин1.Стиль.Высота = 200;
Термин1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Термин1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Термин1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_УдаленыйТекст_метод.os
Перем ДФ, УдаленыйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
УдаленыйТекст1.ДвойноеНажатие.ИмяМетода = "УдаленыйТекст1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_УдаленыйТекст_метод.os" + " " + ТекущаяДата());
УдаленыйТекст1.ДвойноеНажатие();
КонецПроцедуры
Процедура УдаленыйТекст1_ДвойноеНажатие() Экспорт
// Сообщить("УдаленыйТекст1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Текст = "Это УдаленыйТекст";
УдаленыйТекст1.Стиль.Высота = 200;
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
УдаленыйТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "УдаленыйТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_УдаленыйТекст_событие.os
Перем ДФ, УдаленыйТекст1;
Процедура УдаленыйТекст1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_УдаленыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Текст = "Это УдаленыйТекст";
УдаленыйТекст1.Стиль.Высота = 200;
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
УдаленыйТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "УдаленыйТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_УпорядоченныйСписок_метод.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
УпорядоченныйСписок1.ДвойноеНажатие.ИмяМетода = "УпорядоченныйСписок1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_УпорядоченныйСписок_метод.os" + " " + ТекущаяДата());
УпорядоченныйСписок1.ДвойноеНажатие();
КонецПроцедуры
Процедура УпорядоченныйСписок1_ДвойноеНажатие() Экспорт
// Сообщить("УпорядоченныйСписок1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Текст = "Это УпорядоченныйСписок";
УпорядоченныйСписок1.Стиль.Высота = 200;
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
УпорядоченныйСписок1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "УпорядоченныйСписок1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_УпорядоченныйСписок_событие.os
Перем ДФ, УпорядоченныйСписок1;
Процедура УпорядоченныйСписок1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_УпорядоченныйСписок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Текст = "Это УпорядоченныйСписок";
УпорядоченныйСписок1.Стиль.Высота = 200;
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
УпорядоченныйСписок1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "УпорядоченныйСписок1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Флажок_метод.os
Перем ДФ, Флажок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Флажок1.ДвойноеНажатие.ИмяМетода = "Флажок1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Флажок_метод.os" + " " + ТекущаяДата());
Флажок1.ДвойноеНажатие();
КонецПроцедуры
Процедура Флажок1_ДвойноеНажатие() Экспорт
// Сообщить("Флажок1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Стиль.Высота = 200;
Флажок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Флажок1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Флажок1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Флажок_событие.os
Перем ДФ, Флажок1;
Процедура Флажок1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Флажок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Стиль.Высота = 200;
Флажок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Флажок1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Флажок1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ФорматированныйТекст_метод.os
Перем ДФ, ФорматированныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ФорматированныйТекст1.ДвойноеНажатие.ИмяМетода = "ФорматированныйТекст1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ФорматированныйТекст_метод.os" + " " + ТекущаяДата());
ФорматированныйТекст1.ДвойноеНажатие();
КонецПроцедуры
Процедура ФорматированныйТекст1_ДвойноеНажатие() Экспорт
// Сообщить("ФорматированныйТекст1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Текст = "Это ФорматированныйТекст";
ФорматированныйТекст1.Стиль.Высота = 200;
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ФорматированныйТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ФорматированныйТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ФорматированныйТекст_событие.os
Перем ДФ, ФорматированныйТекст1;
Процедура ФорматированныйТекст1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ФорматированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Текст = "Это ФорматированныйТекст";
ФорматированныйТекст1.Стиль.Высота = 200;
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ФорматированныйТекст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ФорматированныйТекст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Холст_метод.os
Перем ДФ, Холст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Холст1.ДвойноеНажатие.ИмяМетода = "Холст1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Холст_метод.os" + " " + ТекущаяДата());
Холст1.ДвойноеНажатие();
КонецПроцедуры
Процедура Холст1_ДвойноеНажатие() Экспорт
// Сообщить("Холст1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
Холст1.Стиль.Высота = 200;
Холст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Холст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Холст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Холст_событие.os
Перем ДФ, Холст1;
Процедура Холст1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Холст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
Холст1.Стиль.Высота = 200;
Холст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Холст1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Холст1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ШапкаТаблицы_метод.os
Перем ДФ, ШапкаТаблицы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ШапкаТаблицы1.ДвойноеНажатие.ИмяМетода = "ШапкаТаблицы1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ШапкаТаблицы_метод.os" + " " + ТекущаяДата());
ШапкаТаблицы1.ДвойноеНажатие();
КонецПроцедуры
Процедура ШапкаТаблицы1_ДвойноеНажатие() Экспорт
// Сообщить("ШапкаТаблицы1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Текст = "Это ШапкаТаблицы";
ШапкаТаблицы1.Стиль.Высота = 200;
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ШапкаТаблицы1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ШапкаТаблицы1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ШапкаТаблицы_событие.os
Перем ДФ, ШапкаТаблицы1;
Процедура ШапкаТаблицы1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ШапкаТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Текст = "Это ШапкаТаблицы";
ШапкаТаблицы1.Стиль.Высота = 200;
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ШапкаТаблицы1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ШапкаТаблицы1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Шкала_метод.os
Перем ДФ, Шкала1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Шкала1.ДвойноеНажатие.ИмяМетода = "Шкала1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Шкала_метод.os" + " " + ТекущаяДата());
Шкала1.ДвойноеНажатие();
КонецПроцедуры
Процедура Шкала1_ДвойноеНажатие() Экспорт
// Сообщить("Шкала1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Шкала1.Стиль.Высота = 200;
Шкала1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шкала1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Шкала1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Шкала_событие.os
Перем ДФ, Шкала1;
Процедура Шкала1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Шкала_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Шкала1.Стиль.Высота = 200;
Шкала1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шкала1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Шкала1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ЭлементПоляСписка_метод.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЭлементПоляСписка1.ДвойноеНажатие.ИмяМетода = "ЭлементПоляСписка1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ЭлементПоляСписка_метод.os" + " " + ТекущаяДата());
ЭлементПоляСписка1.ДвойноеНажатие();
КонецПроцедуры
Процедура ЭлементПоляСписка1_ДвойноеНажатие() Экспорт
// Сообщить("ЭлементПоляСписка1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Текст = "Это ЭлементПоляСписка";
ЭлементПоляСписка1.Стиль.Высота = 200;
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЭлементПоляСписка1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ЭлементПоляСписка1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ЭлементПоляСписка_событие.os
Перем ДФ, ЭлементПоляСписка1;
Процедура ЭлементПоляСписка1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ЭлементПоляСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Текст = "Это ЭлементПоляСписка";
ЭлементПоляСписка1.Стиль.Высота = 200;
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЭлементПоляСписка1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ЭлементПоляСписка1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ЭлементСписка_метод.os
Перем ДФ, ЭлементСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЭлементСписка1.ДвойноеНажатие.ИмяМетода = "ЭлементСписка1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ЭлементСписка_метод.os" + " " + ТекущаяДата());
ЭлементСписка1.ДвойноеНажатие();
КонецПроцедуры
Процедура ЭлементСписка1_ДвойноеНажатие() Экспорт
// Сообщить("ЭлементСписка1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Текст = "Это ЭлементСписка";
ЭлементСписка1.Стиль.Высота = 200;
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЭлементСписка1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ЭлементСписка1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ЭлементСписка_событие.os
Перем ДФ, ЭлементСписка1;
Процедура ЭлементСписка1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ЭлементСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Текст = "Это ЭлементСписка";
ЭлементСписка1.Стиль.Высота = 200;
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЭлементСписка1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ЭлементСписка1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Ячейка_метод.os
Перем ДФ, Ячейка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Ячейка1.ДвойноеНажатие.ИмяМетода = "Ячейка1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_Ячейка_метод.os" + " " + ТекущаяДата());
Ячейка1.ДвойноеНажатие();
КонецПроцедуры
Процедура Ячейка1_ДвойноеНажатие() Экспорт
// Сообщить("Ячейка1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Текст = "Это Ячейка";
Ячейка1.Стиль.Высота = 200;
Ячейка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ячейка1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Ячейка1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_Ячейка_событие.os
Перем ДФ, Ячейка1;
Процедура Ячейка1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_Ячейка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Текст = "Это Ячейка";
Ячейка1.Стиль.Высота = 200;
Ячейка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ячейка1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "Ячейка1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ЯчейкаЗаголовка_метод.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЯчейкаЗаголовка1.ДвойноеНажатие.ИмяМетода = "ЯчейкаЗаголовка1_ДвойноеНажатие"
, "", "!!! ") + "ДвойноеНажатие_ЯчейкаЗаголовка_метод.os" + " " + ТекущаяДата());
ЯчейкаЗаголовка1.ДвойноеНажатие();
КонецПроцедуры
Процедура ЯчейкаЗаголовка1_ДвойноеНажатие() Экспорт
// Сообщить("ЯчейкаЗаголовка1_ДвойноеНажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Текст = "Это ЯчейкаЗаголовка";
ЯчейкаЗаголовка1.Стиль.Высота = 200;
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЯчейкаЗаголовка1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ЯчейкаЗаголовка1_ДвойноеНажатие");
Форма1.Открыть();
ДвойноеНажатие_ЯчейкаЗаголовка_событие.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура ЯчейкаЗаголовка1_ДвойноеНажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ДвойноеНажатие_ЯчейкаЗаголовка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Дважды щелкните объект";
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Текст = "Это ЯчейкаЗаголовка";
ЯчейкаЗаголовка1.Стиль.Высота = 200;
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЯчейкаЗаголовка1.ДвойноеНажатие = ДФ.Действие(ЭтотОбъект, "ЯчейкаЗаголовка1_ДвойноеНажатие");
Форма1.Открыть();
Диапазон_ГруппаКолонок_свойство.os
Перем ДФ, ГруппаКолонок1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппаКолонок1.Диапазон = 2
, "", "!!! ") + "Диапазон_ГруппаКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппаКолонок1, "Диапазон", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Стиль1 = Таблица1.Стиль;
Стиль1.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Стиль1.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
ГруппаКолонок1.Диапазон = 2;
ГруппаКолонок1.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = Таблица1;
Колонка1.Стиль.Ширина = 200;
Колонка2 = Таблица1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = Таблица1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
Форма1.Открыть();
Диапазон_Колонка_свойство.os
Перем ДФ, Колонка1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонка1.Диапазон = 2
, "", "!!! ") + "Диапазон_Колонка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонка1, "Диапазон", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Колонка1 = Таблица1.ДобавитьДочерний(ДФ.Колонка());
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Диапазон = 2;
Колонка1.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Строка1 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Ячейка11 = Строка1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
Ячейка11.Текст = "Цвет";
Ячейка12 = Строка1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
Ячейка12.Текст = "Форма";
Ячейка13 = Строка1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
Ячейка13.Текст = "Количество";
Строка2 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Ячейка21 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка21.Текст = "Синий";
Ячейка22 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка22.Текст = "Круглый";
Ячейка23 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка23.Текст = "4";
Строка3 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Ячейка31 = Строка3.ДобавитьДочерний(ДФ.Ячейка());
Ячейка31.Текст = "Красный";
Ячейка32 = Строка3.ДобавитьДочерний(ДФ.Ячейка());
Ячейка32.Текст = "Квадратный";
Ячейка33 = Строка3.ДобавитьДочерний(ДФ.Ячейка());
Ячейка33.Текст = "14";
Строка4 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Ячейка41 = Строка4.ДобавитьДочерний(ДФ.Ячейка());
Ячейка41.Текст = "Зеленый";
Ячейка42 = Строка4.ДобавитьДочерний(ДФ.Ячейка());
Ячейка42.Текст = "Треугольный";
Ячейка43 = Строка4.ДобавитьДочерний(ДФ.Ячейка());
Ячейка43.Текст = "7";
Форма1.Открыть();
ДиапазонКолонок_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ячейка1.ДиапазонКолонок = 2
, "", "!!! ") + "ДиапазонКолонок_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ячейка1, "ДиапазонКолонок", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Стиль1 = Таблица1.Стиль;
Стиль1.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Строка1 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = Строка1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Месяц";
ЯчейкаЗаголовка2 = Строка1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Дней";
Строка2 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Ячейка1 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Декабрь";
Ячейка1.ДиапазонКолонок = 2;
Ячейка2 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "31";
Строка3 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Ячейка3 = Строка3.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Январь";
Ячейка4 = Строка3.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "31";
Форма1.Открыть();
ДиапазонКолонок_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка7;
Процедура Свойство() Экспорт
Сообщить(?(
ЯчейкаЗаголовка7.ДиапазонКолонок = 2
, "", "!!! ") + "ДиапазонКолонок_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка7, "ДиапазонКолонок", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Стиль1 = Таблица1.Стиль;
Стиль1.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Стиль1.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Таблица1;
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Таблица1;
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = ГруппаКолонок1;
Колонка1.Стиль.Ширина = 200;
Колонка2 = ДФ.Колонка();
Колонка2.Родитель = ГруппаКолонок1;
Колонка2.Стиль.Ширина = 100;
Колонка3 = ДФ.Колонка();
Колонка3.Родитель = ГруппаКолонок1;
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Таблица1;
СтрокаШапка = ДФ.СтрокаТаблицы();
СтрокаШапка.Родитель = Таблица1;
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = СтрокаШапка;
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка2.Родитель = СтрокаШапка;
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка3.Родитель = СтрокаШапка;
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Таблица1;
СтрокаМатроскин = ДФ.СтрокаТаблицы();
СтрокаМатроскин.Родитель = ОбластьТаблицы1;
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка4.Родитель = СтрокаМатроскин;
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = СтрокаМатроскин;
Ячейка1.Текст = "Кот";
Ячейка2 = ДФ.Ячейка();
Ячейка2.Родитель = СтрокаМатроскин;
Ячейка2.Текст = "4";
СтрокаШарик = ДФ.СтрокаТаблицы();
СтрокаШарик.Родитель = ОбластьТаблицы1;
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка5.Родитель = СтрокаШарик;
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = ДФ.Ячейка();
Ячейка3.Родитель = СтрокаШарик;
Ячейка3.Текст = "Пёс";
Ячейка4 = ДФ.Ячейка();
Ячейка4.Родитель = СтрокаШарик;
Ячейка4.Текст = "4";
СтрокаГалчонок = ДФ.СтрокаТаблицы();
СтрокаГалчонок.Родитель = ОбластьТаблицы1;
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка6.Родитель = СтрокаГалчонок;
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = ДФ.Ячейка();
Ячейка5.Родитель = СтрокаГалчонок;
Ячейка5.Текст = "Птица";
Ячейка6 = ДФ.Ячейка();
Ячейка6.Родитель = СтрокаГалчонок;
Ячейка6.Текст = "2";
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Таблица1;
СтрокаИтого = ДФ.СтрокаТаблицы();
СтрокаИтого.Родитель = Итоги1;
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка7.Родитель = СтрокаИтого;
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = ДФ.Ячейка();
Ячейка7.Родитель = СтрокаИтого;
Ячейка7.Текст = "10";
Форма1.Открыть();
ДиапазонКолонокЭлемента_Стиль_свойство.os
Перем ДФ, Заголовок2;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок2.Стиль.ДиапазонКолонокЭлемента = "all"
, "", "!!! ") + "ДиапазонКолонокЭлемента_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок2.Стиль, "ДиапазонКолонокЭлемента", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РазделительКолонок1 = ДФ.РазделительКолонок(ДФ.ШиринаГраницы.Средняя, ДФ.СтильГраницы.Двойная, ДФ.Цвет.Синий);
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.РазделительКолонок = РазделительКолонок1;
Блок1.Стиль.КоличествоКолонок = 3;
Заголовок2 = Блок1.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок2.Текст = "Вместо предисловия, или История о том, как Алиса попала на Шахматную доску, стала Белой Пешкой и на одиннадцатом ходу превратилась в Королеву";
Абзац1 = Блок1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Стиль.ЦветФона = ДФ.Цвет("БелаяДымка");
Абзац1.Текст = "И тут появилась Черная Королева.
|«Ого! Как выросла! – подумала Алиса. – Когда я нашла ее в золе, она была не больше моего пальца. А теперь я ей по плечо».
|– У нас такой чудесный воздух, что все тянутся вверх не по дням, а по часам, – сказала Роза, будто подслушала мысли Алисы.
|– Пойду навстречу ей, – сказала Алиса, как бы извиняясь перед цветами.
|С ними было, конечно, весело поболтать, но беседа с Королевой наверняка намного интересней.
|– Если хочешь встретиться, – посоветовала Роза, – иди не к ней, а от нее.
|Такой явной глупости Алиса и слушать не стала. И, конечно же, пошла прямиком к Королеве. Но, к ее изумлению, Королева мгновенно исчезла из виду.
|А дорожка снова привела Алису к дому. Раздосадованная, Алиса отпрянула от дома и оглянулась. Королева маячила вдалеке позади нее.
|Алиса заколебалась: уж не права ли была Роза и не следует ли двинуться в противоположную от Королевы сторону? Так она и сделала.
|И все вышло чудесно! Буквально через минуту она столкнулась нос к носу с Королевой. И что удивительно, холм, до которого она так
|долго не могла дойти, возвышался прямо перед ней.
|– Ты откуда взялась? – строго спросила Королева. – Куда идешь? Гляди в глаза! Говори почтительно! Не маши руками, не верти головой и не дрыгай ногами!
|Алиса как можно вежливее объяснила, что немного заблудилась, а теперь разобралась, что к чему и что куда, и идет себе своей дорогой.";
Заголовок2.Стиль.ДиапазонКолонокЭлемента = -1;
Форма1.Открыть();
ДиапазонСтрок_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ячейка1.ДиапазонСтрок = 2
, "", "!!! ") + "ДиапазонСтрок_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ячейка1, "ДиапазонСтрок", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Стиль1 = Таблица1.Стиль;
Стиль1.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Строка1 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = Строка1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Фамилия";
ЯчейкаЗаголовка1.Идентификатор = "Фамилия";
ЯчейкаЗаголовка2 = Строка1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Имя";
ЯчейкаЗаголовка2.Идентификатор = "Имя";
ЯчейкаЗаголовка3 = Строка1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Возраст";
ЯчейкаЗаголовка2.Идентификатор = "Возраст";
ЯчейкаЗаголовка4 = Строка1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Планета";
ЯчейкаЗаголовка2.Идентификатор = "Планета";
Строка2 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Ячейка1 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Доктор";
Ячейка1.Заголовки = "Фамилия";
Ячейка1.ДиапазонСтрок = 2;
Ячейка2 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "Кто";
Ячейка2.Заголовки = "Имя";
Ячейка3 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "более миллиарда лет";
Ячейка3.Заголовки = "Возраст";
Ячейка4 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "Галлифрей";
Ячейка4.Заголовки = "Планета";
Строка3 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Строка3.Стиль.Высота = 20;
Ячейка6 = Строка3.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7 = Строка3.ДобавитьДочерний(ДФ.Ячейка());
Ячейка8 = Строка3.ДобавитьДочерний(ДФ.Ячейка());
Строка4 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Ячейка9 = Строка4.ДобавитьДочерний(ДФ.Ячейка());
Ячейка9.Текст = "Тайлер";
Ячейка10 = Строка4.ДобавитьДочерний(ДФ.Ячейка());
Ячейка10.Текст = "Роза";
Ячейка11 = Строка4.ДобавитьДочерний(ДФ.Ячейка());
Ячейка11.Текст = "19 лет";
Ячейка12 = Строка4.ДобавитьДочерний(ДФ.Ячейка());
Ячейка12.Текст = "Земля";
Форма1.Открыть();
ДиапазонСтрок_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка5;
Процедура Свойство() Экспорт
Сообщить(?(
ЯчейкаЗаголовка5.ДиапазонСтрок = 2
, "", "!!! ") + "ДиапазонСтрок_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка5, "ДиапазонСтрок", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Стиль1 = Таблица1.Стиль;
Стиль1.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Стиль1.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Таблица1.ДобавитьДочерний(ДФ.Заголовок()).Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка()).Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка()).Текст = "Имя";
СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка()).Текст = "Вид";
СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка()).Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка()).Текст = "Матроскин";
СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка()).Текст = "Кот";
СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка()).Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка()).Текст = "Пёс";
СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка()).Текст = "4";
Строка1 = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Строка1.Стиль.Копировать(СтрокаМатроскин.Стиль);
Строка1.ДобавитьДочерний(ДФ.Ячейка()).Стиль.Высота = 20;
Строка1.ДобавитьДочерний(ДФ.Ячейка()).Стиль.Высота = 20;
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка()).Текст = "Галчонок";
СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка()).Текст = "Птица";
СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка()).Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка()).Текст = "10";
ЯчейкаЗаголовка5.ДиапазонСтрок = 2;
Форма1.Открыть();
ДлинаТабуляции_Стиль_свойство.os
Перем ДФ, ФорматированныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ФорматированныйТекст1.Стиль.ДлинаТабуляции = "4"
, "", "!!! ") + "ДлинаТабуляции_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1.Стиль, "ДлинаТабуляции", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ФорматированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ТуманноБелый;
ФорматированныйТекст1.Текст = "Алиса встречает Черную Королеву, становится Белой Пешкой и начинает игру с клетки e2.";
ФорматированныйТекст1.Стиль.ДлинаТабуляции = 4;
Форма1.Открыть();
Длительность_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Аудио1.Длительность = 209
, "", "!!! ") + "Длительность_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "Длительность", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";
Форма1.Открыть();
Длительность_ПараметрыАнимации_свойство.os
Перем АнимацияВращение, АнимацияМасштаб;
Перем ДФ, ПараметрыАнимации1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПараметрыАнимации1.Длительность = 3000
, "", "!!! ") + "Длительность_ПараметрыАнимации_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
АнимацияВращение.Запустить();
АнимацияМасштаб.Запустить();
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
АнимацияВращение.Пауза();
АнимацияМасштаб.Пауза();
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
АнимацияВращение.Завершить();
АнимацияМасштаб.Завершить();
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
АнимацияВращение.Отменить();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяВысота = 400;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Запустить";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Пауза";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка3 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Завершить";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Отменить вращение";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок2.Стиль.Ширина = 45;
Блок2.Стиль.Высота = 45;
Блок2.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок2.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок2.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок2.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок2";
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.Зеленый;
Кадр3.Сдвиг = "scale(1)";
Кадр3.Смещение = 0;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Желтый;
Кадр4.Сдвиг = "scale(1.05)";
Кадр4.Смещение = 0.1;
Кадр5 = ДФ.Стиль();
Кадр5.ЦветФона = ДФ.Цвет.Желтый;
Кадр5.Сдвиг = "scale(1.4)";
Кадр5.Смещение = 0.7;
Кадр6 = ДФ.Стиль();
Кадр6.ЦветФона = ДФ.Цвет.Красный;
Кадр6.Сдвиг = "scale(1.5)";
Кадр6.Смещение = 1;
Кадры2 = ДФ.Кадры();
Кадры2.Добавить(Кадр3);
Кадры2.Добавить(Кадр4);
Кадры2.Добавить(Кадр5);
Кадры2.Добавить(Кадр6);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
100);
АнимацияВращение = Блок1.Анимация(Кадры1, ПараметрыАнимации1);
АнимацияМасштаб = Блок2.Анимация(Кадры2, ПараметрыАнимации1);
Форма1.Открыть();
ДлительностьАнимации_СвойстваАнимации_свойство.os
Перем ДФ, Анимация1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Анимация1.ДлительностьАнимации = 3000
, "", "!!! ") + "ДлительностьАнимации_СвойстваАнимации_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Анимация1 = ДФ.СвойстваАнимации();
Анимация1.ИмяАнимации = Кадры1.Имя;
Анимация1.ДлительностьАнимации = 3000;
Анимация1.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце;
Анимация1.ЗадержкаАнимации = 600;
Анимация1.КоличествоПовторов = -1;
Анимация1.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать;
Анимация1.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад;
Анимация1.Состояние = ДФ.Состояние.Запущена;
Блок1.Стиль.Анимация = Анимация1;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
ДлительностьАнимации_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ДлительностьАнимации = "3000ms"
, "", "!!! ") + "ДлительностьАнимации_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ДлительностьАнимации", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Блок1.Стиль.ИмяАнимации = Кадры1.Имя;
Блок1.Стиль.ДлительностьАнимации = 3000;
Блок1.Стиль.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце;
Блок1.Стиль.ЗадержкаАнимации = 600;
Блок1.Стиль.КоличествоПовторов = -1;
Блок1.Стиль.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать;
Блок1.Стиль.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад;
Блок1.Стиль.Состояние = ДФ.Состояние.Запущена;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
Добавить_Кадры_метод.os
Перем ДФ, Кадры1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Кадры1.Имя = "масштаб"
, "", "!!! ") + "Добавить_Кадры_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Анимация1 = ДФ.СвойстваАнимации(Кадры1.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок1.Стиль.Анимация = Анимация1;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
Добавить_Меню_метод.os
Перем ДФ, МенюСправка;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + МенюСправка = "ДфЭлементМеню"
, "", "!!! ") + "Добавить_Меню_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГлавноеМеню = ДФ.Меню(ДФ.ТипМеню.Главное); // Это строка главного меню.
ПодменюМенюФайл = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюФайл = ДФ.ЭлементМеню("Файл", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюФайл);
Открыть = ДФ.ЭлементМеню("Открыть", ДФ.ТипЭлементаМеню.Стандартный);
Сохранить = ДФ.ЭлементМеню("Сохранить");
Разделитель1 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Настройки = ДФ.ЭлементМеню("Настройки");
Разделитель2 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Выход = ДФ.ЭлементМеню("Выход");
ПодменюМенюФайл.Добавить(Открыть);
ПодменюМенюФайл.Добавить(Сохранить);
ПодменюМенюФайл.Добавить(Разделитель1);
ПодменюМенюФайл.Добавить(Настройки);
ПодменюМенюФайл.Добавить(Разделитель2);
ПодменюМенюФайл.Добавить(Выход);
ПодменюМенюПравка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюПравка = ДФ.ЭлементМеню("Правка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюПравка);
Отмена = ДФ.ЭлементМеню("Отмена");
Повтор = ДФ.ЭлементМеню("Повтор");
ПодменюМенюПравка.Добавить(Отмена);
ПодменюМенюПравка.Добавить(Повтор);
ПодменюМенюСправка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюСправка = ДФ.ЭлементМеню("Справка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюСправка);
ОПрограмме = ДФ.ЭлементМеню("О программе");
ПодменюМенюСправка.Добавить(ОПрограмме);
ГлавноеМеню.Добавить(МенюФайл);
ГлавноеМеню.Добавить(МенюПравка);
ГлавноеМеню.Добавить(МенюСправка);
Форма1.Меню = ГлавноеМеню;
Форма1.Открыть();
Добавить_ПолеСписка_метод.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
// ЭлементыСписка = ПолеСписка1.ЭлементыСписка;
// Для А = 0 По ЭлементыСписка.ВГраница() Цикл
// Эл = ЭлементыСписка.Получить(А);
// Сообщить("Эл = " + Эл + " ключ - " + Эл.КлючЭлемента);
// КонецЦикла;
Сообщить(?(
ПолеСписка1.ЭлементыСписка.Количество() = 3
, "", "!!! ") + "Добавить_ПолеСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "ЭлементыСписка", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Ширина = 150;
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = ПолеСписка1;
ЭлементПоляСписка1.Значение = "Кот";
ЭлементПоляСписка1.Текст = "Матроскин";
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ПолеСписка1;
ЭлементПоляСписка2.Значение = "Пёс";
ЭлементПоляСписка2.Текст = "Шарик";
ЭлементПоляСписка3 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка3.Значение = "Птица";
ЭлементПоляСписка3.Текст = "Галчонок";
ПолеСписка1.Добавить(ЭлементПоляСписка3, 1);
Форма1.Открыть();
ДобавитьДочерний_Абзац_метод.os
Перем ДФ, Абзац1, Абзац2;
Процедура Родитель() Экспорт
Сообщить(?(
Абзац2.Родитель = Абзац1
, "", "!!! ") + "ДобавитьДочерний_Абзац_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац2 = Абзац1.ДобавитьДочерний(ДФ.Абзац());
Абзац2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Артикль_метод.os
Перем ДФ, Артикль1, Артикль2;
Процедура Родитель() Экспорт
Сообщить(?(
Артикль2.Родитель = Артикль1
, "", "!!! ") + "ДобавитьДочерний_Артикль_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Артикль2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Артикль1 = Форма1.ДобавитьДочерний(ДФ.Артикль());
Артикль2 = Артикль1.ДобавитьДочерний(ДФ.Артикль());
Артикль2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Блок_метод.os
Перем ДФ, Блок1, Блок2;
Процедура Родитель() Экспорт
Сообщить(?(
Блок2.Родитель = Блок1
, "", "!!! ") + "ДобавитьДочерний_Блок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Группа_метод.os
Перем ДФ, Группа1, Группа2;
Процедура Родитель() Экспорт
Сообщить(?(
Группа2.Родитель = Группа1
, "", "!!! ") + "ДобавитьДочерний_Группа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Группа2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Группа1 = Форма1.ДобавитьДочерний(ДФ.Группа());
Группа2 = Группа1.ДобавитьДочерний(ДФ.Группа());
Группа2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_ГруппаКолонок_метод.os
Перем ДФ, ГруппаКолонок1, ГруппаКолонок2;
Процедура Родитель() Экспорт
Сообщить(?(
ГруппаКолонок2.Родитель = ГруппаКолонок1
, "", "!!! ") + "ДобавитьДочерний_ГруппаКолонок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппаКолонок2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГруппаКолонок1 = Форма1.ДобавитьДочерний(ДФ.ГруппаКолонок());
ГруппаКолонок2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Форма1.Открыть();
ДобавитьДочерний_ГруппировкаПоляСписка_метод.os
Перем ДФ, ГруппировкаПоляСписка1, ГруппировкаПоляСписка2;
Процедура Родитель() Экспорт
Сообщить(?(
ГруппировкаПоляСписка2.Родитель = ГруппировкаПоляСписка1
, "", "!!! ") + "ДобавитьДочерний_ГруппировкаПоляСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппировкаПоляСписка2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГруппировкаПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ГруппировкаПоляСписка());
ГруппировкаПоляСписка2 = ГруппировкаПоляСписка1.ДобавитьДочерний(ДФ.ГруппировкаПоляСписка());
Форма1.Открыть();
ДобавитьДочерний_Диалог_метод.os
Перем ДФ, Диалог1, Диалог2;
Процедура Родитель() Экспорт
Сообщить(?(
Диалог2.Родитель = Диалог1
, "", "!!! ") + "ДобавитьДочерний_Диалог_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Диалог2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Диалог1 = Форма1.ДобавитьДочерний(ДФ.Диалог());
Диалог2 = Диалог1.ДобавитьДочерний(ДФ.Диалог());
Диалог2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_ДополнительныйБлок_метод.os
Перем ДФ, ДополнительныйБлок1, ДополнительныйБлок2;
Процедура Родитель() Экспорт
Сообщить(?(
ДополнительныйБлок2.Родитель = ДополнительныйБлок1
, "", "!!! ") + "ДобавитьДочерний_ДополнительныйБлок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ДополнительныйБлок1 = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
ДополнительныйБлок2 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
ДополнительныйБлок2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_ЖирныйТекст_метод.os
Перем ДФ, ЖирныйТекст1, ЖирныйТекст2;
Процедура Родитель() Экспорт
Сообщить(?(
ЖирныйТекст2.Родитель = ЖирныйТекст1
, "", "!!! ") + "ДобавитьДочерний_ЖирныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЖирныйТекст2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЖирныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
ЖирныйТекст2 = ЖирныйТекст1.ДобавитьДочерний(ДФ.ЖирныйТекст());
ЖирныйТекст2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Заголовок1_метод.os
Перем ДФ, Заголовок11, Заголовок12;
Процедура Родитель() Экспорт
Сообщить(?(
Заголовок12.Родитель = Заголовок11
, "", "!!! ") + "ДобавитьДочерний_Заголовок1_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок12, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок11 = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок12 = Заголовок11.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок12.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Заголовок2_метод.os
Перем ДФ, Заголовок21, Заголовок22;
Процедура Родитель() Экспорт
Сообщить(?(
Заголовок22.Родитель = Заголовок21
, "", "!!! ") + "ДобавитьДочерний_Заголовок2_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок22, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок21 = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок22 = Заголовок21.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок22.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Заголовок3_метод.os
Перем ДФ, Заголовок31, Заголовок32;
Процедура Родитель() Экспорт
Сообщить(?(
Заголовок32.Родитель = Заголовок31
, "", "!!! ") + "ДобавитьДочерний_Заголовок3_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок32, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок31 = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок32 = Заголовок31.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок32.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Заголовок4_метод.os
Перем ДФ, Заголовок41, Заголовок42;
Процедура Родитель() Экспорт
Сообщить(?(
Заголовок42.Родитель = Заголовок41
, "", "!!! ") + "ДобавитьДочерний_Заголовок4_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок42, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок41 = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Заголовок42 = Заголовок41.ДобавитьДочерний(ДФ.Заголовок4());
Заголовок42.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Заголовок5_метод.os
Перем ДФ, Заголовок51, Заголовок52;
Процедура Родитель() Экспорт
Сообщить(?(
Заголовок52.Родитель = Заголовок51
, "", "!!! ") + "ДобавитьДочерний_Заголовок5_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок52, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок51 = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Заголовок52 = Заголовок51.ДобавитьДочерний(ДФ.Заголовок5());
Заголовок52.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Заголовок6_метод.os
Перем ДФ, Заголовок61, Заголовок62;
Процедура Родитель() Экспорт
Сообщить(?(
Заголовок62.Родитель = Заголовок61
, "", "!!! ") + "ДобавитьДочерний_Заголовок6_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок62, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок61 = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Заголовок62 = Заголовок61.ДобавитьДочерний(ДФ.Заголовок6());
Заголовок62.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Заголовок_метод.os
Перем ДФ, Заголовок1, Заголовок2;
Процедура Родитель() Экспорт
Сообщить(?(
Заголовок2.Родитель = Заголовок1
, "", "!!! ") + "ДобавитьДочерний_Заголовок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок1 = Форма1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок2 = Заголовок1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_ЗаголовокГруппы_метод.os
Перем ДФ, ЗаголовокГруппы1, ЗаголовокГруппы2;
Процедура Родитель() Экспорт
Сообщить(?(
ЗаголовокГруппы2.Родитель = ЗаголовокГруппы1
, "", "!!! ") + "ДобавитьДочерний_ЗаголовокГруппы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокГруппы2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокГруппы1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокГруппы());
ЗаголовокГруппы2 = ЗаголовокГруппы1.ДобавитьДочерний(ДФ.ЗаголовокГруппы());
ЗаголовокГруппы2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_ЗаголовокРаскрываемогоБлока_метод.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1, ЗаголовокРаскрываемогоБлока2;
Процедура Родитель() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока2.Родитель = ЗаголовокРаскрываемогоБлока1
, "", "!!! ") + "ДобавитьДочерний_ЗаголовокРаскрываемогоЗаголовокРаскрываемогоБлокаа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокРаскрываемогоБлока1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокРаскрываемогоБлока());
ЗаголовокРаскрываемогоБлока2 = ЗаголовокРаскрываемогоБлока1.ДобавитьДочерний(ДФ.ЗаголовокРаскрываемогоБлока());
ЗаголовокРаскрываемогоБлока2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Итоги_метод.os
Перем ДФ, Итоги1, Итоги2;
Процедура Родитель() Экспорт
Сообщить(?(
Итоги2.Родитель = Итоги1
, "", "!!! ") + "ДобавитьДочерний_Итоги_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Итоги2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Итоги1 = Форма1.ДобавитьДочерний(ДФ.Итоги());
Итоги2 = Итоги1.ДобавитьДочерний(ДФ.Итоги());
Итоги2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Карта_метод.os
Перем ДФ, Карта1, Карта2;
Процедура Родитель() Экспорт
Сообщить(?(
Карта2.Родитель = Карта1
, "", "!!! ") + "ДобавитьДочерний_Карта_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Карта2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Карта1 = Форма1.ДобавитьДочерний(ДФ.Карта());
Карта2 = Карта1.ДобавитьДочерний(ДФ.Карта());
Карта2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Кнопка_метод.os
Перем ДФ, Кнопка1, Кнопка2;
Процедура Родитель() Экспорт
Сообщить(?(
Кнопка2.Родитель = Кнопка1
, "", "!!! ") + "ДобавитьДочерний_Кнопка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2 = Кнопка1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Код_метод.os
Перем ДФ, Код1, Код2;
Процедура Родитель() Экспорт
Сообщить(?(
Код2.Родитель = Код1
, "", "!!! ") + "ДобавитьДочерний_Код_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Код2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Код1 = Форма1.ДобавитьДочерний(ДФ.Код());
Код2 = Код1.ДобавитьДочерний(ДФ.Код());
Код2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Колонка_метод.os
Перем ДФ, Колонка1, Колонка2;
Процедура Родитель() Экспорт
Сообщить(?(
Колонка2.Родитель = Колонка1
, "", "!!! ") + "ДобавитьДочерний_Колонка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонка2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонка1 = Форма1.ДобавитьДочерний(ДФ.Колонка());
Колонка2 = Колонка1.ДобавитьДочерний(ДФ.Колонка());
Форма1.Открыть();
ДобавитьДочерний_Колонтитул_метод.os
Перем ДФ, Колонтитул1, Колонтитул2;
Процедура Родитель() Экспорт
Сообщить(?(
Колонтитул2.Родитель = Колонтитул1
, "", "!!! ") + "ДобавитьДочерний_Колонтитул_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонтитул2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонтитул1 = Форма1.ДобавитьДочерний(ДФ.Колонтитул());
Колонтитул2 = Колонтитул1.ДобавитьДочерний(ДФ.Колонтитул());
Колонтитул2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Контент_метод.os
Перем ДФ, Блок1, Блок2;
Процедура Родитель() Экспорт
Сообщить(?(
Блок2.Родитель = Блок1
, "", "!!! ") + "ДобавитьДочерний_Контент_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = Форма1.Контент.ДобавитьДочерний(ДФ.Блок());
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_КурсивТекст_метод.os
Перем ДФ, КурсивТекст1, КурсивТекст2;
Процедура Родитель() Экспорт
Сообщить(?(
КурсивТекст2.Родитель = КурсивТекст1
, "", "!!! ") + "ДобавитьДочерний_КурсивТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(КурсивТекст2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
КурсивТекст1 = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
КурсивТекст2 = КурсивТекст1.ДобавитьДочерний(ДФ.КурсивТекст());
КурсивТекст2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_МаркированныйТекст_метод.os
Перем ДФ, МаркированныйТекст1, МаркированныйТекст2;
Процедура Родитель() Экспорт
Сообщить(?(
МаркированныйТекст2.Родитель = МаркированныйТекст1
, "", "!!! ") + "ДобавитьДочерний_МаркированныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МаркированныйТекст2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МаркированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
МаркированныйТекст2 = МаркированныйТекст1.ДобавитьДочерний(ДФ.МаркированныйТекст());
МаркированныйТекст2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_МедиаГруппа_метод.os
Перем ДФ, МедиаГруппа1, МедиаГруппа2;
Процедура Родитель() Экспорт
Сообщить(?(
МедиаГруппа2.Родитель = МедиаГруппа1
, "", "!!! ") + "ДобавитьДочерний_МедиаГруппа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МедиаГруппа1 = Форма1.ДобавитьДочерний(ДФ.МедиаГруппа());
МедиаГруппа2 = МедиаГруппа1.ДобавитьДочерний(ДФ.МедиаГруппа());
МедиаГруппа2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_МелкийТекст_метод.os
Перем ДФ, МелкийТекст1, МелкийТекст2;
Процедура Родитель() Экспорт
Сообщить(?(
МелкийТекст2.Родитель = МелкийТекст1
, "", "!!! ") + "ДобавитьДочерний_МелкийТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МелкийТекст2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МелкийТекст1 = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
МелкийТекст2 = МелкийТекст1.ДобавитьДочерний(ДФ.МелкийТекст());
МелкийТекст2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_НадстрочныйТекст_метод.os
Перем ДФ, НадстрочныйТекст1, НадстрочныйТекст2;
Процедура Родитель() Экспорт
Сообщить(?(
НадстрочныйТекст2.Родитель = НадстрочныйТекст1
, "", "!!! ") + "ДобавитьДочерний_НадстрочныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НадстрочныйТекст2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НадстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
НадстрочныйТекст2 = НадстрочныйТекст1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
НадстрочныйТекст2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_НаправленныйТекст_метод.os
Перем ДФ, НаправленныйТекст1, НаправленныйТекст2;
Процедура Родитель() Экспорт
Сообщить(?(
НаправленныйТекст2.Родитель = НаправленныйТекст1
, "", "!!! ") + "ДобавитьДочерний_НаправленныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НаправленныйТекст2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НаправленныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
НаправленныйТекст2 = НаправленныйТекст1.ДобавитьДочерний(ДФ.НаправленныйТекст());
НаправленныйТекст2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_НеупорядоченныйСписок_метод.os
Перем ДФ, НеупорядоченныйСписок1, НеупорядоченныйСписок2;
Процедура Родитель() Экспорт
Сообщить(?(
НеупорядоченныйСписок2.Родитель = НеупорядоченныйСписок1
, "", "!!! ") + "ДобавитьДочерний_НеупорядоченныйСписок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НеупорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
НеупорядоченныйСписок2 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
НеупорядоченныйСписок2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_НижнийКолонтитул_метод.os
Перем ДФ, НижнийКолонтитул1, НижнийКолонтитул2;
Процедура Родитель() Экспорт
Сообщить(?(
НижнийКолонтитул2.Родитель = НижнийКолонтитул1
, "", "!!! ") + "ДобавитьДочерний_НижнийКолонтитул_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НижнийКолонтитул1 = Форма1.ДобавитьДочерний(ДФ.НижнийКолонтитул());
НижнийКолонтитул2 = НижнийКолонтитул1.ДобавитьДочерний(ДФ.НижнийКолонтитул());
НижнийКолонтитул2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Область_метод.os
Перем ДФ, Область1, Область2;
Процедура Родитель() Экспорт
Сообщить(?(
Область2.Родитель = Область1
, "", "!!! ") + "ДобавитьДочерний_Область_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Область2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Область1 = Форма1.ДобавитьДочерний(ДФ.Область());
Область2 = Область1.ДобавитьДочерний(ДФ.Область());
Область2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_ОбластьТаблицы_метод.os
Перем ДФ, ОбластьТаблицы1, ОбластьТаблицы2;
Процедура Родитель() Экспорт
Сообщить(?(
ОбластьТаблицы2.Родитель = ОбластьТаблицы1
, "", "!!! ") + "ДобавитьДочерний_ОбластьТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТаблицы2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
ОбластьТаблицы2 = ОбластьТаблицы1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
ОбластьТаблицы2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_ОбластьТекста_метод.os
Перем ДФ, ОбластьТекста1, ОбластьТекста2;
Процедура Родитель() Экспорт
Сообщить(?(
ОбластьТекста2.Родитель = ОбластьТекста1
, "", "!!! ") + "ДобавитьДочерний_ОбластьТекста_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста2 = ОбластьТекста1.ДобавитьДочерний(ДФ.ОбластьТекста());
Форма1.Открыть();
ДобавитьДочерний_ОписаниеМедиа_метод.os
Перем ДФ, ОписаниеМедиа1, ОписаниеМедиа2;
Процедура Родитель() Экспорт
Сообщить(?(
ОписаниеМедиа2.Родитель = ОписаниеМедиа1
, "", "!!! ") + "ДобавитьДочерний_ОписаниеМедиа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОписаниеМедиа1 = Форма1.ДобавитьДочерний(ДФ.ОписаниеМедиа());
ОписаниеМедиа2 = ОписаниеМедиа1.ДобавитьДочерний(ДФ.ОписаниеМедиа());
ОписаниеМедиа2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Определение_метод.os
Перем ДФ, Определение1, Определение2;
Процедура Родитель() Экспорт
Сообщить(?(
Определение2.Родитель = Определение1
, "", "!!! ") + "ДобавитьДочерний_Определение_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Определение2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Определение1 = Форма1.ДобавитьДочерний(ДФ.Определение());
Определение2 = Определение1.ДобавитьДочерний(ДФ.Определение());
Определение2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Перенос_метод.os
Перем ДФ, Перенос1, Перенос2;
Процедура Родитель() Экспорт
Сообщить(?(
Перенос2.Родитель = Перенос1
, "", "!!! ") + "ДобавитьДочерний_Перенос_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Перенос2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Перенос1 = Форма1.ДобавитьДочерний(ДФ.Перенос());
Перенос2 = Перенос1.ДобавитьДочерний(ДФ.Перенос());
Форма1.Открыть();
ДобавитьДочерний_ПодстрочныйТекст_метод.os
Перем ДФ, ПодстрочныйТекст1, ПодстрочныйТекст2;
Процедура Родитель() Экспорт
Сообщить(?(
ПодстрочныйТекст2.Родитель = ПодстрочныйТекст1
, "", "!!! ") + "ДобавитьДочерний_ПодстрочныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодстрочныйТекст2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
ПодстрочныйТекст2 = ПодстрочныйТекст1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
ПодстрочныйТекст2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_ПодчеркнутыйТекст_метод.os
Перем ДФ, ПодчеркнутыйТекст1, ПодчеркнутыйТекст2;
Процедура Родитель() Экспорт
Сообщить(?(
ПодчеркнутыйТекст2.Родитель = ПодчеркнутыйТекст1
, "", "!!! ") + "ДобавитьДочерний_ПодчеркнутыйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодчеркнутыйТекст2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодчеркнутыйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
ПодчеркнутыйТекст2 = ПодчеркнутыйТекст1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
ПодчеркнутыйТекст2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_ПолеСписка_метод.os
Перем ДФ, ПолеСписка1, ПолеСписка2;
Процедура Родитель() Экспорт
Сообщить(?(
ПолеСписка2.Родитель = ПолеСписка1
, "", "!!! ") + "ДобавитьДочерний_ПолеСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеСписка1 = Форма1.ДобавитьДочерний(ДФ.ПолеСписка());
ПолеСписка2 = ПолеСписка1.ДобавитьДочерний(ДФ.ПолеСписка());
Форма1.Открыть();
ДобавитьДочерний_РаскрываемыйБлок_метод.os
Перем ДФ, РаскрываемыйБлок1, РаскрываемыйБлок2;
Процедура Родитель() Экспорт
Сообщить(?(
РаскрываемыйБлок2.Родитель = РаскрываемыйБлок1
, "", "!!! ") + "ДобавитьДочерний_РаскрываемыйБлок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(РаскрываемыйБлок2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
РаскрываемыйБлок2 = РаскрываемыйБлок1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
Форма1.Открыть();
ДобавитьДочерний_Результат_метод.os
Перем ДФ, Результат1, Результат2;
Процедура Родитель() Экспорт
Сообщить(?(
Результат2.Родитель = Результат1
, "", "!!! ") + "ДобавитьДочерний_Результат_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Результат2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Результат1 = Форма1.ДобавитьДочерний(ДФ.Результат());
Результат2 = Результат1.ДобавитьДочерний(ДФ.Результат());
Результат2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_СписокОпределений_метод.os
Перем ДФ, СписокОпределений1, СписокОпределений2;
Процедура Родитель() Экспорт
Сообщить(?(
СписокОпределений2.Родитель = СписокОпределений1
, "", "!!! ") + "ДобавитьДочерний_СписокОпределений_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СписокОпределений1 = Форма1.ДобавитьДочерний(ДФ.СписокОпределений());
СписокОпределений2 = СписокОпределений1.ДобавитьДочерний(ДФ.СписокОпределений());
СписокОпределений2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Ссылка_метод.os
Перем ДФ, Ссылка1, Ссылка2;
Процедура Родитель() Экспорт
Сообщить(?(
Ссылка2.Родитель = Ссылка1
, "", "!!! ") + "ДобавитьДочерний_Ссылка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ссылка2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ссылка1 = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка2 = Ссылка1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_СтрокаТаблицы_метод.os
Перем ДФ, СтрокаТаблицы1, СтрокаТаблицы2;
Процедура Родитель() Экспорт
Сообщить(?(
СтрокаТаблицы2.Родитель = СтрокаТаблицы1
, "", "!!! ") + "ДобавитьДочерний_СтрокаТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СтрокаТаблицы2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СтрокаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаТаблицы2 = СтрокаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаТаблицы2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Таблица_метод.os
Перем ДФ, Таблица1, Таблица2;
Процедура Родитель() Экспорт
Сообщить(?(
Таблица2.Родитель = Таблица1
, "", "!!! ") + "ДобавитьДочерний_Таблица_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица2 = Таблица1.ДобавитьДочерний(ДФ.Таблица());
Таблица2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Термин_метод.os
Перем ДФ, Термин1, Термин2;
Процедура Родитель() Экспорт
Сообщить(?(
Термин2.Родитель = Термин1
, "", "!!! ") + "ДобавитьДочерний_Термин_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Термин2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Термин1 = Форма1.ДобавитьДочерний(ДФ.Термин());
Термин2 = Термин1.ДобавитьДочерний(ДФ.Термин());
Термин2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_УдаленыйТекст_метод.os
Перем ДФ, УдаленыйТекст1, УдаленыйТекст2;
Процедура Родитель() Экспорт
Сообщить(?(
УдаленыйТекст2.Родитель = УдаленыйТекст1
, "", "!!! ") + "ДобавитьДочерний_УдаленыйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УдаленыйТекст2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УдаленыйТекст1 = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
УдаленыйТекст2 = УдаленыйТекст1.ДобавитьДочерний(ДФ.УдаленыйТекст());
УдаленыйТекст2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_УпорядоченныйСписок_метод.os
Перем ДФ, УпорядоченныйСписок1, УпорядоченныйСписок2;
Процедура Родитель() Экспорт
Сообщить(?(
УпорядоченныйСписок2.Родитель = УпорядоченныйСписок1
, "", "!!! ") + "ДобавитьДочерний_УпорядоченныйСписок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УпорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.УпорядоченныйСписок());
УпорядоченныйСписок2 = УпорядоченныйСписок1.ДобавитьДочерний(ДФ.УпорядоченныйСписок());
УпорядоченныйСписок2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Форма_метод.os
Перем ДФ, Блок1, Блок2;
Процедура Родитель() Экспорт
Сообщить(?(
Блок2.Родитель = Блок1
, "", "!!! ") + "ДобавитьДочерний_Форма_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_ФорматированныйТекст_метод.os
Перем ДФ, ФорматированныйТекст1, ФорматированныйТекст2;
Процедура Родитель() Экспорт
Сообщить(?(
ФорматированныйТекст2.Родитель = ФорматированныйТекст1
, "", "!!! ") + "ДобавитьДочерний_ФорматированныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ФорматированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
ФорматированныйТекст2 = ФорматированныйТекст1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
ФорматированныйТекст2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Фрейм_метод.os
Перем ДФ, Фрейм1, Фрейм2;
Процедура Родитель() Экспорт
Сообщить(?(
Фрейм2.Родитель = Фрейм1
, "", "!!! ") + "ДобавитьДочерний_Фрейм_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Фрейм2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Фрейм1 = Форма1.ДобавитьДочерний(ДФ.Фрейм());
Фрейм2 = Фрейм1.ДобавитьДочерний(ДФ.Фрейм());
Форма1.Открыть();
ДобавитьДочерний_ШапкаТаблицы_метод.os
Перем ДФ, ШапкаТаблицы1, ШапкаТаблицы2;
Процедура Родитель() Экспорт
Сообщить(?(
ШапкаТаблицы2.Родитель = ШапкаТаблицы1
, "", "!!! ") + "ДобавитьДочерний_ШапкаТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ШапкаТаблицы2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ШапкаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
ШапкаТаблицы2 = ШапкаТаблицы1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
ШапкаТаблицы2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Шкала_метод.os
Перем ДФ, Шкала1, Шкала2;
Процедура Родитель() Экспорт
Сообщить(?(
Шкала2.Родитель = Шкала1
, "", "!!! ") + "ДобавитьДочерний_Шкала_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Шкала2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Шкала1 = Форма1.ДобавитьДочерний(ДФ.Шкала());
Шкала2 = Шкала1.ДобавитьДочерний(ДФ.Шкала());
Форма1.Открыть();
ДобавитьДочерний_ЭлементПоляСписка_метод.os
Перем ДФ, ЭлементПоляСписка1, ЭлементПоляСписка2;
Процедура Родитель() Экспорт
Сообщить(?(
ЭлементПоляСписка2.Родитель = ЭлементПоляСписка1
, "", "!!! ") + "ДобавитьДочерний_ЭлементПоляСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементПоляСписка());
ЭлементПоляСписка2 = ЭлементПоляСписка1.ДобавитьДочерний(ДФ.ЭлементПоляСписка());
ЭлементПоляСписка2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_ЭлементСписка_метод.os
Перем ДФ, ЭлементСписка1, ЭлементСписка2;
Процедура Родитель() Экспорт
Сообщить(?(
ЭлементСписка2.Родитель = ЭлементСписка1
, "", "!!! ") + "ДобавитьДочерний_ЭлементСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка2 = ЭлементСписка1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_Ячейка_метод.os
Перем ДФ, Ячейка1, Ячейка2;
Процедура Родитель() Экспорт
Сообщить(?(
Ячейка2.Родитель = Ячейка1
, "", "!!! ") + "ДобавитьДочерний_Ячейка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ячейка2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ячейка1 = Форма1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2 = Ячейка1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьДочерний_ЯчейкаЗаголовка_метод.os
Перем ДФ, ЯчейкаЗаголовка1, ЯчейкаЗаголовка2;
Процедура Родитель() Экспорт
Сообщить(?(
ЯчейкаЗаголовка2.Родитель = ЯчейкаЗаголовка1
, "", "!!! ") + "ДобавитьДочерний_ЯчейкаЗаголовка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка2, "Родитель", ДФ.Действие(ЭтотОбъект, "Родитель"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЯчейкаЗаголовка1 = Форма1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2 = ЯчейкаЗаголовка1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Форма1.Открыть();
ДобавитьКвадратичнуюБизье_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "ДобавитьКвадратичнуюБизье_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.НачатьПуть();
Контекст2d1.ПерейтиКТочке(20, 20);
Контекст2d1.ДобавитьКвадратичнуюБизье(20, 100, 200, 20);
Контекст2d1.Начертить();
Форма1.Открыть();
ДобавитьКубическуюБизье_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "ДобавитьКубическуюБизье_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.НачатьПуть();
Контекст2d1.ПерейтиКТочке(20, 20);
Контекст2d1.ДобавитьКубическуюБизье(20, 100, 200, 100, 200, 20);
Контекст2d1.Начертить();
Форма1.Открыть();
ДобавитьОстановкуГрадиента_ЛинейныйГрадиент_метод.os
Перем ДФ, Холст1, ЛинейныйГрадиент1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Холст1.Контекст2d.СтильЗаполнения = ЛинейныйГрадиент1
, "", "!!! ") + "ДобавитьОстановкуГрадиента_ЛинейныйГрадиент_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ЛинейныйГрадиент1 = Холст1.Контекст2d.СоздатьЛинейныйГрадиент(0, 0, 170, 0);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0, ДФ.Цвет.Черный);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0.3, ДФ.Цвет.Малиновый);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0.5, ДФ.Цвет.Синий);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0.6, ДФ.Цвет.Зеленый);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0.8, ДФ.Цвет.Желтый);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(1, ДФ.Цвет.Красный);
Холст1.Контекст2d.СтильЗаполнения = ЛинейныйГрадиент1;
Холст1.Контекст2d.ЗаполнитьПрямоугольник(20, 20, 150, 100);
Форма1.Открыть();
ДобавитьОстановкуГрадиента_РадиальныйГрадиент_метод.os
Перем ДФ, Холст1, РадиальныйГрадиент1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Холст1.Контекст2d.СтильЗаполнения = РадиальныйГрадиент1
, "", "!!! ") + "ДобавитьОстановкуГрадиента_РадиальныйГрадиент_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
РадиальныйГрадиент1 = Холст1.Контекст2d.СоздатьРадиальныйГрадиент(75, 50, 5, 90, 60, 100);
РадиальныйГрадиент1.ДобавитьОстановкуГрадиента(0, ДФ.Цвет.Красный);
РадиальныйГрадиент1.ДобавитьОстановкуГрадиента(1, ДФ.Цвет.Белый);
Холст1.Контекст2d.СтильЗаполнения = РадиальныйГрадиент1;
Холст1.Контекст2d.ЗаполнитьПрямоугольник(10, 10, 150, 100);
Форма1.Открыть();
Доступность_ЭлементМеню_свойство.os
Перем ДФ, Сохранить;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Не Сохранить.Доступность
, "", "!!! ") + "Доступность_ЭлементМеню_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ГлавноеМеню = ДФ.Меню(ДФ.ТипМеню.Главное);
ПодменюМенюФайл = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюФайл = ДФ.ЭлементМеню("Файл", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюФайл);
Открыть = ДФ.ЭлементМеню("Открыть", ДФ.ТипЭлементаМеню.Стандартный);
ПодменюОткрыть = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
ТХТ = ДФ.ЭлементМеню("txt");
ДОК = ДФ.ЭлементМеню("doc");
ПодменюОткрыть.Добавить(ТХТ);
ПодменюОткрыть.Добавить(ДОК);
Открыть.Подменю = ПодменюОткрыть;
Сохранить = ДФ.ЭлементМеню("Сохранить");
Сохранить.Доступность = Ложь;
Разделитель1 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Настройки = ДФ.ЭлементМеню("Настройки");
Разделитель2 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Выход = ДФ.ЭлементМеню("Выход");
ПодменюМенюФайл.Добавить(Открыть);
ПодменюМенюФайл.Добавить(Сохранить);
ПодменюМенюФайл.Добавить(Разделитель1);
ПодменюМенюФайл.Добавить(Настройки);
ПодменюМенюФайл.Добавить(Разделитель2);
ПодменюМенюФайл.Добавить(Выход);
ПодменюМенюПравка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюПравка = ДФ.ЭлементМеню("Правка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюПравка);
Отмена = ДФ.ЭлементМеню("Отмена");
Повтор = ДФ.ЭлементМеню("Повтор");
ПодменюМенюПравка.Добавить(Отмена);
ПодменюМенюПравка.Добавить(Повтор);
ПодменюМенюСправка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюСправка = ДФ.ЭлементМеню("Справка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюСправка);
ОПрограмме = ДФ.ЭлементМеню("О программе");
ПодменюМенюСправка.Добавить(ОПрограмме);
ГлавноеМеню.Добавить(МенюФайл);
ГлавноеМеню.Добавить(МенюПравка);
ГлавноеМеню.Добавить(МенюСправка);
Форма1.Меню = ГлавноеМеню;
Форма1.Открыть();
Дуга_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "Дуга_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.НачатьПуть();
Контекст2d1.Дуга(100, 75, 50, 0, 2 * ДФ.Математика().Пи);
Контекст2d1.Начертить();
Форма1.Открыть();
ДугаМежду_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "ДугаМежду_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.НачатьПуть();
Контекст2d1.ПерейтиКТочке(20, 20);
Контекст2d1.Линия(100, 20);
Контекст2d1.ДугаМежду(150, 20, 150, 70, 50);
Контекст2d1.Линия(150, 120);
Контекст2d1.Начертить();
Форма1.Открыть();
Е_Математика_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().Е = 2.71828182845904
, "", "!!! ") + "Е_Математика_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().Е;
Форма1.Открыть();
ЖирностьШрифта_ОкноСообщений_свойство.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОкноСообщений1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный
, "", "!!! ") + "ЖирностьШрифта_ОкноСообщений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
ОкноСообщений1.Показать();
Форма1.Открыть();
ЖирностьШрифта_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ЖирностьШрифта = ДФ.ЖирностьШрифта.Нормальный
, "", "!!! ") + "ЖирностьШрифта_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ЖирностьШрифта", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шрифт1 = ДФ.Шрифт();
Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
Шрифт1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
Шрифт1.РазмерШрифта = 20;
Шрифт1.ВысотаСтроки = 50;
Шрифт1.СемействоШрифтов = "arial,serif";
Абзац1.Стиль.Шрифт = Шрифт1;
Абзац1.Стиль.ЖирностьШрифта = ДФ.ЖирностьШрифта.Нормальный;
Форма1.Открыть();
ЖирностьШрифта_Уведомления_свойство.os
Перем ДФ, Уведомления1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Уведомления1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный
, "", "!!! ") + "ЖирностьШрифта_Уведомления_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
Уведомления1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Форма1.Открыть();
ЖирностьШрифта_Шрифт_свойство.os
Перем ДФ, Шрифт1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный
, "", "!!! ") + "ЖирностьШрифта_Шрифт_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шрифт1 = ДФ.Шрифт();
Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
Шрифт1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
Шрифт1.РазмерШрифта = 20;
Шрифт1.ВысотаСтроки = 50;
Шрифт1.СемействоШрифтов = "arial,serif";
Абзац1.Стиль.Шрифт = Шрифт1;
Форма1.Открыть();
Завершено_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Не Аудио1.Завершено
, "", "!!! ") + "Завершено_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "Завершено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Воспроизвести();
Форма1.Открыть();
Завершить_Анимация_метод.os
Перем ДФ, АнимацияВращение, АнимацияМасштаб;
Процедура Кнопка1_Нажатие() Экспорт
АнимацияВращение.Запустить();
АнимацияМасштаб.Запустить();
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
АнимацияВращение.Пауза();
АнимацияМасштаб.Пауза();
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
АнимацияВращение.Завершить();
АнимацияМасштаб.Завершить();
Сообщить(?(
Истина
, "", "!!! ") + "Завершить_Анимация_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
АнимацияВращение.Отменить();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Нажми кнопку Завершить";
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Запустить";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Пауза";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка3 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Завершить";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Отменить вращение";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = ДФ.Поворот(0);
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = ДФ.Поворот(180);
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок2.Стиль.Ширина = 45;
Блок2.Стиль.Высота = 45;
Блок2.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок2.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок2.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок2.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок2";
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.Зеленый;
Кадр3.Сдвиг = ДФ.Масштаб(1, 1);
Кадр3.Смещение = 0;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Желтый;
Кадр4.Сдвиг = ДФ.Масштаб(1.05, 1.05);
Кадр4.Смещение = 0.1;
Кадр5 = ДФ.Стиль();
Кадр5.ЦветФона = ДФ.Цвет.Желтый;
Кадр5.Сдвиг = ДФ.Масштаб(1.4, 1.4);
Кадр5.Смещение = 0.7;
Кадр6 = ДФ.Стиль();
Кадр6.ЦветФона = ДФ.Цвет.Красный;
Кадр6.Сдвиг = ДФ.Масштаб(1.5, 1.5);
Кадр6.Смещение = 1;
Кадры2 = ДФ.Кадры();
Кадры2.Добавить(Кадр3);
Кадры2.Добавить(Кадр4);
Кадры2.Добавить(Кадр5);
Кадры2.Добавить(Кадр6);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Блок1.Анимация(Кадры1, ПараметрыАнимации1);
АнимацияМасштаб = Блок2.Анимация(Кадры2, ПараметрыАнимации1);
Форма1.Открыть();
ЗавершитьРаботу_ДекларативныеФормы_метод.os
Перем ДФ;
Процедура Кнопка1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ЗавершитьРаботу_ДекларативныеФормы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Нажми кнопку";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
Заголовки_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ячейка1.Заголовки = "Профессия"
, "", "!!! ") + "Заголовки_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ячейка1, "Заголовки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Стиль1 = Таблица1.Стиль;
Стиль1.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Строка1 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = Строка1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Профессия";
ЯчейкаЗаголовка1.Идентификатор = "Профессия";
ЯчейкаЗаголовка2 = Строка1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Имя";
ЯчейкаЗаголовка2.Идентификатор = "Имя";
ЯчейкаЗаголовка3 = Строка1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Возраст";
ЯчейкаЗаголовка2.Идентификатор = "Возраст";
ЯчейкаЗаголовка4 = Строка1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Адрес";
ЯчейкаЗаголовка2.Идентификатор = "Адрес";
Строка2 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Ячейка1 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Доктор";
Ячейка1.Заголовки = "Профессия";
Ячейка2 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "Кто";
Ячейка2.Заголовки = "Имя";
Ячейка3 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Неопределенный";
Ячейка3.Заголовки = "Возраст";
Ячейка4 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "Телефонная будка";
Ячейка4.Заголовки = "Адрес";
Форма1.Открыть();
Заголовок_Лоток_свойство.os
Перем ДФ, Лоток1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Лоток1.Заголовок = "Заголовок"
, "", "!!! ") + "Заголовок_Лоток_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Лоток1_Нажатие() Экспорт
Сообщить("Лоток1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Лоток1 = ДФ.Лоток();
Лоток1.Заголовок = "Заголовок";
Лоток1.Подсказка = "Подсказка";
Лоток1.Значок = "icon.png";
Лоток1.Нажатие = ДФ.Действие(ЭтотОбъект, "Лоток1_Нажатие");
Форма1.Открыть();
Заголовок_ОкноСообщений_свойство.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОкноСообщений1.Заголовок = "Самуил Маршак"
, "", "!!! ") + "Заголовок_ОкноСообщений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.Заголовок = "Самуил Маршак";
ОкноСообщений1.Показать();
Форма1.Открыть();
Заголовок_Таблица_свойство.os
Перем ДФ, Заголовок1;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок1.Текст = "Жители деревни Простоквашино"
, "", "!!! ") + "Заголовок_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
Форма1.Открыть();
Заголовок_Уведомления_свойство.os
Перем ДФ, Уведомления1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Уведомления1.Заголовок = "Самуил Маршак"
, "", "!!! ") + "Заголовок_Уведомления_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
Уведомления1.Заголовок = "Самуил Маршак";
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Форма1.Открыть();
Заголовок_Форма_свойство.os
Перем ДФ, Форма1, НовыйЗаголовок;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Заголовок_Форма_свойство.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Заголовок = "Тестовая форма";
Форма1.Контент.Текст = "Если Заголовок формы = Тестовая форма, тогда закрывай";
Форма1.Открыть();
Загружена_Форма_событие.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Загружена_Форма_событие.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Форма загружена, можно закрывать.";
Абзац1.Стиль.Высота = 200;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Открыть();
Загружено_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.Загружено
, "", "!!! ") + "Загружено_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "Загружено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
// Изображение1.Источник = "file:///C:/444/~Деклар Форма/maslenica10.jpg";
Изображение1.Источник = "maslenica10.jpg";
Форма1.Открыть();
ЗагрузитьСценарии_ДекларативныеФормы_метод.os
//== Файл Стартовый.os == начало
Перем ДФ, МояСтруктураЧисло;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МояСтруктураЧисло = 513
, "", "!!! ") + "ЗагрузитьСценарии_ДекларативныеФормы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Структура1 = Новый Структура();
Структура1.Вставить("Строка", "Моя строка");
Структура1.Вставить("Число", 256);
ДФ.ВвестиГлобальноеСвойство(Структура1, "МояСтруктура", Ложь);
Сценарии = ДФ.ЗагрузитьСценарии(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "ДопСценарии" + ПолучитьРазделительПути() + "Парсер2"));
Действие = ДФ.Действие(Сценарии.Парсер2, "МояФункцияИзПарсер");
ДФ.Выполнить(Действие);
МояСтруктураЧисло = Структура1.Число;
Форма1.Открыть();
//== Файл Стартовый.os == конец
// // //== Файл ..\ТестыДекларФорм\ДопСценарии\Парсер2\Парсер2.os == начало
// // Процедура МояФункцияИзПарсер() Экспорт
// // Для Каждого эл Из МояСтруктура Цикл
// // // Сообщить("Ключ = " + эл.Ключ + " Значение = " + эл.Значение);
// // КонецЦикла;
// // МояСтруктура.Число = 513;
// // КонецПроцедуры
// // //== Файл Парсер.os == конец
Задержка_ПараметрыАнимации_свойство.os
Перем АнимацияВращение, АнимацияМасштаб;
Перем ДФ, ПараметрыАнимации1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПараметрыАнимации1.Задержка = 600
, "", "!!! ") + "Задержка_ПараметрыАнимации_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
АнимацияВращение.Запустить();
АнимацияМасштаб.Запустить();
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
АнимацияВращение.Пауза();
АнимацияМасштаб.Пауза();
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
АнимацияВращение.Завершить();
АнимацияМасштаб.Завершить();
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
АнимацияВращение.Отменить();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Запустить";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Пауза";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка3 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Завершить";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Отменить вращение";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок2.Стиль.Ширина = 45;
Блок2.Стиль.Высота = 45;
Блок2.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок2.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок2.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок2.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок2";
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.Зеленый;
Кадр3.Сдвиг = "scale(1)";
Кадр3.Смещение = 0;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Желтый;
Кадр4.Сдвиг = "scale(1.05)";
Кадр4.Смещение = 0.1;
Кадр5 = ДФ.Стиль();
Кадр5.ЦветФона = ДФ.Цвет.Желтый;
Кадр5.Сдвиг = "scale(1.4)";
Кадр5.Смещение = 0.7;
Кадр6 = ДФ.Стиль();
Кадр6.ЦветФона = ДФ.Цвет.Красный;
Кадр6.Сдвиг = "scale(1.5)";
Кадр6.Смещение = 1;
Кадры2 = ДФ.Кадры();
Кадры2.Добавить(Кадр3);
Кадры2.Добавить(Кадр4);
Кадры2.Добавить(Кадр5);
Кадры2.Добавить(Кадр6);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
100);
АнимацияВращение = Блок1.Анимация(Кадры1, ПараметрыАнимации1);
АнимацияМасштаб = Блок2.Анимация(Кадры2, ПараметрыАнимации1);
Форма1.Открыть();
ЗадержкаАнимации_СвойстваАнимации_свойство.os
Перем ДФ, Анимация1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Анимация1.ЗадержкаАнимации = 600
, "", "!!! ") + "ЗадержкаАнимации_СвойстваАнимации_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Анимация1 = ДФ.СвойстваАнимации();
Анимация1.ИмяАнимации = Кадры1.Имя;
Анимация1.ДлительностьАнимации = 3000;
Анимация1.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце;
Анимация1.ЗадержкаАнимации = 600;
Анимация1.КоличествоПовторов = -1;
Анимация1.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать;
Анимация1.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад;
Анимация1.Состояние = ДФ.Состояние.Запущена;
Блок1.Стиль.Анимация = Анимация1;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
ЗадержкаАнимации_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЗадержкаАнимации = "600ms"
, "", "!!! ") + "ЗадержкаАнимации_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЗадержкаАнимации", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Блок1.Стиль.ИмяАнимации = Кадры1.Имя;
Блок1.Стиль.ДлительностьАнимации = 3000;
Блок1.Стиль.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце;
Блок1.Стиль.ЗадержкаАнимации = 600;
Блок1.Стиль.КоличествоПовторов = -1;
Блок1.Стиль.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать;
Блок1.Стиль.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад;
Блок1.Стиль.Состояние = ДФ.Состояние.Запущена;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
ЗадержкаПерехода_Переход_свойство.os
Перем ДФ, Переход1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Переход1.ЗадержкаПерехода = 4
, "", "!!! ") + "ЗадержкаПерехода_Переход_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Переход1 = ДФ.Переход();
Переход1.СвойствоПерехода = ДФ.СвойствоПерехода.Все;
Переход1.ВремяПерехода = 5;
Переход1.ФункцияПерехода = ДФ.ФункцияПерехода.Линейно;
Переход1.ЗадержкаПерехода = 4;
Переход2 = ДФ.Переход(ДФ.СвойствоПерехода.Все, 5, ДФ.ФункцияПерехода.Линейно, 4);
Форма1.Открыть();
ЗадержкаПерехода_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЗадержкаПерехода = "1000ms"
, "", "!!! ") + "ЗадержкаПерехода_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЗадержкаПерехода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура МышьНадЭлементом() Экспорт
Блок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 200;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Блок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.Высота = 100;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.Высота = 100;
Блок1.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Красный);
Блок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Блок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Переход1 = ДФ.Переход();
Переход1.СвойствоПерехода = ДФ.СвойствоПерехода.Все;
Переход1.ВремяПерехода = 1500;
Переход1.ФункцияПерехода = ДФ.ФункцияПерехода.МедленноВконце;
Переход1.ЗадержкаПерехода = 100;
Блок1.Стиль.Переход = Переход1;
Блок1.Стиль.ЗадержкаПерехода = 1000;
Форма1.Открыть();
ЗадержкаПосле_ПараметрыАнимации_свойство.os
Перем АнимацияВращение, АнимацияМасштаб;
Перем ДФ, ПараметрыАнимации1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПараметрыАнимации1.ЗадержкаПосле = 100
, "", "!!! ") + "ЗадержкаПосле_ПараметрыАнимации_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
АнимацияВращение.Запустить();
АнимацияМасштаб.Запустить();
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
АнимацияВращение.Пауза();
АнимацияМасштаб.Пауза();
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
АнимацияВращение.Завершить();
АнимацияМасштаб.Завершить();
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
АнимацияВращение.Отменить();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Запустить";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Пауза";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка3 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Завершить";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Отменить вращение";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок2.Стиль.Ширина = 45;
Блок2.Стиль.Высота = 45;
Блок2.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок2.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок2.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок2.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок2";
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.Зеленый;
Кадр3.Сдвиг = "scale(1)";
Кадр3.Смещение = 0;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Желтый;
Кадр4.Сдвиг = "scale(1.05)";
Кадр4.Смещение = 0.1;
Кадр5 = ДФ.Стиль();
Кадр5.ЦветФона = ДФ.Цвет.Желтый;
Кадр5.Сдвиг = "scale(1.4)";
Кадр5.Смещение = 0.7;
Кадр6 = ДФ.Стиль();
Кадр6.ЦветФона = ДФ.Цвет.Красный;
Кадр6.Сдвиг = "scale(1.5)";
Кадр6.Смещение = 1;
Кадры2 = ДФ.Кадры();
Кадры2.Добавить(Кадр3);
Кадры2.Добавить(Кадр4);
Кадры2.Добавить(Кадр5);
Кадры2.Добавить(Кадр6);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
100);
АнимацияВращение = Блок1.Анимация(Кадры1, ПараметрыАнимации1);
АнимацияМасштаб = Блок2.Анимация(Кадры2, ПараметрыАнимации1);
Форма1.Открыть();
ЗакончитьПуть_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "ЗакончитьПуть_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.НачатьПуть();
Контекст2d1.ПерейтиКТочке(20, 20);
Контекст2d1.Линия(20, 100);
Контекст2d1.Линия(70, 100);
Контекст2d1.ЗакончитьПуть();
Контекст2d1.Начертить();
Форма1.Открыть();
Закрыть_Диалог_метод.os
Перем ДФ, Диалог1;
Процедура Свойство() Экспорт
Сообщить(?(
Не Диалог1.Открыт
, "", "!!! ") + "Закрыть_Диалог_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "Открыт", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Стиль.ЦветФона = ДФ.Цвет("Бежевый");
Диалог1.Показать();
Диалог1.Закрыть();
Форма1.Открыть();
Заливка_ПараметрыАнимации_свойство.os
Перем АнимацияВращение, АнимацияМасштаб;
Перем ДФ, ПараметрыАнимации1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПараметрыАнимации1.Заливка = ДФ.ЗаливкаАнимации.Назад
, "", "!!! ") + "Заливка_ПараметрыАнимации_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
АнимацияВращение.Запустить();
АнимацияМасштаб.Запустить();
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
АнимацияВращение.Пауза();
АнимацияМасштаб.Пауза();
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
АнимацияВращение.Завершить();
АнимацияМасштаб.Завершить();
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
АнимацияВращение.Отменить();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Запустить";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Пауза";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка3 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Завершить";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Отменить вращение";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок2.Стиль.Ширина = 45;
Блок2.Стиль.Высота = 45;
Блок2.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок2.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок2.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок2.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок2";
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.Зеленый;
Кадр3.Сдвиг = "scale(1)";
Кадр3.Смещение = 0;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Желтый;
Кадр4.Сдвиг = "scale(1.05)";
Кадр4.Смещение = 0.1;
Кадр5 = ДФ.Стиль();
Кадр5.ЦветФона = ДФ.Цвет.Желтый;
Кадр5.Сдвиг = "scale(1.4)";
Кадр5.Смещение = 0.7;
Кадр6 = ДФ.Стиль();
Кадр6.ЦветФона = ДФ.Цвет.Красный;
Кадр6.Сдвиг = "scale(1.5)";
Кадр6.Смещение = 1;
Кадры2 = ДФ.Кадры();
Кадры2.Добавить(Кадр3);
Кадры2.Добавить(Кадр4);
Кадры2.Добавить(Кадр5);
Кадры2.Добавить(Кадр6);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
100);
АнимацияВращение = Блок1.Анимация(Кадры1, ПараметрыАнимации1);
АнимацияМасштаб = Блок2.Анимация(Кадры2, ПараметрыАнимации1);
Форма1.Открыть();
ЗаливкаАнимации_СвойстваАнимации_свойство.os
Перем ДФ, Анимация1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Анимация1.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад
, "", "!!! ") + "ЗаливкаАнимации_СвойстваАнимации_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Анимация1 = ДФ.СвойстваАнимации();
Анимация1.ИмяАнимации = Кадры1.Имя;
Анимация1.ДлительностьАнимации = 3000;
Анимация1.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце;
Анимация1.ЗадержкаАнимации = 600;
Анимация1.КоличествоПовторов = -1;
Анимация1.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать;
Анимация1.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад;
Анимация1.Состояние = ДФ.Состояние.Запущена;
Блок1.Стиль.Анимация = Анимация1;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
ЗаливкаАнимации_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад
, "", "!!! ") + "ЗаливкаАнимации_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЗаливкаАнимации", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Блок1.Стиль.ИмяАнимации = Кадры1.Имя;
Блок1.Стиль.ДлительностьАнимации = 3000;
Блок1.Стиль.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце;
Блок1.Стиль.ЗадержкаАнимации = 600;
Блок1.Стиль.КоличествоПовторов = -1;
Блок1.Стиль.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать;
Блок1.Стиль.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад;
Блок1.Стиль.Состояние = ДФ.Состояние.Запущена;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
Замостить_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "Замостить_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 600;
Форма1.НачальнаяВысота = 350;
Изображение1 = ДФ.Изображение();
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Ширина = 119;
Изображение1.Высота = 80;
Абзац2 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 550;
Холст1.Высота = 300;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.Замостить(Изображение1, ДФ.ПовторШаблона.Повторять, 0, 0, 550, 300);
Форма1.Открыть();
Заполнение_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Заполнение = "50px 10px 20px 30px"
, "", "!!! ") + "Заполнение_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Заполнение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Текст = "Блок1";
Блок1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Толстая, ДФ.СтильГраницы.ЧертаПробел, ДФ.Цвет.Красный);
Блок1.Стиль.Заполнение = ДФ.Заполнение(50, 10, 20, 30);
Форма1.Открыть();
ЗаполнениеКолонок_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ЗаполнениеКолонок = ДФ.ЗаполнениеКолонок.Авто
, "", "!!! ") + "ЗаполнениеКолонок_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ЗаполнениеКолонок", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.Текст = "– Ах ты, шалун! – воскликнула Алиса и чмокнула котенка в мокрый носик, делая при этом сердитое лицо.
|– Разве Дина тебе не объясняла, что хорошо, а что плохо? Ай-я-яй, Дина! Ты слышишь? Плохо!
|И Алиса укоризненно покачала головой. Потом она подхватила котенка, собрала запутанный ворох ниток и, поудобнее устроившись в кресле, стала снова мотать клубок.
|Но работа не очень-то спорилась, потому что она не переставая болтала то с котенком, а то и сама с собой.
|Котенок с невинным видом сидел у нее на коленях и только иногда легонько цапал когтистой лапкой клубок, словно хотел помочь Алисе.
|– Ты, котик, и не догадываешься, наверное, что будет завтра? – спрашивала Алиса.
|– Откуда тебе! Ты же не сидел со мной вчера у окошка. Тебя умывали. А я видела, как ребята собирали ветки для костра.";
Абзац1.Стиль.КоличествоКолонок = 3;
Абзац1.Стиль.Высота = 400;
Абзац1.Стиль.ЗаполнениеКолонок = ДФ.ЗаполнениеКолонок.Авто;
Форма1.Открыть();
ЗаполнениеСверху_Заполнение_свойство.os
Перем ДФ, Заполнение1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заполнение1.ЗаполнениеСверху = 50
, "", "!!! ") + "ЗаполнениеСверху_Заполнение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "– Забавный стишок! – промолвила Алиса.
|– В нем что-то есть.
|– Честно говоря, кто этот ЧТО-ТО, Алиса объяснить не смогла бы, но ей стыдно было в этом признаться даже самой себе. ";
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заполнение1 = ДФ.Заполнение(50, 10, 60, 60);
Заполнение1.ЗаполнениеСверху = 50;
Заполнение1.ЗаполнениеСправа = 20;
Заполнение1.ЗаполнениеСнизу = 60;
Заполнение1.ЗаполнениеСлева = 100;
Блок1.Стиль.Заполнение = Заполнение1;
Форма1.Открыть();
ЗаполнениеСверху_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЗаполнениеСверху = "50px"
, "", "!!! ") + "ЗаполнениеСверху_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЗаполнениеСверху", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЗаполнениеСверху = 50;
Форма1.Открыть();
ЗаполнениеСлева_Заполнение_свойство.os
Перем ДФ, Заполнение1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заполнение1.ЗаполнениеСлева = 100
, "", "!!! ") + "ЗаполнениеСлева_Заполнение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "– Забавный стишок! – промолвила Алиса.
|– В нем что-то есть.
|– Честно говоря, кто этот ЧТО-ТО, Алиса объяснить не смогла бы, но ей стыдно было в этом признаться даже самой себе. ";
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заполнение1 = ДФ.Заполнение(50, 10, 60, 60);
Заполнение1.ЗаполнениеСверху = 50;
Заполнение1.ЗаполнениеСправа = 20;
Заполнение1.ЗаполнениеСнизу = 60;
Заполнение1.ЗаполнениеСлева = 100;
Блок1.Стиль.Заполнение = Заполнение1;
Форма1.Открыть();
ЗаполнениеСлева_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЗаполнениеСлева = "50px"
, "", "!!! ") + "ЗаполнениеСлева_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЗаполнениеСлева", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЗаполнениеСлева = 50;
Форма1.Открыть();
ЗаполнениеСнизу_Заполнение_свойство.os
Перем ДФ, Заполнение1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заполнение1.ЗаполнениеСнизу = 60
, "", "!!! ") + "ЗаполнениеСнизу_Заполнение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "– Забавный стишок! – промолвила Алиса.
|– В нем что-то есть.
|– Честно говоря, кто этот ЧТО-ТО, Алиса объяснить не смогла бы, но ей стыдно было в этом признаться даже самой себе. ";
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заполнение1 = ДФ.Заполнение(50, 10, 60, 60);
Заполнение1.ЗаполнениеСверху = 50;
Заполнение1.ЗаполнениеСправа = 20;
Заполнение1.ЗаполнениеСнизу = 60;
Заполнение1.ЗаполнениеСлева = 100;
Блок1.Стиль.Заполнение = Заполнение1;
Форма1.Открыть();
ЗаполнениеСнизу_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЗаполнениеСнизу = "30px"
, "", "!!! ") + "ЗаполнениеСнизу_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЗаполнениеСнизу", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Текст = "Блок1";
Блок1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Толстая, ДФ.СтильГраницы.ЧертаПробел, ДФ.Цвет.Красный);
Блок1.Стиль.ЗаполнениеСнизу = 30;
Форма1.Открыть();
ЗаполнениеСправа_Заполнение_свойство.os
Перем ДФ, Заполнение1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заполнение1.ЗаполнениеСправа = 20
, "", "!!! ") + "ЗаполнениеСправа_Заполнение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "– Забавный стишок! – промолвила Алиса.
|– В нем что-то есть.
|– Честно говоря, кто этот ЧТО-ТО, Алиса объяснить не смогла бы, но ей стыдно было в этом признаться даже самой себе. ";
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заполнение1 = ДФ.Заполнение(50, 10, 60, 60);
Заполнение1.ЗаполнениеСверху = 50;
Заполнение1.ЗаполнениеСправа = 20;
Заполнение1.ЗаполнениеСнизу = 60;
Заполнение1.ЗаполнениеСлева = 100;
Блок1.Стиль.Заполнение = Заполнение1;
Форма1.Открыть();
ЗаполнениеСправа_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЗаполнениеСправа = "60px"
, "", "!!! ") + "ЗаполнениеСправа_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЗаполнениеСправа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Текст = "Блок1";
Блок1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Толстая, ДФ.СтильГраницы.ЧертаПробел, ДФ.Цвет.Красный);
Блок1.Направление = ДФ.Направление.СправаНалево;
Блок1.Стиль.ЗаполнениеСправа = 60;
Форма1.Открыть();
Заполнитель_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.Заполнитель = "Заполнитель.."
, "", "!!! ") + "Заполнитель_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "Заполнитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Заполнитель = "Заполнитель..";
Форма1.Открыть();
Заполнитель_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.Заполнитель = "Заполнитель.."
, "", "!!! ") + "Заполнитель_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "Заполнитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ПолеПароля1 = Форма1.ДобавитьДочерний(ДФ.ПолеПароля());
ПолеПароля1.Заполнитель = "Заполнитель..";
Форма1.Открыть();
Заполнитель_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.Заполнитель = "Заполнитель.."
, "", "!!! ") + "Заполнитель_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "Заполнитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ПолеПоиска1 = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
ПолеПоиска1.Заполнитель = "Заполнитель..";
Форма1.Открыть();
Заполнитель_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.Заполнитель = "Заполнитель.."
, "", "!!! ") + "Заполнитель_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "Заполнитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ПолеТекста1 = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
ПолеТекста1.Заполнитель = "Заполнитель..";
Форма1.Открыть();
Заполнитель_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.Заполнитель = "Введите число"
, "", "!!! ") + "Заполнитель_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "Заполнитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ПолеЧисла1 = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Заполнитель = "Введите число";
Форма1.Открыть();
Заполнить_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "Заполнить_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.Прямоугольник(10, 10, 100, 100);
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Красный;
Контекст2d1.Заполнить();
Форма1.Открыть();
ЗаполнитьПрямоугольник_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "ЗаполнитьПрямоугольник_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.ЗаполнитьПрямоугольник(10, 10, 100, 100);
Форма1.Открыть();
ЗаполнитьТекст_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "ЗаполнитьТекст_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 300;
Холст1.Высота = 150;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Шрифт1 = ДФ.Шрифт( , , , 24, , "serif");
// Шрифт1 = ДФ.Шрифт();
// Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
// Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
// Шрифт1.РазмерШрифта = 20;
// Шрифт1.ВысотаСтроки = 50;
// Шрифт1.СемействоШрифтов = "serif";
Контекст2d1.Шрифт = Шрифт1;
Контекст2d1.НаправлениеТекста = ДФ.Направление.СлеваНаправо;
Контекст2d1.ЗаполнитьТекст("OneScript", 150, 50);
Контекст2d1.НаправлениеТекста = ДФ.Направление.СправаНалево;
Контекст2d1.ЗаполнитьТекст("OneScript", 150, 60);
Форма1.Открыть();
Запустить_Анимация_метод.os
Перем ДФ, АнимацияВращение, АнимацияМасштаб;
Процедура Кнопка1_Нажатие() Экспорт
АнимацияВращение.Запустить();
АнимацияМасштаб.Запустить();
Сообщить(?(
Истина
, "", "!!! ") + "Запустить_Анимация_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
АнимацияВращение.Пауза();
АнимацияМасштаб.Пауза();
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
АнимацияВращение.Завершить();
АнимацияМасштаб.Завершить();
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
АнимацияВращение.Отменить();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Нажми кнопку Запустить";
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Запустить";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Пауза";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка3 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Завершить";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Отменить вращение";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок2.Стиль.Ширина = 45;
Блок2.Стиль.Высота = 45;
Блок2.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок2.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок2.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок2.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок2";
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.Зеленый;
Кадр3.Сдвиг = "scale(1)";
Кадр3.Смещение = 0;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Желтый;
Кадр4.Сдвиг = "scale(1.05)";
Кадр4.Смещение = 0.1;
Кадр5 = ДФ.Стиль();
Кадр5.ЦветФона = ДФ.Цвет.Желтый;
Кадр5.Сдвиг = "scale(1.4)";
Кадр5.Смещение = 0.7;
Кадр6 = ДФ.Стиль();
Кадр6.ЦветФона = ДФ.Цвет.Красный;
Кадр6.Сдвиг = "scale(1.5)";
Кадр6.Смещение = 1;
Кадры2 = ДФ.Кадры();
Кадры2.Добавить(Кадр3);
Кадры2.Добавить(Кадр4);
Кадры2.Добавить(Кадр5);
Кадры2.Добавить(Кадр6);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Блок1.Анимация(Кадры1, ПараметрыАнимации1);
АнимацияМасштаб = Блок2.Анимация(Кадры2, ПараметрыАнимации1);
Кнопка3_Нажатие();
Форма1.Открыть();
Зет_Масштаб3Д_свойство.os
Перем ДФ, Масштаб3Д1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Масштаб3Д1.Зет = 3.1
, "", "!!! ") + "Зет_Масштаб3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Масштаб3Д1 = ДФ.Масштаб3Д();
Масштаб3Д1.Икс = 1.4;
Масштаб3Д1.Игрек = 2.6;
Масштаб3Д1.Зет = 3.1;
Масштаб3Д2 = ДФ.Масштаб3Д(2.3, 4.2, 3.1);
Форма1.Открыть();
Зет_МасштабЗет_свойство.os
Перем ДФ, МасштабЗет1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МасштабЗет1.Зет = 1.4
, "", "!!! ") + "Зет_МасштабЗет_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МасштабЗет1 = ДФ.МасштабЗет();
МасштабЗет1.Зет = 1.4;
МасштабЗет2 = ДФ.МасштабЗет(2.3);
Форма1.Открыть();
Зет_Перевод3Д_свойство.os
Перем ДФ, Перевод3Д1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Перевод3Д1.Зет = 30
, "", "!!! ") + "Зет_Перевод3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Перевод3Д1 = ДФ.Перевод3Д();
Перевод3Д1.Икс = 10;
Перевод3Д1.Игрек = 20;
Перевод3Д1.Зет = 30;
Перевод3Д2 = ДФ.Перевод3Д(30, 40, 50);
Форма1.Открыть();
Зет_ПереводЗет_свойство.os
Перем ДФ, ПереводЗет1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПереводЗет1.Зет = 30
, "", "!!! ") + "Зет_ПереводЗет_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПереводЗет1 = ДФ.ПереводЗет();
ПереводЗет1.Зет = 30;
ПереводЗет2 = ДФ.ПереводЗет(30);
Форма1.Открыть();
Зет_Поворот3Д_свойство.os
Перем ДФ, Поворот3Д1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Поворот3Д1.Зет = 30
, "", "!!! ") + "Зет_Поворот3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Поворот3Д1 = ДФ.Поворот3Д();
Поворот3Д1.Икс = 10;
Поворот3Д1.Игрек = 20;
Поворот3Д1.Зет = 30;
Поворот3Д1.Угол = 30;
Поворот3Д2 = ДФ.Поворот3Д(16, 18, 32, 30);
Форма1.Открыть();
ЗетИндекс_Стиль_свойство.os
Перем ДФ, Блок1, Блок2, Блок3;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЗетИндекс = 3
, "", "!!! ") + "ЗетИндекс_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЗетИндекс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Блок1.Стиль.ЗетИндекс = 3;
Блок2.Стиль.ЗетИндекс = 2;
Блок3.Стиль.ЗетИндекс = 1;
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Блок1.Стиль.ЗетИндекс = 2;
Блок2.Стиль.ЗетИндекс = 3;
Блок3.Стиль.ЗетИндекс = 1;
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
Блок1.Стиль.ЗетИндекс = 2;
Блок2.Стиль.ЗетИндекс = 1;
Блок3.Стиль.ЗетИндекс = 3;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Блок1 вперед";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = ДФ.Кнопка();
Кнопка2.Родитель = Форма1;
Кнопка2.Текст = "Блок2 вперед";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка3 = ДФ.Кнопка();
Кнопка3.Родитель = Форма1;
Кнопка3.Текст = "Блок3 вперед";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Стиль1 = ДФ.Стиль();
Стиль1.Ширина = 100;
Стиль1.Высота = 100;
Стиль1.РадиусГраницы = ДФ.РадиусГраницы(25, 25, 25, 25);
Стиль1.Отображать = ДФ.Отображать.Гибкий;
Стиль1.Позиция = ДФ.Позиция.Абсолютно;
Стиль1.ВыравниваниеЭлементов = ДФ.ВыравниваниеЭлементов.Центр;
Стиль1.Отображать = ДФ.Отображать.Гибкий;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Текст = "Блок1";
Блок1.Стиль.Копировать(Стиль1);
Блок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Блок1.Стиль.Верх = 100;
Блок1.Стиль.Лево = 50;
Блок1.Стиль.ЗетИндекс = 3;
Блок2 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок2.Текст = "Блок2";
Блок2.Стиль.Копировать(Стиль1);
Блок2.Стиль.ЦветФона = ДФ.Цвет.Синий;
Блок2.Стиль.Верх = 165;
Блок2.Стиль.Лево = 100;
Блок2.Стиль.РасположениеСодержимого = ДФ.РасположениеСодержимого.ВНачале;
Блок3 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок3.Текст = "Блок3";
Блок3.Стиль.Копировать(Стиль1);
Блок3.Стиль.ЦветФона = ДФ.Цвет.Зеленый;
Блок3.Стиль.Верх = 100;
Блок3.Стиль.Лево = 130;
Блок3.Стиль.РасположениеСодержимого = ДФ.РасположениеСодержимого.ВКонце;
Форма1.Открыть();
Знак_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().Знак(-55.64) = -1
, "", "!!! ") + "Знак_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().Знак(-55.64);
Форма1.Открыть();
Значение_АргументыСобытия_свойство.os
Перем ДФ, Результат1, Ползунок1, ПолеЧисла1;
Процедура Ползунок1_Ввод() Экспорт
Результат1.Значение = ДФ.АргументыСобытия.Значение + ПолеЧисла1.Значение;
Сообщить(?(
ДФ.АргументыСобытия.Значение >= 0
, "", "!!! ") + "Значение_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПолеЧисла1_Ввод() Экспорт
Результат1.Значение = ДФ.АргументыСобытия.Значение + Ползунок1.Значение;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Двиньте ползунок";
Подпись1 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Текст = "0";
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Значение = 85;
Ползунок1.Ввод = ДФ.Действие(ЭтотОбъект, "Ползунок1_Ввод");
Подпись2 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись2.Текст = "100 + ";
ПолеЧисла1 = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Значение = 20;
ПолеЧисла1.Ввод = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_Ввод");
Подпись3 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись3.Текст = " = ";
Результат1 = Форма1.ДобавитьДочерний(ДФ.Результат());
Результат1.Значение = Ползунок1.Значение + ПолеЧисла1.Значение;
Форма1.Открыть();
Значение_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.Значение = "22:53:05"
, "", "!!! ") + "Значение_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Значение = "22:53:05";
Форма1.Открыть();
Значение_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.Значение = "2014-02-09"
, "", "!!! ") + "Значение_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Значение = "2014-02-09";
Форма1.Открыть();
Значение_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.Значение = "2014-02-06T10:57Z"
, "", "!!! ") + "Значение_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Значение = "2014-02-06T10:57Z";
Форма1.Открыть();
Значение_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Значение = "2014-11-16T15:25:33"
, "", "!!! ") + "Значение_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Значение = "2014-11-16T15:25:33";
Форма1.Открыть();
Значение_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.Значение = "2014-05"
, "", "!!! ") + "Значение_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Значение = "2014-05";
Форма1.Открыть();
Значение_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.Значение = "2014-W15"
, "", "!!! ") + "Значение_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Значение = "2014-W15";
Форма1.Открыть();
Значение_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборЦвета1.Значение = ДФ.Цвет.ГлубокийРозовый
, "", "!!! ") + "Значение_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборЦвета1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.Значение = ДФ.Цвет.ГлубокийРозовый;
Форма1.Открыть();
Значение_Индикатор_свойство.os
Перем ДФ, Индикатор1;
Процедура Свойство() Экспорт
Сообщить(?(
Индикатор1.Значение = 75.68
, "", "!!! ") + "Значение_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Индикатор1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.Значение = 75.68;
Форма1.Открыть();
Значение_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.Значение = "ОбластьТекста1"
, "", "!!! ") + "Значение_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Значение = "ОбластьТекста1";
Форма1.Открыть();
Значение_Переключатель_свойство.os
Перем ДФ, Переключатель1;
Процедура Свойство() Экспорт
Сообщить(?(
Переключатель1.Значение = "Переключатель1"
, "", "!!! ") + "Значение_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Переключатель1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Значение = "Переключатель1";
Форма1.Открыть();
Значение_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.Значение = "ПолеПароля1"
, "", "!!! ") + "Значение_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Значение = "ПолеПароля1";
Форма1.Открыть();
Значение_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.Значение = "ПолеПоиска1"
, "", "!!! ") + "Значение_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Значение = "ПолеПоиска1";
Форма1.Открыть();
Значение_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.Значение = "Птица"
, "", "!!! ") + "Значение_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Ширина = 150;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = ПолеСписка1;
ГруппировкаПоляСписка1.Надпись = "Жители деревни Простоквашино";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка1.Значение = "Кот";
ЭлементПоляСписка1.Текст = "Матроскин";
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Пёс";
ЭлементПоляСписка2.Текст = "Шарик";
ЭлементПоляСписка3 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка3.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка3.Значение = "Птица";
ЭлементПоляСписка3.Текст = "Галчонок";
ПолеСписка1.Значение = "Птица";
Форма1.Открыть();
Значение_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.Значение = "ПолеТекста1"
, "", "!!! ") + "Значение_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Значение = "ПолеТекста1";
Форма1.Открыть();
Значение_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.Значение = 77.33
, "", "!!! ") + "Значение_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Значение = 77.33;
Форма1.Открыть();
Значение_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.Значение = 59
, "", "!!! ") + "Значение_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Значение = 59;
Форма1.Открыть();
Значение_Результат_свойство.os
Перем ДФ, Результат1;
Процедура Свойство() Экспорт
Сообщить(?(
Результат1.Значение = "Результат1"
, "", "!!! ") + "Значение_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Результат1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Значение = "Результат1";
Форма1.Открыть();
Значение_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Свойство() Экспорт
Сообщить(?(
// Флажок1.Значение = "Да"
Флажок1.Значение = "Флажок1"
, "", "!!! ") + "Значение_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
// Флажок1.Значение = Истина;
Флажок1.Значение = "Флажок1";
Форма1.Открыть();
Значение_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Свойство() Экспорт
Сообщить(?(
Шкала1.Значение = 33.67
, "", "!!! ") + "Значение_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Шкала1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Шкала1.Значение = 33.67;
Форма1.Открыть();
Значение_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементПоляСписка1.Значение = "ЭлементПоляСписка1"
, "", "!!! ") + "Значение_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Значение = "ЭлементПоляСписка1";
Форма1.Открыть();
Значок_Лоток_свойство.os
Перем ДФ, Лоток1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Лоток1.Значок = "icon.png"
, "", "!!! ") + "Значок_Лоток_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Лоток1_Нажатие() Экспорт
Сообщить("Лоток1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Лоток1 = ДФ.Лоток();
Лоток1.Заголовок = "Заголовок";
Лоток1.Подсказка = "Подсказка";
Лоток1.Значок = "icon.png";
Лоток1.Нажатие = ДФ.Действие(ЭтотОбъект, "Лоток1_Нажатие");
Форма1.Открыть();
Значок_Форма_свойство.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Значок_Форма_свойство.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Значок = "icon.png";
Форма1.Контент.Текст = "Если у формы есть значок, можно закрывать.";
Форма1.Открыть();
Значок_ЭлементМеню_свойство.os
Перем ДФ, Сохранить;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Сохранить.Значок = "icon.png"
, "", "!!! ") + "Значок_ЭлементМеню_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ГлавноеМеню = ДФ.Меню(ДФ.ТипМеню.Главное);
ПодменюМенюФайл = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюФайл = ДФ.ЭлементМеню("Файл", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюФайл);
Открыть = ДФ.ЭлементМеню("Открыть", ДФ.ТипЭлементаМеню.Стандартный);
ПодменюОткрыть = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
ТХТ = ДФ.ЭлементМеню("txt");
ДОК = ДФ.ЭлементМеню("doc");
ПодменюОткрыть.Добавить(ТХТ);
ПодменюОткрыть.Добавить(ДОК);
Открыть.Подменю = ПодменюОткрыть;
Сохранить = ДФ.ЭлементМеню("Сохранить");
Сохранить.Значок = "icon.png";
Разделитель1 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Настройки = ДФ.ЭлементМеню("Настройки");
Разделитель2 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Выход = ДФ.ЭлементМеню("Выход");
ПодменюМенюФайл.Добавить(Открыть);
ПодменюМенюФайл.Добавить(Сохранить);
ПодменюМенюФайл.Добавить(Разделитель1);
ПодменюМенюФайл.Добавить(Настройки);
ПодменюМенюФайл.Добавить(Разделитель2);
ПодменюМенюФайл.Добавить(Выход);
ПодменюМенюПравка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюПравка = ДФ.ЭлементМеню("Правка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюПравка);
Отмена = ДФ.ЭлементМеню("Отмена");
Повтор = ДФ.ЭлементМеню("Повтор");
ПодменюМенюПравка.Добавить(Отмена);
ПодменюМенюПравка.Добавить(Повтор);
ПодменюМенюСправка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюСправка = ДФ.ЭлементМеню("Справка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюСправка);
ОПрограмме = ДФ.ЭлементМеню("О программе");
ПодменюМенюСправка.Добавить(ОПрограмме);
ГлавноеМеню.Добавить(МенюФайл);
ГлавноеМеню.Добавить(МенюПравка);
ГлавноеМеню.Добавить(МенюСправка);
Форма1.Меню = ГлавноеМеню;
Форма1.Открыть();
Игрек_АргументыСобытия_свойство.os
Перем ДФ, ГлавноеМеню;
Процедура Абзац1_ПриОтпусканииМыши() Экспорт
// Если ДФ.АргументыСобытия.Кнопка = ДФ.КнопкиМыши.Правая Тогда
// ГлавноеМеню.Показать(ДФ.АргументыСобытия.Икс, ДФ.АргументыСобытия.Игрек);
// КонецЕсли;
// Сообщить("ДФ.АргументыСобытия.Кнопка = " + ДФ.АргументыСобытия.Кнопка);
Сообщить(?(
ДФ.АргументыСобытия.Игрек > 0
, "", "!!! ") + "Игрек_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкни кнопкой мыши по абзацу";
ГлавноеМеню = ДФ.Меню(ДФ.ТипМеню.Контекстное);
ПодменюМенюФайл = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюФайл = ДФ.ЭлементМеню("Файл", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюФайл);
Открыть = ДФ.ЭлементМеню("Открыть", ДФ.ТипЭлементаМеню.Стандартный);
Сохранить = ДФ.ЭлементМеню("Сохранить");
Разделитель1 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Настройки = ДФ.ЭлементМеню("Настройки");
Разделитель2 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Выход = ДФ.ЭлементМеню("Выход");
ПодменюМенюФайл.Добавить(Открыть);
ПодменюМенюФайл.Добавить(Сохранить);
ПодменюМенюФайл.Добавить(Разделитель1);
ПодменюМенюФайл.Добавить(Настройки);
ПодменюМенюФайл.Добавить(Разделитель2);
ПодменюМенюФайл.Добавить(Выход);
ПодменюМенюПравка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюПравка = ДФ.ЭлементМеню("Правка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюПравка);
Отмена = ДФ.ЭлементМеню("Отмена");
Повтор = ДФ.ЭлементМеню("Повтор");
ПодменюМенюПравка.Добавить(Отмена);
ПодменюМенюПравка.Добавить(Повтор);
ПодменюМенюСправка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюСправка = ДФ.ЭлементМеню("Справка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюСправка);
ОПрограмме = ДФ.ЭлементМеню("О программе");
ПодменюМенюСправка.Добавить(ОПрограмме);
ГлавноеМеню.Добавить(МенюФайл);
ГлавноеМеню.Добавить(МенюПравка);
ГлавноеМеню.Добавить(МенюСправка);
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Абзац";
Абзац1.Стиль.Высота = 400;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "Абзац1_ПриОтпусканииМыши");
Форма1.Открыть();
Игрек_ИсточникПерспективы_свойство.os
Перем ДФ, ИсточникПерспективы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ИсточникПерспективы1.Игрек = 50
, "", "!!! ") + "Игрек_ИсточникПерспективы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ИсточникПерспективы1 = ДФ.ИсточникПерспективы();
ИсточникПерспективы1.Икс = 20;
ИсточникПерспективы1.Игрек = 50;
Форма1.Открыть();
Игрек_Круг_свойство.os
Перем ДФ, Круг1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Круг1.Игрек = 60
, "", "!!! ") + "Игрек_Круг_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Круг1 = ДФ.Круг();
Круг1.Икс = 50;
Круг1.Игрек = 60;
Круг1.Радиус = 20;
Круг2 = ДФ.Круг(20, 20, 8);
Форма1.Открыть();
Игрек_Масштаб3Д_свойство.os
Перем ДФ, Масштаб3Д1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Масштаб3Д1.Игрек = 2.6
, "", "!!! ") + "Игрек_Масштаб3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Масштаб3Д1 = ДФ.Масштаб3Д();
Масштаб3Д1.Икс = 1.4;
Масштаб3Д1.Игрек = 2.6;
Масштаб3Д1.Зет = 3.1;
Масштаб3Д2 = ДФ.Масштаб3Д(2.3, 4.2, 3.1);
Форма1.Открыть();
Игрек_Масштаб_свойство.os
Перем ДФ, Масштаб1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Масштаб1.Игрек = 2.6
, "", "!!! ") + "Игрек_Масштаб_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Масштаб1 = ДФ.Масштаб();
Масштаб1.Икс = 1.4;
Масштаб1.Игрек = 2.6;
Масштаб2 = ДФ.Масштаб(2.3, 4.2);
Форма1.Открыть();
Игрек_МасштабИгрек_свойство.os
Перем ДФ, МасштабИгрек1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МасштабИгрек1.Игрек = 1.4
, "", "!!! ") + "Игрек_МасштабИгрек_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МасштабИгрек1 = ДФ.МасштабИгрек();
МасштабИгрек1.Игрек = 1.4;
МасштабИгрек2 = ДФ.МасштабИгрек(2.3);
Форма1.Открыть();
Игрек_Перевод3Д_свойство.os
Перем ДФ, Перевод3Д1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Перевод3Д1.Игрек = 20
, "", "!!! ") + "Игрек_Перевод3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Перевод3Д1 = ДФ.Перевод3Д();
Перевод3Д1.Икс = 10;
Перевод3Д1.Игрек = 20;
Перевод3Д1.Зет = 30;
Перевод3Д2 = ДФ.Перевод3Д(30, 40, 50);
Форма1.Открыть();
Игрек_Перевод_свойство.os
Перем ДФ, Перевод1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Перевод1.Игрек = 20
, "", "!!! ") + "Игрек_Перевод_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Перевод1 = ДФ.Перевод();
Перевод1.Икс = 10;
Перевод1.Игрек = 20;
Перевод2 = ДФ.Перевод(30, 40);
Форма1.Открыть();
Игрек_ПереводИгрек_свойство.os
Перем ДФ, ПереводИгрек1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПереводИгрек1.Игрек = 30
, "", "!!! ") + "Игрек_ПереводИгрек_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПереводИгрек1 = ДФ.ПереводИгрек();
ПереводИгрек1.Игрек = 30;
ПереводИгрек2 = ДФ.ПереводИгрек(40);
Форма1.Открыть();
Игрек_Поворот3Д_свойство.os
Перем ДФ, Поворот3Д1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Поворот3Д1.Игрек = 20
, "", "!!! ") + "Игрек_Поворот3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Поворот3Д1 = ДФ.Поворот3Д();
Поворот3Д1.Икс = 10;
Поворот3Д1.Игрек = 20;
Поворот3Д1.Зет = 30;
Поворот3Д1.Угол = 30;
Поворот3Д2 = ДФ.Поворот3Д(16, 18, 32, 30);
Форма1.Открыть();
Игрек_Прямоугольник_свойство.os
Перем ДФ, Прямоугольник1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Прямоугольник1.Игрек = 10
, "", "!!! ") + "Игрек_Прямоугольник_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Прямоугольник1 = ДФ.Прямоугольник();
Прямоугольник1.Икс = 10;
Прямоугольник1.Игрек = 10;
Прямоугольник1.Ширина = 100;
Прямоугольник1.Высота = 150;
Прямоугольник2 = ДФ.Прямоугольник(10, 10, 100, 150);
Форма1.Открыть();
Игрек_Тень_свойство.os
Перем ДФ, Тень1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Тень1.Игрек = 20
, "", "!!! ") + "Игрек_Тень_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Блок1";
Блок1.Стиль.Высота = 100;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Отступ = ДФ.Отступ(50, 50, 50, 50);
Тень1 = ДФ.Тень();
Тень1.Икс = 30;
Тень1.Игрек = 20;
Тень1.Размытие = 8;
Тень1.Величина = 10;
Тень1.Цвет = ДФ.Цвет.Серебристый;
Блок1.Стиль.Тень = Тень1;
Форма1.Открыть();
Игрек_Точка_свойство.os
Перем ДФ, Точка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Точка1.Игрек = 30
, "", "!!! ") + "Игрек_Точка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Точка1 = ДФ.Точка();
Точка1.Икс = 20;
Точка1.Игрек = 30;
Форма1.Открыть();
ИгрекСмещение_АргументыСобытия_свойство.os
Перем ДФ, Абзац1;
Процедура Абзац1_ПриПеремещенииМыши() Экспорт
Абзац1.Текст = "
|ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "
|ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "
|ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "
|ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "
|СдвигИкс = " + ДФ.АргументыСобытия.СдвигИкс + "
|СдвигИгрек = " + ДФ.АргументыСобытия.СдвигИгрек + "
|ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "
|ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "
|";
Сообщить(?(
ДФ.АргументыСобытия.ИгрекСмещение > 0
, "", "!!! ") + "ИгрекСмещение_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "";
Абзац1.Стиль.Высота = 200;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "Абзац1_ПриПеремещенииМыши");
Форма1.Открыть();
ИгрекФормы_АргументыСобытия_свойство.os
Перем ДФ, Абзац1;
Процедура Абзац1_ПриПеремещенииМыши() Экспорт
Абзац1.Текст = "
|ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "
|ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "
|ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "
|ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "
|СдвигИкс = " + ДФ.АргументыСобытия.СдвигИкс + "
|СдвигИгрек = " + ДФ.АргументыСобытия.СдвигИгрек + "
|ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "
|ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "
|";
Сообщить(?(
ДФ.АргументыСобытия.ИгрекФормы > 0
, "", "!!! ") + "ИгрекФормы_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "";
Абзац1.Стиль.Высота = 200;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "Абзац1_ПриПеремещенииМыши");
Форма1.Открыть();
ИгрекЭкрана_АргументыСобытия_свойство.os
Перем ДФ, Абзац1;
Процедура Абзац1_ПриПеремещенииМыши() Экспорт
Абзац1.Текст = "
|ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "
|ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "
|ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "
|ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "
|СдвигИкс = " + ДФ.АргументыСобытия.СдвигИкс + "
|СдвигИгрек = " + ДФ.АргументыСобытия.СдвигИгрек + "
|ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "
|ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "
|";
Сообщить(?(
ДФ.АргументыСобытия.ИгрекЭкрана > 0
, "", "!!! ") + "ИгрекЭкрана_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "";
Абзац1.Стиль.Высота = 200;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "Абзац1_ПриПеремещенииМыши");
Форма1.Открыть();
Идентификатор_Абзац_свойство.os
Перем ДФ, Абзац1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Абзац1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Просто текст";
Абзац1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Артикль_свойство.os
Перем ДФ, Артикль1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Артикль1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Артикль1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Текст = "Просто текст";
Артикль1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Аудио1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Блок_свойство.os
Перем ДФ, Блок1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Блок1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Просто текст";
Блок1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ВыборВремени1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ВыборДаты1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ВыборДатыВремени1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ВыборМесяца1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ВыборНедели1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ВыборФайла1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ВыборЦвета1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборЦвета1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Группа_свойство.os
Перем ДФ, Группа1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Группа1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Группа1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Текст = "Просто текст";
Группа1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ГруппаКолонок_свойство.os
Перем ДФ, ГруппаКолонок1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ГруппаКолонок1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ГруппаКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппаКолонок1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Форма1;
ГруппаКолонок1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ГруппировкаПоляСписка_свойство.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ГруппировкаПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппировкаПоляСписка1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Диалог_свойство.os
Перем ДФ, Диалог1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Диалог1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Текст = "Просто текст";
Диалог1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ДополнительныйБлок1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "Просто текст";
ДополнительныйБлок1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ЖирныйТекст1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЖирныйТекст1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Текст = "Просто текст";
ЖирныйТекст1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Заголовок1_свойство.os
Перем ДФ, Заголовок11;
Процедура Идентификатор() Экспорт
Сообщить(?(
Заголовок11.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок11, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Текст = "Просто текст";
Заголовок11.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Заголовок2_свойство.os
Перем ДФ, Заголовок21;
Процедура Идентификатор() Экспорт
Сообщить(?(
Заголовок21.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок21, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Текст = "Просто текст";
Заголовок21.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Заголовок3_свойство.os
Перем ДФ, Заголовок31;
Процедура Идентификатор() Экспорт
Сообщить(?(
Заголовок31.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок31, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Текст = "Просто текст";
Заголовок31.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Заголовок4_свойство.os
Перем ДФ, Заголовок41;
Процедура Идентификатор() Экспорт
Сообщить(?(
Заголовок41.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок41, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Текст = "Просто текст";
Заголовок41.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Заголовок5_свойство.os
Перем ДФ, Заголовок51;
Процедура Идентификатор() Экспорт
Сообщить(?(
Заголовок51.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок51, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Текст = "Просто текст";
Заголовок51.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Заголовок6_свойство.os
Перем ДФ, Заголовок61;
Процедура Идентификатор() Экспорт
Сообщить(?(
Заголовок61.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок61, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Текст = "Просто текст";
Заголовок61.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Заголовок_свойство.os
Перем ДФ, Заголовок1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Заголовок1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Текст = "Просто текст";
Заголовок1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ЗаголовокГруппы_свойство.os
Перем ДФ, ЗаголовокГруппы1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ЗаголовокГруппы1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Текст = "Просто текст";
ЗаголовокГруппы1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ЗаголовокРаскрываемогоБлока_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Текст = "Просто текст";
ЗаголовокРаскрываемогоБлока1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Изображение1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Индикатор_свойство.os
Перем ДФ, Индикатор1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Индикатор1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Индикатор1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Итоги_свойство.os
Перем ДФ, Итоги1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Итоги1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Итоги_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Итоги1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Текст = "Просто текст";
Итоги1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Карта_свойство.os
Перем ДФ, Карта1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Карта1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Карта_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Карта1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Карта1 = ДФ.Карта();
Карта1.Родитель = Форма1;
Карта1.Текст = "Просто текст";
Карта1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Кнопка_свойство.os
Перем ДФ, Кнопка1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Кнопка1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Просто текст";
Кнопка1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Код_свойство.os
Перем ДФ, Код1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Код1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Код_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Код1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Колонка_свойство.os
Перем ДФ, Колонка1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Колонка1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Колонка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонка1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = Форма1;
Колонка1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Колонтитул_свойство.os
Перем ДФ, Колонтитул1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Колонтитул1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонтитул1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Текст = "Просто текст";
Колонтитул1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Контент_свойство.os
Перем ДФ, Контент1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Контент1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Контент_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Контент1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент1 = Форма1.Контент;
Контент1.Текст = "Просто текст";
Контент1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст1;
Процедура Идентификатор() Экспорт
Сообщить(?(
КурсивТекст1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(КурсивТекст1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Текст = "Просто текст";
КурсивТекст1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Линия_свойство.os
Перем ДФ, Линия1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Линия1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Линия1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Линия1 = ДФ.Линия();
Линия1.Родитель = Форма1;
Линия1.Текст = "Просто текст";
Линия1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст1;
Процедура Идентификатор() Экспорт
Сообщить(?(
МаркированныйТекст1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МаркированныйТекст1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Текст = "Просто текст";
МаркированныйТекст1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_МедиаГруппа_свойство.os
Перем ДФ, МедиаГруппа1;
Процедура Идентификатор() Экспорт
Сообщить(?(
МедиаГруппа1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Текст = "Просто текст";
МедиаГруппа1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст1;
Процедура Идентификатор() Экспорт
Сообщить(?(
МелкийТекст1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МелкийТекст1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Текст = "Просто текст";
МелкийТекст1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст1;
Процедура Идентификатор() Экспорт
Сообщить(?(
НадстрочныйТекст1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НадстрочныйТекст1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Текст = "Просто текст";
НадстрочныйТекст1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст1;
Процедура Идентификатор() Экспорт
Сообщить(?(
НаправленныйТекст1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НаправленныйТекст1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Текст = "Просто текст";
НаправленныйТекст1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_НеупорядоченныйСписок_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Идентификатор() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Текст = "Просто текст";
НеупорядоченныйСписок1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_НижнийКолонтитул_свойство.os
Перем ДФ, НижнийКолонтитул1;
Процедура Идентификатор() Экспорт
Сообщить(?(
НижнийКолонтитул1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Текст = "Просто текст";
НижнийКолонтитул1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Область_свойство.os
Перем ДФ, Область1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Область1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Область1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Область1 = ДФ.Область();
Область1.Родитель = Форма1;
Область1.Текст = "Просто текст";
Область1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ОбластьТаблицы_свойство.os
Перем ДФ, ОбластьТаблицы1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ОбластьТаблицы1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ОбластьТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТаблицы1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Текст = "Просто текст";
ОбластьТаблицы1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ОбластьТекста1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ОписаниеМедиа_свойство.os
Перем ДФ, ОписаниеМедиа1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ОписаниеМедиа1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Текст = "Просто текст";
ОписаниеМедиа1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Определение_свойство.os
Перем ДФ, Определение1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Определение1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Определение1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Текст = "Просто текст";
Определение1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Переключатель_свойство.os
Перем ДФ, Переключатель1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Переключатель1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Переключатель1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Перенос_свойство.os
Перем ДФ, Перенос1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Перенос1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Перенос_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Перенос1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Перенос1 = ДФ.Перенос();
Перенос1.Родитель = Форма1;
Перенос1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Подпись_свойство.os
Перем ДФ, Подпись1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Подпись1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Подпись1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Просто текст";
Подпись1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ПодстрочныйТекст1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодстрочныйТекст1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Текст = "Просто текст";
ПодстрочныйТекст1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ПодчеркнутыйТекст1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодчеркнутыйТекст1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Текст = "Просто текст";
ПодчеркнутыйТекст1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ПолеПароля1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ПолеПоиска1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ПолеСписка1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ПолеТекста1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ПолеЧисла1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Ползунок1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Идентификатор() Экспорт
Сообщить(?(
РаскрываемыйБлок1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(РаскрываемыйБлок1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Результат_свойство.os
Перем ДФ, Результат1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Результат1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Результат1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Текст = "Просто текст";
Результат1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Скрипт_свойство.os
Перем ДФ, Скрипт1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Скрипт1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Скрипт_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Скрипт1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Скрипт1 = ДФ.Скрипт();
Скрипт1.Родитель = Форма1;
Скрипт1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_СписокОпределений_свойство.os
Перем ДФ, СписокОпределений1;
Процедура Идентификатор() Экспорт
Сообщить(?(
СписокОпределений1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Текст = "Просто текст";
СписокОпределений1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Ссылка1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Текст = "Просто текст";
Ссылка1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаТаблицы1;
Процедура Идентификатор() Экспорт
Сообщить(?(
СтрокаТаблицы1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СтрокаТаблицы1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Текст = "Просто текст";
СтрокаТаблицы1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Таблица1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Текст = "Просто текст";
Таблица1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Термин_свойство.os
Перем ДФ, Термин1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Термин1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Термин1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Текст = "Просто текст";
Термин1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст1;
Процедура Идентификатор() Экспорт
Сообщить(?(
УдаленыйТекст1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УдаленыйТекст1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Текст = "Просто текст";
УдаленыйТекст1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Идентификатор() Экспорт
Сообщить(?(
УпорядоченныйСписок1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Текст = "Просто текст";
УпорядоченныйСписок1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Флажок1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ФорматированныйТекст1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Текст = "Просто текст";
ФорматированныйТекст1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Фрейм_свойство.os
Перем ДФ, Фрейм1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Фрейм1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Фрейм_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Фрейм1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Фрейм1 = ДФ.Фрейм();
Фрейм1.Родитель = Форма1;
Фрейм1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Холст_свойство.os
Перем ДФ, Холст1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Холст1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Холст1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
Холст1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ШапкаТаблицы_свойство.os
Перем ДФ, ШапкаТаблицы1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ШапкаТаблицы1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ШапкаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ШапкаТаблицы1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Текст = "Просто текст";
ШапкаТаблицы1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Шкала1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Шкала1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Шкала1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ЭлементПоляСписка1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Текст = "Просто текст";
ЭлементПоляСписка1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ЭлементСписка_свойство.os
Перем ДФ, ЭлементСписка1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ЭлементСписка1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Текст = "Просто текст";
ЭлементСписка1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Идентификатор() Экспорт
Сообщить(?(
Ячейка1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ячейка1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Текст = "Просто текст";
Ячейка1.Идентификатор = "идент";
Форма1.Открыть();
Идентификатор_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура Идентификатор() Экспорт
Сообщить(?(
ЯчейкаЗаголовка1.Идентификатор = "идент"
, "", "!!! ") + "Идентификатор_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка1, "Идентификатор", ДФ.Действие(ЭтотОбъект, "Идентификатор"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Текст = "Просто текст";
ЯчейкаЗаголовка1.Идентификатор = "идент";
Форма1.Открыть();
ИзменяемыйРазмер_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ИзменяемыйРазмер = ДФ.ИзменяемыйРазмер.ШиринаВысота
, "", "!!! ") + "ИзменяемыйРазмер_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ИзменяемыйРазмер", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 500;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Ширина = 270;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Абзац1 = Блок1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "– Забавный стишок! – промолвила Алиса.
|– В нем что-то есть.
|– Честно говоря, кто этот ЧТО-ТО, Алиса объяснить не смогла бы, но ей стыдно было в этом признаться даже самой себе.";
Блок1.Стиль.ИзменяемыйРазмер = ДФ.ИзменяемыйРазмер.ШиринаВысота;
Форма1.Открыть();
ИзменяемыйРазмер_Форма_свойство.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ИзменяемыйРазмер_Форма_свойство.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Контент.Текст = "Если размер формы нельзя изменить, можно закрывать.";
Форма1.ИзменяемыйРазмер = Ложь;
Форма1.Открыть();
Икс_АргументыСобытия_свойство.os
Перем ДФ, ГлавноеМеню;
Процедура Абзац1_ПриОтпусканииМыши() Экспорт
// Если ДФ.АргументыСобытия.Кнопка = ДФ.КнопкиМыши.Правая Тогда
// ГлавноеМеню.Показать(ДФ.АргументыСобытия.Икс, ДФ.АргументыСобытия.Игрек);
// КонецЕсли;
// Сообщить("ДФ.АргументыСобытия.Кнопка = " + ДФ.АргументыСобытия.Кнопка);
Сообщить(?(
ДФ.АргументыСобытия.Икс > 0
, "", "!!! ") + "Икс_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкни кнопкой мыши по абзацу";
ГлавноеМеню = ДФ.Меню(ДФ.ТипМеню.Контекстное);
ПодменюМенюФайл = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюФайл = ДФ.ЭлементМеню("Файл", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюФайл);
Открыть = ДФ.ЭлементМеню("Открыть", ДФ.ТипЭлементаМеню.Стандартный);
Сохранить = ДФ.ЭлементМеню("Сохранить");
Разделитель1 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Настройки = ДФ.ЭлементМеню("Настройки");
Разделитель2 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Выход = ДФ.ЭлементМеню("Выход");
ПодменюМенюФайл.Добавить(Открыть);
ПодменюМенюФайл.Добавить(Сохранить);
ПодменюМенюФайл.Добавить(Разделитель1);
ПодменюМенюФайл.Добавить(Настройки);
ПодменюМенюФайл.Добавить(Разделитель2);
ПодменюМенюФайл.Добавить(Выход);
ПодменюМенюПравка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюПравка = ДФ.ЭлементМеню("Правка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюПравка);
Отмена = ДФ.ЭлементМеню("Отмена");
Повтор = ДФ.ЭлементМеню("Повтор");
ПодменюМенюПравка.Добавить(Отмена);
ПодменюМенюПравка.Добавить(Повтор);
ПодменюМенюСправка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюСправка = ДФ.ЭлементМеню("Справка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюСправка);
ОПрограмме = ДФ.ЭлементМеню("О программе");
ПодменюМенюСправка.Добавить(ОПрограмме);
ГлавноеМеню.Добавить(МенюФайл);
ГлавноеМеню.Добавить(МенюПравка);
ГлавноеМеню.Добавить(МенюСправка);
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Абзац";
Абзац1.Стиль.Высота = 400;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "Абзац1_ПриОтпусканииМыши");
Форма1.Открыть();
Икс_ИсточникПерспективы_свойство.os
Перем ДФ, ИсточникПерспективы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ИсточникПерспективы1.Икс = 20
, "", "!!! ") + "Икс_ИсточникПерспективы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ИсточникПерспективы1 = ДФ.ИсточникПерспективы();
ИсточникПерспективы1.Икс = 20;
ИсточникПерспективы1.Игрек = 50;
Форма1.Открыть();
Икс_Круг_свойство.os
Перем ДФ, Круг1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Круг1.Икс = 50
, "", "!!! ") + "Икс_Круг_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Круг1 = ДФ.Круг();
Круг1.Икс = 50;
Круг1.Игрек = 60;
Круг1.Радиус = 20;
Круг2 = ДФ.Круг(20, 20, 8);
Форма1.Открыть();
Икс_Масштаб3Д_свойство.os
Перем ДФ, Масштаб3Д1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Масштаб3Д1.Икс = 1.4
, "", "!!! ") + "Икс_Масштаб3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Масштаб3Д1 = ДФ.Масштаб3Д();
Масштаб3Д1.Икс = 1.4;
Масштаб3Д1.Игрек = 2.6;
Масштаб3Д1.Зет = 3.1;
Масштаб3Д2 = ДФ.Масштаб3Д(2.3, 4.2, 3.1);
Форма1.Открыть();
Икс_Масштаб_свойство.os
Перем ДФ, Масштаб1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Масштаб1.Икс = 1.4
, "", "!!! ") + "Икс_Масштаб_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Масштаб1 = ДФ.Масштаб();
Масштаб1.Икс = 1.4;
Масштаб1.Игрек = 2.6;
Масштаб2 = ДФ.Масштаб(2.3, 4.2);
Форма1.Открыть();
Икс_МасштабИкс_свойство.os
Перем ДФ, МасштабИкс1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МасштабИкс1.Икс = 1.4
, "", "!!! ") + "Икс_МасштабИкс_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МасштабИкс1 = ДФ.МасштабИкс();
МасштабИкс1.Икс = 1.4;
МасштабИкс2 = ДФ.МасштабИкс(2.3);
Форма1.Открыть();
Икс_Перевод3Д_свойство.os
Перем ДФ, Перевод3Д1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Перевод3Д1.Икс = 10
, "", "!!! ") + "Икс_Перевод3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Перевод3Д1 = ДФ.Перевод3Д();
Перевод3Д1.Икс = 10;
Перевод3Д1.Игрек = 20;
Перевод3Д1.Зет = 30;
Перевод3Д2 = ДФ.Перевод3Д(30, 40, 50);
Форма1.Открыть();
Икс_Перевод_свойство.os
Перем ДФ, Перевод1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Перевод1.Икс = 10
, "", "!!! ") + "Икс_Перевод_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Перевод1 = ДФ.Перевод();
Перевод1.Икс = 10;
Перевод1.Игрек = 20;
Перевод2 = ДФ.Перевод(30, 40);
Форма1.Открыть();
Икс_ПереводИкс_свойство.os
Перем ДФ, ПереводИкс1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПереводИкс1.Икс = 30
, "", "!!! ") + "Икс_ПереводИкс_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПереводИкс1 = ДФ.ПереводИкс();
ПереводИкс1.Икс = 30;
ПереводИкс2 = ДФ.ПереводИкс(40);
Форма1.Открыть();
Икс_Поворот3Д_свойство.os
Перем ДФ, Поворот3Д1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Поворот3Д1.Икс = 10
, "", "!!! ") + "Икс_Поворот3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Поворот3Д1 = ДФ.Поворот3Д();
Поворот3Д1.Икс = 10;
Поворот3Д1.Игрек = 20;
Поворот3Д1.Зет = 30;
Поворот3Д1.Угол = 30;
Поворот3Д2 = ДФ.Поворот3Д(16, 18, 32, 30);
Форма1.Открыть();
Икс_Прямоугольник_свойство.os
Перем ДФ, Прямоугольник1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Прямоугольник1.Икс = 10
, "", "!!! ") + "Икс_Прямоугольник_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Прямоугольник1 = ДФ.Прямоугольник();
Прямоугольник1.Икс = 10;
Прямоугольник1.Игрек = 10;
Прямоугольник1.Ширина = 100;
Прямоугольник1.Высота = 150;
Прямоугольник2 = ДФ.Прямоугольник(10, 10, 100, 150);
Форма1.Открыть();
Икс_Тень_свойство.os
Перем ДФ, Тень1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Тень1.Икс = 30
, "", "!!! ") + "Икс_Тень_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Блок1";
Блок1.Стиль.Высота = 100;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Отступ = ДФ.Отступ(50, 50, 50, 50);
Тень1 = ДФ.Тень();
Тень1.Икс = 30;
Тень1.Игрек = 20;
Тень1.Размытие = 8;
Тень1.Величина = 10;
Тень1.Цвет = ДФ.Цвет.Серебристый;
Блок1.Стиль.Тень = Тень1;
Форма1.Открыть();
Икс_Точка_свойство.os
Перем ДФ, Точка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Точка1.Икс = 20
, "", "!!! ") + "Икс_Точка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Точка1 = ДФ.Точка();
Точка1.Икс = 20;
Точка1.Игрек = 30;
Форма1.Открыть();
ИксСмещение_АргументыСобытия_свойство.os
Перем ДФ, Абзац1;
Процедура Абзац1_ПриПеремещенииМыши() Экспорт
Абзац1.Текст = "
|ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "
|ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "
|ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "
|ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "
|СдвигИкс = " + ДФ.АргументыСобытия.СдвигИкс + "
|СдвигИгрек = " + ДФ.АргументыСобытия.СдвигИгрек + "
|ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "
|ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "
|";
Сообщить(?(
ДФ.АргументыСобытия.ИксСмещение > 0
, "", "!!! ") + "ИксСмещение_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "";
Абзац1.Стиль.Высота = 200;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "Абзац1_ПриПеремещенииМыши");
Форма1.Открыть();
ИксФормы_АргументыСобытия_свойство.os
Перем ДФ, Абзац1;
Процедура Абзац1_ПриПеремещенииМыши() Экспорт
Абзац1.Текст = "
|ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "
|ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "
|ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "
|ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "
|СдвигИкс = " + ДФ.АргументыСобытия.СдвигИкс + "
|СдвигИгрек = " + ДФ.АргументыСобытия.СдвигИгрек + "
|ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "
|ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "
|";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ИксФормы_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "";
Абзац1.Стиль.Высота = 200;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "Абзац1_ПриПеремещенииМыши");
Форма1.Открыть();
ИксЭкрана_АргументыСобытия_свойство.os
Перем ДФ, Абзац1;
Процедура Абзац1_ПриПеремещенииМыши() Экспорт
Абзац1.Текст = "
|ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "
|ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "
|ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "
|ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "
|СдвигИкс = " + ДФ.АргументыСобытия.СдвигИкс + "
|СдвигИгрек = " + ДФ.АргументыСобытия.СдвигИгрек + "
|ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "
|ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "
|";
Сообщить(?(
ДФ.АргументыСобытия.ИксЭкрана > 0
, "", "!!! ") + "ИксЭкрана_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "";
Абзац1.Стиль.Высота = 200;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "Абзац1_ПриПеремещенииМыши");
Форма1.Открыть();
Имя_Абзац_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.Текст = "Абзац1";
Абзац1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Артикль_свойство.os
Перем ДФ, Артикль1;
Процедура Свойство() Экспорт
Сообщить(?(
Артикль1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Артикль1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Артикль1.Текст = "Артикль1";
Артикль1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Аудио1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Аудио1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Блок_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Блок1.Текст = "Блок1";
Блок1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборВремени1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборДаты1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборДатыВремени1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборМестнойДатыВремени1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборМесяца1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборНедели1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборФайла1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборФайла1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборЦвета1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборЦвета1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборЦвета1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Группа_свойство.os
Перем ДФ, Группа1;
Процедура Свойство() Экспорт
Сообщить(?(
Группа1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Группа1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Группа1.Текст = "Группа1";
Группа1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ГруппаКолонок_свойство.os
Перем ДФ, ГруппаКолонок1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппаКолонок1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ГруппаКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппаКолонок1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Форма1;
ГруппаКолонок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ГруппаКолонок1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ГруппировкаПоляСписка_свойство.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ГруппировкаПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппировкаПоляСписка1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ГруппировкаПоляСписка1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Диалог_свойство.os
Перем ДФ, Диалог1;
Процедура Свойство() Экспорт
Сообщить(?(
Диалог1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Диалог1.Текст = "Диалог1";
Диалог1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
ДополнительныйБлок1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ДополнительныйБлок1.Текст = "ДополнительныйБлок1";
ДополнительныйБлок1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ЖирныйТекст1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЖирныйТекст1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЖирныйТекст1.Текст = "ЖирныйТекст1";
ЖирныйТекст1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Заголовок1_свойство.os
Перем ДФ, Заголовок11;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок11.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок11, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок11.Текст = "Заголовок11";
Заголовок11.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Заголовок2_свойство.os
Перем ДФ, Заголовок21;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок21.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок21, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок21.Текст = "Заголовок21";
Заголовок21.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Заголовок3_свойство.os
Перем ДФ, Заголовок31;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок31.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок31, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок31.Текст = "Заголовок31";
Заголовок31.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Заголовок4_свойство.os
Перем ДФ, Заголовок41;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок41.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок41, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок41.Текст = "Заголовок41";
Заголовок41.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Заголовок5_свойство.os
Перем ДФ, Заголовок51;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок51.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок51, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок51.Текст = "Заголовок51";
Заголовок51.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Заголовок6_свойство.os
Перем ДФ, Заголовок61;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок61.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок61, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок61.Текст = "Заголовок61";
Заголовок61.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Заголовок_свойство.os
Перем ДФ, Заголовок1;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок1.Текст = "Заголовок1";
Заголовок1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ЗаголовокГруппы_свойство.os
Перем ДФ, ЗаголовокГруппы1;
Процедура Свойство() Экспорт
Сообщить(?(
ЗаголовокГруппы1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЗаголовокГруппы1.Текст = "ЗаголовокГруппы1";
ЗаголовокГруппы1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура Свойство() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ЗаголовокРаскрываемогоБлока_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЗаголовокРаскрываемогоБлока1.Текст = "ЗаголовокРаскрываемогоБлока1";
ЗаголовокРаскрываемогоБлока1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Изображение1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Индикатор_свойство.os
Перем ДФ, Индикатор1;
Процедура Свойство() Экспорт
Сообщить(?(
Индикатор1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Индикатор1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Индикатор1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Итоги_свойство.os
Перем ДФ, Итоги1;
Процедура Свойство() Экспорт
Сообщить(?(
Итоги1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Итоги_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Итоги1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Итоги1.Текст = "Итоги1";
Итоги1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Кадры_свойство.os
Перем ДФ, Кадры1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Кадры1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Кадры_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Карта_свойство.os
Перем ДФ, Карта1;
Процедура Свойство() Экспорт
Сообщить(?(
Карта1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Карта_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Карта1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Карта1 = ДФ.Карта();
Карта1.Родитель = Форма1;
Карта1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Карта1.Текст = "Карта1";
Карта1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Кнопка_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Сообщить(?(
Кнопка1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Кнопка1.Текст = "Кнопка1";
Кнопка1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Код_свойство.os
Перем ДФ, Код1;
Процедура Свойство() Экспорт
Сообщить(?(
Код1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Код_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Код1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Код1.Текст = "Код1";
Код1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Колонка_свойство.os
Перем ДФ, Колонка1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонка1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Колонка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонка1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = Форма1;
Колонка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Колонка1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Колонтитул_свойство.os
Перем ДФ, Колонтитул1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонтитул1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонтитул1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Колонтитул1.Текст = "Колонтитул1";
Колонтитул1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Контент_свойство.os
Перем ДФ, Контент1;
Процедура Свойство() Экспорт
Сообщить(?(
Контент1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Контент_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Контент1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент1 = Форма1.Контент;
Контент1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Контент1.Текст = "КурсивТекст1";
Контент1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
КурсивТекст1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(КурсивТекст1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
КурсивТекст1.Текст = "КурсивТекст1";
КурсивТекст1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Линия_свойство.os
Перем ДФ, Линия1;
Процедура Свойство() Экспорт
Сообщить(?(
Линия1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Линия1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Линия1 = ДФ.Линия();
Линия1.Родитель = Форма1;
Линия1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Линия1.Текст = "Линия1";
Линия1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
МаркированныйТекст1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МаркированныйТекст1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МаркированныйТекст1.Текст = "МаркированныйТекст1";
МаркированныйТекст1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_МедиаГруппа_свойство.os
Перем ДФ, МедиаГруппа1;
Процедура Свойство() Экспорт
Сообщить(?(
МедиаГруппа1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МедиаГруппа1.Текст = "МедиаГруппа1";
МедиаГруппа1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
МелкийТекст1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МелкийТекст1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МелкийТекст1.Текст = "МелкийТекст1";
МелкийТекст1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
НадстрочныйТекст1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НадстрочныйТекст1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НадстрочныйТекст1.Текст = "НадстрочныйТекст1";
НадстрочныйТекст1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
НаправленныйТекст1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НаправленныйТекст1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НаправленныйТекст1.Текст = "НаправленныйТекст1";
НаправленныйТекст1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_НеупорядоченныйСписок_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НеупорядоченныйСписок1.Текст = "НеупорядоченныйСписок1";
НеупорядоченныйСписок1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_НижнийКолонтитул_свойство.os
Перем ДФ, НижнийКолонтитул1;
Процедура Свойство() Экспорт
Сообщить(?(
НижнийКолонтитул1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НижнийКолонтитул1.Текст = "НижнийКолонтитул1";
НижнийКолонтитул1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Область_свойство.os
Перем ДФ, Область1;
Процедура Свойство() Экспорт
Сообщить(?(
Область1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Область1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Область1 = ДФ.Область();
Область1.Родитель = Форма1;
Область1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Область1.Текст = "Область1";
Область1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ОбластьТаблицы_свойство.os
Перем ДФ, ОбластьТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТаблицы1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ОбластьТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТаблицы1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОбластьТаблицы1.Текст = "ОбластьТаблицы1";
ОбластьТаблицы1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОбластьТекста1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ОписаниеМедиа_свойство.os
Перем ДФ, ОписаниеМедиа1;
Процедура Свойство() Экспорт
Сообщить(?(
ОписаниеМедиа1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОписаниеМедиа1.Текст = "ОписаниеМедиа1";
ОписаниеМедиа1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Определение_свойство.os
Перем ДФ, Определение1;
Процедура Свойство() Экспорт
Сообщить(?(
Определение1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Определение1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Определение1.Текст = "Определение1";
Определение1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Переключатель_свойство.os
Перем ДФ, Переключатель1;
Процедура Свойство() Экспорт
Сообщить(?(
Переключатель1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Переключатель1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Переключатель1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Перенос_свойство.os
Перем ДФ, Перенос1;
Процедура Свойство() Экспорт
Сообщить(?(
Перенос1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Перенос_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Перенос1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Перенос1 = ДФ.Перенос();
Перенос1.Родитель = Форма1;
Перенос1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Перенос1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Подпись_свойство.os
Перем ДФ, Подпись1;
Процедура Свойство() Экспорт
Сообщить(?(
Подпись1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Подпись1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Подпись1.Текст = "Подпись1";
Подпись1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ПодстрочныйТекст1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодстрочныйТекст1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПодстрочныйТекст1.Текст = "ПодстрочныйТекст1";
ПодстрочныйТекст1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ПодчеркнутыйТекст1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодчеркнутыйТекст1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПодчеркнутыйТекст1.Текст = "ПодчеркнутыйТекст1";
ПодчеркнутыйТекст1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеПароля1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеПоиска1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеСписка1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеТекста1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеЧисла1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ползунок1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
РаскрываемыйБлок1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(РаскрываемыйБлок1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
РаскрываемыйБлок1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Результат_свойство.os
Перем ДФ, Результат1;
Процедура Свойство() Экспорт
Сообщить(?(
Результат1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Результат1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Результат1.Текст = "Результат1";
Результат1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_СписокОпределений_свойство.os
Перем ДФ, СписокОпределений1;
Процедура Свойство() Экспорт
Сообщить(?(
СписокОпределений1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
СписокОпределений1.Текст = "СписокОпределений1";
СписокОпределений1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ссылка1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ссылка1.Текст = "Ссылка1";
Ссылка1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
СтрокаТаблицы1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СтрокаТаблицы1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
СтрокаТаблицы1.Текст = "СтрокаТаблицы1";
СтрокаТаблицы1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Сообщить(?(
Таблица1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Таблица1.Текст = "Таблица1";
Таблица1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Термин_свойство.os
Перем ДФ, Термин1;
Процедура Свойство() Экспорт
Сообщить(?(
Термин1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Термин1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Термин1.Текст = "Термин1";
Термин1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
УдаленыйТекст1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УдаленыйТекст1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
УдаленыйТекст1.Текст = "УдаленыйТекст1";
УдаленыйТекст1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
УпорядоченныйСписок1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
УпорядоченныйСписок1.Текст = "УпорядоченныйСписок1";
УпорядоченныйСписок1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Свойство() Экспорт
Сообщить(?(
Флажок1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Флажок1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ФорматированныйТекст1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ФорматированныйТекст1.Текст = "ФорматированныйТекст1";
ФорматированныйТекст1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Фрейм_свойство.os
Перем ДФ, Фрейм1;
Процедура Свойство() Экспорт
Сообщить(?(
Фрейм1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Фрейм_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Фрейм1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Фрейм1 = ДФ.Фрейм();
Фрейм1.Родитель = Форма1;
Фрейм1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Фрейм1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Холст_свойство.os
Перем ДФ, Холст1;
Процедура Свойство() Экспорт
Сообщить(?(
Холст1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Холст1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
Холст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Холст1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ШапкаТаблицы_свойство.os
Перем ДФ, ШапкаТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
ШапкаТаблицы1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ШапкаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ШапкаТаблицы1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ШапкаТаблицы1.Текст = "ШапкаТаблицы1";
ШапкаТаблицы1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Свойство() Экспорт
Сообщить(?(
Шкала1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Шкала1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Шкала1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шкала1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементПоляСписка1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЭлементПоляСписка1.Текст = "ЭлементПоляСписка1";
ЭлементПоляСписка1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ЭлементСписка_свойство.os
Перем ДФ, ЭлементСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементСписка1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЭлементСписка1.Текст = "ЭлементСписка1";
ЭлементСписка1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ячейка1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ячейка1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ячейка1.Текст = "Ячейка1";
Ячейка1.Имя = "имяЭлемента";
Форма1.Открыть();
Имя_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЯчейкаЗаголовка1.Имя = "имяЭлемента"
, "", "!!! ") + "Имя_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка1, "Имя", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЯчейкаЗаголовка1.Текст = "ЯчейкаЗаголовка1";
ЯчейкаЗаголовка1.Имя = "имяЭлемента";
Форма1.Открыть();
ИмяАнимации_СвойстваАнимации_свойство.os
Перем ДФ, Анимация1, Кадры1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Анимация1.ИмяАнимации = Кадры1.Имя
, "", "!!! ") + "ИмяАнимации_СвойстваАнимации_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Анимация1 = ДФ.СвойстваАнимации();
Анимация1.ИмяАнимации = Кадры1.Имя;
Анимация1.ДлительностьАнимации = 3000;
Анимация1.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце;
Анимация1.ЗадержкаАнимации = 600;
Анимация1.КоличествоПовторов = -1;
Анимация1.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать;
Анимация1.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад;
Анимация1.Состояние = ДФ.Состояние.Запущена;
Блок1.Стиль.Анимация = Анимация1;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
ИмяАнимации_Стиль_свойство.os
Перем ДФ, Кадры1, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ИмяАнимации = Кадры1.Имя
, "", "!!! ") + "ИмяАнимации_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ИмяАнимации", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Блок1.Стиль.ИмяАнимации = Кадры1.Имя;
Блок1.Стиль.ДлительностьАнимации = 3000;
Блок1.Стиль.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце;
Блок1.Стиль.ЗадержкаАнимации = 600;
Блок1.Стиль.КоличествоПовторов = -1;
Блок1.Стиль.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать;
Блок1.Стиль.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад;
Блок1.Стиль.Состояние = ДФ.Состояние.Запущена;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
ИмяКарты_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.ИмяКарты = "имяКарты"
, "", "!!! ") + "ИмяКарты_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "ИмяКарты", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Изображение1.ИмяКарты = "имяКарты";
Форма1.Открыть();
ИмяМетода_Действие_свойство.os
Перем ДФ, Действие;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Действие.ИмяМетода = "Форма1_Загружена"
, "", "!!! ") + "ИмяМетода_Действие_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Структура1 = Новый Структура("Поле1","ЧтоТоТам");
Структура1.Вставить("Число25", 25);
Структура1.Вставить("Число48", 48);
Действие = ДФ.Действие(ЭтотОбъект, "");
Действие.ИмяМетода = "Форма1_Загружена";
Действие.Параметр = Структура1;
Форма1.Загружена = Действие;
Форма1.Открыть();
Инверсия_ФильтрИзображений_свойство.os
Перем ДФ, ФильтрИзображений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ФильтрИзображений1.Инверсия = 30
, "", "!!! ") + "Инверсия_ФильтрИзображений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Изображение1 = ДФ.Изображение();
Форма1.ДобавитьДочерний(Изображение1);
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Стиль.Ширина = 200;
ФильтрИзображений1 = ДФ.ФильтрИзображений();
ФильтрИзображений1.Инверсия = 30;
Изображение1.Стиль.Фильтр = ФильтрИзображений1;
Форма1.Открыть();
Индекс_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка3;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементПоляСписка3.Индекс = 2
, "", "!!! ") + "Индекс_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка3, "Индекс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Ширина = 150;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = ПолеСписка1;
ГруппировкаПоляСписка1.Надпись = "Жители деревни Простоквашино";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка1.Значение = "Кот";
ЭлементПоляСписка1.Текст = "Матроскин";
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Пёс";
ЭлементПоляСписка2.Текст = "Шарик";
ЭлементПоляСписка3 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка3.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка3.Значение = "Птица";
ЭлементПоляСписка3.Текст = "Галчонок";
Форма1.Открыть();
ИндексВыбранного_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.ИндексВыбранного = 1
, "", "!!! ") + "ИндексВыбранного_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "ИндексВыбранного", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Ширина = 150;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = ПолеСписка1;
ГруппировкаПоляСписка1.Надпись = "Жители деревни Простоквашино";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка1.Значение = "Кот";
ЭлементПоляСписка1.Текст = "Матроскин";
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Пёс";
ЭлементПоляСписка2.Текст = "Шарик";
ЭлементПоляСписка3 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка3.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка3.Значение = "Птица";
ЭлементПоляСписка3.Текст = "Галчонок";
ПолеСписка1.ИндексВыбранного = 1;
Форма1.Открыть();
ИндексСтроки_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаШарик;
Процедура Свойство() Экспорт
Сообщить(?(
СтрокаШарик.ИндексСтроки = 2
, "", "!!! ") + "ИндексСтроки_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СтрокаШарик, "ИндексСтроки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
Форма1.Открыть();
ИндексСтрокиВСекции_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаШарик;
Процедура Свойство() Экспорт
Сообщить(?(
СтрокаШарик.ИндексСтрокиВСекции = 1
, "", "!!! ") + "ИндексСтрокиВСекции_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СтрокаШарик, "ИндексСтрокиВСекции", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
Форма1.Открыть();
ИндексЯчейки_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ячейка1.ИндексЯчейки = 1
, "", "!!! ") + "ИндексЯчейки_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ячейка1, "ИндексЯчейки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Стиль1 = Таблица1.Стиль;
Стиль1.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Стиль1.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Таблица1;
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Таблица1;
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = ГруппаКолонок1;
Колонка1.Стиль.Ширина = 200;
Колонка2 = ДФ.Колонка();
Колонка2.Родитель = ГруппаКолонок1;
Колонка2.Стиль.Ширина = 100;
Колонка3 = ДФ.Колонка();
Колонка3.Родитель = ГруппаКолонок1;
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Таблица1;
СтрокаШапка = ДФ.СтрокаТаблицы();
СтрокаШапка.Родитель = Таблица1;
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = СтрокаШапка;
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка2.Родитель = СтрокаШапка;
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка3.Родитель = СтрокаШапка;
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Таблица1;
СтрокаМатроскин = ДФ.СтрокаТаблицы();
СтрокаМатроскин.Родитель = ОбластьТаблицы1;
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка4.Родитель = СтрокаМатроскин;
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = СтрокаМатроскин;
Ячейка1.Текст = "Кот";
Ячейка2 = ДФ.Ячейка();
Ячейка2.Родитель = СтрокаМатроскин;
Ячейка2.Текст = "4";
СтрокаШарик = ДФ.СтрокаТаблицы();
СтрокаШарик.Родитель = ОбластьТаблицы1;
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка5.Родитель = СтрокаШарик;
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = ДФ.Ячейка();
Ячейка3.Родитель = СтрокаШарик;
Ячейка3.Текст = "Пёс";
Ячейка4 = ДФ.Ячейка();
Ячейка4.Родитель = СтрокаШарик;
Ячейка4.Текст = "4";
СтрокаГалчонок = ДФ.СтрокаТаблицы();
СтрокаГалчонок.Родитель = ОбластьТаблицы1;
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка6.Родитель = СтрокаГалчонок;
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = ДФ.Ячейка();
Ячейка5.Родитель = СтрокаГалчонок;
Ячейка5.Текст = "Птица";
Ячейка6 = ДФ.Ячейка();
Ячейка6.Родитель = СтрокаГалчонок;
Ячейка6.Текст = "2";
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Таблица1;
СтрокаИтого = ДФ.СтрокаТаблицы();
СтрокаИтого.Родитель = Итоги1;
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка7.Родитель = СтрокаИтого;
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = ДФ.Ячейка();
Ячейка7.Родитель = СтрокаИтого;
Ячейка7.Текст = "10";
Форма1.Открыть();
ИндексЯчейки_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка3;
Процедура Свойство() Экспорт
Сообщить(?(
ЯчейкаЗаголовка3.ИндексЯчейки = 2
, "", "!!! ") + "ИндексЯчейки_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка3, "ИндексЯчейки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Стиль1 = Таблица1.Стиль;
Стиль1.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Стиль1.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Таблица1;
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Таблица1;
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = ГруппаКолонок1;
Колонка1.Стиль.Ширина = 200;
Колонка2 = ДФ.Колонка();
Колонка2.Родитель = ГруппаКолонок1;
Колонка2.Стиль.Ширина = 100;
Колонка3 = ДФ.Колонка();
Колонка3.Родитель = ГруппаКолонок1;
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Таблица1;
СтрокаШапка = ДФ.СтрокаТаблицы();
СтрокаШапка.Родитель = Таблица1;
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = СтрокаШапка;
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка2.Родитель = СтрокаШапка;
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка3.Родитель = СтрокаШапка;
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Таблица1;
СтрокаМатроскин = ДФ.СтрокаТаблицы();
СтрокаМатроскин.Родитель = ОбластьТаблицы1;
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка4.Родитель = СтрокаМатроскин;
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = СтрокаМатроскин;
Ячейка1.Текст = "Кот";
Ячейка2 = ДФ.Ячейка();
Ячейка2.Родитель = СтрокаМатроскин;
Ячейка2.Текст = "4";
СтрокаШарик = ДФ.СтрокаТаблицы();
СтрокаШарик.Родитель = ОбластьТаблицы1;
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка5.Родитель = СтрокаШарик;
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = ДФ.Ячейка();
Ячейка3.Родитель = СтрокаШарик;
Ячейка3.Текст = "Пёс";
Ячейка4 = ДФ.Ячейка();
Ячейка4.Родитель = СтрокаШарик;
Ячейка4.Текст = "4";
СтрокаГалчонок = ДФ.СтрокаТаблицы();
СтрокаГалчонок.Родитель = ОбластьТаблицы1;
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка6.Родитель = СтрокаГалчонок;
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = ДФ.Ячейка();
Ячейка5.Родитель = СтрокаГалчонок;
Ячейка5.Текст = "Птица";
Ячейка6 = ДФ.Ячейка();
Ячейка6.Родитель = СтрокаГалчонок;
Ячейка6.Текст = "2";
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Таблица1;
СтрокаИтого = ДФ.СтрокаТаблицы();
СтрокаИтого.Родитель = Итоги1;
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка7.Родитель = СтрокаИтого;
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = ДФ.Ячейка();
Ячейка7.Родитель = СтрокаИтого;
Ячейка7.Текст = "10";
Форма1.Открыть();
Интервал_ОкноСообщений_свойство.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОкноСообщений1.Интервал = 5000
, "", "!!! ") + "Интервал_ОкноСообщений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.Интервал = 5000;
ОкноСообщений1.Показать();
Форма1.Открыть();
Интервал_Таймер_свойство.os
Перем ДФ, Таймер1, Кнопка1;
Перем Таймер2, Кнопка3;
Перем Блок1, Блок2;
Процедура Форма1_Загружена() Экспорт
Таймер1.Начать();
Приостановить(300);
Таймер2.Начать();
// Сообщить("Форма1_Загружена " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Таймер1.Интервал = 1000
, "", "!!! ") + "Интервал_Таймер_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Таймер1.Начать();
Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Таймер1.Остановить();
Сообщить("Кнопка2_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Блок1.Текст = "Таймер активен = " + Таймер1.Активен;
КонецПроцедуры
Процедура Таймер1_ПриСрабатыванииТаймера() Экспорт
Сообщить("Таймер1_ПриСрабатыванииТаймера");
Если Кнопка1.Стиль.Цветфона = ДФ.Цвет.МорскаяРакушка Тогда
Кнопка1.Стиль.Цветфона = ДФ.Цвет.Красный;
Иначе
Кнопка1.Стиль.Цветфона = ДФ.Цвет.МорскаяРакушка;
КонецЕсли;
Блок1.Текст = "" + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
|Таймер активен = " + Таймер1.Активен;
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
Таймер2.Начать();
Сообщить("Кнопка3_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
Таймер2.Остановить();
Сообщить("Кнопка4_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Блок2.Текст = "Таймер активен = " + Таймер2.Активен;
КонецПроцедуры
Процедура Таймер2_ПриСрабатыванииТаймера() Экспорт
Сообщить("Таймер2_ПриСрабатыванииТаймера");
Если Кнопка3.Стиль.Цветфона = ДФ.Цвет.СветлоСерый Тогда
Кнопка3.Стиль.Цветфона = ДФ.Цвет.СветлыйЗеленоватоГолубой;
Иначе
Кнопка3.Стиль.Цветфона = ДФ.Цвет.СветлоСерый;
КонецЕсли;
Блок2.Текст = "" + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
|Таймер активен = " + Таймер2.Активен;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 400;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Стиль.Высота = 100;
Абзац1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Кнопка1 = Абзац1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Начать";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Абзац1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Остановить";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Блок1 = Абзац1.ДобавитьДочерний(ДФ.Блок());
Таймер1 = ДФ.Таймер();
Таймер1.ПриСрабатыванииТаймера = ДФ.Действие(ЭтотОбъект, "Таймер1_ПриСрабатыванииТаймера");
Таймер1.Интервал = 1000;
Таймер1.Начать();
Абзац2 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац2.Стиль.Высота = 100;
Абзац2.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Кнопка3 = Абзац2.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Начать";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Абзац2.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Остановить";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок2 = Абзац2.ДобавитьДочерний(ДФ.Блок());
Таймер2 = ДФ.Таймер();
Таймер2.ПриСрабатыванииТаймера = ДФ.Действие(ЭтотОбъект, "Таймер2_ПриСрабатыванииТаймера");
Таймер2.Интервал = 1000;
Таймер2.Начать();
Форма1.Открыть();
Интервал_Уведомления_свойство.os
Перем ДФ, Уведомления1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Уведомления1.Интервал = 11000
, "", "!!! ") + "Интервал_Уведомления_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
Уведомления1.Интервал = 5000;
Уведомления1.Показать();
Уведомления1.Интервал = 8000;
Уведомления1.Показать();
Уведомления1.Интервал = 11000;
Уведомления1.Показать();
Форма1.Открыть();
ИнтервалГраницы_Стиль_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Сообщить(?(
Таблица1.Стиль.ИнтервалГраницы = "20px 5px"
, "", "!!! ") + "ИнтервалГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1.Стиль, "ИнтервалГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
Таблица1.Стиль.ИнтервалГраницы = ДФ.Размер(20, 5);
Форма1.Открыть();
ИнтервалКолонок_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ИнтервалКолонок = "50px"
, "", "!!! ") + "ИнтервалКолонок_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ИнтервалКолонок", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.Текст = "– Ах ты, шалун! – воскликнула Алиса и чмокнула котенка в мокрый носик, делая при этом сердитое лицо.
|– Разве Дина тебе не объясняла, что хорошо, а что плохо? Ай-я-яй, Дина! Ты слышишь? Плохо!
|И Алиса укоризненно покачала головой. Потом она подхватила котенка, собрала запутанный ворох ниток и, поудобнее устроившись в кресле, стала снова мотать клубок.
|Но работа не очень-то спорилась, потому что она не переставая болтала то с котенком, а то и сама с собой.
|Котенок с невинным видом сидел у нее на коленях и только иногда легонько цапал когтистой лапкой клубок, словно хотел помочь Алисе.
|– Ты, котик, и не догадываешься, наверное, что будет завтра? – спрашивала Алиса.
|– Откуда тебе! Ты же не сидел со мной вчера у окошка. Тебя умывали. А я видела, как ребята собирали ветки для костра.
|Знаешь, какой ворох нужен для хорошего костра? Но тут, как назло, пошел снег, стало холодно, и их всех позвали домой.
|Но завтра! Завтра непременно будет костер, и мы с тобой, котик, пойдем поглядеть.
|
|Разговаривая, Алиса обматывала котенка ниткой. Шерстяная нитка так подходила к цвету его шерстки!
|Но котенок вдруг вырвался, клубок вывалился из рук Алисы и снова размотался.";
Абзац1.Стиль.ШиринаКолонок = 100;
Абзац1.Стиль.КоличествоКолонок = 3;
Абзац1.Стиль.ИнтервалКолонок = 50;
Форма1.Открыть();
ИнтервалСимволов_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ИнтервалСимволов = "5px"
, "", "!!! ") + "ИнтервалСимволов_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ИнтервалСимволов", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Абзац1.Стиль.ИнтервалСимволов = 5;
Форма1.Открыть();
ИнтервалСлов_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ИнтервалСлов = "20px"
, "", "!!! ") + "ИнтервалСлов_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ИнтервалСлов", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 600;
Форма1.НачальнаяВысота = 100;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Текст = "Пустое вы сердечным ты она, обмолвясь, заменила";
Блок1.Стиль.ИнтервалСлов = 20;
Форма1.Открыть();
Источник_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Аудио1.Источник <> ""
, "", "!!! ") + "Источник_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "Источник", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
// Аудио1.Источник = "file:///C:/444/Pic/Kaoma_Lambada.mp3";
Аудио1.Источник = "Kaoma_Lambada.mp3";
Форма1.Открыть();
Источник_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.Источник <> ""
, "", "!!! ") + "Источник_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "Источник", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
// Изображение1.Источник = "file:///C:/444/~Деклар Форма/maslenica10.jpg";
Изображение1.Источник = "maslenica10.jpg";
Форма1.Открыть();
Источник_Скрипт_свойство.os
Перем ДФ, Скрипт1;
Процедура Свойство() Экспорт
Сообщить(?(
СтрНайти(Скрипт1.Источник, "sample.js") > 0
, "", "!!! ") + "Источник_Скрипт_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Скрипт1, "Источник", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Скрипт1 = Форма1.ДобавитьДочерний(ДФ.Скрипт());
Скрипт1.Источник = (Новый Файл(ТекущийСценарий().Источник).Путь) + "Скриптjs" + ПолучитьРазделительПути() + "sample.js";
//============
//Содержимое файла sample.js
// let str;
// str = 'Добавили JavaScript-код';
// //alert(str);
//============
Форма1.Открыть();
Источник_Фрейм_свойство.os
Перем ДФ, Фрейм1;
Процедура Свойство() Экспорт
Сообщить(?(
Фрейм1.Источник = "https://oscript.io/"
, "", "!!! ") + "Источник_Фрейм_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Фрейм1, "Источник", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 900;
Форма1.НачальнаяВысота = 600;
Фрейм1 = Форма1.ДобавитьДочерний(ДФ.Фрейм());
Фрейм1.Источник = "https://oscript.io/";
Фрейм1.Стиль.Ширина = 880;
Фрейм1.Стиль.Высота = 550;
Форма1.Открыть();
ИсточникКартинкиГраницы_КартинкаГраницы_свойство.os
Перем ДФ, КартинкаГраницы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
КартинкаГраницы1.ИсточникКартинкиГраницы = "border.png"
, "", "!!! ") + "ИсточникКартинкиГраницы_КартинкаГраницы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Текст = "Здравствуй МИР!";
Блок1.Стиль.Границы = ДФ.Границы(15, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Заполнение = ДФ.Заполнение(10, 20, 20, 10);
КартинкаГраницы1 = ДФ.КартинкаГраницы();
// КартинкаГраницы1.ИсточникКартинкиГраницы = "file:///C:/444/~Деклар Форма/abc.png";
КартинкаГраницы1.ИсточникКартинкиГраницы = "border.png";
КартинкаГраницы1.НарезкаКартинкиГраницы = 30;
КартинкаГраницы1.ШиринаКартинкиГраницы = 10;
КартинкаГраницы1.СмещениеКартинкиГраницы = 10;
КартинкаГраницы1.МозаикаКартинкиГраницы = ДФ.МозаикаКартинкиГраницы.Закруглять;
Блок1.Стиль.КартинкаГраницы = КартинкаГраницы1;
Форма1.Открыть();
ИсточникКартинкиГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ИсточникКартинкиГраницы = "url(""border.png"")"
, "", "!!! ") + "ИсточникКартинкиГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ИсточникКартинкиГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.ЦветФона = ДФ.Цвет.СветлоСерый;
Блок1.Стиль.Границы = ДФ.Границы(30, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.ИсточникКартинкиГраницы = "border.png";
Блок1.Стиль.НарезкаКартинкиГраницы = 30;
Блок1.Стиль.ШиринаКартинкиГраницы = ДФ.Размер(10, 20);
Блок1.Стиль.СмещениеКартинкиГраницы = 0;
Блок1.Стиль.МозаикаКартинкиГраницы = ДФ.МозаикаКартинкиГраницы.Закруглять;
Форма1.Открыть();
ИсточникПерспективы_Стиль_свойство.os
Перем ДФ, Результат1, Результат2, Блок1, ИсточникПерспективы1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ИсточникПерспективы = "0.5px 0.9px"
, "", "!!! ") + "ИсточникПерспективы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ИсточникПерспективы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Ползунок1_Ввод() Экспорт
Результат1.Значение = ДФ.АргументыСобытия.Значение;
ИсточникПерспективы1.Икс = ДФ.АргументыСобытия.Значение;
Блок1.Стиль.ИсточникПерспективы = ИсточникПерспективы1;
КонецПроцедуры
Процедура Ползунок2_Ввод() Экспорт
Результат2.Значение = ДФ.АргументыСобытия.Значение;
ИсточникПерспективы1.Игрек = ДФ.АргументыСобытия.Значение;
Блок1.Стиль.ИсточникПерспективы = ИсточникПерспективы1;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 700;
Форма1.НачальнаяВысота = 700;
БлокПолзунок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Ползунок1 = БлокПолзунок1.ДобавитьДочерний(ДФ.Ползунок());
Ползунок1.Максимум = 400;
Ползунок1.Минимум = -40;
Ползунок1.Значение = 150;
Ползунок1.Ввод = ДФ.Действие(ЭтотОбъект, "Ползунок1_Ввод");
БлокПолзунок1.ДобавитьДочерний(ДФ.НаправленныйТекст()).Текст = " по X = ";
Результат1 = БлокПолзунок1.ДобавитьДочерний(ДФ.Результат());
Результат1.Значение = Ползунок1.Значение;
БлокПолзунок2 = Форма1.ДобавитьДочерний(ДФ.Блок());
Ползунок2 = БлокПолзунок2.ДобавитьДочерний(ДФ.Ползунок());
Ползунок2.Максимум = 400;
Ползунок2.Минимум = -40;
Ползунок2.Значение = 150;
Ползунок2.Ввод = ДФ.Действие(ЭтотОбъект, "Ползунок2_Ввод");
Ползунок2.Стиль.Позиция = ДФ.Позиция.Статично;
БлокПолзунок2.ДобавитьДочерний(ДФ.НаправленныйТекст()).Текст = " по Y = ";
Результат2 = БлокПолзунок2.ДобавитьДочерний(ДФ.Результат());
Результат2.Значение = Ползунок2.Значение;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Отступ = ДФ.Отступ(, , , , Истина);
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Стиль.Перспектива = 125;
Блок1.Текст = "Блок1";
ИсточникПерспективы1 = ДФ.ИсточникПерспективы(0.5, 0.9);
Блок1.Стиль.ИсточникПерспективы = ИсточникПерспективы1;
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Заполнение = ДФ.Заполнение(50, 50, 50, 50);
Блок2.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Блок2.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок2.Стиль.ЦветФона = ДФ.Цвет.Коралловый;
Блок2.Стиль.Сдвиг = ДФ.ПоворотИкс(45);
Блок2.Текст = "Алиса как можно вежливее объяснила, что немного заблудилась, а теперь разобралась, что к чему и что куда, и идет себе своей дорогой.";
Форма1.Открыть();
ИсходнаяВысота_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.ИсходнаяВысота = 80
, "", "!!! ") + "ИсходнаяВысота_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "ИсходнаяВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Ширина = 119 * 2;
Изображение1.Высота = 80 * 2;
Форма1.Открыть();
ИсходнаяШирина_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.ИсходнаяШирина = 119
, "", "!!! ") + "ИсходнаяШирина_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "ИсходнаяШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Ширина = 119 * 2;
Изображение1.Высота = 80 * 2;
Форма1.Открыть();
Итоги_Таблица_свойство.os
Перем ДФ, Итоги1;
Процедура Форма1_Загружена() Экспорт
Элементы = Итоги1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить("" + ТипЗнч(эл) + " - " + эл.КлючЭлемента);
// КонецЦикла;
Сообщить(?(
Элементы.Количество() = 1
, "", "!!! ") + "Итоги_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
Форма1.Открыть();
Калибровка_Стиль_свойство.os
Перем ДФ, Блок2;
Процедура Свойство() Экспорт
Сообщить(?(
Блок2.Стиль.Калибровка = ДФ.Калибровка.Границы
, "", "!!! ") + "Калибровка_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок2.Стиль, "Калибровка", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная);
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Текст = "Блок2";
Блок2.Стиль.Ширина = 150;
Блок2.Стиль.Границы = ДФ.Границы(3, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Коралловый);
Блок2.Стиль.ГоризонтальноеВыравнивание = ДФ.ГоризонтальноеВыравнивание.Лево;
Блок2.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Блок3 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок3.Текст = "Блок3";
Блок3.Стиль.Ширина = 150;
Блок3.Стиль.Границы = ДФ.Границы(3, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Коралловый);
Блок3.Стиль.ГоризонтальноеВыравнивание = ДФ.ГоризонтальноеВыравнивание.Лево;
Блок3.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Блок4 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок4.Стиль.Несвободно = ДФ.Несвободно.ЛевоПраво;
Блок2.Стиль.Калибровка = ДФ.Калибровка.Границы;
Блок3.Стиль.Калибровка = ДФ.Калибровка.Границы;
Форма1.Открыть();
Карта_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.Карта
, "", "!!! ") + "Карта_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "Карта", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Ссылка1 = Абзац1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка1.Адрес = "#"; // Здесь должна быть ссылка на .php Но её пока нет. Функционал не доработан. В разработке.
Изображение1 = Ссылка1.ДобавитьДочерний(ДФ.Изображение());
// Изображение1.Источник = "file:///C:/444/~Деклар Форма/maslenica10.jpg";
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Стиль.Ширина = 119 * 2;
Изображение1.Стиль.Высота = 80 * 2;
Изображение1.Карта = Истина;
Форма1.Открыть();
КартинкаГраницы_Стиль_свойство.os
Перем ДФ, Блок1, КартинкаГраницы1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.КартинкаГраницы = "url(""border.png"") 30 / 10px 20px / 0px round"
, "", "!!! ") + "КартинкаГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "КартинкаГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.ЦветФона = ДФ.Цвет.СветлоСерый;
Блок1.Стиль.Границы = ДФ.Границы(30, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
КартинкаГраницы1 = ДФ.КартинкаГраницы();
КартинкаГраницы1.ИсточникКартинкиГраницы = "border.png";
КартинкаГраницы1.НарезкаКартинкиГраницы = 30;
КартинкаГраницы1.ШиринаКартинкиГраницы = ДФ.Размер(10, 20);
КартинкаГраницы1.СмещениеКартинкиГраницы = 0;
КартинкаГраницы1.МозаикаКартинкиГраницы = ДФ.МозаикаКартинкиГраницы.Закруглять;
Блок1.Стиль.КартинкаГраницы = КартинкаГраницы1;
Форма1.Открыть();
КартинкаСтиляСписка_Стиль_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.Стиль.КартинкаСтиляСписка = "url(""icon.png"")"
, "", "!!! ") + "КартинкаСтиляСписка_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1.Стиль, "КартинкаСтиляСписка", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
РаскрываемыйБлок1.ДобавитьДочерний(ЗаголовокРаскрываемогоБлока1);
ЗаголовокРаскрываемогоБлока1.Текст = "Жители деревни Простоквашино";
НеупорядоченныйСписок1 = РаскрываемыйБлок1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
ЭлементСписка1 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Кот Матроскин";
ЭлементСписка2 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка2.Текст = "Пёс Шарик";
ЭлементСписка3 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка3.Текст = "Птица Галчонок";
НеупорядоченныйСписок1.Стиль.КартинкаСтиляСписка = "icon.png";
РаскрываемыйБлок1.Открыт = Истина;
Форма1.Открыть();
КартинкаСтиляСписка_СтильСписка_свойство.os
Перем ДФ, СтильСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СтильСписка1.КартинкаСтиляСписка = "icon.png"
, "", "!!! ") + "КартинкаСтиляСписка_СтильСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 400;
СтильСписка1 = ДФ.СтильСписка();
СтильСписка1.ТипСтиляСписка = ДФ.ТипСтиляСписка.ЗакрашенныйКруг;
СтильСписка1.ПозицияСтиляСписка = ДФ.ПозицияСтиляСписка.Внутри;
СтильСписка1.КартинкаСтиляСписка = "icon.png";
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
РаскрываемыйБлок1.ДобавитьДочерний(ЗаголовокРаскрываемогоБлока1);
ЗаголовокРаскрываемогоБлока1.Текст = "Жители деревни Простоквашино";
НеупорядоченныйСписок1 = РаскрываемыйБлок1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
ЭлементСписка1 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Кот Матроскин";
ЭлементСписка2 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка2.Текст = "Пёс Шарик";
ЭлементСписка3 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка3.Текст = "Птица Галчонок";
НеупорядоченныйСписок1.Стиль.СтильСписка = СтильСписка1;
Форма1.Открыть();
Киоск_Форма_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Киоск_Форма_свойство.os" + " " + ТекущаяДата());
Приостановить(5000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Киоск = Истина;
Форма1.Открыть();
ККорень_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().ККорень(3) = 1.73205080756888
, "", "!!! ") + "ККорень_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().ККорень(3);
Форма1.Открыть();
КлавишаДоступа_Абзац_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Абзац1.Нажатие();
КонецПроцедуры
Процедура Абзац1_Нажатие() Экспорт
Сообщить(?(
Абзац1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.Высота = 60;
Абзац1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Абзац1.Нажатие = ДФ.Действие(ЭтотОбъект, "Абзац1_Нажатие");
Абзац1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Артикль_свойство.os
Перем ДФ, Артикль1;
Процедура Свойство() Экспорт
Артикль1.Нажатие();
КонецПроцедуры
Процедура Артикль1_Нажатие() Экспорт
Сообщить(?(
Артикль1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Артикль1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Стиль.Высота = 60;
Артикль1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Артикль1.Нажатие = ДФ.Действие(ЭтотОбъект, "Артикль1_Нажатие");
Артикль1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Аудио1.Нажатие();
КонецПроцедуры
Процедура Аудио1_Нажатие() Экспорт
Сообщить(?(
Аудио1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Стиль.Высота = 60;
Аудио1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Аудио1.Нажатие = ДФ.Действие(ЭтотОбъект, "Аудио1_Нажатие");
Аудио1.КлавишаДоступа = "w";
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";
Форма1.Открыть();
КлавишаДоступа_Блок_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Блок1.Нажатие();
КонецПроцедуры
Процедура Блок1_Нажатие() Экспорт
Сообщить(?(
Блок1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 60;
Блок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Блок1.Нажатие = ДФ.Действие(ЭтотОбъект, "Блок1_Нажатие");
Блок1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
ВыборВремени1.Нажатие();
КонецПроцедуры
Процедура ВыборВремени1_Нажатие() Экспорт
Сообщить(?(
ВыборВремени1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Стиль.Высота = 60;
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ВыборВремени1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборВремени1_Нажатие");
ВыборВремени1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
ВыборДаты1.Нажатие();
КонецПроцедуры
Процедура ВыборДаты1_Нажатие() Экспорт
Сообщить(?(
ВыборДаты1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Стиль.Высота = 60;
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ВыборДаты1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_Нажатие");
ВыборДаты1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
ВыборДатыВремени1.Нажатие();
КонецПроцедуры
Процедура ВыборДатыВремени1_Нажатие() Экспорт
Сообщить(?(
ВыборДатыВремени1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Стиль.Высота = 60;
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ВыборДатыВремени1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_Нажатие");
ВыборДатыВремени1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
ВыборМестнойДатыВремени1.Нажатие();
КонецПроцедуры
Процедура ВыборМестнойДатыВремени1_Нажатие() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Стиль.Высота = 60;
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ВыборМестнойДатыВремени1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборМестнойДатыВремени1_Нажатие");
ВыборМестнойДатыВремени1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
ВыборМесяца1.Нажатие();
КонецПроцедуры
Процедура ВыборМесяца1_Нажатие() Экспорт
Сообщить(?(
ВыборМесяца1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Стиль.Высота = 60;
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ВыборМесяца1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_Нажатие");
ВыборМесяца1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
ВыборНедели1.Нажатие();
КонецПроцедуры
Процедура ВыборНедели1_Нажатие() Экспорт
Сообщить(?(
ВыборНедели1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Стиль.Высота = 60;
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ВыборНедели1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_Нажатие");
ВыборНедели1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Свойство() Экспорт
ВыборФайла1.Нажатие();
КонецПроцедуры
Процедура ВыборФайла1_Нажатие() Экспорт
Сообщить(?(
ВыборФайла1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.Стиль.Высота = 60;
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ВыборФайла1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборФайла1_Нажатие");
ВыборФайла1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1;
Процедура Свойство() Экспорт
ВыборЦвета1.Нажатие();
КонецПроцедуры
Процедура ВыборЦвета1_Нажатие() Экспорт
Сообщить(?(
ВыборЦвета1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборЦвета1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.Стиль.Высота = 60;
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ВыборЦвета1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборЦвета1_Нажатие");
ВыборЦвета1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Группа_свойство.os
Перем ДФ, Группа1;
Процедура Свойство() Экспорт
Группа1.Нажатие();
КонецПроцедуры
Процедура Группа1_Нажатие() Экспорт
Сообщить(?(
Группа1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Группа1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Стиль.Высота = 60;
Группа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Группа1.Нажатие = ДФ.Действие(ЭтотОбъект, "Группа1_Нажатие");
Группа1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ГруппировкаПоляСписка_свойство.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Свойство() Экспорт
ГруппировкаПоляСписка1.Нажатие();
КонецПроцедуры
Процедура ГруппировкаПоляСписка1_Нажатие() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ГруппировкаПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппировкаПоляСписка1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.Стиль.Высота = 60;
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ГруппировкаПоляСписка1.Нажатие = ДФ.Действие(ЭтотОбъект, "ГруппировкаПоляСписка1_Нажатие");
ГруппировкаПоляСписка1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Диалог_свойство.os
Перем ДФ, Диалог1;
Процедура Свойство() Экспорт
Диалог1.Нажатие();
КонецПроцедуры
Процедура Диалог1_Нажатие() Экспорт
Сообщить(?(
Диалог1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Стиль.Высота = 60;
Диалог1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Диалог1.Нажатие = ДФ.Действие(ЭтотОбъект, "Диалог1_Нажатие");
Диалог1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок1;
Процедура Свойство() Экспорт
ДополнительныйБлок1.Нажатие();
КонецПроцедуры
Процедура ДополнительныйБлок1_Нажатие() Экспорт
Сообщить(?(
ДополнительныйБлок1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Стиль.Высота = 60;
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ДополнительныйБлок1.Нажатие = ДФ.Действие(ЭтотОбъект, "ДополнительныйБлок1_Нажатие");
ДополнительныйБлок1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст1;
Процедура Свойство() Экспорт
ЖирныйТекст1.Нажатие();
КонецПроцедуры
Процедура ЖирныйТекст1_Нажатие() Экспорт
Сообщить(?(
ЖирныйТекст1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЖирныйТекст1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Стиль.Высота = 60;
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЖирныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЖирныйТекст1_Нажатие");
ЖирныйТекст1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Заголовок1_свойство.os
Перем ДФ, Заголовок11;
Процедура Свойство() Экспорт
Заголовок11.Нажатие();
КонецПроцедуры
Процедура Заголовок11_Нажатие() Экспорт
Сообщить(?(
Заголовок11.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок11, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Стиль.Высота = 60;
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок11.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок11_Нажатие");
Заголовок11.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Заголовок2_свойство.os
Перем ДФ, Заголовок21;
Процедура Свойство() Экспорт
Заголовок21.Нажатие();
КонецПроцедуры
Процедура Заголовок21_Нажатие() Экспорт
Сообщить(?(
Заголовок21.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок21, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Стиль.Высота = 60;
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок21.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок21_Нажатие");
Заголовок21.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Заголовок3_свойство.os
Перем ДФ, Заголовок31;
Процедура Свойство() Экспорт
Заголовок31.Нажатие();
КонецПроцедуры
Процедура Заголовок31_Нажатие() Экспорт
Сообщить(?(
Заголовок31.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок31, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Стиль.Высота = 60;
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок31.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок31_Нажатие");
Заголовок31.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Заголовок4_свойство.os
Перем ДФ, Заголовок41;
Процедура Свойство() Экспорт
Заголовок41.Нажатие();
КонецПроцедуры
Процедура Заголовок41_Нажатие() Экспорт
Сообщить(?(
Заголовок41.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок41, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Стиль.Высота = 60;
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок41.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок41_Нажатие");
Заголовок41.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Заголовок5_свойство.os
Перем ДФ, Заголовок51;
Процедура Свойство() Экспорт
Заголовок51.Нажатие();
КонецПроцедуры
Процедура Заголовок51_Нажатие() Экспорт
Сообщить(?(
Заголовок51.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок51, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Стиль.Высота = 60;
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок51.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок51_Нажатие");
Заголовок51.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Заголовок6_свойство.os
Перем ДФ, Заголовок61;
Процедура Свойство() Экспорт
Заголовок61.Нажатие();
КонецПроцедуры
Процедура Заголовок61_Нажатие() Экспорт
Сообщить(?(
Заголовок61.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок61, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Стиль.Высота = 60;
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок61.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок61_Нажатие");
Заголовок61.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Заголовок_свойство.os
Перем ДФ, Заголовок1;
Процедура Свойство() Экспорт
Заголовок1.Нажатие();
КонецПроцедуры
Процедура Заголовок1_Нажатие() Экспорт
Сообщить(?(
Заголовок1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Стиль.Высота = 60;
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок1.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок1_Нажатие");
Заголовок1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ЗаголовокГруппы_свойство.os
Перем ДФ, ЗаголовокГруппы1;
Процедура Свойство() Экспорт
ЗаголовокГруппы1.Нажатие();
КонецПроцедуры
Процедура ЗаголовокГруппы1_Нажатие() Экспорт
Сообщить(?(
ЗаголовокГруппы1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Стиль.Высота = 60;
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЗаголовокГруппы1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЗаголовокГруппы1_Нажатие");
ЗаголовокГруппы1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура Свойство() Экспорт
ЗаголовокРаскрываемогоБлока1.Нажатие();
КонецПроцедуры
Процедура ЗаголовокРаскрываемогоБлока1_Нажатие() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ЗаголовокРаскрываемогоБлока_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Стиль.Высота = 60;
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЗаголовокРаскрываемогоБлока1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЗаголовокРаскрываемогоБлока1_Нажатие");
ЗаголовокРаскрываемогоБлока1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Изображение1.Нажатие();
КонецПроцедуры
Процедура Изображение1_Нажатие() Экспорт
Сообщить(?(
Изображение1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.Стиль.Высота = 60;
Изображение1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Изображение1.Нажатие = ДФ.Действие(ЭтотОбъект, "Изображение1_Нажатие");
Изображение1.КлавишаДоступа = "w";
Изображение1.Источник = "maslenica10.jpg";
Форма1.Открыть();
КлавишаДоступа_Индикатор_свойство.os
Перем ДФ, Индикатор1;
Процедура Свойство() Экспорт
Индикатор1.Нажатие();
КонецПроцедуры
Процедура Индикатор1_Нажатие() Экспорт
Сообщить(?(
Индикатор1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Индикатор1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.Стиль.Высота = 60;
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Индикатор1.Нажатие = ДФ.Действие(ЭтотОбъект, "Индикатор1_Нажатие");
Индикатор1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Итоги_свойство.os
Перем ДФ, Итоги1;
Процедура Свойство() Экспорт
Итоги1.Нажатие();
КонецПроцедуры
Процедура Итоги1_Нажатие() Экспорт
Сообщить(?(
Итоги1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Итоги_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Итоги1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Стиль.Высота = 60;
Итоги1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Итоги1.Нажатие = ДФ.Действие(ЭтотОбъект, "Итоги1_Нажатие");
Итоги1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Карта_свойство.os
Перем ДФ, Карта1;
Процедура Свойство() Экспорт
Карта1.Нажатие();
КонецПроцедуры
Процедура Карта1_Нажатие() Экспорт
Сообщить(?(
Карта1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Карта_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Карта1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Карта1 = ДФ.Карта();
Карта1.Родитель = Форма1;
Карта1.Стиль.Высота = 60;
Карта1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Карта1.Нажатие = ДФ.Действие(ЭтотОбъект, "Карта1_Нажатие");
Карта1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Кнопка_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Кнопка1.Нажатие();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Сообщить(?(
Кнопка1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Стиль.Высота = 60;
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Код_свойство.os
Перем ДФ, Код1;
Процедура Свойство() Экспорт
Код1.Нажатие();
КонецПроцедуры
Процедура Код1_Нажатие() Экспорт
Сообщить(?(
Код1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Код_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Код1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Стиль.Высота = 60;
Код1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Код1.Нажатие = ДФ.Действие(ЭтотОбъект, "Код1_Нажатие");
Код1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Колонтитул_свойство.os
Перем ДФ, Колонтитул1;
Процедура Свойство() Экспорт
Колонтитул1.Нажатие();
КонецПроцедуры
Процедура Колонтитул1_Нажатие() Экспорт
Сообщить(?(
Колонтитул1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонтитул1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Стиль.Высота = 60;
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Колонтитул1.Нажатие = ДФ.Действие(ЭтотОбъект, "Колонтитул1_Нажатие");
Колонтитул1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Контент_свойство.os
Перем ДФ, Контент1;
Процедура Свойство() Экспорт
Контент1.Нажатие();
КонецПроцедуры
Процедура Контент1_Нажатие() Экспорт
Сообщить(?(
Контент1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Контент_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Контент1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Контент1 = Форма1.Контент;
Контент1.Стиль.Высота = 60;
Контент1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Контент1.Нажатие = ДФ.Действие(ЭтотОбъект, "Контент1_Нажатие");
Контент1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст1;
Процедура Свойство() Экспорт
КурсивТекст1.Нажатие();
КонецПроцедуры
Процедура КурсивТекст1_Нажатие() Экспорт
Сообщить(?(
КурсивТекст1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(КурсивТекст1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Стиль.Высота = 60;
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
КурсивТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "КурсивТекст1_Нажатие");
КурсивТекст1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Линия_свойство.os
Перем ДФ, Линия1;
Процедура Свойство() Экспорт
Линия1.Нажатие();
КонецПроцедуры
Процедура Линия1_Нажатие() Экспорт
Сообщить(?(
Линия1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Линия1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Линия1 = ДФ.Линия();
Линия1.Родитель = Форма1;
Линия1.Стиль.Высота = 60;
Линия1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Линия1.Нажатие = ДФ.Действие(ЭтотОбъект, "Линия1_Нажатие");
Линия1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст1;
Процедура Свойство() Экспорт
МаркированныйТекст1.Нажатие();
КонецПроцедуры
Процедура МаркированныйТекст1_Нажатие() Экспорт
Сообщить(?(
МаркированныйТекст1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МаркированныйТекст1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Стиль.Высота = 60;
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
МаркированныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "МаркированныйТекст1_Нажатие");
МаркированныйТекст1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_МедиаГруппа_свойство.os
Перем ДФ, МедиаГруппа1;
Процедура Свойство() Экспорт
МедиаГруппа1.Нажатие();
КонецПроцедуры
Процедура МедиаГруппа1_Нажатие() Экспорт
Сообщить(?(
МедиаГруппа1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Стиль.Высота = 60;
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
МедиаГруппа1.Нажатие = ДФ.Действие(ЭтотОбъект, "МедиаГруппа1_Нажатие");
МедиаГруппа1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст1;
Процедура Свойство() Экспорт
МелкийТекст1.Нажатие();
КонецПроцедуры
Процедура МелкийТекст1_Нажатие() Экспорт
Сообщить(?(
МелкийТекст1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МелкийТекст1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Стиль.Высота = 60;
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
МелкийТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "МелкийТекст1_Нажатие");
МелкийТекст1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст1;
Процедура Свойство() Экспорт
НадстрочныйТекст1.Нажатие();
КонецПроцедуры
Процедура НадстрочныйТекст1_Нажатие() Экспорт
Сообщить(?(
НадстрочныйТекст1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НадстрочныйТекст1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Стиль.Высота = 60;
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НадстрочныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "НадстрочныйТекст1_Нажатие");
НадстрочныйТекст1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст1;
Процедура Свойство() Экспорт
НаправленныйТекст1.Нажатие();
КонецПроцедуры
Процедура НаправленныйТекст1_Нажатие() Экспорт
Сообщить(?(
НаправленныйТекст1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НаправленныйТекст1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Стиль.Высота = 60;
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НаправленныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "НаправленныйТекст1_Нажатие");
НаправленныйТекст1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_НеупорядоченныйСписок_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Свойство() Экспорт
НеупорядоченныйСписок1.Нажатие();
КонецПроцедуры
Процедура НеупорядоченныйСписок1_Нажатие() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Стиль.Высота = 60;
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НеупорядоченныйСписок1.Нажатие = ДФ.Действие(ЭтотОбъект, "НеупорядоченныйСписок1_Нажатие");
НеупорядоченныйСписок1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_НижнийКолонтитул_свойство.os
Перем ДФ, НижнийКолонтитул1;
Процедура Свойство() Экспорт
НижнийКолонтитул1.Нажатие();
КонецПроцедуры
Процедура НижнийКолонтитул1_Нажатие() Экспорт
Сообщить(?(
НижнийКолонтитул1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Стиль.Высота = 60;
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НижнийКолонтитул1.Нажатие = ДФ.Действие(ЭтотОбъект, "НижнийКолонтитул1_Нажатие");
НижнийКолонтитул1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Область_свойство.os
Перем ДФ, Область1;
Процедура Свойство() Экспорт
Область1.Нажатие();
КонецПроцедуры
Процедура Область1_Нажатие() Экспорт
Сообщить(?(
Область1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Область1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Область1 = ДФ.Область();
Область1.Родитель = Форма1;
Область1.Стиль.Высота = 60;
Область1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Область1.Нажатие = ДФ.Действие(ЭтотОбъект, "Область1_Нажатие");
Область1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ОбластьТаблицы_свойство.os
Перем ДФ, ОбластьТаблицы1;
Процедура Свойство() Экспорт
ОбластьТаблицы1.Нажатие();
КонецПроцедуры
Процедура ОбластьТаблицы1_Нажатие() Экспорт
Сообщить(?(
ОбластьТаблицы1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ОбластьТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТаблицы1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Стиль.Высота = 60;
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ОбластьТаблицы1.Нажатие = ДФ.Действие(ЭтотОбъект, "ОбластьТаблицы1_Нажатие");
ОбластьТаблицы1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
ОбластьТекста1.Нажатие();
КонецПроцедуры
Процедура ОбластьТекста1_Нажатие() Экспорт
Сообщить(?(
ОбластьТекста1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Стиль.Высота = 60;
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ОбластьТекста1.Нажатие = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_Нажатие");
ОбластьТекста1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ОписаниеМедиа_свойство.os
Перем ДФ, ОписаниеМедиа1;
Процедура Свойство() Экспорт
ОписаниеМедиа1.Нажатие();
КонецПроцедуры
Процедура ОписаниеМедиа1_Нажатие() Экспорт
Сообщить(?(
ОписаниеМедиа1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Стиль.Высота = 60;
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ОписаниеМедиа1.Нажатие = ДФ.Действие(ЭтотОбъект, "ОписаниеМедиа1_Нажатие");
ОписаниеМедиа1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Определение_свойство.os
Перем ДФ, Определение1;
Процедура Свойство() Экспорт
Определение1.Нажатие();
КонецПроцедуры
Процедура Определение1_Нажатие() Экспорт
Сообщить(?(
Определение1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Определение1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Стиль.Высота = 60;
Определение1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Определение1.Нажатие = ДФ.Действие(ЭтотОбъект, "Определение1_Нажатие");
Определение1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Переключатель_свойство.os
Перем ДФ, Переключатель1;
Процедура Свойство() Экспорт
Переключатель1.Нажатие();
КонецПроцедуры
Процедура Переключатель1_Нажатие() Экспорт
Сообщить(?(
Переключатель1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Переключатель1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Стиль.Высота = 60;
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Переключатель1.Нажатие = ДФ.Действие(ЭтотОбъект, "Переключатель1_Нажатие");
Переключатель1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Подпись_свойство.os
Перем ДФ, Подпись1;
Процедура Свойство() Экспорт
Подпись1.Нажатие();
КонецПроцедуры
Процедура Подпись1_Нажатие() Экспорт
Сообщить(?(
Подпись1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Подпись1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Стиль.Высота = 60;
Подпись1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Подпись1.Нажатие = ДФ.Действие(ЭтотОбъект, "Подпись1_Нажатие");
Подпись1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Свойство() Экспорт
ПодстрочныйТекст1.Нажатие();
КонецПроцедуры
Процедура ПодстрочныйТекст1_Нажатие() Экспорт
Сообщить(?(
ПодстрочныйТекст1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодстрочныйТекст1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Стиль.Высота = 60;
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПодстрочныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПодстрочныйТекст1_Нажатие");
ПодстрочныйТекст1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Свойство() Экспорт
ПодчеркнутыйТекст1.Нажатие();
КонецПроцедуры
Процедура ПодчеркнутыйТекст1_Нажатие() Экспорт
Сообщить(?(
ПодчеркнутыйТекст1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодчеркнутыйТекст1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Стиль.Высота = 60;
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПодчеркнутыйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПодчеркнутыйТекст1_Нажатие");
ПодчеркнутыйТекст1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
ПолеПароля1.Нажатие();
КонецПроцедуры
Процедура ПолеПароля1_Нажатие() Экспорт
Сообщить(?(
ПолеПароля1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Стиль.Высота = 60;
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеПароля1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_Нажатие");
ПолеПароля1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
ПолеПоиска1.Нажатие();
КонецПроцедуры
Процедура ПолеПоиска1_Нажатие() Экспорт
Сообщить(?(
ПолеПоиска1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Стиль.Высота = 60;
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеПоиска1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_Нажатие");
ПолеПоиска1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
ПолеСписка1.Нажатие();
КонецПроцедуры
Процедура ПолеСписка1_Нажатие() Экспорт
Сообщить(?(
ПолеСписка1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Высота = 60;
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеСписка1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеСписка1_Нажатие");
ПолеСписка1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
ПолеТекста1.Нажатие();
КонецПроцедуры
Процедура ПолеТекста1_Нажатие() Экспорт
Сообщить(?(
ПолеТекста1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Стиль.Высота = 60;
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеТекста1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_Нажатие");
ПолеТекста1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
ПолеЧисла1.Нажатие();
КонецПроцедуры
Процедура ПолеЧисла1_Нажатие() Экспорт
Сообщить(?(
ПолеЧисла1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Стиль.Высота = 60;
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеЧисла1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_Нажатие");
ПолеЧисла1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Ползунок1.Нажатие();
КонецПроцедуры
Процедура Ползунок1_Нажатие() Экспорт
Сообщить(?(
Ползунок1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Стиль.Высота = 60;
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Ползунок1.Нажатие = ДФ.Действие(ЭтотОбъект, "Ползунок1_Нажатие");
Ползунок1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Свойство() Экспорт
РаскрываемыйБлок1.Нажатие();
КонецПроцедуры
Процедура РаскрываемыйБлок1_Нажатие() Экспорт
Сообщить(?(
РаскрываемыйБлок1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(РаскрываемыйБлок1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.Стиль.Высота = 60;
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
РаскрываемыйБлок1.Нажатие = ДФ.Действие(ЭтотОбъект, "РаскрываемыйБлок1_Нажатие");
РаскрываемыйБлок1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Результат_свойство.os
Перем ДФ, Результат1;
Процедура Свойство() Экспорт
Результат1.Нажатие();
КонецПроцедуры
Процедура Результат1_Нажатие() Экспорт
Сообщить(?(
Результат1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Результат1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Стиль.Высота = 60;
Результат1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Результат1.Нажатие = ДФ.Действие(ЭтотОбъект, "Результат1_Нажатие");
Результат1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_СписокОпределений_свойство.os
Перем ДФ, СписокОпределений1;
Процедура Свойство() Экспорт
СписокОпределений1.Нажатие();
КонецПроцедуры
Процедура СписокОпределений1_Нажатие() Экспорт
Сообщить(?(
СписокОпределений1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Стиль.Высота = 60;
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
СписокОпределений1.Нажатие = ДФ.Действие(ЭтотОбъект, "СписокОпределений1_Нажатие");
СписокОпределений1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Свойство() Экспорт
Ссылка1.Нажатие();
КонецПроцедуры
Процедура Ссылка1_Нажатие() Экспорт
Сообщить(?(
Ссылка1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Стиль.Высота = 60;
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Ссылка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Ссылка1_Нажатие");
Ссылка1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаТаблицы1;
Процедура Свойство() Экспорт
СтрокаТаблицы1.Нажатие();
КонецПроцедуры
Процедура СтрокаТаблицы1_Нажатие() Экспорт
Сообщить(?(
СтрокаТаблицы1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СтрокаТаблицы1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Стиль.Высота = 60;
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
СтрокаТаблицы1.Нажатие = ДФ.Действие(ЭтотОбъект, "СтрокаТаблицы1_Нажатие");
СтрокаТаблицы1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Таблица1.Нажатие();
КонецПроцедуры
Процедура Таблица1_Нажатие() Экспорт
Сообщить(?(
Таблица1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Стиль.Высота = 60;
Таблица1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Таблица1.Нажатие = ДФ.Действие(ЭтотОбъект, "Таблица1_Нажатие");
Таблица1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Термин_свойство.os
Перем ДФ, Термин1;
Процедура Свойство() Экспорт
Термин1.Нажатие();
КонецПроцедуры
Процедура Термин1_Нажатие() Экспорт
Сообщить(?(
Термин1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Термин1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Стиль.Высота = 60;
Термин1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Термин1.Нажатие = ДФ.Действие(ЭтотОбъект, "Термин1_Нажатие");
Термин1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст1;
Процедура Свойство() Экспорт
УдаленыйТекст1.Нажатие();
КонецПроцедуры
Процедура УдаленыйТекст1_Нажатие() Экспорт
Сообщить(?(
УдаленыйТекст1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УдаленыйТекст1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Стиль.Высота = 60;
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
УдаленыйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "УдаленыйТекст1_Нажатие");
УдаленыйТекст1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Свойство() Экспорт
УпорядоченныйСписок1.Нажатие();
КонецПроцедуры
Процедура УпорядоченныйСписок1_Нажатие() Экспорт
Сообщить(?(
УпорядоченныйСписок1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Стиль.Высота = 60;
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
УпорядоченныйСписок1.Нажатие = ДФ.Действие(ЭтотОбъект, "УпорядоченныйСписок1_Нажатие");
УпорядоченныйСписок1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Свойство() Экспорт
Флажок1.Нажатие();
КонецПроцедуры
Процедура Флажок1_Нажатие() Экспорт
Сообщить(?(
Флажок1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Стиль.Высота = 60;
Флажок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Флажок1.Нажатие = ДФ.Действие(ЭтотОбъект, "Флажок1_Нажатие");
Флажок1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст1;
Процедура Свойство() Экспорт
ФорматированныйТекст1.Нажатие();
КонецПроцедуры
Процедура ФорматированныйТекст1_Нажатие() Экспорт
Сообщить(?(
ФорматированныйТекст1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Стиль.Высота = 60;
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ФорматированныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "ФорматированныйТекст1_Нажатие");
ФорматированныйТекст1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Холст_свойство.os
Перем ДФ, Холст1;
Процедура Свойство() Экспорт
Холст1.Нажатие();
КонецПроцедуры
Процедура Холст1_Нажатие() Экспорт
Сообщить(?(
Холст1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Холст1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
Холст1.Стиль.Высота = 60;
Холст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Холст1.Нажатие = ДФ.Действие(ЭтотОбъект, "Холст1_Нажатие");
Холст1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ШапкаТаблицы_свойство.os
Перем ДФ, ШапкаТаблицы1;
Процедура Свойство() Экспорт
ШапкаТаблицы1.Нажатие();
КонецПроцедуры
Процедура ШапкаТаблицы1_Нажатие() Экспорт
Сообщить(?(
ШапкаТаблицы1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ШапкаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ШапкаТаблицы1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Стиль.Высота = 60;
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ШапкаТаблицы1.Нажатие = ДФ.Действие(ЭтотОбъект, "ШапкаТаблицы1_Нажатие");
ШапкаТаблицы1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Свойство() Экспорт
Шкала1.Нажатие();
КонецПроцедуры
Процедура Шкала1_Нажатие() Экспорт
Сообщить(?(
Шкала1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Шкала1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Шкала1.Стиль.Высота = 60;
Шкала1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Шкала1.Нажатие = ДФ.Действие(ЭтотОбъект, "Шкала1_Нажатие");
Шкала1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Свойство() Экспорт
ЭлементПоляСписка1.Нажатие();
КонецПроцедуры
Процедура ЭлементПоляСписка1_Нажатие() Экспорт
Сообщить(?(
ЭлементПоляСписка1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Стиль.Высота = 60;
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЭлементПоляСписка1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЭлементПоляСписка1_Нажатие");
ЭлементПоляСписка1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ЭлементСписка_свойство.os
Перем ДФ, ЭлементСписка1;
Процедура Свойство() Экспорт
ЭлементСписка1.Нажатие();
КонецПроцедуры
Процедура ЭлементСписка1_Нажатие() Экспорт
Сообщить(?(
ЭлементСписка1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Стиль.Высота = 60;
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЭлементСписка1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЭлементСписка1_Нажатие");
ЭлементСписка1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Свойство() Экспорт
Ячейка1.Нажатие();
КонецПроцедуры
Процедура Ячейка1_Нажатие() Экспорт
Сообщить(?(
Ячейка1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ячейка1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Стиль.Высота = 60;
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Ячейка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Ячейка1_Нажатие");
Ячейка1.КлавишаДоступа = "w";
Форма1.Открыть();
КлавишаДоступа_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура Свойство() Экспорт
ЯчейкаЗаголовка1.Нажатие();
КонецПроцедуры
Процедура ЯчейкаЗаголовка1_Нажатие() Экспорт
Сообщить(?(
ЯчейкаЗаголовка1.КлавишаДоступа = "w"
, "", "!!! ") + "КлавишаДоступа_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка1, "КлавишаДоступа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Стиль.Высота = 60;
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЯчейкаЗаголовка1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЯчейкаЗаголовка1_Нажатие");
ЯчейкаЗаголовка1.КлавишаДоступа = "w";
Форма1.Открыть();
Класс_Абзац_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Класс = "класс1"
, "", "!!! ") + "Класс_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Это Элемент";
Абзац1.Класс = "класс1";
Форма1.Открыть();
Класс_Артикль_свойство.os
Перем ДФ, Артикль1;
Процедура Свойство() Экспорт
Сообщить(?(
Артикль1.Класс = "класс1"
, "", "!!! ") + "Класс_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Артикль1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Артикль1 = Форма1.ДобавитьДочерний(ДФ.Артикль());
Артикль1.Текст = "Это Элемент";
Артикль1.Класс = "класс1";
Форма1.Открыть();
Класс_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Аудио1.Класс = "класс1"
, "", "!!! ") + "Класс_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = Форма1.ДобавитьДочерний(ДФ.Аудио());
Аудио1.Класс = "класс1";
Форма1.Открыть();
Класс_Блок_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Класс = "класс1"
, "", "!!! ") + "Класс_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Текст = "Это Элемент";
Блок1.Класс = "класс1";
Форма1.Открыть();
Класс_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.Класс = "класс1"
, "", "!!! ") + "Класс_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
ВыборВремени1.Класс = "класс1";
Форма1.Открыть();
Класс_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.Класс = "класс1"
, "", "!!! ") + "Класс_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДаты1 = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
ВыборДаты1.Класс = "класс1";
Форма1.Открыть();
Класс_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.Класс = "класс1"
, "", "!!! ") + "Класс_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
ВыборДатыВремени1.Класс = "класс1";
Форма1.Открыть();
Класс_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Класс = "класс1"
, "", "!!! ") + "Класс_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМестнойДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
ВыборМестнойДатыВремени1.Класс = "класс1";
Форма1.Открыть();
Класс_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.Класс = "класс1"
, "", "!!! ") + "Класс_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМесяца1 = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
ВыборМесяца1.Класс = "класс1";
Форма1.Открыть();
Класс_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.Класс = "класс1"
, "", "!!! ") + "Класс_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборНедели1 = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
ВыборНедели1.Класс = "класс1";
Форма1.Открыть();
Класс_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборФайла1.Класс = "класс1"
, "", "!!! ") + "Класс_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборФайла1 = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
ВыборФайла1.Класс = "класс1";
Форма1.Открыть();
Класс_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборЦвета1.Класс = "класс1"
, "", "!!! ") + "Класс_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборЦвета1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборЦвета1 = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
ВыборЦвета1.Класс = "класс1";
Форма1.Открыть();
Класс_Группа_свойство.os
Перем ДФ, Группа1;
Процедура Свойство() Экспорт
Сообщить(?(
Группа1.Класс = "класс1"
, "", "!!! ") + "Класс_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Группа1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Группа1 = Форма1.ДобавитьДочерний(ДФ.Группа());
Группа1.Текст = "Это Элемент";
Группа1.Класс = "класс1";
Форма1.Открыть();
Класс_ГруппаКолонок_свойство.os
Перем ДФ, ГруппаКолонок1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппаКолонок1.Класс = "класс1"
, "", "!!! ") + "Класс_ГруппаКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппаКолонок1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГруппаКолонок1 = Форма1.ДобавитьДочерний(ДФ.ГруппаКолонок());
ГруппаКолонок1.Класс = "класс1";
Форма1.Открыть();
Класс_ГруппировкаПоляСписка_свойство.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.Класс = "класс1"
, "", "!!! ") + "Класс_ГруппировкаПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппировкаПоляСписка1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГруппировкаПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ГруппировкаПоляСписка());
ГруппировкаПоляСписка1.Класс = "класс1";
Форма1.Открыть();
Класс_Диалог_свойство.os
Перем ДФ, Диалог1;
Процедура Свойство() Экспорт
Сообщить(?(
Диалог1.Класс = "класс1"
, "", "!!! ") + "Класс_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Диалог1 = Форма1.ДобавитьДочерний(ДФ.Диалог());
Диалог1.Текст = "Это Элемент";
Диалог1.Класс = "класс1";
Форма1.Открыть();
Класс_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
ДополнительныйБлок1.Класс = "класс1"
, "", "!!! ") + "Класс_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ДополнительныйБлок1 = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
ДополнительныйБлок1.Текст = "Это Элемент";
ДополнительныйБлок1.Класс = "класс1";
Форма1.Открыть();
Класс_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ЖирныйТекст1.Класс = "класс1"
, "", "!!! ") + "Класс_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЖирныйТекст1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЖирныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
ЖирныйТекст1.Текст = "Это Элемент";
ЖирныйТекст1.Класс = "класс1";
Форма1.Открыть();
Класс_Заголовок1_свойство.os
Перем ДФ, Заголовок11;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок11.Класс = "класс1"
, "", "!!! ") + "Класс_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок11, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок11 = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок11.Текст = "Это Элемент";
Заголовок11.Класс = "класс1";
Форма1.Открыть();
Класс_Заголовок2_свойство.os
Перем ДФ, Заголовок21;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок21.Класс = "класс1"
, "", "!!! ") + "Класс_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок21, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок21 = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок21.Текст = "Это Элемент";
Заголовок21.Класс = "класс1";
Форма1.Открыть();
Класс_Заголовок3_свойство.os
Перем ДФ, Заголовок31;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок31.Класс = "класс1"
, "", "!!! ") + "Класс_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок31, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок31 = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок31.Текст = "Это Элемент";
Заголовок31.Класс = "класс1";
Форма1.Открыть();
Класс_Заголовок4_свойство.os
Перем ДФ, Заголовок41;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок41.Класс = "класс1"
, "", "!!! ") + "Класс_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок41, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок41 = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Заголовок41.Текст = "Это Элемент";
Заголовок41.Класс = "класс1";
Форма1.Открыть();
Класс_Заголовок5_свойство.os
Перем ДФ, Заголовок51;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок51.Класс = "класс1"
, "", "!!! ") + "Класс_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок51, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок51 = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Заголовок51.Текст = "Это Элемент";
Заголовок51.Класс = "класс1";
Форма1.Открыть();
Класс_Заголовок6_свойство.os
Перем ДФ, Заголовок61;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок61.Класс = "класс1"
, "", "!!! ") + "Класс_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок61, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок61 = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Заголовок61.Текст = "Это Элемент";
Заголовок61.Класс = "класс1";
Форма1.Открыть();
Класс_Заголовок_свойство.os
Перем ДФ, Заголовок1;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок1.Класс = "класс1"
, "", "!!! ") + "Класс_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок1 = Форма1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Это Элемент";
Заголовок1.Класс = "класс1";
Форма1.Открыть();
Класс_ЗаголовокГруппы_свойство.os
Перем ДФ, ЗаголовокГруппы1;
Процедура Свойство() Экспорт
Сообщить(?(
ЗаголовокГруппы1.Класс = "класс1"
, "", "!!! ") + "Класс_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокГруппы1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокГруппы());
ЗаголовокГруппы1.Текст = "Это Элемент";
ЗаголовокГруппы1.Класс = "класс1";
Форма1.Открыть();
Класс_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура Свойство() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.Класс = "класс1"
, "", "!!! ") + "Класс_ЗаголовокРаскрываемогоБлока_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокРаскрываемогоБлока1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокРаскрываемогоБлока());
ЗаголовокРаскрываемогоБлока1.Текст = "Это Элемент";
ЗаголовокРаскрываемогоБлока1.Класс = "класс1";
Форма1.Открыть();
Класс_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.Класс = "класс1"
, "", "!!! ") + "Класс_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Класс = "класс1";
Форма1.Открыть();
Класс_Индикатор_свойство.os
Перем ДФ, Индикатор1;
Процедура Свойство() Экспорт
Сообщить(?(
Индикатор1.Класс = "класс1"
, "", "!!! ") + "Класс_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Индикатор1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Индикатор1 = Форма1.ДобавитьДочерний(ДФ.Индикатор());
Индикатор1.Класс = "класс1";
Форма1.Открыть();
Класс_Итоги_свойство.os
Перем ДФ, Итоги1;
Процедура Свойство() Экспорт
Сообщить(?(
Итоги1.Класс = "класс1"
, "", "!!! ") + "Класс_Итоги_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Итоги1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Итоги1 = Форма1.ДобавитьДочерний(ДФ.Итоги());
Итоги1.Текст = "Это Элемент";
Итоги1.Класс = "класс1";
Форма1.Открыть();
Класс_Карта_свойство.os
Перем ДФ, Карта1;
Процедура Свойство() Экспорт
Сообщить(?(
Карта1.Класс = "класс1"
, "", "!!! ") + "Класс_Карта_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Карта1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Карта1 = Форма1.ДобавитьДочерний(ДФ.Карта());
Карта1.Текст = "Это Элемент";
Карта1.Класс = "класс1";
Форма1.Открыть();
Класс_Кнопка_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Сообщить(?(
Кнопка1.Класс = "класс1"
, "", "!!! ") + "Класс_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Это Элемент";
Кнопка1.Класс = "класс1";
Форма1.Открыть();
Класс_Код_свойство.os
Перем ДФ, Код1;
Процедура Свойство() Экспорт
Сообщить(?(
Код1.Класс = "класс1"
, "", "!!! ") + "Класс_Код_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Код1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Код1 = Форма1.ДобавитьДочерний(ДФ.Код());
Код1.Текст = "Это Элемент";
Код1.Класс = "класс1";
Форма1.Открыть();
Класс_Колонка_свойство.os
Перем ДФ, Колонка1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонка1.Класс = "класс1"
, "", "!!! ") + "Класс_Колонка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонка1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонка1 = Форма1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Класс = "класс1";
Форма1.Открыть();
Класс_Колонтитул_свойство.os
Перем ДФ, Колонтитул1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонтитул1.Класс = "класс1"
, "", "!!! ") + "Класс_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонтитул1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонтитул1 = Форма1.ДобавитьДочерний(ДФ.Колонтитул());
Колонтитул1.Текст = "Это Элемент";
Колонтитул1.Класс = "класс1";
Форма1.Открыть();
Класс_Контент_свойство.os
Перем ДФ, Контент1;
Процедура Свойство() Экспорт
Сообщить(?(
Контент1.Класс = "класс1"
, "", "!!! ") + "Класс_Контент_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Контент1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент1 = Форма1.Контент;
Контент1.Класс = "класс1";
Форма1.Открыть();
Класс_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
КурсивТекст1.Класс = "класс1"
, "", "!!! ") + "Класс_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(КурсивТекст1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
КурсивТекст1 = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
КурсивТекст1.Текст = "Это Элемент";
КурсивТекст1.Класс = "класс1";
Форма1.Открыть();
Класс_Линия_свойство.os
Перем ДФ, Линия1;
Процедура Свойство() Экспорт
Сообщить(?(
Линия1.Класс = "класс1"
, "", "!!! ") + "Класс_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Линия1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Линия1 = Форма1.ДобавитьДочерний(ДФ.Линия());
Линия1.Текст = "Это Элемент";
Линия1.Класс = "класс1";
Форма1.Открыть();
Класс_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
МаркированныйТекст1.Класс = "класс1"
, "", "!!! ") + "Класс_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МаркированныйТекст1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МаркированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
МаркированныйТекст1.Текст = "Это Элемент";
МаркированныйТекст1.Класс = "класс1";
Форма1.Открыть();
Класс_МедиаГруппа_свойство.os
Перем ДФ, МедиаГруппа1;
Процедура Свойство() Экспорт
Сообщить(?(
МедиаГруппа1.Класс = "класс1"
, "", "!!! ") + "Класс_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МедиаГруппа1 = Форма1.ДобавитьДочерний(ДФ.МедиаГруппа());
МедиаГруппа1.Текст = "Это Элемент";
МедиаГруппа1.Класс = "класс1";
Форма1.Открыть();
Класс_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
МелкийТекст1.Класс = "класс1"
, "", "!!! ") + "Класс_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МелкийТекст1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МелкийТекст1 = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
МелкийТекст1.Текст = "Это Элемент";
МелкийТекст1.Класс = "класс1";
Форма1.Открыть();
Класс_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
НадстрочныйТекст1.Класс = "класс1"
, "", "!!! ") + "Класс_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НадстрочныйТекст1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НадстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
НадстрочныйТекст1.Текст = "Это Элемент";
НадстрочныйТекст1.Класс = "класс1";
Форма1.Открыть();
Класс_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
НаправленныйТекст1.Класс = "класс1"
, "", "!!! ") + "Класс_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НаправленныйТекст1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НаправленныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
НаправленныйТекст1.Текст = "Это Элемент";
НаправленныйТекст1.Класс = "класс1";
Форма1.Открыть();
Класс_НеупорядоченныйСписок_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.Класс = "класс1"
, "", "!!! ") + "Класс_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НеупорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
НеупорядоченныйСписок1.Текст = "Это Элемент";
НеупорядоченныйСписок1.Класс = "класс1";
Форма1.Открыть();
Класс_НижнийКолонтитул_свойство.os
Перем ДФ, НижнийКолонтитул1;
Процедура Свойство() Экспорт
Сообщить(?(
НижнийКолонтитул1.Класс = "класс1"
, "", "!!! ") + "Класс_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НижнийКолонтитул1 = Форма1.ДобавитьДочерний(ДФ.НижнийКолонтитул());
НижнийКолонтитул1.Текст = "Это Элемент";
НижнийКолонтитул1.Класс = "класс1";
Форма1.Открыть();
Класс_Область_свойство.os
Перем ДФ, Область1;
Процедура Свойство() Экспорт
Сообщить(?(
Область1.Класс = "класс1"
, "", "!!! ") + "Класс_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Область1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Область1 = Форма1.ДобавитьДочерний(ДФ.Область());
Область1.Текст = "Это Элемент";
Область1.Класс = "класс1";
Форма1.Открыть();
Класс_ОбластьТаблицы_свойство.os
Перем ДФ, ОбластьТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТаблицы1.Класс = "класс1"
, "", "!!! ") + "Класс_ОбластьТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТаблицы1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
ОбластьТаблицы1.Текст = "Это Элемент";
ОбластьТаблицы1.Класс = "класс1";
Форма1.Открыть();
Класс_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.Класс = "класс1"
, "", "!!! ") + "Класс_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Класс = "класс1";
Форма1.Открыть();
Класс_ОписаниеМедиа_свойство.os
Перем ДФ, ОписаниеМедиа1;
Процедура Свойство() Экспорт
Сообщить(?(
ОписаниеМедиа1.Класс = "класс1"
, "", "!!! ") + "Класс_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОписаниеМедиа1 = Форма1.ДобавитьДочерний(ДФ.ОписаниеМедиа());
ОписаниеМедиа1.Текст = "Это Элемент";
ОписаниеМедиа1.Класс = "класс1";
Форма1.Открыть();
Класс_Определение_свойство.os
Перем ДФ, Определение1;
Процедура Свойство() Экспорт
Сообщить(?(
Определение1.Класс = "класс1"
, "", "!!! ") + "Класс_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Определение1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Определение1 = Форма1.ДобавитьДочерний(ДФ.Определение());
Определение1.Текст = "Это Элемент";
Определение1.Класс = "класс1";
Форма1.Открыть();
Класс_Переключатель_свойство.os
Перем ДФ, Переключатель1;
Процедура Свойство() Экспорт
Сообщить(?(
Переключатель1.Класс = "класс1"
, "", "!!! ") + "Класс_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Переключатель1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Переключатель1 = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель1.Класс = "класс1";
Форма1.Открыть();
Класс_Перенос_свойство.os
Перем ДФ, Перенос1;
Процедура Свойство() Экспорт
Сообщить(?(
Перенос1.Класс = "класс1"
, "", "!!! ") + "Класс_Перенос_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Перенос1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Перенос1 = Форма1.ДобавитьДочерний(ДФ.Перенос());
Перенос1.Класс = "класс1";
Форма1.Открыть();
Класс_Подпись_свойство.os
Перем ДФ, Подпись1;
Процедура Свойство() Экспорт
Сообщить(?(
Подпись1.Класс = "класс1"
, "", "!!! ") + "Класс_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Подпись1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Подпись1 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Текст = "Это Элемент";
Подпись1.Класс = "класс1";
Форма1.Открыть();
Класс_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ПодстрочныйТекст1.Класс = "класс1"
, "", "!!! ") + "Класс_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодстрочныйТекст1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
ПодстрочныйТекст1.Текст = "Это Элемент";
ПодстрочныйТекст1.Класс = "класс1";
Форма1.Открыть();
Класс_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ПодчеркнутыйТекст1.Класс = "класс1"
, "", "!!! ") + "Класс_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодчеркнутыйТекст1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодчеркнутыйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
ПодчеркнутыйТекст1.Текст = "Это Элемент";
ПодчеркнутыйТекст1.Класс = "класс1";
Форма1.Открыть();
Класс_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.Класс = "класс1"
, "", "!!! ") + "Класс_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПароля1 = Форма1.ДобавитьДочерний(ДФ.ПолеПароля());
ПолеПароля1.Класс = "класс1";
Форма1.Открыть();
Класс_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.Класс = "класс1"
, "", "!!! ") + "Класс_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПоиска1 = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
ПолеПоиска1.Класс = "класс1";
Форма1.Открыть();
Класс_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.Класс = "класс1"
, "", "!!! ") + "Класс_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеСписка1 = Форма1.ДобавитьДочерний(ДФ.ПолеСписка());
ПолеСписка1.Класс = "класс1";
Форма1.Открыть();
Класс_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.Класс = "класс1"
, "", "!!! ") + "Класс_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеТекста1 = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
ПолеТекста1.Класс = "класс1";
Форма1.Открыть();
Класс_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.Класс = "класс1"
, "", "!!! ") + "Класс_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеЧисла1 = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Класс = "класс1";
Форма1.Открыть();
Класс_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.Класс = "класс1"
, "", "!!! ") + "Класс_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ползунок1 = Форма1.ДобавитьДочерний(ДФ.Ползунок());
Ползунок1.Класс = "класс1";
Форма1.Открыть();
Класс_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
РаскрываемыйБлок1.Класс = "класс1"
, "", "!!! ") + "Класс_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(РаскрываемыйБлок1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
РаскрываемыйБлок1.Класс = "класс1";
Форма1.Открыть();
Класс_Результат_свойство.os
Перем ДФ, Результат1;
Процедура Свойство() Экспорт
Сообщить(?(
Результат1.Класс = "класс1"
, "", "!!! ") + "Класс_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Результат1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Результат1 = Форма1.ДобавитьДочерний(ДФ.Результат());
Результат1.Текст = "Это Элемент";
Результат1.Класс = "класс1";
Форма1.Открыть();
Класс_СписокОпределений_свойство.os
Перем ДФ, СписокОпределений1;
Процедура Свойство() Экспорт
Сообщить(?(
СписокОпределений1.Класс = "класс1"
, "", "!!! ") + "Класс_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СписокОпределений1 = Форма1.ДобавитьДочерний(ДФ.СписокОпределений());
СписокОпределений1.Текст = "Это Элемент";
СписокОпределений1.Класс = "класс1";
Форма1.Открыть();
Класс_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ссылка1.Класс = "класс1"
, "", "!!! ") + "Класс_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ссылка1 = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка1.Текст = "Это Элемент";
Ссылка1.Класс = "класс1";
Форма1.Открыть();
Класс_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
СтрокаТаблицы1.Класс = "класс1"
, "", "!!! ") + "Класс_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СтрокаТаблицы1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СтрокаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаТаблицы1.Текст = "Это Элемент";
СтрокаТаблицы1.Класс = "класс1";
Форма1.Открыть();
Класс_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Сообщить(?(
Таблица1.Класс = "класс1"
, "", "!!! ") + "Класс_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Текст = "Это Элемент";
Таблица1.Класс = "класс1";
Форма1.Открыть();
Класс_Термин_свойство.os
Перем ДФ, Термин1;
Процедура Свойство() Экспорт
Сообщить(?(
Термин1.Класс = "класс1"
, "", "!!! ") + "Класс_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Термин1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Термин1 = Форма1.ДобавитьДочерний(ДФ.Термин());
Термин1.Текст = "Это Элемент";
Термин1.Класс = "класс1";
Форма1.Открыть();
Класс_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
УдаленыйТекст1.Класс = "класс1"
, "", "!!! ") + "Класс_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УдаленыйТекст1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УдаленыйТекст1 = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
УдаленыйТекст1.Текст = "Это Элемент";
УдаленыйТекст1.Класс = "класс1";
Форма1.Открыть();
Класс_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
УпорядоченныйСписок1.Класс = "класс1"
, "", "!!! ") + "Класс_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УпорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.УпорядоченныйСписок());
УпорядоченныйСписок1.Текст = "Это Элемент";
УпорядоченныйСписок1.Класс = "класс1";
Форма1.Открыть();
Класс_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Свойство() Экспорт
Сообщить(?(
Флажок1.Класс = "класс1"
, "", "!!! ") + "Класс_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Флажок1 = Форма1.ДобавитьДочерний(ДФ.Флажок());
Флажок1.Класс = "класс1";
Форма1.Открыть();
Класс_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ФорматированныйТекст1.Класс = "класс1"
, "", "!!! ") + "Класс_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ФорматированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
ФорматированныйТекст1.Текст = "Это Элемент";
ФорматированныйТекст1.Класс = "класс1";
Форма1.Открыть();
Класс_Фрейм_свойство.os
Перем ДФ, Фрейм1;
Процедура Свойство() Экспорт
Сообщить(?(
Фрейм1.Класс = "класс1"
, "", "!!! ") + "Класс_Фрейм_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Фрейм1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Фрейм1 = Форма1.ДобавитьДочерний(ДФ.Фрейм());
Фрейм1.Класс = "класс1";
Форма1.Открыть();
Класс_Холст_свойство.os
Перем ДФ, Холст1;
Процедура Свойство() Экспорт
Сообщить(?(
Холст1.Класс = "класс1"
, "", "!!! ") + "Класс_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Холст1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Класс = "класс1";
Форма1.Открыть();
Класс_ШапкаТаблицы_свойство.os
Перем ДФ, ШапкаТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
ШапкаТаблицы1.Класс = "класс1"
, "", "!!! ") + "Класс_ШапкаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ШапкаТаблицы1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ШапкаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
ШапкаТаблицы1.Текст = "Это Элемент";
ШапкаТаблицы1.Класс = "класс1";
Форма1.Открыть();
Класс_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Свойство() Экспорт
Сообщить(?(
Шкала1.Класс = "класс1"
, "", "!!! ") + "Класс_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Шкала1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Шкала1 = Форма1.ДобавитьДочерний(ДФ.Шкала());
Шкала1.Класс = "класс1";
Форма1.Открыть();
Класс_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементПоляСписка1.Класс = "класс1"
, "", "!!! ") + "Класс_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементПоляСписка());
ЭлементПоляСписка1.Текст = "Это Элемент";
ЭлементПоляСписка1.Класс = "класс1";
Форма1.Открыть();
Класс_ЭлементСписка_свойство.os
Перем ДФ, ЭлементСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементСписка1.Класс = "класс1"
, "", "!!! ") + "Класс_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Это Элемент";
ЭлементСписка1.Класс = "класс1";
Форма1.Открыть();
Класс_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ячейка1.Класс = "класс1"
, "", "!!! ") + "Класс_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ячейка1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ячейка1 = Форма1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Это Элемент";
Ячейка1.Класс = "класс1";
Форма1.Открыть();
Класс_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЯчейкаЗаголовка1.Класс = "класс1"
, "", "!!! ") + "Класс_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка1, "Класс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЯчейкаЗаголовка1 = Форма1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Это Элемент";
ЯчейкаЗаголовка1.Класс = "класс1";
Форма1.Открыть();
КлючЭлемента_Абзац_свойство.os
Перем ДФ, Абзац1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Абзац1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Абзац";
КлючЭлемента = Абзац1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Артикль_свойство.os
Перем ДФ, Артикль1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Артикль1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Текст = "Это Артикль";
КлючЭлемента = Артикль1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Аудио_свойство.os
Перем ДФ, Аудио1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Аудио1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
КлючЭлемента = Аудио1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Блок_свойство.os
Перем ДФ, Блок1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Блок1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Это Блок";
КлючЭлемента = Блок1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборВремени1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
КлючЭлемента = ВыборВремени1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборДаты1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
КлючЭлемента = ВыборДаты1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборДатыВремени1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
КлючЭлемента = ВыборДатыВремени1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
КлючЭлемента = ВыборМестнойДатыВремени1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборМесяца1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
КлючЭлемента = ВыборМесяца1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборНедели1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
КлючЭлемента = ВыборНедели1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборФайла1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
КлючЭлемента = ВыборФайла1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборЦвета1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
КлючЭлемента = ВыборЦвета1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Группа_свойство.os
Перем ДФ, Группа1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Группа1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Текст = "Это Группа";
КлючЭлемента = Группа1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ГруппаКолонок_свойство.os
Перем ДФ, ГруппаКолонок1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ГруппаКолонок1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ГруппаКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Форма1;
КлючЭлемента = ГруппаКолонок1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ГруппировкаПоляСписка_свойство.os
Перем ДФ, ГруппировкаПоляСписка1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ГруппировкаПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
КлючЭлемента = ГруппировкаПоляСписка1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Диалог_свойство.os
Перем ДФ, Диалог1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Диалог1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Текст = "Это Диалог";
КлючЭлемента = Диалог1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДополнительныйБлок1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "Это ДополнительныйБлок";
КлючЭлемента = ДополнительныйБлок1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЖирныйТекст1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Текст = "Это ЖирныйТекст";
КлючЭлемента = ЖирныйТекст1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Заголовок1_свойство.os
Перем ДФ, Заголовок11, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок11.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Текст = "Это Заголовок1";
КлючЭлемента = Заголовок11.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Заголовок2_свойство.os
Перем ДФ, Заголовок21, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок21.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Текст = "Это Заголовок2";
КлючЭлемента = Заголовок21.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Заголовок3_свойство.os
Перем ДФ, Заголовок31, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок31.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Текст = "Это Заголовок3";
КлючЭлемента = Заголовок31.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Заголовок4_свойство.os
Перем ДФ, Заголовок41, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок41.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Текст = "Это Заголовок4";
КлючЭлемента = Заголовок41.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Заголовок5_свойство.os
Перем ДФ, Заголовок51, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок51.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Текст = "Это Заголовок5";
КлючЭлемента = Заголовок51.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Заголовок6_свойство.os
Перем ДФ, Заголовок61, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок61.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Текст = "Это Заголовок6";
КлючЭлемента = Заголовок61.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Заголовок_свойство.os
Перем ДФ, Заголовок1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Текст = "Это Заголовок";
КлючЭлемента = Заголовок1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ЗаголовокГруппы_свойство.os
Перем ДФ, ЗаголовокГруппы1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЗаголовокГруппы1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Текст = "Это ЗаголовокГруппы";
КлючЭлемента = ЗаголовокГруппы1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ЗаголовокРаскрываемогоБлока_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Текст = "Это ЗаголовокРаскрываемогоБлока";
КлючЭлемента = ЗаголовокРаскрываемогоБлока1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Изображение_свойство.os
Перем ДФ, Изображение1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Изображение1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
КлючЭлемента = Изображение1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Индикатор_свойство.os
Перем ДФ, Индикатор1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Индикатор1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
КлючЭлемента = Индикатор1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Итоги_свойство.os
Перем ДФ, Итоги1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Итоги1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Итоги_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Текст = "Это Итоги";
КлючЭлемента = Итоги1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Кадры_свойство.os
Перем ДФ, Кадры1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Кадры1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Кадры_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кадры1 = ДФ.Кадры();
КлючЭлемента = Кадры1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Карта_свойство.os
Перем ДФ, Карта1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Карта1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Карта_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Карта1 = ДФ.Карта();
Карта1.Родитель = Форма1;
Карта1.Текст = "Это Карта";
КлючЭлемента = Карта1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Кнопка_свойство.os
Перем ДФ, Кнопка1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Кнопка1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка";
КлючЭлемента = Кнопка1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Код_свойство.os
Перем ДФ, Код1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Код1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Код_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Текст = "Это Код";
КлючЭлемента = Код1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Колонка_свойство.os
Перем ДФ, Колонка1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Колонка1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Колонка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = Форма1;
КлючЭлемента = Колонка1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Колонтитул_свойство.os
Перем ДФ, Колонтитул1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Колонтитул1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Текст = "Это Колонтитул";
КлючЭлемента = Колонтитул1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Контент_свойство.os
Перем ДФ, Контент1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контент1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Контент_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент1 = Форма1.Контент;
Контент1.Текст = "Это Контент";
КлючЭлемента = Контент1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
КурсивТекст1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Текст = "Это КурсивТекст";
КлючЭлемента = КурсивТекст1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Линия_свойство.os
Перем ДФ, Линия1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Линия1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Линия1 = ДФ.Линия();
Линия1.Родитель = Форма1;
Линия1.Текст = "Это Линия";
КлючЭлемента = Линия1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МаркированныйТекст1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Текст = "Это МаркированныйТекст";
КлючЭлемента = МаркированныйТекст1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_МедиаГруппа_свойство.os
Перем ДФ, МедиаГруппа1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МедиаГруппа1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Текст = "Это МедиаГруппа";
КлючЭлемента = МедиаГруппа1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МелкийТекст1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Текст = "Это МелкийТекст";
КлючЭлемента = МелкийТекст1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Меню_свойство.os
Перем ДФ, Меню1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Меню1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Меню_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Меню1 = ДФ.Меню(ДФ.ТипМеню.Главное);
КлючЭлемента = Меню1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НадстрочныйТекст1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Текст = "Это НадстрочныйТекст";
КлючЭлемента = НадстрочныйТекст1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НаправленныйТекст1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Текст = "Это НаправленныйТекст";
КлючЭлемента = НаправленныйТекст1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_НеупорядоченныйСписок_свойство.os
Перем ДФ, НеупорядоченныйСписок1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Текст = "Это НеупорядоченныйСписок";
КлючЭлемента = НеупорядоченныйСписок1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_НижнийКолонтитул_свойство.os
Перем ДФ, НижнийКолонтитул1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НижнийКолонтитул1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Текст = "Это НижнийКолонтитул";
КлючЭлемента = НижнийКолонтитул1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Область_свойство.os
Перем ДФ, Область1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Область1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Область1 = ДФ.Область();
Область1.Родитель = Форма1;
Область1.Текст = "Это Область";
КлючЭлемента = Область1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ОбластьТаблицы_свойство.os
Перем ДФ, ОбластьТаблицы1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОбластьТаблицы1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ОбластьТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Текст = "Это ОбластьТаблицы";
КлючЭлемента = ОбластьТаблицы1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОбластьТекста1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
КлючЭлемента = ОбластьТекста1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ОписаниеМедиа_свойство.os
Перем ДФ, ОписаниеМедиа1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОписаниеМедиа1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Текст = "Это ОписаниеМедиа";
КлючЭлемента = ОписаниеМедиа1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Определение_свойство.os
Перем ДФ, Определение1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Определение1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Текст = "Это Определение";
КлючЭлемента = Определение1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Переключатель_свойство.os
Перем ДФ, Переключатель1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Переключатель1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
КлючЭлемента = Переключатель1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Перенос_свойство.os
Перем ДФ, Перенос1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Перенос1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Перенос_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Перенос1 = ДФ.Перенос();
Перенос1.Родитель = Форма1;
КлючЭлемента = Перенос1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Подпись_свойство.os
Перем ДФ, Подпись1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Подпись1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Это Подпись";
КлючЭлемента = Подпись1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПодстрочныйТекст1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Текст = "Это ПодстрочныйТекст";
КлючЭлемента = ПодстрочныйТекст1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПодчеркнутыйТекст1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Текст = "Это ПодчеркнутыйТекст";
КлючЭлемента = ПодчеркнутыйТекст1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеПароля1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
КлючЭлемента = ПолеПароля1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеПоиска1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
КлючЭлемента = ПолеПоиска1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеСписка1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
КлючЭлемента = ПолеСписка1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеТекста1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
КлючЭлемента = ПолеТекста1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеЧисла1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
КлючЭлемента = ПолеЧисла1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Ползунок_свойство.os
Перем ДФ, Ползунок1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Ползунок1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
КлючЭлемента = Ползунок1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
РаскрываемыйБлок1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
КлючЭлемента = РаскрываемыйБлок1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Результат_свойство.os
Перем ДФ, Результат1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Результат1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Текст = "Это Результат";
КлючЭлемента = Результат1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Скрипт_свойство.os
Перем ДФ, Скрипт1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Скрипт1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Скрипт_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Скрипт1 = ДФ.Скрипт();
Скрипт1.Родитель = Форма1;
Скрипт1.Текст = "
|let str;
|str = ""Добавили JavaScript-код"";
|//alert(str);
|";
КлючЭлемента = Скрипт1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_СписокОпределений_свойство.os
Перем ДФ, СписокОпределений1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СписокОпределений1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Текст = "Это СписокОпределений";
КлючЭлемента = СписокОпределений1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Ссылка_свойство.os
Перем ДФ, Ссылка1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Ссылка1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Текст = "Это Ссылка";
КлючЭлемента = Ссылка1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаТаблицы1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СтрокаТаблицы1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Текст = "Это СтрокаТаблицы";
КлючЭлемента = СтрокаТаблицы1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Таблица_свойство.os
Перем ДФ, Таблица1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Таблица1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Текст = "Это Таблица";
КлючЭлемента = Таблица1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Термин_свойство.os
Перем ДФ, Термин1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Термин1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Текст = "Это Термин";
КлючЭлемента = Термин1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
УдаленыйТекст1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Текст = "Это УдаленыйТекст";
КлючЭлемента = УдаленыйТекст1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
УпорядоченныйСписок1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Текст = "Это УпорядоченныйСписок";
КлючЭлемента = УпорядоченныйСписок1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Флажок_свойство.os
Перем ДФ, Флажок1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Флажок1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
КлючЭлемента = Флажок1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Форма_свойство.os
Перем ДФ, Форма1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Форма1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Форма_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
КлючЭлемента = Форма1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ФорматированныйТекст1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Текст = "Это ФорматированныйТекст";
КлючЭлемента = ФорматированныйТекст1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Фрейм_свойство.os
Перем ДФ, Фрейм1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Фрейм1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Фрейм_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Фрейм1 = ДФ.Фрейм();
Фрейм1.Родитель = Форма1;
КлючЭлемента = Фрейм1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Холст_свойство.os
Перем ДФ, Холст1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Холст1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
КлючЭлемента = Холст1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ШапкаТаблицы_свойство.os
Перем ДФ, ШапкаТаблицы1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ШапкаТаблицы1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ШапкаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Текст = "Это ШапкаТаблицы";
КлючЭлемента = ШапкаТаблицы1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Шкала_свойство.os
Перем ДФ, Шкала1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Шкала1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
КлючЭлемента = Шкала1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЭлементПоляСписка1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Текст = "Это ЭлементПоляСписка";
КлючЭлемента = ЭлементПоляСписка1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ЭлементСписка_свойство.os
Перем ДФ, ЭлементСписка1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЭлементСписка1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Текст = "Это ЭлементСписка";
КлючЭлемента = ЭлементСписка1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_Ячейка_свойство.os
Перем ДФ, Ячейка1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Ячейка1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Текст = "Это Ячейка";
КлючЭлемента = Ячейка1.КлючЭлемента;
Форма1.Открыть();
КлючЭлемента_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка1, КлючЭлемента;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЯчейкаЗаголовка1.КлючЭлемента = КлючЭлемента
, "", "!!! ") + "КлючЭлемента_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Текст = "Это ЯчейкаЗаголовка";
КлючЭлемента = ЯчейкаЗаголовка1.КлючЭлемента;
Форма1.Открыть();
Кнопка_АргументыСобытия_свойство.os
Перем ДФ;
Перем ГлавноеМеню;
Процедура Абзац1_ПриОтпусканииМыши() Экспорт
// Если ДФ.АргументыСобытия.Кнопка = ДФ.КнопкиМыши.Правая Тогда
// ГлавноеМеню.Показать(ДФ.АргументыСобытия.Икс, ДФ.АргументыСобытия.Игрек);
// КонецЕсли;
// Сообщить("ДФ.АргументыСобытия.Кнопка = " + ДФ.АргументыСобытия.Кнопка);
Сообщить(?(
ДФ.АргументыСобытия.Кнопка = ДФ.КнопкиМыши.Правая
, "", "!!! ") + "Икс_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкни правой кнопкой мыши по абзацу";
ГлавноеМеню = ДФ.Меню(ДФ.ТипМеню.Контекстное);
ПодменюМенюФайл = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюФайл = ДФ.ЭлементМеню("Файл", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюФайл);
Открыть = ДФ.ЭлементМеню("Открыть", ДФ.ТипЭлементаМеню.Стандартный);
Сохранить = ДФ.ЭлементМеню("Сохранить");
Разделитель1 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Настройки = ДФ.ЭлементМеню("Настройки");
Разделитель2 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Выход = ДФ.ЭлементМеню("Выход");
ПодменюМенюФайл.Добавить(Открыть);
ПодменюМенюФайл.Добавить(Сохранить);
ПодменюМенюФайл.Добавить(Разделитель1);
ПодменюМенюФайл.Добавить(Настройки);
ПодменюМенюФайл.Добавить(Разделитель2);
ПодменюМенюФайл.Добавить(Выход);
ПодменюМенюПравка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюПравка = ДФ.ЭлементМеню("Правка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюПравка);
Отмена = ДФ.ЭлементМеню("Отмена");
Повтор = ДФ.ЭлементМеню("Повтор");
ПодменюМенюПравка.Добавить(Отмена);
ПодменюМенюПравка.Добавить(Повтор);
ПодменюМенюСправка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюСправка = ДФ.ЭлементМеню("Справка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюСправка);
ОПрограмме = ДФ.ЭлементМеню("О программе");
ПодменюМенюСправка.Добавить(ОПрограмме);
ГлавноеМеню.Добавить(МенюФайл);
ГлавноеМеню.Добавить(МенюПравка);
ГлавноеМеню.Добавить(МенюСправка);
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Абзац";
Абзац1.Стиль.Высота = 400;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "Абзац1_ПриОтпусканииМыши");
Форма1.Открыть();
Количество_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.Количество = 3
, "", "!!! ") + "Количество_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "Количество", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Ширина = 150;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = ПолеСписка1;
ГруппировкаПоляСписка1.Надпись = "Жители деревни Простоквашино";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка1.Значение = "Кот";
ЭлементПоляСписка1.Текст = "Матроскин";
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Пёс";
ЭлементПоляСписка2.Текст = "Шарик";
ЭлементПоляСписка3 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка3.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка3.Значение = "Птица";
ЭлементПоляСписка3.Текст = "Галчонок";
Форма1.Открыть();
КоличествоКолонок_КолонкиЭлемента_свойство.os
Перем ДФ, КолонкиЭлемента1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
КолонкиЭлемента1.КоличествоКолонок = 3
, "", "!!! ") + "КоличествоКолонок_КолонкиЭлемента_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.Текст = "– Ах ты, шалун! – воскликнула Алиса и чмокнула котенка в мокрый носик, делая при этом сердитое лицо.
|– Разве Дина тебе не объясняла, что хорошо, а что плохо? Ай-я-яй, Дина! Ты слышишь? Плохо!
|И Алиса укоризненно покачала головой. Потом она подхватила котенка, собрала запутанный ворох ниток и, поудобнее устроившись в кресле, стала снова мотать клубок.
|Но работа не очень-то спорилась, потому что она не переставая болтала то с котенком, а то и сама с собой.
|Котенок с невинным видом сидел у нее на коленях и только иногда легонько цапал когтистой лапкой клубок, словно хотел помочь Алисе.
|– Ты, котик, и не догадываешься, наверное, что будет завтра? – спрашивала Алиса.
|– Откуда тебе! Ты же не сидел со мной вчера у окошка. Тебя умывали. А я видела, как ребята собирали ветки для костра.
|Знаешь, какой ворох нужен для хорошего костра? Но тут, как назло, пошел снег, стало холодно, и их всех позвали домой.
|Но завтра! Завтра непременно будет костер, и мы с тобой, котик, пойдем поглядеть.
|
|Разговаривая, Алиса обматывала котенка ниткой. Шерстяная нитка так подходила к цвету его шерстки!
|Но котенок вдруг вырвался, клубок вывалился из рук Алисы и снова размотался.";
КолонкиЭлемента1 = ДФ.КолонкиЭлемента();
КолонкиЭлемента1.ШиринаКолонок = 100;
КолонкиЭлемента1.КоличествоКолонок = 3;
Абзац1.Стиль.КолонкиЭлемента = КолонкиЭлемента1;
Форма1.Открыть();
КоличествоКолонок_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.КоличествоКолонок = "3"
, "", "!!! ") + "КоличествоКолонок_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "КоличествоКолонок", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.Текст = "– Ах ты, шалун! – воскликнула Алиса и чмокнула котенка в мокрый носик, делая при этом сердитое лицо.
|– Разве Дина тебе не объясняла, что хорошо, а что плохо? Ай-я-яй, Дина! Ты слышишь? Плохо!
|И Алиса укоризненно покачала головой. Потом она подхватила котенка, собрала запутанный ворох ниток и, поудобнее устроившись в кресле, стала снова мотать клубок.
|Но работа не очень-то спорилась, потому что она не переставая болтала то с котенком, а то и сама с собой.
|Котенок с невинным видом сидел у нее на коленях и только иногда легонько цапал когтистой лапкой клубок, словно хотел помочь Алисе.
|– Ты, котик, и не догадываешься, наверное, что будет завтра? – спрашивала Алиса.
|– Откуда тебе! Ты же не сидел со мной вчера у окошка. Тебя умывали. А я видела, как ребята собирали ветки для костра.
|Знаешь, какой ворох нужен для хорошего костра? Но тут, как назло, пошел снег, стало холодно, и их всех позвали домой.
|Но завтра! Завтра непременно будет костер, и мы с тобой, котик, пойдем поглядеть.
|
|Разговаривая, Алиса обматывала котенка ниткой. Шерстяная нитка так подходила к цвету его шерстки!
|Но котенок вдруг вырвался, клубок вывалился из рук Алисы и снова размотался.";
Абзац1.Стиль.ШиринаКолонок = 100;
Абзац1.Стиль.КоличествоКолонок = 3;
Форма1.Открыть();
КоличествоПовторов_ПараметрыАнимации_свойство.os
Перем АнимацияВращение, АнимацияМасштаб;
Перем ДФ, ПараметрыАнимации1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПараметрыАнимации1.КоличествоПовторов = 1000
, "", "!!! ") + "КоличествоПовторов_ПараметрыАнимации_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
АнимацияВращение.Запустить();
АнимацияМасштаб.Запустить();
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
АнимацияВращение.Пауза();
АнимацияМасштаб.Пауза();
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
АнимацияВращение.Завершить();
АнимацияМасштаб.Завершить();
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
АнимацияВращение.Отменить();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Запустить";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Пауза";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка3 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Завершить";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Отменить вращение";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок2.Стиль.Ширина = 45;
Блок2.Стиль.Высота = 45;
Блок2.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок2.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок2.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок2.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок2";
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.Зеленый;
Кадр3.Сдвиг = "scale(1)";
Кадр3.Смещение = 0;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Желтый;
Кадр4.Сдвиг = "scale(1.05)";
Кадр4.Смещение = 0.1;
Кадр5 = ДФ.Стиль();
Кадр5.ЦветФона = ДФ.Цвет.Желтый;
Кадр5.Сдвиг = "scale(1.4)";
Кадр5.Смещение = 0.7;
Кадр6 = ДФ.Стиль();
Кадр6.ЦветФона = ДФ.Цвет.Красный;
Кадр6.Сдвиг = "scale(1.5)";
Кадр6.Смещение = 1;
Кадры2 = ДФ.Кадры();
Кадры2.Добавить(Кадр3);
Кадры2.Добавить(Кадр4);
Кадры2.Добавить(Кадр5);
Кадры2.Добавить(Кадр6);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
100);
АнимацияВращение = Блок1.Анимация(Кадры1, ПараметрыАнимации1);
АнимацияМасштаб = Блок2.Анимация(Кадры2, ПараметрыАнимации1);
Форма1.Открыть();
КоличествоПовторов_СвойстваАнимации_свойство.os
Перем ДФ, Анимация1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Анимация1.КоличествоПовторов = -1
, "", "!!! ") + "КоличествоПовторов_СвойстваАнимации_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Анимация1 = ДФ.СвойстваАнимации();
Анимация1.ИмяАнимации = Кадры1.Имя;
Анимация1.ДлительностьАнимации = 3000;
Анимация1.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце;
Анимация1.ЗадержкаАнимации = 600;
Анимация1.КоличествоПовторов = -1;
Анимация1.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать;
Анимация1.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад;
Анимация1.Состояние = ДФ.Состояние.Запущена;
Блок1.Стиль.Анимация = Анимация1;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
КоличествоПовторов_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.КоличествоПовторов = "infinite"
, "", "!!! ") + "КоличествоПовторов_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "КоличествоПовторов", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Блок1.Стиль.ИмяАнимации = Кадры1.Имя;
Блок1.Стиль.ДлительностьАнимации = 3000;
Блок1.Стиль.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце;
Блок1.Стиль.ЗадержкаАнимации = 600;
Блок1.Стиль.КоличествоПовторов = -1;
Блок1.Стиль.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать;
Блок1.Стиль.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад;
Блок1.Стиль.Состояние = ДФ.Состояние.Запущена;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
Колонки_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.Колонки = 25
, "", "!!! ") + "Колонки_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "Колонки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Текст = "– Забавный стишок! – промолвила Алиса.
|– В нем что-то есть.
|– Честно говоря, кто этот ЧТО-ТО, Алиса объяснить не смогла бы, но ей стыдно было в этом признаться даже самой себе. И она пробормотала:
|– Если собраться с мыслями, то, я думаю, здесь кто-то кого-то чем-то и зачем-то свержил, то есть отсвечил. Но что это я! – спохватилась она.
|– Тут еще столько надо успеть. Обежать все комнаты. Заглянуть в сад!";
ОбластьТекста1.ПереносТекста = ДФ.ПереносТекста.Переносить;
ОбластьТекста1.Колонки = 25;
Форма1.Открыть();
КолонкиЭлемента_Стиль_свойство.os
Перем ДФ, Абзац1, КолонкиЭлемента1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.КолонкиЭлемента = "100px 3"
, "", "!!! ") + "КолонкиЭлемента_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "КолонкиЭлемента", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.Текст = "– Ах ты, шалун! – воскликнула Алиса и чмокнула котенка в мокрый носик, делая при этом сердитое лицо.
|– Разве Дина тебе не объясняла, что хорошо, а что плохо? Ай-я-яй, Дина! Ты слышишь? Плохо!
|И Алиса укоризненно покачала головой. Потом она подхватила котенка, собрала запутанный ворох ниток и, поудобнее устроившись в кресле, стала снова мотать клубок.
|Но работа не очень-то спорилась, потому что она не переставая болтала то с котенком, а то и сама с собой.
|Котенок с невинным видом сидел у нее на коленях и только иногда легонько цапал когтистой лапкой клубок, словно хотел помочь Алисе.
|– Ты, котик, и не догадываешься, наверное, что будет завтра? – спрашивала Алиса.
|– Откуда тебе! Ты же не сидел со мной вчера у окошка. Тебя умывали. А я видела, как ребята собирали ветки для костра.
|Знаешь, какой ворох нужен для хорошего костра? Но тут, как назло, пошел снег, стало холодно, и их всех позвали домой.
|Но завтра! Завтра непременно будет костер, и мы с тобой, котик, пойдем поглядеть.
|
|Разговаривая, Алиса обматывала котенка ниткой. Шерстяная нитка так подходила к цвету его шерстки!
|Но котенок вдруг вырвался, клубок вывалился из рук Алисы и снова размотался.";
КолонкиЭлемента1 = ДФ.КолонкиЭлемента();
КолонкиЭлемента1.ШиринаКолонок = 100;
КолонкиЭлемента1.КоличествоКолонок = 3;
Абзац1.Стиль.КолонкиЭлемента = КолонкиЭлемента1;
Форма1.Открыть();
Композиция_Контекст2d_свойство.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контекст2d1.Композиция = ДФ.Композиция.СуществующееНад
, "", "!!! ") + "Композиция_Контекст2d_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Красный;
Контекст2d1.ЗаполнитьПрямоугольник(20, 20, 75, 50);
Контекст2d1.Композиция = ДФ.Композиция.НовоеНад;
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Синий;
Контекст2d1.ЗаполнитьПрямоугольник(50, 50, 75, 50);
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Красный;
Контекст2d1.ЗаполнитьПрямоугольник(150, 20, 75, 50);
Контекст2d1.Композиция = ДФ.Композиция.СуществующееНад;
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Синий;
Контекст2d1.ЗаполнитьПрямоугольник(180, 50, 75, 50);
Форма1.Открыть();
КонецПеретаскивания_Абзац_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Абзац_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Абзац());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Артикль_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Артикль_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Артикль());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Аудио_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Аудио_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Аудио());
Источник.Источник = "Kaoma_Lambada.mp3";
Источник.Контролы = Истина;
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Блок_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Блок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Блок());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ВыборВремени_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ВыборВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ВыборДаты_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ВыборДаты_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ВыборДатыВремени_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ВыборДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ВыборМестнойДатыВремени_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ВыборМестнойДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ВыборМесяца_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ВыборМесяца_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ВыборНедели_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ВыборНедели_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ВыборФайла_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ВыборФайла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ВыборЦвета_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ВыборЦвета_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Группа_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Группа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Группа());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Диалог_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Диалог_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Диалог());
Источник.Показать();
Источник.Показать();
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ДополнительныйБлок_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ДополнительныйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ЖирныйТекст_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ЖирныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Заголовок1_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Заголовок1_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Заголовок2_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Заголовок2_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Заголовок3_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Заголовок3_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Заголовок4_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Заголовок4_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Заголовок5_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Заголовок5_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Заголовок6_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Заголовок6_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Изображение_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Изображение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Изображение());
Источник.Источник = "maslenica10.jpg";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Индикатор_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Индикатор_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Индикатор());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Кнопка_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Кнопка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_КурсивТекст_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_КурсивТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Линия_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Линия_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Линия());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_МаркированныйТекст_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_МаркированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_МелкийТекст_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_МелкийТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_НадстрочныйТекст_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_НадстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_НаправленныйТекст_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_НаправленныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ОбластьТекста_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ОбластьТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Переключатель_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Переключатель_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Подпись_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Подпись_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Подпись());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ПодстрочныйТекст_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ПодстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ПодчеркнутыйТекст_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ПодчеркнутыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ПолеПоиска_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ПолеПоиска_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ПолеТекста_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ПолеТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ПолеЧисла_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ПолеЧисла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Ползунок_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Ползунок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Ползунок());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_РаскрываемыйБлок_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_РаскрываемыйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Результат_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Результат_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Результат());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Ссылка_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Ссылка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Таблица_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Таблица_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Таблица());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_УдаленыйТекст_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_УдаленыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Флажок_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Флажок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Флажок());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_ФорматированныйТекст_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_ФорматированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
КонецПеретаскивания_Шкала_событие.os
Перем ДФ, Источник;
Процедура КонецПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "КонецПеретаскивания_Шкала_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью и отпусти";
Источник = Форма1.ДобавитьДочерний(ДФ.Шкала());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.КонецПеретаскивания = ДФ.Действие(ЭтотОбъект, "КонецПеретаскивания");
Форма1.Открыть();
Контекст2d_Холст_свойство.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "Контекст2d_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 400;
Холст1.Высота = 300;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.ЗаполнитьПрямоугольник(20, 20, 150, 100);
Контекст2d1.Прямоугольник(180, 20, 200, 100);
Форма1.Открыть();
Контент_Форма_свойство.os
Перем ДФ, Контент;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контент.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Контент_Форма_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Кнопка1";
Кнопка2 = ДФ.Кнопка();
Кнопка2.Родитель = Форма1;
Кнопка2.Текст = "Кнопка2";
Кнопка3 = ДФ.Кнопка();
Кнопка3.Родитель = Форма1;
Кнопка3.Текст = "Кнопка3";
Контент = Форма1.Контент;
Контент.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Контраст_ФильтрИзображений_свойство.os
Перем ДФ, ФильтрИзображений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ФильтрИзображений1.Контраст = 200
, "", "!!! ") + "Контраст_ФильтрИзображений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Изображение1 = ДФ.Изображение();
Форма1.ДобавитьДочерний(Изображение1);
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Стиль.Ширина = 200;
ФильтрИзображений1 = ДФ.ФильтрИзображений();
ФильтрИзображений1.Контраст = 200;
Изображение1.Стиль.Фильтр = ФильтрИзображений1;
Форма1.Открыть();
Контролы_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Аудио1.Контролы
, "", "!!! ") + "Контролы_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "Контролы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";
Форма1.Открыть();
Контур_Стиль_свойство.os
Перем ДФ, Блок1, Контур1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Контур = "rgb(127, 255, 212) double medium"
, "", "!!! ") + "Контур_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Контур", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Текст = "Здравствуй МИР!";
Блок1.Стиль.Границы = ДФ.Границы(15, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Заполнение = ДФ.Заполнение(10, 20, 20, 10);
Контур1 = ДФ.Контур(ДФ.ШиринаГраницы.Средняя, ДФ.СтильГраницы.Двойная, ДФ.Цвет.Аквамариновый);
Блок1.Стиль.Контур = Контур1;
Форма1.Открыть();
Координаты_Полигон_свойство.os
Перем ДФ, Полигон1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Полигон1.Координаты.Количество() = 4
, "", "!!! ") + "Координаты_Полигон_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Полигон1 = ДФ.Полигон();
Массив = Новый Массив();
Массив.Добавить(ДФ.Точка(10, 20));
Массив.Добавить(ДФ.Точка(15, 30));
Массив.Добавить(ДФ.Точка(20, 40));
Массив.Добавить(ДФ.Точка(30, 20));
Полигон1.Координаты = Массив;
Полигон2 = ДФ.Полигон(Массив);
Форма1.Открыть();
Копировать_Стиль_метод.os
Перем ДФ, Абзац2;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац2.Стиль.Ширина = 300
, "", "!!! ") + "Копировать_Стиль_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац2.Стиль, "Ширина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Абзац1";
Стиль1 = Абзац1.Стиль;
Стиль1.ЦветФона = ДФ.Цвет("Аквамариновый");
Стиль1.Высота = 100;
Стиль1.Ширина = 300;
Абзац2 = ДФ.Абзац();
Абзац2.Родитель = Форма1;
Абзац2.Текст = "Это Абзац2";
Стиль2 = Абзац2.Стиль;
Стиль2.Копировать(Стиль1);
Форма1.Открыть();
КопироватьДанныеРисунка_Контекст2d_метод.os
Перем ДФ, Контекст2d1, Изображение1;
Процедура Кнопка1_Нажатие() Экспорт
Контекст2d1.КопироватьДанныеРисунка(10, 10, Изображение1.Ширина, Изображение1.Высота, Изображение1.Ширина + 20, 10);
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "КопироватьДанныеРисунка_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 450;
Форма1.НачальнаяВысота = 350;
Форма1.Контент.Текст = "Нажми кнопку";
Изображение1 = ДФ.Изображение();
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Ширина = 119;
Изображение1.Высота = 80;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 300;
Холст1.Высота = 150;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.РисоватьИзображение(Изображение1, 10, 10);
Форма1.Открыть();
Косинус_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().Косинус(0.9) = 0.621609968270664
, "", "!!! ") + "Косинус_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().Косинус(0.9);
Форма1.Открыть();
Куб_css.os
//== Файл Стартовый.os == начало
Перем ДФ, Флажок1, Флажок2, Подпись1, Подпись2, Ползунок1, Ползунок2, Ползунок3, Куб, БлокВцентре, Икс, Игрек;
Процедура Флажок1_ПриИзменении() Экспорт
Ползунок1.Отключено = Не Флажок1.Помечен;
Ползунок2.Отключено = Не Флажок1.Помечен;
Ползунок3.Отключено = Не Флажок1.Помечен;
Если Флажок1.Помечен Тогда
Подпись1.Стиль.ЦветФона = ДФ.Цвет.БледноЗеленый;
БлокВцентре.Стиль.Перспектива = Ползунок1.Значение;
Иначе
Подпись1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
БлокВцентре.Стиль.Перспектива = "none";
КонецЕсли;
КонецПроцедуры
Процедура Флажок2_ПриИзменении() Экспорт
Если Флажок2.Помечен Тогда
Подпись2.Стиль.ЦветФона = ДФ.Цвет.БледноЗеленый;
Куб.Стиль.Состояние = ДФ.Состояние.Запущена;
Иначе
Подпись2.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Куб.Стиль.Состояние = ДФ.Состояние.Остановлена;
КонецЕсли;
КонецПроцедуры
Процедура Ползунок1_Ввод() Экспорт
Ползунок1.Стиль.РазмерКартинки = ДФ.Размер(ДФ.АргументыСобытия.Значение - 300, 7);
БлокВцентре.Стиль.Перспектива = ДФ.АргументыСобытия.Значение;
КонецПроцедуры
Процедура Ползунок2_Ввод() Экспорт
Ползунок2.Стиль.РазмерКартинки = ДФ.Размер(ДФ.АргументыСобытия.Значение + 100, 7);
БлокВцентре.Стиль.ИсточникПерспективы = ДФ.ИсточникПерспективы(Икс, ДФ.АргументыСобытия.Значение);
Игрек = ДФ.АргументыСобытия.Значение;
КонецПроцедуры
Процедура Ползунок3_Ввод() Экспорт
Ползунок3.Стиль.РазмерКартинки = ДФ.Размер(ДФ.АргументыСобытия.Значение + 100, 7);
БлокВцентре.Стиль.ИсточникПерспективы = ДФ.ИсточникПерспективы(ДФ.АргументыСобытия.Значение, Игрек);
Икс = ДФ.АргументыСобытия.Значение
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
ДФ.cssПуть = "cub.css";
Форма1 = ДФ.Форма;
Контент = Форма1.Контент;
Контент.Стиль.Отображать = ДФ.Отображать.Гибкий;
Контент.Стиль.РасположениеСодержимого = ДФ.РасположениеСодержимого.Вцентре;
Контент.Стиль.ВыравниваниеЭлементов = ДФ.ВыравниваниеЭлементов.Центр;
Контент.Стиль.Переполнение = ДФ.Переполнение.Прокрутка;
Контент.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Контент.Стиль.НаправлениеЭлементов = ДФ.НаправлениеЭлементов.Колонка;
Контент.Стиль.НаправлениеЭлементов = ДФ.НаправлениеЭлементов.Колонка;
Контент.Стиль.РазмерШрифта = 20;
БлокВерх = Форма1.ДобавитьДочерний(ДФ.Блок());
БлокВерх.Стиль.Отображать = ДФ.Отображать.Гибкий;
Флажок1 = БлокВерх.ДобавитьДочерний(ДФ.Флажок());
Флажок1.Идентификатор = "usePerspective";
Флажок1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "Флажок1_ПриИзменении");
Флажок1.Стиль.Отображать = ДФ.Отображать.Отсутствие;
Флажок1.Помечен = Истина;
Флажок2 = БлокВерх.ДобавитьДочерний(ДФ.Флажок());
Флажок2.Идентификатор = "runAnimation";
Флажок2.ПриИзменении = ДФ.Действие(ЭтотОбъект, "Флажок2_ПриИзменении");
Флажок2.Стиль.Отображать = ДФ.Отображать.Отсутствие;
Флажок2.Помечен = Истина;
Подпись1 = БлокВерх.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Связь = Флажок1.Идентификатор;
Подпись1.Текст = "Использовать перспективу";
Подпись1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Подпись1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(4, 4, 4, 4);
Подпись1.Стиль.Заполнение = ДФ.Заполнение(3, 3, 3, 3);
БлокВерх.ДобавитьДочерний(ДФ.Блок()).Стиль.Ширина = 15;
Подпись2 = БлокВерх.ДобавитьДочерний(ДФ.Подпись());
Подпись2.Связь = Флажок2.Идентификатор;
Подпись2.Текст = "Запустить анимацию";
Подпись2.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Подпись2.Стиль.РадиусГраницы = ДФ.РадиусГраницы(4, 4, 4, 4);
Подпись2.Стиль.Заполнение = ДФ.Заполнение(3, 3, 3, 3);
БлокСередина = Форма1.ДобавитьДочерний(ДФ.Блок());
БлокСередина.Стиль.ОтступСверху = 20;
БлокСередина.Стиль.Отображать = ДФ.Отображать.Гибкий;
БлокСлева = БлокСередина.ДобавитьДочерний(ДФ.Блок());
БлокСлева.Стиль.НаправлениеЭлементов = ДФ.НаправлениеЭлементов.Строка;
БлокСлева.Стиль.Ширина = 50;
БлокСлеваТекст = БлокСлева.ДобавитьДочерний(ДФ.Блок());
БлокСлеваТекст.Текст = "Перспектива";
БлокСлеваТекст.Стиль.Позиция = ДФ.Позиция.Абсолютно;
БлокСлеваТекст.Стиль.Ширина = 50;
БлокСлеваТекст.Стиль.Сдвиг = ДФ.Поворот(270);
БлокСлеваТекст.Стиль.ОтступСлева = -9;
БлокСлеваТекст.Стиль.ОтступСверху = 185;
Ползунок1 = БлокСлева.ДобавитьДочерний(ДФ.Ползунок());
Ползунок1.Минимум = 300;
Ползунок1.Максимум = 600;
Ползунок1.Значение = 450;
Ползунок1.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Ползунок1.Стиль.Ширина = 300;
Ползунок1.Стиль.Сдвиг = ДФ.Поворот(270);
Ползунок1.Стиль.ОтступСлева = -115;
Ползунок1.Стиль.ОтступСверху = 185;
Ползунок1.Ввод = ДФ.Действие(ЭтотОбъект, "Ползунок1_Ввод");
Ползунок1.Стиль.РазмерКартинки = ДФ.Размер(150, 7);
БлокВцентре = БлокСередина.ДобавитьДочерний(ДФ.Блок());
БлокВцентре.Стиль.Ширина = 400;
БлокВцентре.Стиль.Высота = 400;
БлокВцентре.Класс = "container";
БлокВцентре.Стиль.Отображать = ДФ.Отображать.Гибкий;
БлокВцентре.Стиль.РасположениеСодержимого = ДФ.РасположениеСодержимого.Вцентре;
БлокВцентре.Стиль.ВыравниваниеЭлементов = ДФ.ВыравниваниеЭлементов.Центр;
БлокВцентре.Стиль.Перспектива = 1000;
БлокВцентре.Стиль.ИсточникПерспективы = ДФ.ИсточникПерспективы(0, 1);
Икс = 0;
Игрек = 1;
БлокСправа = БлокСередина.ДобавитьДочерний(ДФ.Блок());
БлокСлева.Стиль.НаправлениеЭлементов = ДФ.НаправлениеЭлементов.Строка;
БлокСправа.Стиль.Ширина = 50;
Ползунок2 = БлокСправа.ДобавитьДочерний(ДФ.Ползунок());
Ползунок2.Класс = "input2";
Ползунок2.Минимум = -100;
Ползунок2.Максимум = 200;
Ползунок2.Значение = 0;
Ползунок2.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Ползунок2.Стиль.Ширина = 300;
Ползунок2.Стиль.Сдвиг = ДФ.Поворот(270);
Ползунок2.Стиль.ОтступСлева = -135;
Ползунок2.Стиль.ОтступСверху = 185;
Ползунок2.Ввод = ДФ.Действие(ЭтотОбъект, "Ползунок2_Ввод");
Ползунок2.Стиль.РазмерКартинки = ДФ.Размер(100, 7);
БлокСправаТекст = БлокСправа.ДобавитьДочерний(ДФ.Блок());
БлокСправаТекст.Текст = "Источник перспективы - вертикаль";
БлокСправаТекст.Стиль.Позиция = ДФ.Позиция.Абсолютно;
БлокСправаТекст.Стиль.Ширина = 300;
БлокСправаТекст.Стиль.Сдвиг = ДФ.Поворот(90);
БлокСправаТекст.Стиль.ОтступСлева = -115;
БлокСправаТекст.Стиль.ОтступСверху = 185;
БлокСнизу = Форма1.ДобавитьДочерний(ДФ.Блок());
БлокСнизу.Стиль.Отображать = ДФ.Отображать.Гибкий;
БлокСнизу.Стиль.Ширина = 500;
БлокСнизу.Стиль.НаправлениеЭлементов = ДФ.НаправлениеЭлементов.Колонка;
БлокСнизу.Стиль.ВыравниваниеЭлементов = ДФ.ВыравниваниеЭлементов.Центр;
БлокСнизу.Стиль.ОтступСверху = 3;
Ползунок3 = БлокСнизу.ДобавитьДочерний(ДФ.Ползунок());
Ползунок3.Класс = "input3";
Ползунок3.Минимум = -100;
Ползунок3.Максимум = 200;
Ползунок3.Значение = 100;
Ползунок3.Стиль.Ширина = 300;
Ползунок3.Ввод = ДФ.Действие(ЭтотОбъект, "Ползунок3_Ввод");
Ползунок3.Стиль.РазмерКартинки = ДФ.Размер(200, 7);
БлокСнизуТекст = БлокСнизу.ДобавитьДочерний(ДФ.Блок());
БлокСнизуТекст.Текст = "Источник перспективы - горизонталь";
Куб = БлокВцентре.ДобавитьДочерний(ДФ.Блок());
Куб.Класс = "cube";
Куб.Стиль.Позиция = ДФ.Позиция.Относительно;
Куб.Стиль.Ширина = 200;
Куб.Стиль.Высота = 200;
Куб.Стиль.СтильСдвига = ДФ.СтильСдвига.Трехмерный;
Фронт = Куб.ДобавитьДочерний(ДФ.Блок());
Фронт.Класс = "side front";
Фронт.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Фронт.Стиль.Ширина = "100%";
Фронт.Стиль.Высота = "100%";
Фронт.Стиль.Непрозрачность = 0.75;
Фронт.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Белый);
Фронт.Стиль.ЦветФона = ДФ.Цвет(213, 0, 0);
Фронт.Стиль.Сдвиг = ДФ.ПереводЗет(100);
ЛеваяСторона = Куб.ДобавитьДочерний(ДФ.Блок());
ЛеваяСторона.Класс = "side left";
ЛеваяСторона.Стиль.Позиция = ДФ.Позиция.Абсолютно;
ЛеваяСторона.Стиль.Ширина = "100%";
ЛеваяСторона.Стиль.Высота = "100%";
ЛеваяСторона.Стиль.Непрозрачность = 0.75;
ЛеваяСторона.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Белый);
ЛеваяСторона.Стиль.ЦветФона = ДФ.Цвет(48, 79, 254);
Массив1 = Новый Массив();
Массив1.Добавить(ДФ.ПоворотИгрек(90));
Массив1.Добавить(ДФ.ПереводЗет(100));
ЛеваяСторона.Стиль.Сдвиг = Массив1;
ПраваяСторона = Куб.ДобавитьДочерний(ДФ.Блок());
ПраваяСторона.Класс = "side right";
ПраваяСторона.Стиль.Позиция = ДФ.Позиция.Абсолютно;
ПраваяСторона.Стиль.Ширина = "100%";
ПраваяСторона.Стиль.Высота = "100%";
ПраваяСторона.Стиль.Непрозрачность = 0.75;
ПраваяСторона.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Белый);
ПраваяСторона.Стиль.ЦветФона = ДФ.Цвет(170, 0, 255);
Массив2 = Новый Массив();
Массив2.Добавить(ДФ.ПоворотИгрек(-90));
Массив2.Добавить(ДФ.ПереводЗет(100));
ПраваяСторона.Стиль.Сдвиг = Массив2;
Задняя = Куб.ДобавитьДочерний(ДФ.Блок());
Задняя.Класс = "side back";
Задняя.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Задняя.Стиль.Ширина = "100%";
Задняя.Стиль.Высота = "100%";
Задняя.Стиль.Непрозрачность = 0.75;
Задняя.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Белый);
Задняя.Стиль.ЦветФона = ДФ.Цвет(170, 0, 255);
Задняя.Стиль.Сдвиг = ДФ.ПереводЗет(-100);
Верхняя = Куб.ДобавитьДочерний(ДФ.Блок());
Верхняя.Класс = "side top";
Верхняя.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Верхняя.Стиль.Ширина = "100%";
Верхняя.Стиль.Высота = "100%";
Верхняя.Стиль.Непрозрачность = 0.75;
Верхняя.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Белый);
Верхняя.Стиль.ЦветФона = ДФ.Цвет(0, 191, 165);
Массив3 = Новый Массив();
Массив3.Добавить(ДФ.ПоворотИкс(90));
Массив3.Добавить(ДФ.ПереводЗет(100));
Верхняя.Стиль.Сдвиг = Массив3;
Нижняя = Куб.ДобавитьДочерний(ДФ.Блок());
Нижняя.Класс = "side bottom";
Нижняя.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Нижняя.Стиль.Ширина = "100%";
Нижняя.Стиль.Высота = "100%";
Нижняя.Стиль.Непрозрачность = 0.75;
Нижняя.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Белый);
Нижняя.Стиль.ЦветФона = ДФ.Цвет(100, 221, 23);
Массив4 = Новый Массив();
Массив4.Добавить(ДФ.ПоворотИкс(-90));
Массив4.Добавить(ДФ.ПереводЗет(100));
Нижняя.Стиль.Сдвиг = Массив4;
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Массив5 = Новый Массив();
Массив5.Добавить(ДФ.ПоворотИгрек(0));
Массив5.Добавить(ДФ.ПоворотИкс(720));
Массив5.Добавить(ДФ.ПоворотЗет(0));
Кадр1.Сдвиг = Массив5;
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Массив6 = Новый Массив();
Массив6.Добавить(ДФ.ПоворотИгрек(360));
Массив6.Добавить(ДФ.ПоворотИкс(0));
Массив6.Добавить(ДФ.ПоворотЗет(360));
Кадр2.Сдвиг = Массив6;
Кадр2.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "вращениекуба"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Анимация1 = ДФ.СвойстваАнимации(Кадры1.Имя, 10000, ДФ.ФункцияСинхронизации.Линейно, , -1);
Куб.Стиль.Анимация = Анимация1;
Флажок1_ПриИзменении();
Флажок2_ПриИзменении();
Форма1.Открыть();
//== Файл Стартовый.os == конец
// //== Файл cub.css == начало
// input[type="range"]:focus {
// box-shadow: 0 0 3px 1px #4b81dd;
// outline: none;
// }
// input[type="range"] {
// -webkit-appearance: none;
// margin-right: 15px;
// width: 200px;
// height: 7px;
// background: rgba(255, 255, 255, 0.6);
// border-radius: 5px;
// background-image: linear-gradient(#ff4500, #ff4500);
// background-size: 70% 100%;
// background-repeat: no-repeat;
// }
// input[type="range"]::-webkit-slider-thumb {
// -webkit-appearance: none;
// height: 20px;
// width: 20px;
// border-radius: 50%;
// background: #ff4500;
// box-shadow: 0 0 2px 0 #555;
// transition: background .3s ease-in-out;
// }
// input[type="range"]::-moz-range-thumb {
// -webkit-appearance: none;
// height: 20px;
// width: 20px;
// border-radius: 50%;
// background: #ff4500;
// box-shadow: 0 0 2px 0 #555;
// transition: background .3s ease-in-out;
// }
// input[type="range"]::-ms-thumb {
// -webkit-appearance: none;
// height: 20px;
// width: 20px;
// border-radius: 50%;
// background: #ff4500;
// box-shadow: 0 0 2px 0 #555;
// transition: background .3s ease-in-out;
// }
// input[type="range"]::-webkit-slider-thumb:hover {
// background: #ff0200;
// }
// input[type="range"]::-moz-range-thumb:hover {
// background: #ff0200;
// }
// input[type="range"]::-ms-thumb:hover {
// background: #ff0200;
// }
// input[type="range"]::-webkit-slider-runnable-track {
// -webkit-appearance: none;
// box-shadow: none;
// border: none;
// background: transparent;
// }
// input[type="range"]::-moz-range-track {
// -webkit-appearance: none;
// box-shadow: none;
// border: none;
// background: transparent;
// }
// input[type="range"]::-ms-track {
// -webkit-appearance: none;
// box-shadow: none;
// border: none;
// background: transparent;
// }
// .input1, .input2::-webkit-slider-thumb {
// cursor: ns-resize;
// }
// .input3::-webkit-slider-thumb {
// cursor: ew-resize;
// }
// .input1, .input2::-moz-range-thumb {
// cursor: ns-resize;
// }
// .input3::-moz-range-thumb {
// cursor: ew-resize;
// }
// .input1, .input2::-ms-thumb {
// cursor: ns-resize;
// }
// .input3::-ms-thumb {
// cursor: ew-resize;
// }
// //== Файл cub.css == конец
Курсор_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.Курсор = ДФ.Курсор.Перекрестие
, "", "!!! ") + "Курсор_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "Курсор", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РазделительКолонок1 = ДФ.РазделительКолонок(ДФ.ШиринаГраницы.Средняя, ДФ.СтильГраницы.Двойная, ДФ.Цвет.Синий);
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("БелаяДымка");
Абзац1.Текст = "И тут появилась Черная Королева.
|«Ого! Как выросла! – подумала Алиса. – Когда я нашла ее в золе, она была не больше моего пальца. А теперь я ей по плечо».
|– У нас такой чудесный воздух, что все тянутся вверх не по дням, а по часам, – сказала Роза, будто подслушала мысли Алисы.
|– Пойду навстречу ей, – сказала Алиса, как бы извиняясь перед цветами.
|С ними было, конечно, весело поболтать, но беседа с Королевой наверняка намного интересней.
|– Если хочешь встретиться, – посоветовала Роза, – иди не к ней, а от нее.
|Такой явной глупости Алиса и слушать не стала. И, конечно же, пошла прямиком к Королеве. Но, к ее изумлению, Королева мгновенно исчезла из виду.
|А дорожка снова привела Алису к дому. Раздосадованная, Алиса отпрянула от дома и оглянулась. Королева маячила вдалеке позади нее.
|Алиса заколебалась: уж не права ли была Роза и не следует ли двинуться в противоположную от Королевы сторону? Так она и сделала.
|И все вышло чудесно! Буквально через минуту она столкнулась нос к носу с Королевой. И что удивительно, холм, до которого она так
|долго не могла дойти, возвышался прямо перед ней.
|– Ты откуда взялась? – строго спросила Королева. – Куда идешь? Гляди в глаза! Говори почтительно! Не маши руками, не верти головой и не дрыгай ногами!
|Алиса как можно вежливее объяснила, что немного заблудилась, а теперь разобралась, что к чему и что куда, и идет себе своей дорогой.";
Абзац1.Стиль.РазделительКолонок = РазделительКолонок1;
Абзац1.Стиль.КоличествоКолонок = 3;
Абзац1.Стиль.СтильРазделителяКолонок = ДФ.СтильГраницы.Сплошная;
Абзац1.Стиль.Курсор = ДФ.Курсор.Перекрестие;
Форма1.Открыть();
ЛеваяГраница_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЛеваяГраница = "4px double rgb(255, 0, 0)"
, "", "!!! ") + "ЛеваяГраница_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЛеваяГраница", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 150;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.ЛеваяГраница = ДФ.ЛеваяГраница(4, ДФ.СтильГраницы.Двойная, ДФ.Цвет.Красный);
Форма1.Открыть();
Лево_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Лево = "100px"
, "", "!!! ") + "Лево_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Лево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Блок1.Стиль.Лево = 100;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Блок1;
Абзац1.Текст = "И снова лодочка скользит
|Неслышно по волнам,
|И солнце в зелени сквозит,
|Слетает сказка к нам.
|Как драгоценность берегу
|Тот день и нас на берегу.";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Форма1.Открыть();
ЛевыйРадиусВерхнейГраницы_РадиусГраницы_свойство.os
Перем ДФ, РадиусГраницы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
РадиусГраницы1.ЛевыйРадиусВерхнейГраницы = 10
, "", "!!! ") + "ЛевыйРадиусВерхнейГраницы_РадиусГраницы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
РадиусГраницы1 = ДФ.РадиусГраницы();
РадиусГраницы1.ЛевыйРадиусВерхнейГраницы = 10;
РадиусГраницы1.ПравыйРадиусВерхнейГраницы = 10;
РадиусГраницы1.ПравыйРадиусНижнейГраницы = 20;
РадиусГраницы1.ЛевыйРадиусНижнейГраницы = 20;
РадиусГраницы2 = ДФ.РадиусГраницы(10, 10, 20, 20);
Форма1.Открыть();
ЛевыйРадиусВерхнейГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЛевыйРадиусВерхнейГраницы = "25px"
, "", "!!! ") + "ЛевыйРадиусВерхнейГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЛевыйРадиусВерхнейГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 300;
Блок1.Текст = "Блок1";
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
// Блок1.Стиль.ЛевыйРадиусНижнейГраницы = "25px";
Блок1.Стиль.ЛевыйРадиусНижнейГраницы = 25;
// Блок1.Стиль.ПравыйРадиусНижнейГраницы = "25px";
Блок1.Стиль.ПравыйРадиусНижнейГраницы = 25;
// Блок1.Стиль.ПравыйРадиусВерхнейГраницы = "25px";
Блок1.Стиль.ПравыйРадиусВерхнейГраницы = 25;
// Блок1.Стиль.ЛевыйРадиусВерхнейГраницы = "25px";
Блок1.Стиль.ЛевыйРадиусВерхнейГраницы = 25;
Форма1.Открыть();
ЛевыйРадиусНижнейГраницы_РадиусГраницы_свойство.os
Перем ДФ, РадиусГраницы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
РадиусГраницы1.ЛевыйРадиусНижнейГраницы = 20
, "", "!!! ") + "ЛевыйРадиусНижнейГраницы_РадиусГраницы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
РадиусГраницы1 = ДФ.РадиусГраницы();
РадиусГраницы1.ЛевыйРадиусВерхнейГраницы = 10;
РадиусГраницы1.ПравыйРадиусВерхнейГраницы = 10;
РадиусГраницы1.ПравыйРадиусНижнейГраницы = 20;
РадиусГраницы1.ЛевыйРадиусНижнейГраницы = 20;
РадиусГраницы2 = ДФ.РадиусГраницы(10, 10, 20, 20);
Форма1.Открыть();
ЛевыйРадиусНижнейГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЛевыйРадиусНижнейГраницы = "25px"
, "", "!!! ") + "ЛевыйРадиусНижнейГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЛевыйРадиусНижнейГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 300;
Блок1.Текст = "Блок1";
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
// Блок1.Стиль.ЛевыйРадиусНижнейГраницы = "25px";
Блок1.Стиль.ЛевыйРадиусНижнейГраницы = 25;
// Блок1.Стиль.ПравыйРадиусНижнейГраницы = "25px";
Блок1.Стиль.ПравыйРадиусНижнейГраницы = 25;
Форма1.Открыть();
Линия_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "Линия_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.НачатьПуть();
Контекст2d1.ПерейтиКТочке(20, 20);
Контекст2d1.Линия(100, 20);
Контекст2d1.ДугаМежду(150, 20, 150, 70, 50);
Контекст2d1.Линия(150, 120);
Контекст2d1.Начертить();
Форма1.Открыть();
Логарифм10_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().Логарифм10(5) = 0.698970004336019
, "", "!!! ") + "Логарифм10_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().Логарифм10(5);
Форма1.Открыть();
Логарифм_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().Логарифм(5) = 1.6094379124341
, "", "!!! ") + "Логарифм_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().Логарифм(5);
Форма1.Открыть();
МаксимальнаяВысота_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.МаксимальнаяВысота = "100px"
, "", "!!! ") + "МаксимальнаяВысота_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "МаксимальнаяВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 500;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Блок1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Блок1.Стиль.МаксимальнаяВысота = 100;
Форма1.Открыть();
МаксимальнаяВысота_Форма_свойство.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "МаксимальнаяВысота_Форма_свойство.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Контент.Текст = "Форма1.МаксимальнаяВысота = 400";
Форма1.МаксимальнаяШирина = 300;
Форма1.МаксимальнаяВысота = 400;
Форма1.Открыть();
МаксимальнаяДлина_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.МаксимальнаяДлина = 50
, "", "!!! ") + "МаксимальнаяДлина_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "МаксимальнаяДлина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 600;
Форма1.НачальнаяВысота = 200;
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Значение = "ОбластьТекста1";
ОбластьТекста1.МаксимальнаяДлина = 50;
Форма1.Открыть();
МаксимальнаяДлина_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.МаксимальнаяДлина = 50
, "", "!!! ") + "МаксимальнаяДлина_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "МаксимальнаяДлина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 600;
Форма1.НачальнаяВысота = 200;
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Значение = "ПолеПароля1";
ПолеПароля1.МаксимальнаяДлина = 50;
Форма1.Открыть();
МаксимальнаяДлина_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.МаксимальнаяДлина = 50
, "", "!!! ") + "МаксимальнаяДлина_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "МаксимальнаяДлина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 600;
Форма1.НачальнаяВысота = 200;
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Значение = "ПолеПоиска1";
ПолеПоиска1.МаксимальнаяДлина = 50;
Форма1.Открыть();
МаксимальнаяДлина_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.МаксимальнаяДлина = 50
, "", "!!! ") + "МаксимальнаяДлина_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "МаксимальнаяДлина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 600;
Форма1.НачальнаяВысота = 200;
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Значение = "ПолеТекста1";
ПолеТекста1.МаксимальнаяДлина = 50;
Форма1.Открыть();
МаксимальнаяШирина_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.МаксимальнаяШирина = "100px"
, "", "!!! ") + "МаксимальнаяШирина_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "МаксимальнаяШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Блок1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Блок1.Стиль.МаксимальнаяШирина = 100;
Форма1.Открыть();
МаксимальнаяШирина_Форма_свойство.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "МаксимальнаяШирина_Форма_свойство.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Контент.Текст = "Форма1.МаксимальнаяШирина = 300";
Форма1.МаксимальнаяШирина = 300;
Форма1.МаксимальнаяВысота = 400;
Форма1.Открыть();
Максимум_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.Максимум = "22:00"
, "", "!!! ") + "Максимум_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "Максимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборВремени1 = ДФ.ВыборВремени();
Форма1.ДобавитьДочерний(ВыборВремени1);
ВыборВремени1.Значение = "22:00";
ВыборВремени1.Максимум = "22:00";
Форма1.Открыть();
Максимум_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.Максимум = "2000-01-01"
, "", "!!! ") + "Максимум_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "Максимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДаты1 = ДФ.ВыборДаты();
Форма1.ДобавитьДочерний(ВыборДаты1);
ВыборДаты1.Значение = "2000-01-01";
ВыборДаты1.Максимум = "2000-01-01";
Форма1.Открыть();
Максимум_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.Максимум = "2014-02-06T22:57Z"
, "", "!!! ") + "Максимум_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "Максимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
Форма1.ДобавитьДочерний(ВыборДатыВремени1);
ВыборДатыВремени1.Значение = "2014-02-06T22:57Z";
ВыборДатыВремени1.Максимум = "2014-02-06T22:57Z";
Форма1.Открыть();
Максимум_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Максимум = "2014-11-16T21:25:33"
, "", "!!! ") + "Максимум_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "Максимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
Форма1.ДобавитьДочерний(ВыборМестнойДатыВремени1);
ВыборМестнойДатыВремени1.Значение = "2014-11-16T21:25:33";
ВыборМестнойДатыВремени1.Максимум = "2014-11-16T21:25:33";
Форма1.Открыть();
Максимум_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.Максимум = "2014-09"
, "", "!!! ") + "Максимум_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "Максимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМесяца1 = ДФ.ВыборМесяца();
Форма1.ДобавитьДочерний(ВыборМесяца1);
ВыборМесяца1.Значение = "2014-09";
ВыборМесяца1.Максимум = "2014-09";
Форма1.Открыть();
Максимум_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.Максимум = "2014-W19"
, "", "!!! ") + "Максимум_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "Максимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборНедели1 = ДФ.ВыборНедели();
Форма1.ДобавитьДочерний(ВыборНедели1);
ВыборНедели1.Значение = "2014-W19";
ВыборНедели1.Максимум = "2014-W19";
Форма1.Открыть();
Максимум_Индикатор_свойство.os
Перем ДФ, Индикатор1;
Процедура Свойство() Экспорт
Сообщить(?(
Индикатор1.Максимум = 99.55
, "", "!!! ") + "Максимум_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Индикатор1, "Максимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Индикатор1 = ДФ.Индикатор();
Форма1.ДобавитьДочерний(Индикатор1);
Индикатор1.Значение = 66.35;
Индикатор1.Максимум = 99.55;
Форма1.Открыть();
Максимум_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.Максимум = 99.55
, "", "!!! ") + "Максимум_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "Максимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеЧисла1 = ДФ.ПолеЧисла();
Форма1.ДобавитьДочерний(ПолеЧисла1);
ПолеЧисла1.Значение = 75;
ПолеЧисла1.Максимум = 99.55;
Форма1.Открыть();
Максимум_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.Максимум = 99.55
, "", "!!! ") + "Максимум_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "Максимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ползунок1 = ДФ.Ползунок();
Форма1.ДобавитьДочерний(Ползунок1);
Ползунок1.Значение = 75;
Ползунок1.Максимум = 99.55;
Форма1.Открыть();
Максимум_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Свойство() Экспорт
Сообщить(?(
Шкала1.Максимум = 99.55
, "", "!!! ") + "Максимум_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Шкала1, "Максимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Шкала1 = ДФ.Шкала();
Форма1.ДобавитьДочерний(Шкала1);
Шкала1.Значение = 75;
Шкала1.Максимум = 99.55;
Форма1.Открыть();
МаксимумУведомленийНаЭкране_ДекларативныеФормы_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.МаксимумУведомленийНаЭкране = 2
, "", "!!! ") + "МаксимумУведомленийНаЭкране_ДекларативныеФормы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ДФ.МаксимумУведомленийНаЭкране = 2;
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Форма1.Открыть();
МасштабИгрек_Матрица_свойство.os
Перем ДФ, Матрица1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица1.МасштабИгрек = 1.8
, "", "!!! ") + "МасштабИгрек_Матрица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Матрица1 = ДФ.Матрица();
Матрица1.МасштабИкс = 1.4;
Матрица1.СдвигИгрек = -2.0;
Матрица1.СдвигИкс = 2.0;
Матрица1.МасштабИгрек = 1.8;
Матрица1.СмещениеИкс = -3.0;
Матрица1.СмещениеИгрек = 3.0;
Форма1.Открыть();
МасштабИкс_Матрица_свойство.os
Перем ДФ, Матрица1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица1.МасштабИкс = 1.4
, "", "!!! ") + "МасштабИкс_Матрица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Матрица1 = ДФ.Матрица();
Матрица1.МасштабИкс = 1.4;
Матрица1.СдвигИгрек = -2.0;
Матрица1.СдвигИкс = 2.0;
Матрица1.МасштабИгрек = 1.8;
Матрица1.СмещениеИкс = -3.0;
Матрица1.СмещениеИгрек = 3.0;
Форма1.Открыть();
Масштабировать_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "Масштабировать_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.РисоватьПрямоугольник(5, 5, 25, 15);
Контекст2d1.Масштабировать(1.5, 4);
Контекст2d1.РисоватьПрямоугольник(5, 5, 25, 15);
Форма1.Открыть();
Меньшее_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().Меньшее(10, 3) = 3
, "", "!!! ") + "Меньшее_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().Меньшее(10, 3);
Форма1.Открыть();
Меню_Лоток_свойство.os
Перем ДФ, Лоток1, ГлавноеМеню;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Лоток1.Меню = ГлавноеМеню
, "", "!!! ") + "Меню_Лоток_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Лоток1_Нажатие() Экспорт
Сообщить("Лоток1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Лоток1 = ДФ.Лоток();
Лоток1.Заголовок = "Заголовок";
Лоток1.Подсказка = "Подсказка";
Лоток1.Значок = "icon.png";
Лоток1.Нажатие = ДФ.Действие(ЭтотОбъект, "Лоток1_Нажатие");
ГлавноеМеню = ДФ.Меню(ДФ.ТипМеню.Главное); // Это строка главного меню.
ПодменюМенюФайл = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюФайл = ДФ.ЭлементМеню("Файл", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюФайл);
Открыть = ДФ.ЭлементМеню("Открыть", ДФ.ТипЭлементаМеню.Стандартный);
Сохранить = ДФ.ЭлементМеню("Сохранить");
Разделитель1 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Настройки = ДФ.ЭлементМеню("Настройки");
Разделитель2 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Выход = ДФ.ЭлементМеню("Выход");
ПодменюМенюФайл.Добавить(Открыть);
ПодменюМенюФайл.Добавить(Сохранить);
ПодменюМенюФайл.Добавить(Разделитель1);
ПодменюМенюФайл.Добавить(Настройки);
ПодменюМенюФайл.Добавить(Разделитель2);
ПодменюМенюФайл.Добавить(Выход);
ПодменюМенюПравка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюПравка = ДФ.ЭлементМеню("Правка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюПравка);
Отмена = ДФ.ЭлементМеню("Отмена");
Повтор = ДФ.ЭлементМеню("Повтор");
ПодменюМенюПравка.Добавить(Отмена);
ПодменюМенюПравка.Добавить(Повтор);
ПодменюМенюСправка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюСправка = ДФ.ЭлементМеню("Справка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюСправка);
ОПрограмме = ДФ.ЭлементМеню("О программе");
ПодменюМенюСправка.Добавить(ОПрограмме);
ГлавноеМеню.Добавить(МенюФайл);
ГлавноеМеню.Добавить(МенюПравка);
ГлавноеМеню.Добавить(МенюСправка);
Лоток1.Меню = ГлавноеМеню;
Форма1.Открыть();
Меню_Форма_свойство.os
Перем ДФ, Форма1, ГлавноеМеню;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Форма1.Меню = ГлавноеМеню
, "", "!!! ") + "Меню_Форма_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГлавноеМеню = ДФ.Меню(ДФ.ТипМеню.Главное); // Это строка главного меню.
ПодменюМенюФайл = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюФайл = ДФ.ЭлементМеню("Файл", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюФайл);
Открыть = ДФ.ЭлементМеню("Открыть", ДФ.ТипЭлементаМеню.Стандартный);
Сохранить = ДФ.ЭлементМеню("Сохранить");
Разделитель1 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Настройки = ДФ.ЭлементМеню("Настройки");
Разделитель2 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Выход = ДФ.ЭлементМеню("Выход");
ПодменюМенюФайл.Добавить(Открыть);
ПодменюМенюФайл.Добавить(Сохранить);
ПодменюМенюФайл.Добавить(Разделитель1);
ПодменюМенюФайл.Добавить(Настройки);
ПодменюМенюФайл.Добавить(Разделитель2);
ПодменюМенюФайл.Добавить(Выход);
ПодменюМенюПравка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюПравка = ДФ.ЭлементМеню("Правка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюПравка);
Отмена = ДФ.ЭлементМеню("Отмена");
Повтор = ДФ.ЭлементМеню("Повтор");
ПодменюМенюПравка.Добавить(Отмена);
ПодменюМенюПравка.Добавить(Повтор);
ПодменюМенюСправка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюСправка = ДФ.ЭлементМеню("Справка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюСправка);
ОПрограмме = ДФ.ЭлементМеню("О программе");
ПодменюМенюСправка.Добавить(ОПрограмме);
ГлавноеМеню.Добавить(МенюФайл);
ГлавноеМеню.Добавить(МенюПравка);
ГлавноеМеню.Добавить(МенюСправка);
Форма1.Меню = ГлавноеМеню;
Форма1.Открыть();
МинимальнаяВысота_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.МинимальнаяВысота = "500px"
, "", "!!! ") + "МинимальнаяВысота_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "МинимальнаяВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 500;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Блок1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Блок1.Стиль.МинимальнаяВысота = 500;
Форма1.Открыть();
МинимальнаяВысота_Форма_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "МинимальнаяВысота_Форма_свойство.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Контент.Текст = "Форма1.МинимальнаяВысота = 200";
Форма1.МинимальнаяШирина = 200;
Форма1.МинимальнаяВысота = 200;
Форма1.Открыть();
МинимальнаяШирина_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.МинимальнаяШирина = "600px"
, "", "!!! ") + "МинимальнаяШирина_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "МинимальнаяШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 400;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Блок1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Блок1.Стиль.МинимальнаяШирина = 600;
Форма1.Открыть();
МинимальнаяШирина_Форма_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "МинимальнаяШирина_Форма_свойство.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Контент.Текст = "Форма1.МинимальнаяШирина = 200";
Форма1.МинимальнаяШирина = 200;
Форма1.МинимальнаяВысота = 200;
Форма1.Открыть();
Минимум_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.Минимум = "21:00"
, "", "!!! ") + "Минимум_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "Минимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Значение = "22:00";
ВыборВремени1.Минимум = "21:00";
Форма1.Открыть();
Минимум_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.Минимум = "1998-01-01"
, "", "!!! ") + "Минимум_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "Минимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Значение = "2000-01-01";
ВыборДаты1.Минимум = "1998-01-01";
Форма1.Открыть();
Минимум_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.Минимум = "2014-02-06T22:57Z"
, "", "!!! ") + "Минимум_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "Минимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Значение = "2015-02-06T22:57Z";
ВыборДатыВремени1.Минимум = "2014-02-06T22:57Z";
Форма1.Открыть();
Минимум_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Минимум = "2014-11-16T21:25:33"
, "", "!!! ") + "Минимум_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "Минимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Значение = "2015-11-16T21:25:33";
ВыборМестнойДатыВремени1.Минимум = "2014-11-16T21:25:33";
Форма1.Открыть();
Минимум_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.Минимум = "2014-09"
, "", "!!! ") + "Минимум_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "Минимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Значение = "2014-10";
ВыборМесяца1.Минимум = "2014-09";
Форма1.Открыть();
Минимум_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.Минимум = "2014-W19"
, "", "!!! ") + "Минимум_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "Минимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Значение = "2014-W20";
ВыборНедели1.Минимум = "2014-W19";
Форма1.Открыть();
Минимум_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.Минимум = 39.55
, "", "!!! ") + "Минимум_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "Минимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Значение = 65;
ПолеЧисла1.Минимум = 39.55;
Форма1.Открыть();
Минимум_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.Минимум = 39.55
, "", "!!! ") + "Минимум_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "Минимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Значение = 65;
Ползунок1.Минимум = 39.55;
Форма1.Открыть();
Минимум_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Свойство() Экспорт
Сообщить(?(
Шкала1.Минимум = 39.55
, "", "!!! ") + "Минимум_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Шкала1, "Минимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Шкала1.Значение = 65;
Шкала1.Минимум = 39.55;
Форма1.Открыть();
МножественныйВыбор_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборФайла1.МножественныйВыбор
, "", "!!! ") + "МножественныйВыбор_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1, "МножественныйВыбор", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура ВыборФайла1_ПриИзменении() Экспорт
Сообщить("ДФ.АргументыСобытия.Файлы = " + ДФ.АргументыСобытия.Файлы);
Сообщить("ВыборФайла1.Файлы = " + ВыборФайла1.Файлы);
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "ВыборФайла1_ПриИзменении");
ВыборФайла1.МножественныйВыбор = Истина;
Форма1.Открыть();
МножественныйВыбор_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.МножественныйВыбор
, "", "!!! ") + "МножественныйВыбор_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "МножественныйВыбор", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Ширина = 150;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = ПолеСписка1;
ГруппировкаПоляСписка1.Надпись = "Жители деревни Простоквашино";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка1.Значение = "Кот";
ЭлементПоляСписка1.Текст = "Матроскин";
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Пёс";
ЭлементПоляСписка2.Текст = "Шарик";
ЭлементПоляСписка3 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка3.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка3.Значение = "Птица";
ЭлементПоляСписка3.Текст = "Галчонок";
ПолеСписка1.МножественныйВыбор = Истина;
Форма1.Открыть();
Множитель_Перспектива_свойство.os
Перем ДФ, Перспектива1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Перспектива1.Множитель = 3
, "", "!!! ") + "Множитель_Перспектива_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Перспектива1 = ДФ.Перспектива();
Перспектива1.Множитель = 3;
Перспектива2 = ДФ.Перспектива(4);
Форма1.Открыть();
МозаикаКартинки_Стиль_свойство.os
Перем ДФ, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Форма1.Контент.Стиль.МозаикаКартинки = ДФ.МозаикаКартинки.Повторять
, "", "!!! ") + "МозаикаКартинки_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Форма1.Контент.Стиль, "МозаикаКартинки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 500;
Форма1.Контент.Стиль.ФоновоеИзображение = "maslenica10.jpg";
Форма1.Контент.Стиль.МозаикаКартинки = ДФ.МозаикаКартинки.Повторять;
Форма1.Открыть();
МозаикаКартинки_Фон_свойство.os
Перем ДФ, Фон1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Фон1.МозаикаКартинки = ДФ.МозаикаКартинки.Повторять
, "", "!!! ") + "МозаикаКартинки_Фон_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент = Форма1.Контент;
Контент.ДобавитьДочерний(ДФ.Абзац()).Текст = "Алиса и сама не заметила, как очутилась на каминной полке.";
Фон1 = ДФ.Фон();
Фон1.ЦветФона = ДФ.Цвет(243, 243, 243);
Фон1.ФоновоеИзображение = "img_flwr.gif";
Фон1.МозаикаКартинки = ДФ.МозаикаКартинки.Повторять;
Фон1.ПоложениеКартинки = ДФ.ПоложениеКартинки.ВерхПраво;
Контент.Стиль.Фон = Фон1;
Форма1.Открыть();
МозаикаКартинкиГраницы_КартинкаГраницы_свойство.os
Перем ДФ, КартинкаГраницы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
КартинкаГраницы1.МозаикаКартинкиГраницы = ДФ.МозаикаКартинкиГраницы.Закруглять
, "", "!!! ") + "МозаикаКартинкиГраницы_КартинкаГраницы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Текст = "Здравствуй МИР!";
Блок1.Стиль.Границы = ДФ.Границы(15, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Заполнение = ДФ.Заполнение(10, 20, 20, 10);
КартинкаГраницы1 = ДФ.КартинкаГраницы();
// КартинкаГраницы1.ИсточникКартинкиГраницы = "file:///C:/444/~Деклар Форма/abc.png";
КартинкаГраницы1.ИсточникКартинкиГраницы = "border.png";
КартинкаГраницы1.НарезкаКартинкиГраницы = 30;
КартинкаГраницы1.ШиринаКартинкиГраницы = 10;
КартинкаГраницы1.СмещениеКартинкиГраницы = 10;
КартинкаГраницы1.МозаикаКартинкиГраницы = ДФ.МозаикаКартинкиГраницы.Закруглять;
Блок1.Стиль.КартинкаГраницы = КартинкаГраницы1;
Форма1.Открыть();
МозаикаКартинкиГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.МозаикаКартинкиГраницы = ДФ.МозаикаКартинкиГраницы.Закруглять
, "", "!!! ") + "МозаикаКартинкиГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "МозаикаКартинкиГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.ЦветФона = ДФ.Цвет.СветлоСерый;
Блок1.Стиль.Границы = ДФ.Границы(30, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.ИсточникКартинкиГраницы = "border.png";
Блок1.Стиль.НарезкаКартинкиГраницы = 30;
Блок1.Стиль.ШиринаКартинкиГраницы = ДФ.Размер(10, 20);
Блок1.Стиль.СмещениеКартинкиГраницы = 0;
Блок1.Стиль.МозаикаКартинкиГраницы = ДФ.МозаикаКартинкиГраницы.Закруглять;
Форма1.Открыть();
МышьНадЭлементом_Абзац_событие.os
Перем ДФ, Абзац1;
Процедура МышьНадЭлементом() Экспорт
Абзац1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Абзац1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Абзац_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Абзац1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Стиль.Ширина = 250;
Абзац1.Текст = "Наведите мышь";
Абзац1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Абзац1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Абзац1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Абзац1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Аудио_событие.os
Перем ДФ, Аудио1;
Процедура МышьНадЭлементом() Экспорт
Аудио1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Аудио1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Аудио_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Аудио1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Аудио1 = Форма1.ДобавитьДочерний(ДФ.Аудио());
Аудио1.Контролы = Истина;
// Аудио1.Источник = "file:///C:/444/Pic/Kaoma_Lambada.mp3";
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Стиль.Ширина = 250;
Аудио1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Аудио1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Аудио1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Аудио1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Блок_событие.os
Перем ДФ, Блок1;
Процедура МышьНадЭлементом() Экспорт
Блок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Блок1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Блок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Блок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Текст = "Наведите мышь";
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Блок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Блок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ВыборВремени_событие.os
Перем ДФ, ВыборВремени1;
Процедура МышьНадЭлементом() Экспорт
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ВыборВремени1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ВыборВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
ВыборВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
ВыборВремени1.Стиль.Ширина = 250;
ВыборВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборВремени1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ВыборВремени1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ВыборДаты_событие.os
Перем ДФ, ВыборДаты1;
Процедура МышьНадЭлементом() Экспорт
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ВыборДаты1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ВыборДаты_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
ВыборДаты1 = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
ВыборДаты1.Стиль.Ширина = 250;
ВыборДаты1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборДаты1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ВыборДаты1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ВыборДатыВремени_событие.os
Перем ДФ, ВыборДатыВремени1;
Процедура МышьНадЭлементом() Экспорт
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ВыборДатыВремени1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ВыборДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
ВыборДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
ВыборДатыВремени1.Стиль.Ширина = 250;
ВыборДатыВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборДатыВремени1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ВыборДатыВремени1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ВыборМестнойДатыВремени_событие.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура МышьНадЭлементом() Экспорт
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ВыборМестнойДатыВремени1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ВыборМестнойДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
ВыборМестнойДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
ВыборМестнойДатыВремени1.Стиль.Ширина = 250;
ВыборМестнойДатыВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборМестнойДатыВремени1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ВыборМестнойДатыВремени1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ВыборМесяца_событие.os
Перем ДФ, ВыборМесяца1;
Процедура МышьНадЭлементом() Экспорт
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ВыборМесяца1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ВыборМесяца_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
ВыборМесяца1 = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
ВыборМесяца1.Стиль.Ширина = 250;
ВыборМесяца1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборМесяца1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ВыборМесяца1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ВыборНедели_событие.os
Перем ДФ, ВыборНедели1;
Процедура МышьНадЭлементом() Экспорт
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ВыборНедели1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ВыборНедели_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
ВыборНедели1 = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
ВыборНедели1.Стиль.Ширина = 250;
ВыборНедели1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборНедели1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ВыборНедели1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ВыборФайла_событие.os
Перем ДФ, ВыборФайла1;
Процедура МышьНадЭлементом() Экспорт
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ВыборФайла1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ВыборФайла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
ВыборФайла1 = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
ВыборФайла1.Стиль.Ширина = 250;
ВыборФайла1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборФайла1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ВыборФайла1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ВыборЦвета_событие.os
Перем ДФ, ВыборЦвета1;
Процедура МышьНадЭлементом() Экспорт
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ВыборЦвета1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ВыборЦвета_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
ВыборЦвета1 = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
ВыборЦвета1.Стиль.Ширина = 250;
ВыборЦвета1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборЦвета1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ВыборЦвета1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Группа_событие.os
Перем ДФ, Группа1;
Процедура МышьНадЭлементом() Экспорт
Группа1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Группа1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Группа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Группа1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Группа1 = Форма1.ДобавитьДочерний(ДФ.Группа());
Группа1.Стиль.Ширина = 250;
Группа1.Текст = "Наведите мышь";
Группа1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Группа1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Группа1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Группа1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ГруппировкаПоляСписка_событие.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура МышьНадЭлементом() Экспорт
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ГруппировкаПоляСписка1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ГруппировкаПоляСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
ГруппировкаПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ГруппировкаПоляСписка());
ГруппировкаПоляСписка1.Стиль.Ширина = 250;
ГруппировкаПоляСписка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ГруппировкаПоляСписка1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ГруппировкаПоляСписка1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Диалог_событие.os
Перем ДФ, Диалог1;
Процедура МышьНадЭлементом() Экспорт
Диалог1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Диалог1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Диалог_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Диалог1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Диалог1 = Форма1.ДобавитьДочерний(ДФ.Диалог());
Диалог1.Стиль.Ширина = 250;
Диалог1.Текст = "Наведите мышь";
Диалог1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Диалог1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Диалог1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Диалог1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Диалог1.Показать();
Форма1.Открыть();
МышьНадЭлементом_ДополнительныйБлок_событие.os
Перем ДФ, ДополнительныйБлок1;
Процедура МышьНадЭлементом() Экспорт
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ДополнительныйБлок1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ДополнительныйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ДополнительныйБлок1 = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
ДополнительныйБлок1.Стиль.Ширина = 250;
ДополнительныйБлок1.Текст = "Наведите мышь";
ДополнительныйБлок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ДополнительныйБлок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ДополнительныйБлок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ЖирныйТекст_событие.os
Перем ДФ, ЖирныйТекст1;
Процедура МышьНадЭлементом() Экспорт
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ЖирныйТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ЖирныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЖирныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
ЖирныйТекст1.Стиль.Ширина = 250;
ЖирныйТекст1.Текст = "Наведите мышь";
ЖирныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЖирныйТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ЖирныйТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Заголовок1_событие.os
Перем ДФ, Заголовок11;
Процедура МышьНадЭлементом() Экспорт
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Заголовок11.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Заголовок1_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок11 = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок11.Стиль.Ширина = 250;
Заголовок11.Текст = "Наведите мышь";
Заголовок11.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок11.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Заголовок11.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Заголовок2_событие.os
Перем ДФ, Заголовок21;
Процедура МышьНадЭлементом() Экспорт
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Заголовок21.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Заголовок2_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок21 = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок21.Стиль.Ширина = 250;
Заголовок21.Текст = "Наведите мышь";
Заголовок21.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок21.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Заголовок21.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Заголовок3_событие.os
Перем ДФ, Заголовок31;
Процедура МышьНадЭлементом() Экспорт
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Заголовок31.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Заголовок3_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок31 = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок31.Стиль.Ширина = 250;
Заголовок31.Текст = "Наведите мышь";
Заголовок31.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок31.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Заголовок31.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Заголовок4_событие.os
Перем ДФ, Заголовок41;
Процедура МышьНадЭлементом() Экспорт
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Заголовок41.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Заголовок4_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок41 = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Заголовок41.Стиль.Ширина = 250;
Заголовок41.Текст = "Наведите мышь";
Заголовок41.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок41.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Заголовок41.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Заголовок5_событие.os
Перем ДФ, Заголовок51;
Процедура МышьНадЭлементом() Экспорт
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Заголовок51.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Заголовок5_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок51 = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Заголовок51.Стиль.Ширина = 250;
Заголовок51.Текст = "Наведите мышь";
Заголовок51.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок51.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Заголовок51.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Заголовок6_событие.os
Перем ДФ, Заголовок61;
Процедура МышьНадЭлементом() Экспорт
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Заголовок61.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Заголовок6_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок61 = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Заголовок61.Стиль.Ширина = 250;
Заголовок61.Текст = "Наведите мышь";
Заголовок61.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок61.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Заголовок61.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Заголовок_событие.os
Перем ДФ, Заголовок1;
Процедура МышьНадЭлементом() Экспорт
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Заголовок1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Заголовок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок1 = Форма1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Стиль.Ширина = 250;
Заголовок1.Текст = "Наведите мышь";
Заголовок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Заголовок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ЗаголовокГруппы_событие.os
Перем ДФ, ЗаголовокГруппы1;
Процедура МышьНадЭлементом() Экспорт
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ЗаголовокГруппы1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ЗаголовокГруппы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЗаголовокГруппы1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокГруппы());
ЗаголовокГруппы1.Стиль.Ширина = 250;
ЗаголовокГруппы1.Текст = "Наведите мышь";
ЗаголовокГруппы1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЗаголовокГруппы1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ЗаголовокГруппы1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ЗаголовокРаскрываемогоБлока_событие.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура МышьНадЭлементом() Экспорт
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ЗаголовокРаскрываемогоБлока_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЗаголовокРаскрываемогоБлока1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокРаскрываемогоБлока());
ЗаголовокРаскрываемогоБлока1.Стиль.Ширина = 250;
ЗаголовокРаскрываемогоБлока1.Текст = "Наведите мышь";
ЗаголовокРаскрываемогоБлока1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЗаголовокРаскрываемогоБлока1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ЗаголовокРаскрываемогоБлока1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Изображение_событие.os
Перем ДФ, Изображение1;
Процедура МышьНадЭлементом() Экспорт
Изображение1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Изображение1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Изображение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Изображение1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Стиль.Ширина = 250;
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Изображение1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Изображение1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Изображение1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Индикатор_событие.os
Перем ДФ, Индикатор1;
Процедура МышьНадЭлементом() Экспорт
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Индикатор1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Индикатор_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
Индикатор1 = Форма1.ДобавитьДочерний(ДФ.Индикатор());
Индикатор1.Стиль.Ширина = 250;
Индикатор1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Индикатор1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Индикатор1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Итоги_событие.os
Перем ДФ, Итоги1;
Процедура МышьНадЭлементом() Экспорт
Итоги1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Итоги1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Итоги_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Итоги1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Итоги1 = Форма1.ДобавитьДочерний(ДФ.Итоги());
Итоги1.Стиль.Ширина = 250;
Итоги1.Текст = "Наведите мышь";
Итоги1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Итоги1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Итоги1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Итоги1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Карта_событие.os
Перем ДФ, Карта1;
Процедура МышьНадЭлементом() Экспорт
Карта1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Карта1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Карта_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Карта1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Карта1 = Форма1.ДобавитьДочерний(ДФ.Карта());
Карта1.Стиль.Ширина = 250;
Карта1.Текст = "Наведите мышь";
Карта1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Карта1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Карта1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Карта1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Кнопка_событие.os
Перем ДФ, Кнопка1;
Процедура МышьНадЭлементом() Экспорт
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Кнопка1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Кнопка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Стиль.Ширина = 250;
Кнопка1.Текст = "Наведите мышь";
Кнопка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кнопка1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Кнопка1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Код_событие.os
Перем ДФ, Код1;
Процедура МышьНадЭлементом() Экспорт
Код1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Код1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Код_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Код1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Код1 = Форма1.ДобавитьДочерний(ДФ.Код());
Код1.Стиль.Ширина = 250;
Код1.Текст = "Наведите мышь";
Код1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Код1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Код1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Код1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Колонтитул_событие.os
Перем ДФ, Колонтитул1;
Процедура МышьНадЭлементом() Экспорт
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Колонтитул1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Колонтитул_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Колонтитул1 = Форма1.ДобавитьДочерний(ДФ.Колонтитул());
Колонтитул1.Стиль.Ширина = 250;
Колонтитул1.Текст = "Наведите мышь";
Колонтитул1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Колонтитул1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Колонтитул1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_КурсивТекст_событие.os
Перем ДФ, КурсивТекст1;
Процедура МышьНадЭлементом() Экспорт
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
КурсивТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_КурсивТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
КурсивТекст1 = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
КурсивТекст1.Стиль.Ширина = 250;
КурсивТекст1.Текст = "Наведите мышь";
КурсивТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
КурсивТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
КурсивТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Линия_событие.os
Перем ДФ, Линия1;
Процедура МышьНадЭлементом() Экспорт
Линия1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Линия1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Линия_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Линия1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Линия1 = Форма1.ДобавитьДочерний(ДФ.Линия());
Линия1.Стиль.Ширина = 250;
Линия1.Текст = "Наведите мышь";
Линия1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Линия1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Линия1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Линия1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_МаркированныйТекст_событие.os
Перем ДФ, МаркированныйТекст1;
Процедура МышьНадЭлементом() Экспорт
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
МаркированныйТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_МаркированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
МаркированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
МаркированныйТекст1.Стиль.Ширина = 250;
МаркированныйТекст1.Текст = "Наведите мышь";
МаркированныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
МаркированныйТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
МаркированныйТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_МедиаГруппа_событие.os
Перем ДФ, МедиаГруппа1;
Процедура МышьНадЭлементом() Экспорт
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
МедиаГруппа1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_МедиаГруппа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
МедиаГруппа1 = Форма1.ДобавитьДочерний(ДФ.МедиаГруппа());
МедиаГруппа1.Стиль.Ширина = 250;
МедиаГруппа1.Текст = "Наведите мышь";
МедиаГруппа1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
МедиаГруппа1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
МедиаГруппа1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_МелкийТекст_событие.os
Перем ДФ, МелкийТекст1;
Процедура МышьНадЭлементом() Экспорт
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
МелкийТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_МелкийТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
МелкийТекст1 = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
МелкийТекст1.Стиль.Ширина = 250;
МелкийТекст1.Текст = "Наведите мышь";
МелкийТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
МелкийТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
МелкийТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_НадстрочныйТекст_событие.os
Перем ДФ, НадстрочныйТекст1;
Процедура МышьНадЭлементом() Экспорт
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
НадстрочныйТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_НадстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
НадстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
НадстрочныйТекст1.Стиль.Ширина = 250;
НадстрочныйТекст1.Текст = "Наведите мышь";
НадстрочныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
НадстрочныйТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
НадстрочныйТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_НаправленныйТекст_событие.os
Перем ДФ, НаправленныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НаправленныйТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_НаправленныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьНадЭлементом() Экспорт
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
НаправленныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
НаправленныйТекст1.Стиль.Ширина = 250;
НаправленныйТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
НаправленныйТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Форма1.Открыть();
МышьНадЭлементом_НеупорядоченныйСписок_событие.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура МышьНадЭлементом() Экспорт
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
НеупорядоченныйСписок1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_НеупорядоченныйСписок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
НеупорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
НеупорядоченныйСписок1.Стиль.Ширина = 250;
НеупорядоченныйСписок1.Текст = "Наведите мышь";
НеупорядоченныйСписок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
НеупорядоченныйСписок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
НеупорядоченныйСписок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_НижнийКолонтитул_событие.os
Перем ДФ, НижнийКолонтитул1;
Процедура МышьНадЭлементом() Экспорт
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
НижнийКолонтитул1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_НижнийКолонтитул_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
НижнийКолонтитул1 = Форма1.ДобавитьДочерний(ДФ.НижнийКолонтитул());
НижнийКолонтитул1.Стиль.Ширина = 250;
НижнийКолонтитул1.Текст = "Наведите мышь";
НижнийКолонтитул1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
НижнийКолонтитул1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
НижнийКолонтитул1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Область_событие.os
Перем ДФ, Область1;
Процедура МышьНадЭлементом() Экспорт
Область1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Область1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Область_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Область1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Область1 = Форма1.ДобавитьДочерний(ДФ.Область());
Область1.Стиль.Ширина = 250;
Область1.Текст = "Наведите мышь";
Область1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Область1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Область1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Область1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ОбластьТаблицы_событие.os
Перем ДФ, ОбластьТаблицы1;
Процедура МышьНадЭлементом() Экспорт
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ОбластьТаблицы1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ОбластьТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ОбластьТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
ОбластьТаблицы1.Стиль.Ширина = 250;
ОбластьТаблицы1.Текст = "Наведите мышь";
ОбластьТаблицы1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ОбластьТаблицы1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ОбластьТаблицы1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ОбластьТекста_событие.os
Перем ДФ, ОбластьТекста1;
Процедура МышьНадЭлементом() Экспорт
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ОбластьТекста1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ОбластьТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Стиль.Ширина = 250;
ОбластьТекста1.Текст = "Наведите мышь";
ОбластьТекста1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ОбластьТекста1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ОбластьТекста1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ОписаниеМедиа_событие.os
Перем ДФ, ОписаниеМедиа1;
Процедура МышьНадЭлементом() Экспорт
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ОписаниеМедиа1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ОписаниеМедиа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ОписаниеМедиа1 = Форма1.ДобавитьДочерний(ДФ.ОписаниеМедиа());
ОписаниеМедиа1.Стиль.Ширина = 250;
ОписаниеМедиа1.Текст = "Наведите мышь";
ОписаниеМедиа1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ОписаниеМедиа1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ОписаниеМедиа1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Определение_событие.os
Перем ДФ, Определение1;
Процедура МышьНадЭлементом() Экспорт
Определение1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Определение1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Определение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Определение1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Определение1 = Форма1.ДобавитьДочерний(ДФ.Определение());
Определение1.Стиль.Ширина = 250;
Определение1.Текст = "Наведите мышь";
Определение1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Определение1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Определение1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Определение1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Переключатель_событие.os
Перем ДФ, Переключатель1;
Процедура МышьНадЭлементом() Экспорт
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Переключатель1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Переключатель_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Переключатель1 = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель1.Стиль.Ширина = 250;
Переключатель1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Переключатель1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Переключатель1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Перенос_событие.os
Перем ДФ, Перенос1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Перенос1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Перенос_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьНадЭлементом() Экспорт
Перенос1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Перенос1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Перенос1 = Форма1.ДобавитьДочерний(ДФ.Перенос());
Перенос1.Стиль.Ширина = 250;
Перенос1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Перенос1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Форма1.Открыть();
МышьНадЭлементом_Подпись_событие.os
Перем ДФ, Подпись1;
Процедура МышьНадЭлементом() Экспорт
Подпись1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Подпись1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Подпись_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Подпись1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Подпись1 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Стиль.Ширина = 250;
Подпись1.Текст = "Наведите мышь";
Подпись1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Подпись1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Подпись1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Подпись1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ПодстрочныйТекст_событие.os
Перем ДФ, ПодстрочныйТекст1;
Процедура МышьНадЭлементом() Экспорт
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ПодстрочныйТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ПодстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ПодстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
ПодстрочныйТекст1.Стиль.Ширина = 250;
ПодстрочныйТекст1.Текст = "Наведите мышь";
ПодстрочныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПодстрочныйТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ПодстрочныйТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ПодчеркнутыйТекст_событие.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура МышьНадЭлементом() Экспорт
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ПодчеркнутыйТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ПодчеркнутыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ПодчеркнутыйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
ПодчеркнутыйТекст1.Стиль.Ширина = 250;
ПодчеркнутыйТекст1.Текст = "Наведите мышь";
ПодчеркнутыйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПодчеркнутыйТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ПодчеркнутыйТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ПолеПароля_событие.os
Перем ДФ, ПолеПароля1;
Процедура МышьНадЭлементом() Экспорт
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ПолеПароля1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ПолеПароля_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
ПолеПароля1 = Форма1.ДобавитьДочерний(ДФ.ПолеПароля());
ПолеПароля1.Стиль.Ширина = 250;
ПолеПароля1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПолеПароля1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ПолеПароля1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ПолеПоиска_событие.os
Перем ДФ, ПолеПоиска1;
Процедура МышьНадЭлементом() Экспорт
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ПолеПоиска1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ПолеПоиска_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
ПолеПоиска1 = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
ПолеПоиска1.Стиль.Ширина = 250;
ПолеПоиска1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПолеПоиска1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ПолеПоиска1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ПолеСписка_событие.os
Перем ДФ, ПолеСписка1;
Процедура МышьНадЭлементом() Экспорт
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ПолеСписка1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ПолеСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
ПолеСписка1 = Форма1.ДобавитьДочерний(ДФ.ПолеСписка());
ПолеСписка1.Стиль.Ширина = 250;
ПолеСписка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПолеСписка1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ПолеСписка1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ПолеТекста_событие.os
Перем ДФ, ПолеТекста1;
Процедура МышьНадЭлементом() Экспорт
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ПолеТекста1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ПолеТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
ПолеТекста1 = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
ПолеТекста1.Стиль.Ширина = 250;
ПолеТекста1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПолеТекста1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ПолеТекста1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ПолеЧисла_событие.os
Перем ДФ, ПолеЧисла1;
Процедура МышьНадЭлементом() Экспорт
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ПолеЧисла1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ПолеЧисла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
ПолеЧисла1 = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Стиль.Ширина = 250;
ПолеЧисла1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПолеЧисла1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ПолеЧисла1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Ползунок_событие.os
Перем ДФ, Ползунок1;
Процедура МышьНадЭлементом() Экспорт
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Ползунок1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Ползунок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
Ползунок1 = Форма1.ДобавитьДочерний(ДФ.Ползунок());
Ползунок1.Стиль.Ширина = 250;
Ползунок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Ползунок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Ползунок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_РаскрываемыйБлок_событие.os
Перем ДФ, РаскрываемыйБлок1;
Процедура МышьНадЭлементом() Экспорт
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
РаскрываемыйБлок1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_РаскрываемыйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
РаскрываемыйБлок1.Стиль.Ширина = 250;
РаскрываемыйБлок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
РаскрываемыйБлок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
РаскрываемыйБлок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Результат_событие.os
Перем ДФ, Результат1;
Процедура МышьНадЭлементом() Экспорт
Результат1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Результат1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Результат_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Результат1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Результат1 = Форма1.ДобавитьДочерний(ДФ.Результат());
Результат1.Стиль.Ширина = 250;
Результат1.Текст = "Наведите мышь";
Результат1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Результат1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Результат1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Результат1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_СписокОпределений_событие.os
Перем ДФ, СписокОпределений1;
Процедура МышьНадЭлементом() Экспорт
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
СписокОпределений1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_СписокОпределений_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
СписокОпределений1 = Форма1.ДобавитьДочерний(ДФ.СписокОпределений());
СписокОпределений1.Стиль.Ширина = 250;
СписокОпределений1.Текст = "Наведите мышь";
СписокОпределений1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
СписокОпределений1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
СписокОпределений1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Ссылка_событие.os
Перем ДФ, Ссылка1;
Процедура МышьНадЭлементом() Экспорт
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Ссылка1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Ссылка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Ссылка1 = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка1.Стиль.Ширина = 250;
Ссылка1.Текст = "Наведите мышь";
Ссылка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Ссылка1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Ссылка1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_СтрокаТаблицы_событие.os
Перем ДФ, СтрокаТаблицы1;
Процедура МышьНадЭлементом() Экспорт
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
СтрокаТаблицы1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_СтрокаТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
СтрокаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаТаблицы1.Стиль.Ширина = 250;
СтрокаТаблицы1.Текст = "Наведите мышь";
СтрокаТаблицы1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
СтрокаТаблицы1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
СтрокаТаблицы1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Таблица_событие.os
Перем ДФ, Таблица1;
Процедура МышьНадЭлементом() Экспорт
Таблица1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Таблица1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Таблица_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Таблица1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Стиль.Ширина = 250;
Таблица1.Текст = "Наведите мышь";
Таблица1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Таблица1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Таблица1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Таблица1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Термин_событие.os
Перем ДФ, Термин1;
Процедура МышьНадЭлементом() Экспорт
Термин1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Термин1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Термин_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Термин1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Термин1 = Форма1.ДобавитьДочерний(ДФ.Термин());
Термин1.Стиль.Ширина = 250;
Термин1.Текст = "Наведите мышь";
Термин1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Термин1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Термин1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Термин1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_УдаленыйТекст_событие.os
Перем ДФ, УдаленыйТекст1;
Процедура МышьНадЭлементом() Экспорт
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
УдаленыйТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_УдаленыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
УдаленыйТекст1 = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
УдаленыйТекст1.Стиль.Ширина = 250;
УдаленыйТекст1.Текст = "Наведите мышь";
УдаленыйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
УдаленыйТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
УдаленыйТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_УпорядоченныйСписок_событие.os
Перем ДФ, УпорядоченныйСписок1;
Процедура МышьНадЭлементом() Экспорт
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
УпорядоченныйСписок1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_УпорядоченныйСписок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
УпорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.УпорядоченныйСписок());
УпорядоченныйСписок1.Стиль.Ширина = 250;
УпорядоченныйСписок1.Текст = "Наведите мышь";
УпорядоченныйСписок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
УпорядоченныйСписок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
УпорядоченныйСписок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Флажок_событие.os
Перем ДФ, Флажок1;
Процедура МышьНадЭлементом() Экспорт
Флажок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Флажок1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Флажок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Флажок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
Флажок1 = Форма1.ДобавитьДочерний(ДФ.Флажок());
Флажок1.Стиль.Ширина = 250;
Флажок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Флажок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Флажок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Флажок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ФорматированныйТекст_событие.os
Перем ДФ, ФорматированныйТекст1;
Процедура МышьНадЭлементом() Экспорт
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ФорматированныйТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ФорматированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ФорматированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
ФорматированныйТекст1.Стиль.Ширина = 250;
ФорматированныйТекст1.Текст = "Наведите мышь";
ФорматированныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ФорматированныйТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ФорматированныйТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Холст_событие.os
Перем ДФ, Холст1;
Процедура МышьНадЭлементом() Экспорт
Холст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Холст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Холст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Холст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Ширина = 250;
Холст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Холст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Холст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Холст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ШапкаТаблицы_событие.os
Перем ДФ, ШапкаТаблицы1;
Процедура МышьНадЭлементом() Экспорт
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ШапкаТаблицы1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ШапкаТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ШапкаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
ШапкаТаблицы1.Стиль.Ширина = 250;
ШапкаТаблицы1.Текст = "Наведите мышь";
ШапкаТаблицы1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ШапкаТаблицы1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ШапкаТаблицы1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Шкала_событие.os
Перем ДФ, Шкала1;
Процедура МышьНадЭлементом() Экспорт
Шкала1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Шкала1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Шкала_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Шкала1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
Шкала1 = Форма1.ДобавитьДочерний(ДФ.Шкала());
Шкала1.Стиль.Ширина = 250;
Шкала1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Шкала1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Шкала1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Шкала1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ЭлементПоляСписка_событие.os
Перем ДФ, ЭлементПоляСписка1;
Процедура МышьНадЭлементом() Экспорт
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ЭлементПоляСписка1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ЭлементПоляСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЭлементПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементПоляСписка());
ЭлементПоляСписка1.Стиль.Ширина = 250;
ЭлементПоляСписка1.Текст = "Наведите мышь";
ЭлементПоляСписка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЭлементПоляСписка1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ЭлементПоляСписка1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ЭлементСписка_событие.os
Перем ДФ, ЭлементСписка1;
Процедура МышьНадЭлементом() Экспорт
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ЭлементСписка1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ЭлементСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
ЭлементСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Стиль.Ширина = 250;
ЭлементСписка1.Текст = "Наведите мышь";
ЭлементСписка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЭлементСписка1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ЭлементСписка1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_Ячейка_событие.os
Перем ДФ, Ячейка1;
Процедура МышьНадЭлементом() Экспорт
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
Ячейка1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_Ячейка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
Ячейка1 = Форма1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Стиль.Ширина = 250;
Ячейка1.Текст = "Наведите мышь";
Ячейка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Ячейка1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Ячейка1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьНадЭлементом_ЯчейкаЗаголовка_событие.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура МышьНадЭлементом() Экспорт
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Сообщить(?(
ЯчейкаЗаголовка1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьНадЭлементом_ЯчейкаЗаголовка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь";
ЯчейкаЗаголовка1 = Форма1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Стиль.Ширина = 250;
ЯчейкаЗаголовка1.Текст = "Наведите мышь";
ЯчейкаЗаголовка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЯчейкаЗаголовка1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ЯчейкаЗаголовка1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Абзац_событие.os
Перем ДФ, Абзац1;
Процедура МышьНадЭлементом() Экспорт
Абзац1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Абзац1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Абзац1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Абзац_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Стиль.Ширина = 250;
Абзац1.Текст = "Наведите мышь";
Абзац1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Абзац1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Абзац1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Абзац1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Аудио_событие.os
Перем ДФ, Аудио1;
Процедура МышьНадЭлементом() Экспорт
Аудио1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Аудио1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Аудио1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Аудио_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Аудио1 = Форма1.ДобавитьДочерний(ДФ.Аудио());
Аудио1.Контролы = Истина;
// Аудио1.Источник = "file:///C:/444/Pic/Kaoma_Lambada.mp3";
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Стиль.Ширина = 250;
Аудио1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Аудио1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Аудио1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Аудио1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Блок_событие.os
Перем ДФ, Блок1;
Процедура МышьНадЭлементом() Экспорт
Блок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Блок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Блок1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Блок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Текст = "Наведите мышь";
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Блок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Блок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ВыборВремени_событие.os
Перем ДФ, ВыборВремени1;
Процедура МышьНадЭлементом() Экспорт
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ВыборВремени1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ВыборВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
ВыборВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
ВыборВремени1.Стиль.Ширина = 250;
ВыборВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборВремени1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ВыборВремени1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ВыборДаты_событие.os
Перем ДФ, ВыборДаты1;
Процедура МышьНадЭлементом() Экспорт
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ВыборДаты1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ВыборДаты_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
ВыборДаты1 = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
ВыборДаты1.Стиль.Ширина = 250;
ВыборДаты1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборДаты1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ВыборДаты1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ВыборДатыВремени_событие.os
Перем ДФ, ВыборДатыВремени1;
Процедура МышьНадЭлементом() Экспорт
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ВыборДатыВремени1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ВыборДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
ВыборДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
ВыборДатыВремени1.Стиль.Ширина = 250;
ВыборДатыВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборДатыВремени1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ВыборДатыВремени1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ВыборМестнойДатыВремени_событие.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура МышьНадЭлементом() Экспорт
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ВыборМестнойДатыВремени1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ВыборМестнойДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
ВыборМестнойДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
ВыборМестнойДатыВремени1.Стиль.Ширина = 250;
ВыборМестнойДатыВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборМестнойДатыВремени1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ВыборМестнойДатыВремени1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ВыборМесяца_событие.os
Перем ДФ, ВыборМесяца1;
Процедура МышьНадЭлементом() Экспорт
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ВыборМесяца1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ВыборМесяца_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
ВыборМесяца1 = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
ВыборМесяца1.Стиль.Ширина = 250;
ВыборМесяца1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборМесяца1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ВыборМесяца1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ВыборНедели_событие.os
Перем ДФ, ВыборНедели1;
Процедура МышьНадЭлементом() Экспорт
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ВыборНедели1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ВыборНедели_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
ВыборНедели1 = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
ВыборНедели1.Стиль.Ширина = 250;
ВыборНедели1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборНедели1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ВыборНедели1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ВыборФайла_событие.os
Перем ДФ, ВыборФайла1;
Процедура МышьНадЭлементом() Экспорт
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ВыборФайла1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ВыборФайла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
ВыборФайла1 = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
ВыборФайла1.Стиль.Ширина = 250;
ВыборФайла1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборФайла1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ВыборФайла1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ВыборЦвета_событие.os
Перем ДФ, ВыборЦвета1;
Процедура МышьНадЭлементом() Экспорт
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ВыборЦвета1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ВыборЦвета_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
ВыборЦвета1 = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
ВыборЦвета1.Стиль.Ширина = 250;
ВыборЦвета1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборЦвета1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ВыборЦвета1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Группа_событие.os
Перем ДФ, Группа1;
Процедура МышьНадЭлементом() Экспорт
Группа1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Группа1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Группа1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Группа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Группа1 = Форма1.ДобавитьДочерний(ДФ.Группа());
Группа1.Стиль.Ширина = 250;
Группа1.Текст = "Наведите мышь";
Группа1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Группа1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Группа1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Группа1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ГруппировкаПоляСписка_событие.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура МышьНадЭлементом() Экспорт
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ГруппировкаПоляСписка1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ГруппировкаПоляСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
ГруппировкаПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ГруппировкаПоляСписка());
ГруппировкаПоляСписка1.Стиль.Ширина = 250;
ГруппировкаПоляСписка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ГруппировкаПоляСписка1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ГруппировкаПоляСписка1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Диалог_событие.os
Перем ДФ, Диалог1;
Процедура МышьНадЭлементом() Экспорт
Диалог1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Диалог1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Диалог1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Диалог_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Диалог1 = Форма1.ДобавитьДочерний(ДФ.Диалог());
Диалог1.Стиль.Ширина = 250;
Диалог1.Текст = "Наведите мышь";
Диалог1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Диалог1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Диалог1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Диалог1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Диалог1.Показать();
Форма1.Открыть();
МышьПокинулаЭлемент_ДополнительныйБлок_событие.os
Перем ДФ, ДополнительныйБлок1;
Процедура МышьНадЭлементом() Экспорт
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ДополнительныйБлок1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ДополнительныйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ДополнительныйБлок1 = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
ДополнительныйБлок1.Стиль.Ширина = 250;
ДополнительныйБлок1.Текст = "Наведите мышь";
ДополнительныйБлок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ДополнительныйБлок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ДополнительныйБлок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ЖирныйТекст_событие.os
Перем ДФ, ЖирныйТекст1;
Процедура МышьНадЭлементом() Экспорт
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ЖирныйТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ЖирныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЖирныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
ЖирныйТекст1.Стиль.Ширина = 250;
ЖирныйТекст1.Текст = "Наведите мышь";
ЖирныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЖирныйТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ЖирныйТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Заголовок1_событие.os
Перем ДФ, Заголовок11;
Процедура МышьНадЭлементом() Экспорт
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Заголовок11.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Заголовок1_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок11 = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок11.Стиль.Ширина = 250;
Заголовок11.Текст = "Наведите мышь";
Заголовок11.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок11.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Заголовок11.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Заголовок2_событие.os
Перем ДФ, Заголовок21;
Процедура МышьНадЭлементом() Экспорт
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Заголовок21.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Заголовок2_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок21 = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок21.Стиль.Ширина = 250;
Заголовок21.Текст = "Наведите мышь";
Заголовок21.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок21.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Заголовок21.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Заголовок3_событие.os
Перем ДФ, Заголовок31;
Процедура МышьНадЭлементом() Экспорт
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Заголовок31.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Заголовок3_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок31 = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок31.Стиль.Ширина = 250;
Заголовок31.Текст = "Наведите мышь";
Заголовок31.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок31.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Заголовок31.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Заголовок4_событие.os
Перем ДФ, Заголовок41;
Процедура МышьНадЭлементом() Экспорт
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Заголовок41.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Заголовок4_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок41 = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Заголовок41.Стиль.Ширина = 250;
Заголовок41.Текст = "Наведите мышь";
Заголовок41.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок41.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Заголовок41.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Заголовок5_событие.os
Перем ДФ, Заголовок51;
Процедура МышьНадЭлементом() Экспорт
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Заголовок51.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Заголовок5_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок51 = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Заголовок51.Стиль.Ширина = 250;
Заголовок51.Текст = "Наведите мышь";
Заголовок51.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок51.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Заголовок51.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Заголовок6_событие.os
Перем ДФ, Заголовок61;
Процедура МышьНадЭлементом() Экспорт
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Заголовок61.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Заголовок6_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок61 = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Заголовок61.Стиль.Ширина = 250;
Заголовок61.Текст = "Наведите мышь";
Заголовок61.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок61.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Заголовок61.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Заголовок_событие.os
Перем ДФ, Заголовок1;
Процедура МышьНадЭлементом() Экспорт
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Заголовок1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Заголовок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок1 = Форма1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Стиль.Ширина = 250;
Заголовок1.Текст = "Наведите мышь";
Заголовок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Заголовок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ЗаголовокГруппы_событие.os
Перем ДФ, ЗаголовокГруппы1;
Процедура МышьНадЭлементом() Экспорт
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ЗаголовокГруппы1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ЗаголовокГруппы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЗаголовокГруппы1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокГруппы());
ЗаголовокГруппы1.Стиль.Ширина = 250;
ЗаголовокГруппы1.Текст = "Наведите мышь";
ЗаголовокГруппы1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЗаголовокГруппы1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ЗаголовокГруппы1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ЗаголовокРаскрываемогоБлока_событие.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура МышьНадЭлементом() Экспорт
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ЗаголовокРаскрываемогоБлока_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЗаголовокРаскрываемогоБлока1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокРаскрываемогоБлока());
ЗаголовокРаскрываемогоБлока1.Стиль.Ширина = 250;
ЗаголовокРаскрываемогоБлока1.Текст = "Наведите мышь";
ЗаголовокРаскрываемогоБлока1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЗаголовокРаскрываемогоБлока1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ЗаголовокРаскрываемогоБлока1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Изображение_событие.os
Перем ДФ, Изображение1;
Процедура МышьНадЭлементом() Экспорт
Изображение1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Изображение1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Изображение1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Изображение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Стиль.Ширина = 250;
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Изображение1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Изображение1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Изображение1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Индикатор_событие.os
Перем ДФ, Индикатор1;
Процедура МышьНадЭлементом() Экспорт
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Индикатор1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Индикатор_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
Индикатор1 = Форма1.ДобавитьДочерний(ДФ.Индикатор());
Индикатор1.Стиль.Ширина = 250;
Индикатор1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Индикатор1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Индикатор1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Итоги_событие.os
Перем ДФ, Итоги1;
Процедура МышьНадЭлементом() Экспорт
Итоги1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Итоги1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Итоги1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Итоги_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Итоги1 = Форма1.ДобавитьДочерний(ДФ.Итоги());
Итоги1.Стиль.Ширина = 250;
Итоги1.Текст = "Наведите мышь";
Итоги1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Итоги1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Итоги1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Итоги1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Карта_событие.os
Перем ДФ, Карта1;
Процедура МышьНадЭлементом() Экспорт
Карта1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Карта1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Карта1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Карта_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Карта1 = Форма1.ДобавитьДочерний(ДФ.Карта());
Карта1.Стиль.Ширина = 250;
Карта1.Текст = "Наведите мышь";
Карта1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Карта1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Карта1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Карта1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Кнопка_событие.os
Перем ДФ, Кнопка1;
Процедура МышьНадЭлементом() Экспорт
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Кнопка1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Кнопка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Стиль.Ширина = 250;
Кнопка1.Текст = "Наведите мышь";
Кнопка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кнопка1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Кнопка1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Код_событие.os
Перем ДФ, Код1;
Процедура МышьНадЭлементом() Экспорт
Код1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Код1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Код1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Код_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Код1 = Форма1.ДобавитьДочерний(ДФ.Код());
Код1.Стиль.Ширина = 250;
Код1.Текст = "Наведите мышь";
Код1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Код1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Код1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Код1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Колонтитул_событие.os
Перем ДФ, Колонтитул1;
Процедура МышьНадЭлементом() Экспорт
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Колонтитул1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Колонтитул_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Колонтитул1 = Форма1.ДобавитьДочерний(ДФ.Колонтитул());
Колонтитул1.Стиль.Ширина = 250;
Колонтитул1.Текст = "Наведите мышь";
Колонтитул1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Колонтитул1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Колонтитул1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_КурсивТекст_событие.os
Перем ДФ, КурсивТекст1;
Процедура МышьНадЭлементом() Экспорт
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
КурсивТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_КурсивТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
КурсивТекст1 = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
КурсивТекст1.Стиль.Ширина = 250;
КурсивТекст1.Текст = "Наведите мышь";
КурсивТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
КурсивТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
КурсивТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Линия_событие.os
Перем ДФ, Линия1;
Процедура МышьНадЭлементом() Экспорт
Линия1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Линия1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Линия1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Линия_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Линия1 = Форма1.ДобавитьДочерний(ДФ.Линия());
Линия1.Стиль.Ширина = 250;
Линия1.Текст = "Наведите мышь";
Линия1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Линия1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Линия1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Линия1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_МаркированныйТекст_событие.os
Перем ДФ, МаркированныйТекст1;
Процедура МышьНадЭлементом() Экспорт
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
МаркированныйТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_МаркированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
МаркированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
МаркированныйТекст1.Стиль.Ширина = 250;
МаркированныйТекст1.Текст = "Наведите мышь";
МаркированныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
МаркированныйТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
МаркированныйТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_МедиаГруппа_событие.os
Перем ДФ, МедиаГруппа1;
Процедура МышьНадЭлементом() Экспорт
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
МедиаГруппа1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_МедиаГруппа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
МедиаГруппа1 = Форма1.ДобавитьДочерний(ДФ.МедиаГруппа());
МедиаГруппа1.Стиль.Ширина = 250;
МедиаГруппа1.Текст = "Наведите мышь";
МедиаГруппа1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
МедиаГруппа1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
МедиаГруппа1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_МелкийТекст_событие.os
Перем ДФ, МелкийТекст1;
Процедура МышьНадЭлементом() Экспорт
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
МелкийТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_МелкийТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
МелкийТекст1 = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
МелкийТекст1.Стиль.Ширина = 250;
МелкийТекст1.Текст = "Наведите мышь";
МелкийТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
МелкийТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
МелкийТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_НадстрочныйТекст_событие.os
Перем ДФ, НадстрочныйТекст1;
Процедура МышьНадЭлементом() Экспорт
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
НадстрочныйТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_НадстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
НадстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
НадстрочныйТекст1.Стиль.Ширина = 250;
НадстрочныйТекст1.Текст = "Наведите мышь";
НадстрочныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
НадстрочныйТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
НадстрочныйТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_НаправленныйТекст_событие.os
Перем ДФ, НаправленныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НаправленныйТекст1.МышьПокинулаЭлемент.ИмяМетода = "МышьПокинулаЭлемент"
, "", "!!! ") + "МышьПокинулаЭлемент_НаправленныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьНадЭлементом() Экспорт
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
НаправленныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
НаправленныйТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
НаправленныйТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Форма1.Открыть();
МышьПокинулаЭлемент_НеупорядоченныйСписок_событие.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура МышьНадЭлементом() Экспорт
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
НеупорядоченныйСписок1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_НеупорядоченныйСписок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
НеупорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
НеупорядоченныйСписок1.Стиль.Ширина = 250;
НеупорядоченныйСписок1.Текст = "Наведите мышь";
НеупорядоченныйСписок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
НеупорядоченныйСписок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
НеупорядоченныйСписок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_НижнийКолонтитул_событие.os
Перем ДФ, НижнийКолонтитул1;
Процедура МышьНадЭлементом() Экспорт
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
НижнийКолонтитул1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_НижнийКолонтитул_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
НижнийКолонтитул1 = Форма1.ДобавитьДочерний(ДФ.НижнийКолонтитул());
НижнийКолонтитул1.Стиль.Ширина = 250;
НижнийКолонтитул1.Текст = "Наведите мышь";
НижнийКолонтитул1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
НижнийКолонтитул1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
НижнийКолонтитул1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Область_событие.os
Перем ДФ, Область1;
Процедура МышьНадЭлементом() Экспорт
Область1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Область1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Область1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Область_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Область1 = Форма1.ДобавитьДочерний(ДФ.Область());
Область1.Стиль.Ширина = 250;
Область1.Текст = "Наведите мышь";
Область1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Область1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Область1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Область1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ОбластьТаблицы_событие.os
Перем ДФ, ОбластьТаблицы1;
Процедура МышьНадЭлементом() Экспорт
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ОбластьТаблицы1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ОбластьТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ОбластьТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
ОбластьТаблицы1.Стиль.Ширина = 250;
ОбластьТаблицы1.Текст = "Наведите мышь";
ОбластьТаблицы1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ОбластьТаблицы1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ОбластьТаблицы1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ОбластьТекста_событие.os
Перем ДФ, ОбластьТекста1;
Процедура МышьНадЭлементом() Экспорт
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ОбластьТекста1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ОбластьТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Стиль.Ширина = 250;
ОбластьТекста1.Текст = "Наведите мышь";
ОбластьТекста1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ОбластьТекста1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ОбластьТекста1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ОписаниеМедиа_событие.os
Перем ДФ, ОписаниеМедиа1;
Процедура МышьНадЭлементом() Экспорт
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ОписаниеМедиа1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ОписаниеМедиа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ОписаниеМедиа1 = Форма1.ДобавитьДочерний(ДФ.ОписаниеМедиа());
ОписаниеМедиа1.Стиль.Ширина = 250;
ОписаниеМедиа1.Текст = "Наведите мышь";
ОписаниеМедиа1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ОписаниеМедиа1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ОписаниеМедиа1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Определение_событие.os
Перем ДФ, Определение1;
Процедура МышьНадЭлементом() Экспорт
Определение1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Определение1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Определение1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Определение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Определение1 = Форма1.ДобавитьДочерний(ДФ.Определение());
Определение1.Стиль.Ширина = 250;
Определение1.Текст = "Наведите мышь";
Определение1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Определение1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Определение1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Определение1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Переключатель_событие.os
Перем ДФ, Переключатель1;
Процедура МышьНадЭлементом() Экспорт
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Переключатель1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Переключатель_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Переключатель1 = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель1.Стиль.Ширина = 250;
Переключатель1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Переключатель1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Переключатель1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Перенос_событие.os
Перем ДФ, Перенос1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Перенос1.МышьПокинулаЭлемент.ИмяМетода = "МышьПокинулаЭлемент"
, "", "!!! ") + "МышьПокинулаЭлемент_Перенос_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МышьНадЭлементом() Экспорт
Перенос1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Перенос1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Перенос1 = Форма1.ДобавитьДочерний(ДФ.Перенос());
Перенос1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Перенос1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Форма1.Открыть();
МышьПокинулаЭлемент_Подпись_событие.os
Перем ДФ, Подпись1;
Процедура МышьНадЭлементом() Экспорт
Подпись1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Подпись1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Подпись1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Подпись_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Подпись1 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Стиль.Ширина = 250;
Подпись1.Текст = "Наведите мышь";
Подпись1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Подпись1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Подпись1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Подпись1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ПодстрочныйТекст_событие.os
Перем ДФ, ПодстрочныйТекст1;
Процедура МышьНадЭлементом() Экспорт
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ПодстрочныйТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ПодстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ПодстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
ПодстрочныйТекст1.Стиль.Ширина = 250;
ПодстрочныйТекст1.Текст = "Наведите мышь";
ПодстрочныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПодстрочныйТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ПодстрочныйТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ПодчеркнутыйТекст_событие.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура МышьНадЭлементом() Экспорт
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ПодчеркнутыйТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ПодчеркнутыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ПодчеркнутыйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
ПодчеркнутыйТекст1.Стиль.Ширина = 250;
ПодчеркнутыйТекст1.Текст = "Наведите мышь";
ПодчеркнутыйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПодчеркнутыйТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ПодчеркнутыйТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ПолеПароля_событие.os
Перем ДФ, ПолеПароля1;
Процедура МышьНадЭлементом() Экспорт
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ПолеПароля1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ПолеПароля_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
ПолеПароля1 = Форма1.ДобавитьДочерний(ДФ.ПолеПароля());
ПолеПароля1.Стиль.Ширина = 250;
ПолеПароля1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПолеПароля1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ПолеПароля1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ПолеПоиска_событие.os
Перем ДФ, ПолеПоиска1;
Процедура МышьНадЭлементом() Экспорт
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ПолеПоиска1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ПолеПоиска_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
ПолеПоиска1 = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
ПолеПоиска1.Стиль.Ширина = 250;
ПолеПоиска1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПолеПоиска1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ПолеПоиска1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ПолеСписка_событие.os
Перем ДФ, ПолеСписка1;
Процедура МышьНадЭлементом() Экспорт
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ПолеСписка1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ПолеСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
ПолеСписка1 = Форма1.ДобавитьДочерний(ДФ.ПолеСписка());
ПолеСписка1.Стиль.Ширина = 250;
ПолеСписка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПолеСписка1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ПолеСписка1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ПолеТекста_событие.os
Перем ДФ, ПолеТекста1;
Процедура МышьНадЭлементом() Экспорт
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ПолеТекста1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ПолеТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
ПолеТекста1 = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
ПолеТекста1.Стиль.Ширина = 250;
ПолеТекста1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПолеТекста1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ПолеТекста1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ПолеЧисла_событие.os
Перем ДФ, ПолеЧисла1;
Процедура МышьНадЭлементом() Экспорт
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ПолеЧисла1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ПолеЧисла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
ПолеЧисла1 = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Стиль.Ширина = 250;
ПолеЧисла1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПолеЧисла1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ПолеЧисла1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Ползунок_событие.os
Перем ДФ, Ползунок1;
Процедура МышьНадЭлементом() Экспорт
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Ползунок1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Ползунок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
Ползунок1 = Форма1.ДобавитьДочерний(ДФ.Ползунок());
Ползунок1.Стиль.Ширина = 250;
Ползунок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Ползунок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Ползунок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_РаскрываемыйБлок_событие.os
Перем ДФ, РаскрываемыйБлок1;
Процедура МышьНадЭлементом() Экспорт
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
РаскрываемыйБлок1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_РаскрываемыйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
РаскрываемыйБлок1.Стиль.Ширина = 250;
РаскрываемыйБлок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
РаскрываемыйБлок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
РаскрываемыйБлок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Результат_событие.os
Перем ДФ, Результат1;
Процедура МышьНадЭлементом() Экспорт
Результат1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Результат1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Результат1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Результат_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Результат1 = Форма1.ДобавитьДочерний(ДФ.Результат());
Результат1.Стиль.Ширина = 250;
Результат1.Текст = "Наведите мышь";
Результат1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Результат1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Результат1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Результат1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_СписокОпределений_событие.os
Перем ДФ, СписокОпределений1;
Процедура МышьНадЭлементом() Экспорт
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
СписокОпределений1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_СписокОпределений_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
СписокОпределений1 = Форма1.ДобавитьДочерний(ДФ.СписокОпределений());
СписокОпределений1.Стиль.Ширина = 250;
СписокОпределений1.Текст = "Наведите мышь";
СписокОпределений1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
СписокОпределений1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
СписокОпределений1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Ссылка_событие.os
Перем ДФ, Ссылка1;
Процедура МышьНадЭлементом() Экспорт
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Ссылка1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Ссылка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Ссылка1 = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка1.Стиль.Ширина = 250;
Ссылка1.Текст = "Наведите мышь";
Ссылка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Ссылка1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Ссылка1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_СтрокаТаблицы_событие.os
Перем ДФ, СтрокаТаблицы1;
Процедура МышьНадЭлементом() Экспорт
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
СтрокаТаблицы1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_СтрокаТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
СтрокаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаТаблицы1.Стиль.Ширина = 250;
СтрокаТаблицы1.Текст = "Наведите мышь";
СтрокаТаблицы1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
СтрокаТаблицы1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
СтрокаТаблицы1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Таблица_событие.os
Перем ДФ, Таблица1;
Процедура МышьНадЭлементом() Экспорт
Таблица1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Таблица1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Таблица1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Таблица_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Стиль.Ширина = 250;
Таблица1.Текст = "Наведите мышь";
Таблица1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Таблица1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Таблица1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Таблица1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Термин_событие.os
Перем ДФ, Термин1;
Процедура МышьНадЭлементом() Экспорт
Термин1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Термин1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Термин1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Термин_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Термин1 = Форма1.ДобавитьДочерний(ДФ.Термин());
Термин1.Стиль.Ширина = 250;
Термин1.Текст = "Наведите мышь";
Термин1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Термин1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Термин1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Термин1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_УдаленыйТекст_событие.os
Перем ДФ, УдаленыйТекст1;
Процедура МышьНадЭлементом() Экспорт
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
УдаленыйТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_УдаленыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
УдаленыйТекст1 = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
УдаленыйТекст1.Стиль.Ширина = 250;
УдаленыйТекст1.Текст = "Наведите мышь";
УдаленыйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
УдаленыйТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
УдаленыйТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_УпорядоченныйСписок_событие.os
Перем ДФ, УпорядоченныйСписок1;
Процедура МышьНадЭлементом() Экспорт
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
УпорядоченныйСписок1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_УпорядоченныйСписок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
УпорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.УпорядоченныйСписок());
УпорядоченныйСписок1.Стиль.Ширина = 250;
УпорядоченныйСписок1.Текст = "Наведите мышь";
УпорядоченныйСписок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
УпорядоченныйСписок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
УпорядоченныйСписок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Флажок_событие.os
Перем ДФ, Флажок1;
Процедура МышьНадЭлементом() Экспорт
Флажок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Флажок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Флажок1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Флажок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
Флажок1 = Форма1.ДобавитьДочерний(ДФ.Флажок());
Флажок1.Стиль.Ширина = 250;
Флажок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Флажок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Флажок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Флажок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ФорматированныйТекст_событие.os
Перем ДФ, ФорматированныйТекст1;
Процедура МышьНадЭлементом() Экспорт
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ФорматированныйТекст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ФорматированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ФорматированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
ФорматированныйТекст1.Стиль.Ширина = 250;
ФорматированныйТекст1.Текст = "Наведите мышь";
ФорматированныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ФорматированныйТекст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ФорматированныйТекст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Холст_событие.os
Перем ДФ, Холст1;
Процедура МышьНадЭлементом() Экспорт
Холст1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Холст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Холст1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Холст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Ширина = 250;
Холст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Холст1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Холст1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Холст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ШапкаТаблицы_событие.os
Перем ДФ, ШапкаТаблицы1;
Процедура МышьНадЭлементом() Экспорт
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ШапкаТаблицы1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ШапкаТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ШапкаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
ШапкаТаблицы1.Стиль.Ширина = 250;
ШапкаТаблицы1.Текст = "Наведите мышь";
ШапкаТаблицы1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ШапкаТаблицы1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ШапкаТаблицы1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Шкала_событие.os
Перем ДФ, Шкала1;
Процедура МышьНадЭлементом() Экспорт
Шкала1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Шкала1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Шкала1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Шкала_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Текст = "Наведи мышь и отведи";
Шкала1 = Форма1.ДобавитьДочерний(ДФ.Шкала());
Шкала1.Стиль.Ширина = 250;
Шкала1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Шкала1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Шкала1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Шкала1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ЭлементПоляСписка_событие.os
Перем ДФ, ЭлементПоляСписка1;
Процедура МышьНадЭлементом() Экспорт
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ЭлементПоляСписка1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ЭлементПоляСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЭлементПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементПоляСписка());
ЭлементПоляСписка1.Стиль.Ширина = 250;
ЭлементПоляСписка1.Текст = "Наведите мышь";
ЭлементПоляСписка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЭлементПоляСписка1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ЭлементПоляСписка1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ЭлементСписка_событие.os
Перем ДФ, ЭлементСписка1;
Процедура МышьНадЭлементом() Экспорт
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ЭлементСписка1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ЭлементСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЭлементСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Стиль.Ширина = 250;
ЭлементСписка1.Текст = "Наведите мышь";
ЭлементСписка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЭлементСписка1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ЭлементСписка1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_Ячейка_событие.os
Перем ДФ, Ячейка1;
Процедура МышьНадЭлементом() Экспорт
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
Ячейка1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_Ячейка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Ячейка1 = Форма1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Стиль.Ширина = 250;
Ячейка1.Текст = "Наведите мышь";
Ячейка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Ячейка1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Ячейка1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
МышьПокинулаЭлемент_ЯчейкаЗаголовка_событие.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура МышьНадЭлементом() Экспорт
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.Синий;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Сообщить(?(
ЯчейкаЗаголовка1.МышьНадЭлементом.ИмяМетода = "МышьНадЭлементом"
, "", "!!! ") + "МышьПокинулаЭлемент_ЯчейкаЗаголовка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЯчейкаЗаголовка1 = Форма1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Стиль.Ширина = 250;
ЯчейкаЗаголовка1.Текст = "Наведите мышь";
ЯчейкаЗаголовка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЯчейкаЗаголовка1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
ЯчейкаЗаголовка1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
Надпись_ГруппировкаПоляСписка_свойство.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.Надпись = "Жители деревни Простоквашино"
, "", "!!! ") + "Надпись_ГруппировкаПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппировкаПоляСписка1, "Надпись", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Ширина = 150;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = ПолеСписка1;
ГруппировкаПоляСписка1.Надпись = "Жители деревни Простоквашино";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка1.Значение = "Кот";
ЭлементПоляСписка1.Текст = "Матроскин";
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Пёс";
ЭлементПоляСписка2.Текст = "Шарик";
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Птица";
ЭлементПоляСписка2.Текст = "Галчонок";
Форма1.Открыть();
Надпись_ЭлементМеню_свойство.os
Перем ДФ, Открыть;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Открыть.Надпись = "Открыть"
, "", "!!! ") + "Надпись_ЭлементМеню_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ГлавноеМеню = ДФ.Меню(ДФ.ТипМеню.Главное);
ПодменюМенюФайл = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюФайл = ДФ.ЭлементМеню("Файл", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюФайл);
Открыть = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Стандартный);
Открыть.Надпись = "Открыть";
Сохранить = ДФ.ЭлементМеню("Сохранить");
Разделитель1 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Настройки = ДФ.ЭлементМеню("Настройки");
Разделитель2 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Выход = ДФ.ЭлементМеню("Выход");
ПодменюМенюФайл.Добавить(Открыть);
ПодменюМенюФайл.Добавить(Сохранить);
ПодменюМенюФайл.Добавить(Разделитель1);
ПодменюМенюФайл.Добавить(Настройки);
ПодменюМенюФайл.Добавить(Разделитель2);
ПодменюМенюФайл.Добавить(Выход);
ПодменюМенюПравка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюПравка = ДФ.ЭлементМеню("Правка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюПравка);
Отмена = ДФ.ЭлементМеню("Отмена");
Повтор = ДФ.ЭлементМеню("Повтор");
ПодменюМенюПравка.Добавить(Отмена);
ПодменюМенюПравка.Добавить(Повтор);
ПодменюМенюСправка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюСправка = ДФ.ЭлементМеню("Справка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюСправка);
ОПрограмме = ДФ.ЭлементМеню("О программе");
ПодменюМенюСправка.Добавить(ОПрограмме);
ГлавноеМеню.Добавить(МенюФайл);
ГлавноеМеню.Добавить(МенюПравка);
ГлавноеМеню.Добавить(МенюСправка);
Форма1.Меню = ГлавноеМеню;
Форма1.Открыть();
Надпись_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка3;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементПоляСписка3.Надпись = "Галчонок"
, "", "!!! ") + "Надпись_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка3, "Надпись", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Ширина = 150;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = ПолеСписка1;
ГруппировкаПоляСписка1.Надпись = "Жители деревни Простоквашино";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка1.Значение = "Кот";
ЭлементПоляСписка1.Надпись = "Матроскин";
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Пёс";
ЭлементПоляСписка2.Надпись = "Шарик";
ЭлементПоляСписка3 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка3.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка3.Значение = "Птица";
ЭлементПоляСписка3.Надпись = "Галчонок";
Форма1.Открыть();
НадЦелью_Абзац_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_Абзац_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.Абзац());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_Артикль_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_Артикль_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.Артикль());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Артикль());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_Блок_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_Блок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.Блок());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Блок());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_Группа_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_Группа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.Группа());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Группа());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_Диалог_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_Диалог_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.Диалог());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Источник.Показать();
Форма1.ДобавитьДочерний(ДФ.Блок());
Цель = Форма1.ДобавитьДочерний(ДФ.Диалог());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Цель.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Цель.Стиль.Верх = 200;
Цель.Показать();
Форма1.Открыть();
НадЦелью_ДополнительныйБлок_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_ДополнительныйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_ЖирныйТекст_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_ЖирныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_Заголовок1_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_Заголовок1_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_Заголовок2_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_Заголовок2_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_Заголовок3_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_Заголовок3_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_Заголовок4_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_Заголовок4_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_Заголовок5_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_Заголовок5_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_Заголовок6_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_Заголовок6_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_Кнопка_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_Кнопка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_КурсивТекст_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_КурсивТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_МаркированныйТекст_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_МаркированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_МелкийТекст_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_МелкийТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_НадстрочныйТекст_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_НадстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_НаправленныйТекст_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_НаправленныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_ОбластьТекста_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_ОбластьТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_ПодстрочныйТекст_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_ПодстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_ПодчеркнутыйТекст_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_ПодчеркнутыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_РаскрываемыйБлок_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_РаскрываемыйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_Результат_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_Результат_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.Результат());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Результат());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_Ссылка_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_Ссылка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_Таблица_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_Таблица_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.Таблица());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Таблица());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_УдаленыйТекст_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_УдаленыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_ФорматированныйТекст_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_ФорматированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
Цель.Текст = "Перетащи Источник сюда";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
НадЦелью_Шкала_событие.os
Перем ДФ, Источник, Цель;
Процедура НадЦелью() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "НадЦелью_Шкала_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Заголовок = "Перетащите мышью внутрь квадрата";
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Источник = Форма1.ДобавитьДочерний(ДФ.Шкала());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Шкала());
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.НадЦелью = ДФ.Действие(ЭтотОбъект, "НадЦелью");
Форма1.Открыть();
Нажатие_Абзац_метод.os
Перем ДФ, Абзац1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Абзац1.Нажатие.ИмяМетода = "Абзац1_Нажатие"
, "", "!!! ") + "Нажатие_Абзац_метод.os" + " " + ТекущаяДата());
Абзац1.Нажатие();
КонецПроцедуры
Процедура Абзац1_Нажатие() Экспорт
// Сообщить("Абзац1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Абзац";
Абзац1.Стиль.Высота = 200;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.Нажатие = ДФ.Действие(ЭтотОбъект, "Абзац1_Нажатие");
Форма1.Открыть();
Нажатие_Абзац_событие.os
Перем ДФ, Абзац1;
Процедура Абзац1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Абзац_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Абзац";
Абзац1.Стиль.Высота = 200;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.Нажатие = ДФ.Действие(ЭтотОбъект, "Абзац1_Нажатие");
Форма1.Открыть();
Нажатие_Артикль_метод.os
Перем ДФ, Артикль1;
Процедура Форма1_Загружена() Экспорт
Артикль1.Нажатие();
КонецПроцедуры
Процедура Артикль1_Нажатие() Экспорт
Сообщить(?(
Артикль1.КлавишаДоступа = "w"
, "", "!!! ") + "Нажатие_Артикль_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Стиль.Высота = 60;
Артикль1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Артикль1.Нажатие = ДФ.Действие(ЭтотОбъект, "Артикль1_Нажатие");
Артикль1.КлавишаДоступа = "w";
Форма1.Открыть();
Нажатие_Артикль_событие.os
Перем ДФ, Артикль1;
Процедура Артикль1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Артикль_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Текст = "Это Артикль";
Артикль1.Стиль.Высота = 200;
Артикль1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Артикль1.Нажатие = ДФ.Действие(ЭтотОбъект, "Артикль1_Нажатие");
Форма1.Открыть();
Нажатие_Аудио_метод.os
Перем ДФ, Аудио1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Аудио1.Нажатие.ИмяМетода = "Аудио1_Нажатие"
, "", "!!! ") + "Нажатие_Аудио_метод.os" + " " + ТекущаяДата());
Аудио1.Нажатие();
КонецПроцедуры
Процедура Аудио1_Нажатие() Экспорт
// Сообщить("Аудио1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Стиль.Высота = 200;
Аудио1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Аудио1.Нажатие = ДФ.Действие(ЭтотОбъект, "Аудио1_Нажатие");
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";
Форма1.Открыть();
Нажатие_Аудио_событие.os
Перем ДФ, Аудио1;
Процедура Аудио1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Аудио_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Стиль.Высота = 200;
Аудио1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Аудио1.Нажатие = ДФ.Действие(ЭтотОбъект, "Аудио1_Нажатие");
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";
Форма1.Открыть();
Нажатие_Блок_метод.os
Перем ДФ, Блок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Блок1.Нажатие.ИмяМетода = "Блок1_Нажатие"
, "", "!!! ") + "Нажатие_Блок_метод.os" + " " + ТекущаяДата());
Блок1.Нажатие();
КонецПроцедуры
Процедура Блок1_Нажатие() Экспорт
// Сообщить("Блок1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Это Блок";
Блок1.Стиль.Высота = 200;
Блок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Блок1.Нажатие = ДФ.Действие(ЭтотОбъект, "Блок1_Нажатие");
Форма1.Открыть();
Нажатие_Блок_событие.os
Перем ДФ, Блок1;
Процедура Блок1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Блок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Это Блок";
Блок1.Стиль.Высота = 200;
Блок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Блок1.Нажатие = ДФ.Действие(ЭтотОбъект, "Блок1_Нажатие");
Форма1.Открыть();
Нажатие_ВыборВремени_метод.os
Перем ДФ, ВыборВремени1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборВремени1.Нажатие.ИмяМетода = "ВыборВремени1_Нажатие"
, "", "!!! ") + "Нажатие_ВыборВремени_метод.os" + " " + ТекущаяДата());
ВыборВремени1.Нажатие();
КонецПроцедуры
Процедура ВыборВремени1_Нажатие() Экспорт
// Сообщить("ВыборВремени1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Стиль.Высота = 200;
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборВремени1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборВремени1_Нажатие");
Форма1.Открыть();
Нажатие_ВыборВремени_событие.os
Перем ДФ, ВыборВремени1;
Процедура ВыборВремени1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ВыборВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Стиль.Высота = 200;
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборВремени1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборВремени1_Нажатие");
Форма1.Открыть();
Нажатие_ВыборДаты_метод.os
Перем ДФ, ВыборДаты1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборДаты1.Нажатие.ИмяМетода = "ВыборДаты1_Нажатие"
, "", "!!! ") + "Нажатие_ВыборДаты_метод.os" + " " + ТекущаяДата());
ВыборДаты1.Нажатие();
КонецПроцедуры
Процедура ВыборДаты1_Нажатие() Экспорт
// Сообщить("ВыборДаты1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Стиль.Высота = 200;
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборДаты1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_Нажатие");
Форма1.Открыть();
Нажатие_ВыборДаты_событие.os
Перем ДФ, ВыборДаты1;
Процедура ВыборДаты1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ВыборДаты_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Стиль.Высота = 200;
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборДаты1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_Нажатие");
Форма1.Открыть();
Нажатие_ВыборДатыВремени_метод.os
Перем ДФ, ВыборДатыВремени1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборДатыВремени1.Нажатие.ИмяМетода = "ВыборДатыВремени1_Нажатие"
, "", "!!! ") + "Нажатие_ВыборДатыВремени_метод.os" + " " + ТекущаяДата());
ВыборДатыВремени1.Нажатие();
КонецПроцедуры
Процедура ВыборДатыВремени1_Нажатие() Экспорт
// Сообщить("ВыборДатыВремени1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Стиль.Высота = 200;
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборДатыВремени1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_Нажатие");
Форма1.Открыть();
Нажатие_ВыборДатыВремени_событие.os
Перем ДФ, ВыборДатыВремени1;
Процедура ВыборДатыВремени1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ВыборДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Стиль.Высота = 200;
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборДатыВремени1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_Нажатие");
Форма1.Открыть();
Нажатие_ВыборМестнойДатыВремени_метод.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Нажатие.ИмяМетода = "ВыборМестнойДатыВремени1_Нажатие"
, "", "!!! ") + "Нажатие_ВыборМестнойДатыВремени_метод.os" + " " + ТекущаяДата());
ВыборМестнойДатыВремени1.Нажатие();
КонецПроцедуры
Процедура ВыборМестнойДатыВремени1_Нажатие() Экспорт
// Сообщить("ВыборМестнойДатыВремени1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Стиль.Высота = 200;
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборМестнойДатыВремени1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборМестнойДатыВремени1_Нажатие");
Форма1.Открыть();
Нажатие_ВыборМестнойДатыВремени_событие.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура ВыборМестнойДатыВремени1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ВыборМестнойДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Стиль.Высота = 200;
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборМестнойДатыВремени1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборМестнойДатыВремени1_Нажатие");
Форма1.Открыть();
Нажатие_ВыборМесяца_метод.os
Перем ДФ, ВыборМесяца1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборМесяца1.Нажатие.ИмяМетода = "ВыборМесяца1_Нажатие"
, "", "!!! ") + "Нажатие_ВыборМесяца_метод.os" + " " + ТекущаяДата());
ВыборМесяца1.Нажатие();
КонецПроцедуры
Процедура ВыборМесяца1_Нажатие() Экспорт
// Сообщить("ВыборМесяца1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Стиль.Высота = 200;
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборМесяца1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_Нажатие");
Форма1.Открыть();
Нажатие_ВыборМесяца_событие.os
Перем ДФ, ВыборМесяца1;
Процедура ВыборМесяца1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ВыборМесяца_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Стиль.Высота = 200;
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборМесяца1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_Нажатие");
Форма1.Открыть();
Нажатие_ВыборНедели_метод.os
Перем ДФ, ВыборНедели1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборНедели1.Нажатие.ИмяМетода = "ВыборНедели1_Нажатие"
, "", "!!! ") + "Нажатие_ВыборНедели_метод.os" + " " + ТекущаяДата());
ВыборНедели1.Нажатие();
КонецПроцедуры
Процедура ВыборНедели1_Нажатие() Экспорт
// Сообщить("ВыборНедели1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Стиль.Высота = 200;
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборНедели1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_Нажатие");
Форма1.Открыть();
Нажатие_ВыборНедели_событие.os
Перем ДФ, ВыборНедели1;
Процедура ВыборНедели1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ВыборНедели_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Стиль.Высота = 200;
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборНедели1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_Нажатие");
Форма1.Открыть();
Нажатие_ВыборФайла_метод.os
Перем ДФ, ВыборФайла1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборФайла1.Нажатие.ИмяМетода = "ВыборФайла1_Нажатие"
, "", "!!! ") + "Нажатие_ВыборФайла_метод.os" + " " + ТекущаяДата());
ВыборФайла1.Нажатие();
КонецПроцедуры
Процедура ВыборФайла1_Нажатие() Экспорт
// Сообщить("ВыборФайла1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.Стиль.Высота = 200;
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборФайла1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборФайла1_Нажатие");
Форма1.Открыть();
Нажатие_ВыборФайла_событие.os
Перем ДФ, ВыборФайла1;
Процедура ВыборФайла1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ВыборФайла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.Стиль.Высота = 200;
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборФайла1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборФайла1_Нажатие");
Форма1.Открыть();
Нажатие_ВыборЦвета_метод.os
Перем ДФ, ВыборЦвета1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборЦвета1.Нажатие.ИмяМетода = "ВыборЦвета1_Нажатие"
, "", "!!! ") + "Нажатие_ВыборЦвета_метод.os" + " " + ТекущаяДата());
ВыборЦвета1.Нажатие();
КонецПроцедуры
Процедура ВыборЦвета1_Нажатие() Экспорт
// Сообщить("ВыборЦвета1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.Стиль.Высота = 200;
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборЦвета1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборЦвета1_Нажатие");
Форма1.Открыть();
Нажатие_ВыборЦвета_событие.os
Перем ДФ, ВыборЦвета1;
Процедура ВыборЦвета1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ВыборЦвета_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.Стиль.Высота = 200;
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборЦвета1.Нажатие = ДФ.Действие(ЭтотОбъект, "ВыборЦвета1_Нажатие");
Форма1.Открыть();
Нажатие_Группа_метод.os
Перем ДФ, Группа1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Группа1.Нажатие.ИмяМетода = "Группа1_Нажатие"
, "", "!!! ") + "Нажатие_Группа_метод.os" + " " + ТекущаяДата());
Группа1.Нажатие();
КонецПроцедуры
Процедура Группа1_Нажатие() Экспорт
// Сообщить("Группа1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Текст = "Это Группа";
Группа1.Стиль.Высота = 200;
Группа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Группа1.Нажатие = ДФ.Действие(ЭтотОбъект, "Группа1_Нажатие");
Форма1.Открыть();
Нажатие_Группа_событие.os
Перем ДФ, Группа1;
Процедура Группа1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Группа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Текст = "Это Группа";
Группа1.Стиль.Высота = 200;
Группа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Группа1.Нажатие = ДФ.Действие(ЭтотОбъект, "Группа1_Нажатие");
Форма1.Открыть();
Нажатие_ГруппировкаПоляСписка_метод.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.Нажатие.ИмяМетода = "ГруппировкаПоляСписка1_Нажатие"
, "", "!!! ") + "Нажатие_ГруппировкаПоляСписка_метод.os" + " " + ТекущаяДата());
ГруппировкаПоляСписка1.Нажатие();
КонецПроцедуры
Процедура ГруппировкаПоляСписка1_Нажатие() Экспорт
// Сообщить("ГруппировкаПоляСписка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.Стиль.Высота = 200;
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ГруппировкаПоляСписка1.Нажатие = ДФ.Действие(ЭтотОбъект, "ГруппировкаПоляСписка1_Нажатие");
Форма1.Открыть();
Нажатие_ГруппировкаПоляСписка_событие.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура ГруппировкаПоляСписка1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ГруппировкаПоляСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.Стиль.Высота = 200;
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ГруппировкаПоляСписка1.Нажатие = ДФ.Действие(ЭтотОбъект, "ГруппировкаПоляСписка1_Нажатие");
Форма1.Открыть();
Нажатие_Диалог_метод.os
Перем ДФ, Диалог1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Диалог1.Нажатие.ИмяМетода = "Диалог1_Нажатие"
, "", "!!! ") + "Нажатие_Диалог_метод.os" + " " + ТекущаяДата());
Диалог1.Нажатие();
КонецПроцедуры
Процедура Диалог1_Нажатие() Экспорт
// Сообщить("Диалог1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Текст = "Это Диалог";
Диалог1.Стиль.Высота = 200;
Диалог1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Диалог1.Нажатие = ДФ.Действие(ЭтотОбъект, "Диалог1_Нажатие");
Форма1.Открыть();
Нажатие_Диалог_событие.os
Перем ДФ, Диалог1;
Процедура Диалог1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Диалог_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Текст = "Это Диалог";
Диалог1.Стиль.Высота = 200;
Диалог1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Диалог1.Нажатие = ДФ.Действие(ЭтотОбъект, "Диалог1_Нажатие");
Диалог1.Показать();
Форма1.Открыть();
Нажатие_ДополнительныйБлок_метод.os
Перем ДФ, ДополнительныйБлок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДополнительныйБлок1.Нажатие.ИмяМетода = "ДополнительныйБлок1_Нажатие"
, "", "!!! ") + "Нажатие_ДополнительныйБлок_метод.os" + " " + ТекущаяДата());
ДополнительныйБлок1.Нажатие();
КонецПроцедуры
Процедура ДополнительныйБлок1_Нажатие() Экспорт
// Сообщить("ДополнительныйБлок1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "Это ДополнительныйБлок";
ДополнительныйБлок1.Стиль.Высота = 200;
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ДополнительныйБлок1.Нажатие = ДФ.Действие(ЭтотОбъект, "ДополнительныйБлок1_Нажатие");
Форма1.Открыть();
Нажатие_ДополнительныйБлок_событие.os
Перем ДФ, ДополнительныйБлок1;
Процедура ДополнительныйБлок1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ДополнительныйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "Это ДополнительныйБлок";
ДополнительныйБлок1.Стиль.Высота = 200;
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ДополнительныйБлок1.Нажатие = ДФ.Действие(ЭтотОбъект, "ДополнительныйБлок1_Нажатие");
Форма1.Открыть();
Нажатие_ЖирныйТекст_метод.os
Перем ДФ, ЖирныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЖирныйТекст1.Нажатие.ИмяМетода = "ЖирныйТекст1_Нажатие"
, "", "!!! ") + "Нажатие_ЖирныйТекст_метод.os" + " " + ТекущаяДата());
ЖирныйТекст1.Нажатие();
КонецПроцедуры
Процедура ЖирныйТекст1_Нажатие() Экспорт
// Сообщить("ЖирныйТекст1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Текст = "Это ЖирныйТекст";
ЖирныйТекст1.Стиль.Высота = 200;
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЖирныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЖирныйТекст1_Нажатие");
Форма1.Открыть();
Нажатие_ЖирныйТекст_событие.os
Перем ДФ, ЖирныйТекст1;
Процедура ЖирныйТекст1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ЖирныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Текст = "Это ЖирныйТекст";
ЖирныйТекст1.Стиль.Высота = 200;
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЖирныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЖирныйТекст1_Нажатие");
Форма1.Открыть();
Нажатие_Заголовок1_метод.os
Перем ДФ, Заголовок11;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок11.Нажатие.ИмяМетода = "Заголовок11_Нажатие"
, "", "!!! ") + "Нажатие_Заголовок1_метод.os" + " " + ТекущаяДата());
Заголовок11.Нажатие();
КонецПроцедуры
Процедура Заголовок11_Нажатие() Экспорт
// Сообщить("Заголовок11_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Текст = "Это Заголовок1";
Заголовок11.Стиль.Высота = 200;
Заголовок11.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок11.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок11_Нажатие");
Форма1.Открыть();
Нажатие_Заголовок1_событие.os
Перем ДФ, Заголовок11;
Процедура Заголовок11_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Заголовок1_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Текст = "Это Заголовок1";
Заголовок11.Стиль.Высота = 200;
Заголовок11.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок11.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок11_Нажатие");
Форма1.Открыть();
Нажатие_Заголовок2_метод.os
Перем ДФ, Заголовок21;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок21.Нажатие.ИмяМетода = "Заголовок21_Нажатие"
, "", "!!! ") + "Нажатие_Заголовок2_метод.os" + " " + ТекущаяДата());
Заголовок21.Нажатие();
КонецПроцедуры
Процедура Заголовок21_Нажатие() Экспорт
// Сообщить("Заголовок21_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Текст = "Это Заголовок2";
Заголовок21.Стиль.Высота = 200;
Заголовок21.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок21.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок21_Нажатие");
Форма1.Открыть();
Нажатие_Заголовок2_событие.os
Перем ДФ, Заголовок21;
Процедура Заголовок21_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Заголовок2_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Текст = "Это Заголовок2";
Заголовок21.Стиль.Высота = 200;
Заголовок21.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок21.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок21_Нажатие");
Форма1.Открыть();
Нажатие_Заголовок3_метод.os
Перем ДФ, Заголовок31;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок31.Нажатие.ИмяМетода = "Заголовок31_Нажатие"
, "", "!!! ") + "Нажатие_Заголовок3_метод.os" + " " + ТекущаяДата());
Заголовок31.Нажатие();
КонецПроцедуры
Процедура Заголовок31_Нажатие() Экспорт
// Сообщить("Заголовок31_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Текст = "Это Заголовок3";
Заголовок31.Стиль.Высота = 200;
Заголовок31.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок31.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок31_Нажатие");
Форма1.Открыть();
Нажатие_Заголовок3_событие.os
Перем ДФ, Заголовок31;
Процедура Заголовок31_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Заголовок3_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Текст = "Это Заголовок3";
Заголовок31.Стиль.Высота = 200;
Заголовок31.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок31.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок31_Нажатие");
Форма1.Открыть();
Нажатие_Заголовок4_метод.os
Перем ДФ, Заголовок41;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок41.Нажатие.ИмяМетода = "Заголовок41_Нажатие"
, "", "!!! ") + "Нажатие_Заголовок4_метод.os" + " " + ТекущаяДата());
Заголовок41.Нажатие();
КонецПроцедуры
Процедура Заголовок41_Нажатие() Экспорт
// Сообщить("Заголовок41_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Текст = "Это Заголовок4";
Заголовок41.Стиль.Высота = 200;
Заголовок41.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок41.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок41_Нажатие");
Форма1.Открыть();
Нажатие_Заголовок4_событие.os
Перем ДФ, Заголовок41;
Процедура Заголовок41_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Заголовок4_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Текст = "Это Заголовок4";
Заголовок41.Стиль.Высота = 200;
Заголовок41.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок41.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок41_Нажатие");
Форма1.Открыть();
Нажатие_Заголовок5_метод.os
Перем ДФ, Заголовок51;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок51.Нажатие.ИмяМетода = "Заголовок51_Нажатие"
, "", "!!! ") + "Нажатие_Заголовок5_метод.os" + " " + ТекущаяДата());
Заголовок51.Нажатие();
КонецПроцедуры
Процедура Заголовок51_Нажатие() Экспорт
// Сообщить("Заголовок51_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Текст = "Это Заголовок5";
Заголовок51.Стиль.Высота = 200;
Заголовок51.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок51.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок51_Нажатие");
Форма1.Открыть();
Нажатие_Заголовок5_событие.os
Перем ДФ, Заголовок51;
Процедура Заголовок51_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Заголовок5_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Текст = "Это Заголовок5";
Заголовок51.Стиль.Высота = 200;
Заголовок51.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок51.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок51_Нажатие");
Форма1.Открыть();
Нажатие_Заголовок6_метод.os
Перем ДФ, Заголовок61;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок61.Нажатие.ИмяМетода = "Заголовок61_Нажатие"
, "", "!!! ") + "Нажатие_Заголовок6_метод.os" + " " + ТекущаяДата());
Заголовок61.Нажатие();
КонецПроцедуры
Процедура Заголовок61_Нажатие() Экспорт
// Сообщить("Заголовок61_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Текст = "Это Заголовок6";
Заголовок61.Стиль.Высота = 200;
Заголовок61.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок61.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок61_Нажатие");
Форма1.Открыть();
Нажатие_Заголовок6_событие.os
Перем ДФ, Заголовок61;
Процедура Заголовок61_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Заголовок6_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Текст = "Это Заголовок6";
Заголовок61.Стиль.Высота = 200;
Заголовок61.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок61.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок61_Нажатие");
Форма1.Открыть();
Нажатие_Заголовок_метод.os
Перем ДФ, Заголовок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок1.Нажатие.ИмяМетода = "Заголовок1_Нажатие"
, "", "!!! ") + "Нажатие_Заголовок_метод.os" + " " + ТекущаяДата());
Заголовок1.Нажатие();
КонецПроцедуры
Процедура Заголовок1_Нажатие() Экспорт
// Сообщить("Заголовок1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Текст = "Это Заголовок";
Заголовок1.Стиль.Высота = 200;
Заголовок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок1.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок1_Нажатие");
Форма1.Открыть();
Нажатие_Заголовок_событие.os
Перем ДФ, Заголовок1;
Процедура Заголовок1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Заголовок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Текст = "Это Заголовок";
Заголовок1.Стиль.Высота = 200;
Заголовок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок1.Нажатие = ДФ.Действие(ЭтотОбъект, "Заголовок1_Нажатие");
Форма1.Открыть();
Нажатие_ЗаголовокГруппы_метод.os
Перем ДФ, ЗаголовокГруппы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЗаголовокГруппы1.Нажатие.ИмяМетода = "ЗаголовокГруппы1_Нажатие"
, "", "!!! ") + "Нажатие_ЗаголовокГруппы_метод.os" + " " + ТекущаяДата());
ЗаголовокГруппы1.Нажатие();
КонецПроцедуры
Процедура ЗаголовокГруппы1_Нажатие() Экспорт
// Сообщить("ЗаголовокГруппы1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Текст = "Это ЗаголовокГруппы";
ЗаголовокГруппы1.Стиль.Высота = 200;
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЗаголовокГруппы1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЗаголовокГруппы1_Нажатие");
Форма1.Открыть();
Нажатие_ЗаголовокГруппы_событие.os
Перем ДФ, ЗаголовокГруппы1;
Процедура ЗаголовокГруппы1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ЗаголовокГруппы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Текст = "Это ЗаголовокГруппы";
ЗаголовокГруппы1.Стиль.Высота = 200;
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЗаголовокГруппы1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЗаголовокГруппы1_Нажатие");
Форма1.Открыть();
Нажатие_ЗаголовокРаскрываемогоБлока_метод.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.Нажатие.ИмяМетода = "ЗаголовокРаскрываемогоБлока1_Нажатие"
, "", "!!! ") + "Нажатие_ЗаголовокРаскрываемогоБлока_метод.os" + " " + ТекущаяДата());
ЗаголовокРаскрываемогоБлока1.Нажатие();
КонецПроцедуры
Процедура ЗаголовокРаскрываемогоБлока1_Нажатие() Экспорт
// Сообщить("ЗаголовокРаскрываемогоБлока1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Текст = "Это ЗаголовокРаскрываемогоБлока";
ЗаголовокРаскрываемогоБлока1.Стиль.Высота = 200;
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЗаголовокРаскрываемогоБлока1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЗаголовокРаскрываемогоБлока1_Нажатие");
Форма1.Открыть();
Нажатие_ЗаголовокРаскрываемогоБлока_событие.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура ЗаголовокРаскрываемогоБлока1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ЗаголовокРаскрываемогоБлока_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Текст = "Это ЗаголовокРаскрываемогоБлока";
ЗаголовокРаскрываемогоБлока1.Стиль.Высота = 200;
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЗаголовокРаскрываемогоБлока1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЗаголовокРаскрываемогоБлока1_Нажатие");
Форма1.Открыть();
Нажатие_Изображение_метод.os
Перем ДФ, Изображение1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Изображение1.Нажатие.ИмяМетода = "Изображение1_Нажатие"
, "", "!!! ") + "Нажатие_Изображение_метод.os" + " " + ТекущаяДата());
Изображение1.Нажатие();
КонецПроцедуры
Процедура Изображение1_Нажатие() Экспорт
// Сообщить("Изображение1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.Стиль.Высота = 200;
Изображение1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Изображение1.Нажатие = ДФ.Действие(ЭтотОбъект, "Изображение1_Нажатие");
Форма1.Открыть();
Нажатие_Изображение_событие.os
Перем ДФ, Изображение1;
Процедура Изображение1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Изображение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.Стиль.Высота = 200;
Изображение1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Изображение1.Нажатие = ДФ.Действие(ЭтотОбъект, "Изображение1_Нажатие");
Изображение1.Источник = "maslenica10.jpg";
Форма1.Открыть();
Нажатие_Индикатор_метод.os
Перем ДФ, Индикатор1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Индикатор1.Нажатие.ИмяМетода = "Индикатор1_Нажатие"
, "", "!!! ") + "Нажатие_Индикатор_метод.os" + " " + ТекущаяДата());
Индикатор1.Нажатие();
КонецПроцедуры
Процедура Индикатор1_Нажатие() Экспорт
// Сообщить("Индикатор1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.Стиль.Высота = 200;
Индикатор1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Индикатор1.Нажатие = ДФ.Действие(ЭтотОбъект, "Индикатор1_Нажатие");
Форма1.Открыть();
Нажатие_Индикатор_событие.os
Перем ДФ, Индикатор1;
Процедура Индикатор1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Индикатор_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.Стиль.Высота = 200;
Индикатор1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Индикатор1.Нажатие = ДФ.Действие(ЭтотОбъект, "Индикатор1_Нажатие");
Форма1.Открыть();
Нажатие_Итоги_метод.os
Перем ДФ, Итоги1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Итоги1.Нажатие.ИмяМетода = "Итоги1_Нажатие"
, "", "!!! ") + "Нажатие_Итоги_метод.os" + " " + ТекущаяДата());
Итоги1.Нажатие();
КонецПроцедуры
Процедура Итоги1_Нажатие() Экспорт
// Сообщить("Итоги1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Текст = "Это Итоги";
Итоги1.Стиль.Высота = 200;
Итоги1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Итоги1.Нажатие = ДФ.Действие(ЭтотОбъект, "Итоги1_Нажатие");
Форма1.Открыть();
Нажатие_Итоги_событие.os
Перем ДФ, Итоги1;
Процедура Итоги1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Итоги_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Текст = "Это Итоги";
Итоги1.Стиль.Высота = 200;
Итоги1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Итоги1.Нажатие = ДФ.Действие(ЭтотОбъект, "Итоги1_Нажатие");
Форма1.Открыть();
Нажатие_Карта_метод.os
Перем ДФ, Карта1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Карта1.Нажатие.ИмяМетода = "Карта1_Нажатие"
, "", "!!! ") + "Нажатие_Карта_метод.os" + " " + ТекущаяДата());
Карта1.Нажатие();
КонецПроцедуры
Процедура Карта1_Нажатие() Экспорт
// Сообщить("Карта1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Карта1 = ДФ.Карта();
Карта1.Родитель = Форма1;
Карта1.Текст = "Это Карта";
Карта1.Стиль.Высота = 200;
Карта1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Карта1.Нажатие = ДФ.Действие(ЭтотОбъект, "Карта1_Нажатие");
Форма1.Открыть();
Нажатие_Карта_событие.os
Перем ДФ, Карта1;
Процедура Карта1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Карта_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Карта1 = ДФ.Карта();
Карта1.Родитель = Форма1;
Карта1.Текст = "Это Карта";
Карта1.Стиль.Высота = 200;
Карта1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Карта1.Нажатие = ДФ.Действие(ЭтотОбъект, "Карта1_Нажатие");
Форма1.Открыть();
Нажатие_Кнопка_метод.os
Перем ДФ, Кнопка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Кнопка1.Нажатие.ИмяМетода = "Кнопка1_Нажатие"
, "", "!!! ") + "Нажатие_Кнопка_метод.os" + " " + ТекущаяДата());
Кнопка1.Нажатие();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка";
Кнопка1.Стиль.Высота = 200;
Кнопка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
Нажатие_Кнопка_событие.os
Перем ДФ, Кнопка1;
Процедура Кнопка1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Кнопка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка";
Кнопка1.Стиль.Высота = 200;
Кнопка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
Нажатие_Код_метод.os
Перем ДФ, Код1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Код1.Нажатие.ИмяМетода = "Код1_Нажатие"
, "", "!!! ") + "Нажатие_Код_метод.os" + " " + ТекущаяДата());
Код1.Нажатие();
КонецПроцедуры
Процедура Код1_Нажатие() Экспорт
// Сообщить("Код1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Текст = "Это Код";
Код1.Стиль.Высота = 200;
Код1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Код1.Нажатие = ДФ.Действие(ЭтотОбъект, "Код1_Нажатие");
Форма1.Открыть();
Нажатие_Код_событие.os
Перем ДФ, Код1;
Процедура Код1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Код_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Текст = "Это Код";
Код1.Стиль.Высота = 200;
Код1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Код1.Нажатие = ДФ.Действие(ЭтотОбъект, "Код1_Нажатие");
Форма1.Открыть();
Нажатие_Колонтитул_метод.os
Перем ДФ, Колонтитул1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Колонтитул1.Нажатие.ИмяМетода = "Колонтитул1_Нажатие"
, "", "!!! ") + "Нажатие_Колонтитул_метод.os" + " " + ТекущаяДата());
Колонтитул1.Нажатие();
КонецПроцедуры
Процедура Колонтитул1_Нажатие() Экспорт
// Сообщить("Колонтитул1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Текст = "Это Колонтитул";
Колонтитул1.Стиль.Высота = 200;
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Колонтитул1.Нажатие = ДФ.Действие(ЭтотОбъект, "Колонтитул1_Нажатие");
Форма1.Открыть();
Нажатие_Колонтитул_событие.os
Перем ДФ, Колонтитул1;
Процедура Колонтитул1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Колонтитул_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Текст = "Это Колонтитул";
Колонтитул1.Стиль.Высота = 200;
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Колонтитул1.Нажатие = ДФ.Действие(ЭтотОбъект, "Колонтитул1_Нажатие");
Форма1.Открыть();
Нажатие_Контент_метод.os
Перем ДФ, Контент1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контент1.Нажатие.ИмяМетода = "Контент1_Нажатие"
, "", "!!! ") + "Нажатие_Контент_метод.os" + " " + ТекущаяДата());
Контент1.Нажатие();
КонецПроцедуры
Процедура Контент1_Нажатие() Экспорт
// Сообщить("Контент1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент1 = Форма1.Контент;
Контент1.Текст = "Это Контент";
Контент1.Стиль.Высота = 200;
Контент1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Контент1.Нажатие = ДФ.Действие(ЭтотОбъект, "Контент1_Нажатие");
Форма1.Открыть();
Нажатие_Контент_событие.os
Перем ДФ, Контент1;
Процедура Контент1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Контент_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Контент1 = Форма1.Контент;
Контент1.Текст = "Это Контент";
Контент1.Стиль.Высота = 200;
Контент1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Контент1.Нажатие = ДФ.Действие(ЭтотОбъект, "Контент1_Нажатие");
Форма1.Открыть();
Нажатие_КурсивТекст_метод.os
Перем ДФ, КурсивТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
КурсивТекст1.Нажатие.ИмяМетода = "КурсивТекст1_Нажатие"
, "", "!!! ") + "Нажатие_КурсивТекст_метод.os" + " " + ТекущаяДата());
КурсивТекст1.Нажатие();
КонецПроцедуры
Процедура КурсивТекст1_Нажатие() Экспорт
// Сообщить("КурсивТекст1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Текст = "Это КурсивТекст";
КурсивТекст1.Стиль.Высота = 200;
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
КурсивТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "КурсивТекст1_Нажатие");
Форма1.Открыть();
Нажатие_КурсивТекст_событие.os
Перем ДФ, КурсивТекст1;
Процедура КурсивТекст1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_КурсивТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Текст = "Это КурсивТекст";
КурсивТекст1.Стиль.Высота = 200;
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
КурсивТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "КурсивТекст1_Нажатие");
Форма1.Открыть();
Нажатие_Линия_метод.os
Перем ДФ, Линия1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Линия1.Нажатие.ИмяМетода = "Линия1_Нажатие"
, "", "!!! ") + "Нажатие_Линия_метод.os" + " " + ТекущаяДата());
Линия1.Нажатие();
КонецПроцедуры
Процедура Линия1_Нажатие() Экспорт
// Сообщить("Линия1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Линия1 = ДФ.Линия();
Линия1.Родитель = Форма1;
Линия1.Текст = "Это Линия";
Линия1.Стиль.Высота = 200;
Линия1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Линия1.Нажатие = ДФ.Действие(ЭтотОбъект, "Линия1_Нажатие");
Форма1.Открыть();
Нажатие_Линия_событие.os
Перем ДФ, Линия1;
Процедура Линия1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Линия_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Линия1 = ДФ.Линия();
Линия1.Родитель = Форма1;
Линия1.Текст = "Это Линия";
Линия1.Стиль.Высота = 200;
Линия1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Линия1.Нажатие = ДФ.Действие(ЭтотОбъект, "Линия1_Нажатие");
Форма1.Открыть();
Нажатие_Лоток_событие.os
Перем ДФ;
Процедура Лоток1_Нажатие() Экспорт
// Сообщить("Лоток1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Лоток_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Нажми в лотке";
Лоток1 = ДФ.Лоток();
Лоток1.Заголовок = "Заголовок";
Лоток1.Подсказка = "Подсказка";
Лоток1.Значок = "icon.png";
Лоток1.Нажатие = ДФ.Действие(ЭтотОбъект, "Лоток1_Нажатие");
Форма1.Открыть();
Нажатие_МаркированныйТекст_метод.os
Перем ДФ, МаркированныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МаркированныйТекст1.Нажатие.ИмяМетода = "МаркированныйТекст1_Нажатие"
, "", "!!! ") + "Нажатие_МаркированныйТекст_метод.os" + " " + ТекущаяДата());
МаркированныйТекст1.Нажатие();
КонецПроцедуры
Процедура МаркированныйТекст1_Нажатие() Экспорт
// Сообщить("МаркированныйТекст1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Текст = "Это МаркированныйТекст";
МаркированныйТекст1.Стиль.Высота = 200;
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МаркированныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "МаркированныйТекст1_Нажатие");
Форма1.Открыть();
Нажатие_МаркированныйТекст_событие.os
Перем ДФ, МаркированныйТекст1;
Процедура МаркированныйТекст1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_МаркированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Текст = "Это МаркированныйТекст";
МаркированныйТекст1.Стиль.Высота = 200;
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МаркированныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "МаркированныйТекст1_Нажатие");
Форма1.Открыть();
Нажатие_МедиаГруппа_метод.os
Перем ДФ, МедиаГруппа1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МедиаГруппа1.Нажатие.ИмяМетода = "МедиаГруппа1_Нажатие"
, "", "!!! ") + "Нажатие_МедиаГруппа_метод.os" + " " + ТекущаяДата());
МедиаГруппа1.Нажатие();
КонецПроцедуры
Процедура МедиаГруппа1_Нажатие() Экспорт
// Сообщить("МедиаГруппа1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Текст = "Это МедиаГруппа";
МедиаГруппа1.Стиль.Высота = 200;
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МедиаГруппа1.Нажатие = ДФ.Действие(ЭтотОбъект, "МедиаГруппа1_Нажатие");
Форма1.Открыть();
Нажатие_МедиаГруппа_событие.os
Перем ДФ, МедиаГруппа1;
Процедура МедиаГруппа1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_МедиаГруппа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Текст = "Это МедиаГруппа";
МедиаГруппа1.Стиль.Высота = 200;
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МедиаГруппа1.Нажатие = ДФ.Действие(ЭтотОбъект, "МедиаГруппа1_Нажатие");
Форма1.Открыть();
Нажатие_МелкийТекст_метод.os
Перем ДФ, МелкийТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МелкийТекст1.Нажатие.ИмяМетода = "МелкийТекст1_Нажатие"
, "", "!!! ") + "Нажатие_МелкийТекст_метод.os" + " " + ТекущаяДата());
МелкийТекст1.Нажатие();
КонецПроцедуры
Процедура МелкийТекст1_Нажатие() Экспорт
// Сообщить("МелкийТекст1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Текст = "Это МелкийТекст";
МелкийТекст1.Стиль.Высота = 200;
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МелкийТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "МелкийТекст1_Нажатие");
Форма1.Открыть();
Нажатие_МелкийТекст_событие.os
Перем ДФ, МелкийТекст1;
Процедура МелкийТекст1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_МелкийТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Текст = "Это МелкийТекст";
МелкийТекст1.Стиль.Высота = 200;
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МелкийТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "МелкийТекст1_Нажатие");
Форма1.Открыть();
Нажатие_НадстрочныйТекст_метод.os
Перем ДФ, НадстрочныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НадстрочныйТекст1.Нажатие.ИмяМетода = "НадстрочныйТекст1_Нажатие"
, "", "!!! ") + "Нажатие_НадстрочныйТекст_метод.os" + " " + ТекущаяДата());
НадстрочныйТекст1.Нажатие();
КонецПроцедуры
Процедура НадстрочныйТекст1_Нажатие() Экспорт
// Сообщить("НадстрочныйТекст1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Текст = "Это НадстрочныйТекст";
НадстрочныйТекст1.Стиль.Высота = 200;
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НадстрочныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "НадстрочныйТекст1_Нажатие");
Форма1.Открыть();
Нажатие_НадстрочныйТекст_событие.os
Перем ДФ, НадстрочныйТекст1;
Процедура НадстрочныйТекст1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_НадстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Текст = "Это НадстрочныйТекст";
НадстрочныйТекст1.Стиль.Высота = 200;
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НадстрочныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "НадстрочныйТекст1_Нажатие");
Форма1.Открыть();
Нажатие_НаправленныйТекст_метод.os
Перем ДФ, НаправленныйТекст1;
Процедура Форма1_Загружена() Экспорт
НаправленныйТекст1.Нажатие();
КонецПроцедуры
Процедура НаправленныйТекст1_Нажатие() Экспорт
Сообщить(?(
НаправленныйТекст1.КлавишаДоступа = "w"
, "", "!!! ") + "Нажатие_НаправленныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "Нажмите alt+w в англ. раскладке.";
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Стиль.Высота = 60;
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НаправленныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "НаправленныйТекст1_Нажатие");
НаправленныйТекст1.КлавишаДоступа = "w";
Форма1.Открыть();
Нажатие_НаправленныйТекст_событие.os
Перем ДФ, НаправленныйТекст1;
Процедура НаправленныйТекст1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_НаправленныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Текст = "Это НаправленныйТекст";
НаправленныйТекст1.Стиль.Высота = 200;
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НаправленныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "НаправленныйТекст1_Нажатие");
Форма1.Открыть();
Нажатие_НеупорядоченныйСписок_метод.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.Нажатие.ИмяМетода = "НеупорядоченныйСписок1_Нажатие"
, "", "!!! ") + "Нажатие_НеупорядоченныйСписок_метод.os" + " " + ТекущаяДата());
НеупорядоченныйСписок1.Нажатие();
КонецПроцедуры
Процедура НеупорядоченныйСписок1_Нажатие() Экспорт
// Сообщить("НеупорядоченныйСписок1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Текст = "Это НеупорядоченныйСписок";
НеупорядоченныйСписок1.Стиль.Высота = 200;
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НеупорядоченныйСписок1.Нажатие = ДФ.Действие(ЭтотОбъект, "НеупорядоченныйСписок1_Нажатие");
Форма1.Открыть();
Нажатие_НеупорядоченныйСписок_событие.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура НеупорядоченныйСписок1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_НеупорядоченныйСписок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Текст = "Это НеупорядоченныйСписок";
НеупорядоченныйСписок1.Стиль.Высота = 200;
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НеупорядоченныйСписок1.Нажатие = ДФ.Действие(ЭтотОбъект, "НеупорядоченныйСписок1_Нажатие");
Форма1.Открыть();
Нажатие_НижнийКолонтитул_метод.os
Перем ДФ, НижнийКолонтитул1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НижнийКолонтитул1.Нажатие.ИмяМетода = "НижнийКолонтитул1_Нажатие"
, "", "!!! ") + "Нажатие_НижнийКолонтитул_метод.os" + " " + ТекущаяДата());
НижнийКолонтитул1.Нажатие();
КонецПроцедуры
Процедура НижнийКолонтитул1_Нажатие() Экспорт
// Сообщить("НижнийКолонтитул1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Текст = "Это НижнийКолонтитул";
НижнийКолонтитул1.Стиль.Высота = 200;
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НижнийКолонтитул1.Нажатие = ДФ.Действие(ЭтотОбъект, "НижнийКолонтитул1_Нажатие");
Форма1.Открыть();
Нажатие_НижнийКолонтитул_событие.os
Перем ДФ, НижнийКолонтитул1;
Процедура НижнийКолонтитул1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_НижнийКолонтитул_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Текст = "Это НижнийКолонтитул";
НижнийКолонтитул1.Стиль.Высота = 200;
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НижнийКолонтитул1.Нажатие = ДФ.Действие(ЭтотОбъект, "НижнийКолонтитул1_Нажатие");
Форма1.Открыть();
Нажатие_Область_метод.os
Перем ДФ, Область1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Область1.Нажатие.ИмяМетода = "Область1_Нажатие"
, "", "!!! ") + "Нажатие_Область_метод.os" + " " + ТекущаяДата());
Область1.Нажатие();
КонецПроцедуры
Процедура Область1_Нажатие() Экспорт
// Сообщить("Область1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Область1 = ДФ.Область();
Область1.Родитель = Форма1;
Область1.Текст = "Это Область";
Область1.Стиль.Высота = 200;
Область1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Область1.Нажатие = ДФ.Действие(ЭтотОбъект, "Область1_Нажатие");
Форма1.Открыть();
Нажатие_Область_событие.os
Перем ДФ, Область1;
Процедура Область1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Область_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Область1 = ДФ.Область();
Область1.Родитель = Форма1;
Область1.Текст = "Это Область";
Область1.Стиль.Высота = 200;
Область1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Область1.Нажатие = ДФ.Действие(ЭтотОбъект, "Область1_Нажатие");
Форма1.Открыть();
Нажатие_ОбластьТаблицы_метод.os
Перем ДФ, ОбластьТаблицы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОбластьТаблицы1.Нажатие.ИмяМетода = "ОбластьТаблицы1_Нажатие"
, "", "!!! ") + "Нажатие_ОбластьТаблицы_метод.os" + " " + ТекущаяДата());
ОбластьТаблицы1.Нажатие();
КонецПроцедуры
Процедура ОбластьТаблицы1_Нажатие() Экспорт
// Сообщить("ОбластьТаблицы1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Текст = "Это ОбластьТаблицы";
ОбластьТаблицы1.Стиль.Высота = 200;
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОбластьТаблицы1.Нажатие = ДФ.Действие(ЭтотОбъект, "ОбластьТаблицы1_Нажатие");
Форма1.Открыть();
Нажатие_ОбластьТаблицы_событие.os
Перем ДФ, ОбластьТаблицы1;
Процедура ОбластьТаблицы1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ОбластьТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Текст = "Это ОбластьТаблицы";
ОбластьТаблицы1.Стиль.Высота = 200;
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОбластьТаблицы1.Нажатие = ДФ.Действие(ЭтотОбъект, "ОбластьТаблицы1_Нажатие");
Форма1.Открыть();
Нажатие_ОбластьТекста_метод.os
Перем ДФ, ОбластьТекста1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОбластьТекста1.Нажатие.ИмяМетода = "ОбластьТекста1_Нажатие"
, "", "!!! ") + "Нажатие_ОбластьТекста_метод.os" + " " + ТекущаяДата());
ОбластьТекста1.Нажатие();
КонецПроцедуры
Процедура ОбластьТекста1_Нажатие() Экспорт
// Сообщить("ОбластьТекста1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Стиль.Высота = 200;
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОбластьТекста1.Нажатие = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_Нажатие");
Форма1.Открыть();
Нажатие_ОбластьТекста_событие.os
Перем ДФ, ОбластьТекста1;
Процедура ОбластьТекста1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ОбластьТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Стиль.Высота = 200;
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОбластьТекста1.Нажатие = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_Нажатие");
Форма1.Открыть();
Нажатие_ОписаниеМедиа_метод.os
Перем ДФ, ОписаниеМедиа1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОписаниеМедиа1.Нажатие.ИмяМетода = "ОписаниеМедиа1_Нажатие"
, "", "!!! ") + "Нажатие_ОписаниеМедиа_метод.os" + " " + ТекущаяДата());
ОписаниеМедиа1.Нажатие();
КонецПроцедуры
Процедура ОписаниеМедиа1_Нажатие() Экспорт
// Сообщить("ОписаниеМедиа1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Текст = "Это ОписаниеМедиа";
ОписаниеМедиа1.Стиль.Высота = 200;
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОписаниеМедиа1.Нажатие = ДФ.Действие(ЭтотОбъект, "ОписаниеМедиа1_Нажатие");
Форма1.Открыть();
Нажатие_ОписаниеМедиа_событие.os
Перем ДФ, ОписаниеМедиа1;
Процедура ОписаниеМедиа1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ОписаниеМедиа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Текст = "Это ОписаниеМедиа";
ОписаниеМедиа1.Стиль.Высота = 200;
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОписаниеМедиа1.Нажатие = ДФ.Действие(ЭтотОбъект, "ОписаниеМедиа1_Нажатие");
Форма1.Открыть();
Нажатие_Определение_метод.os
Перем ДФ, Определение1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Определение1.Нажатие.ИмяМетода = "Определение1_Нажатие"
, "", "!!! ") + "Нажатие_Определение_метод.os" + " " + ТекущаяДата());
Определение1.Нажатие();
КонецПроцедуры
Процедура Определение1_Нажатие() Экспорт
// Сообщить("Определение1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Текст = "Это Определение";
Определение1.Стиль.Высота = 200;
Определение1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Определение1.Нажатие = ДФ.Действие(ЭтотОбъект, "Определение1_Нажатие");
Форма1.Открыть();
Нажатие_Определение_событие.os
Перем ДФ, Определение1;
Процедура Определение1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Определение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Текст = "Это Определение";
Определение1.Стиль.Высота = 200;
Определение1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Определение1.Нажатие = ДФ.Действие(ЭтотОбъект, "Определение1_Нажатие");
Форма1.Открыть();
Нажатие_Переключатель_метод.os
Перем ДФ, Переключатель1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Переключатель1.Нажатие.ИмяМетода = "Переключатель1_Нажатие"
, "", "!!! ") + "Нажатие_Переключатель_метод.os" + " " + ТекущаяДата());
Переключатель1.Нажатие();
КонецПроцедуры
Процедура Переключатель1_Нажатие() Экспорт
// Сообщить("Переключатель1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Стиль.Высота = 200;
Переключатель1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Переключатель1.Нажатие = ДФ.Действие(ЭтотОбъект, "Переключатель1_Нажатие");
Форма1.Открыть();
Нажатие_Переключатель_событие.os
Перем ДФ, Переключатель1;
Процедура Переключатель1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Переключатель_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Стиль.Высота = 200;
Переключатель1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Переключатель1.Нажатие = ДФ.Действие(ЭтотОбъект, "Переключатель1_Нажатие");
Форма1.Открыть();
Нажатие_Подпись_метод.os
Перем ДФ, Подпись1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Подпись1.Нажатие.ИмяМетода = "Подпись1_Нажатие"
, "", "!!! ") + "Нажатие_Подпись_метод.os" + " " + ТекущаяДата());
Подпись1.Нажатие();
КонецПроцедуры
Процедура Подпись1_Нажатие() Экспорт
// Сообщить("Подпись1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Это Подпись";
Подпись1.Стиль.Высота = 200;
Подпись1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Подпись1.Нажатие = ДФ.Действие(ЭтотОбъект, "Подпись1_Нажатие");
Форма1.Открыть();
Нажатие_Подпись_событие.os
Перем ДФ, Подпись1;
Процедура Подпись1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Подпись_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Это Подпись";
Подпись1.Стиль.Высота = 200;
Подпись1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Подпись1.Нажатие = ДФ.Действие(ЭтотОбъект, "Подпись1_Нажатие");
Форма1.Открыть();
Нажатие_ПодстрочныйТекст_метод.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПодстрочныйТекст1.Нажатие.ИмяМетода = "ПодстрочныйТекст1_Нажатие"
, "", "!!! ") + "Нажатие_ПодстрочныйТекст_метод.os" + " " + ТекущаяДата());
ПодстрочныйТекст1.Нажатие();
КонецПроцедуры
Процедура ПодстрочныйТекст1_Нажатие() Экспорт
// Сообщить("ПодстрочныйТекст1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Текст = "Это ПодстрочныйТекст";
ПодстрочныйТекст1.Стиль.Высота = 200;
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПодстрочныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПодстрочныйТекст1_Нажатие");
Форма1.Открыть();
Нажатие_ПодстрочныйТекст_событие.os
Перем ДФ, ПодстрочныйТекст1;
Процедура ПодстрочныйТекст1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ПодстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Текст = "Это ПодстрочныйТекст";
ПодстрочныйТекст1.Стиль.Высота = 200;
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПодстрочныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПодстрочныйТекст1_Нажатие");
Форма1.Открыть();
Нажатие_ПодчеркнутыйТекст_метод.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПодчеркнутыйТекст1.Нажатие.ИмяМетода = "ПодчеркнутыйТекст1_Нажатие"
, "", "!!! ") + "Нажатие_ПодчеркнутыйТекст_метод.os" + " " + ТекущаяДата());
ПодчеркнутыйТекст1.Нажатие();
КонецПроцедуры
Процедура ПодчеркнутыйТекст1_Нажатие() Экспорт
// Сообщить("ПодчеркнутыйТекст1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Текст = "Это ПодчеркнутыйТекст";
ПодчеркнутыйТекст1.Стиль.Высота = 200;
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПодчеркнутыйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПодчеркнутыйТекст1_Нажатие");
Форма1.Открыть();
Нажатие_ПодчеркнутыйТекст_событие.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура ПодчеркнутыйТекст1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ПодчеркнутыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Текст = "Это ПодчеркнутыйТекст";
ПодчеркнутыйТекст1.Стиль.Высота = 200;
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПодчеркнутыйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПодчеркнутыйТекст1_Нажатие");
Форма1.Открыть();
Нажатие_ПолеПароля_метод.os
Перем ДФ, ПолеПароля1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеПароля1.Нажатие.ИмяМетода = "ПолеПароля1_Нажатие"
, "", "!!! ") + "Нажатие_ПолеПароля_метод.os" + " " + ТекущаяДата());
ПолеПароля1.Нажатие();
КонецПроцедуры
Процедура ПолеПароля1_Нажатие() Экспорт
// Сообщить("ПолеПароля1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Стиль.Высота = 200;
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеПароля1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_Нажатие");
Форма1.Открыть();
Нажатие_ПолеПароля_событие.os
Перем ДФ, ПолеПароля1;
Процедура ПолеПароля1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ПолеПароля_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Стиль.Высота = 200;
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеПароля1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_Нажатие");
Форма1.Открыть();
Нажатие_ПолеПоиска_метод.os
Перем ДФ, ПолеПоиска1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеПоиска1.Нажатие.ИмяМетода = "ПолеПоиска1_Нажатие"
, "", "!!! ") + "Нажатие_ПолеПоиска_метод.os" + " " + ТекущаяДата());
ПолеПоиска1.Нажатие();
КонецПроцедуры
Процедура ПолеПоиска1_Нажатие() Экспорт
// Сообщить("ПолеПоиска1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Стиль.Высота = 200;
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеПоиска1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_Нажатие");
Форма1.Открыть();
Нажатие_ПолеПоиска_событие.os
Перем ДФ, ПолеПоиска1;
Процедура ПолеПоиска1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ПолеПоиска_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Стиль.Высота = 200;
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеПоиска1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_Нажатие");
Форма1.Открыть();
Нажатие_ПолеСписка_метод.os
Перем ДФ, ПолеСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеСписка1.Нажатие.ИмяМетода = "ПолеСписка1_Нажатие"
, "", "!!! ") + "Нажатие_ПолеСписка_метод.os" + " " + ТекущаяДата());
ПолеСписка1.Нажатие();
КонецПроцедуры
Процедура ПолеСписка1_Нажатие() Экспорт
// Сообщить("ПолеСписка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Высота = 200;
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеСписка1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеСписка1_Нажатие");
Форма1.Открыть();
Нажатие_ПолеСписка_событие.os
Перем ДФ, ПолеСписка1;
Процедура ПолеСписка1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ПолеСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Высота = 200;
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеСписка1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеСписка1_Нажатие");
Форма1.Открыть();
Нажатие_ПолеТекста_метод.os
Перем ДФ, ПолеТекста1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеТекста1.Нажатие.ИмяМетода = "ПолеТекста1_Нажатие"
, "", "!!! ") + "Нажатие_ПолеТекста_метод.os" + " " + ТекущаяДата());
ПолеТекста1.Нажатие();
КонецПроцедуры
Процедура ПолеТекста1_Нажатие() Экспорт
// Сообщить("ПолеТекста1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Стиль.Высота = 200;
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеТекста1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_Нажатие");
Форма1.Открыть();
Нажатие_ПолеТекста_событие.os
Перем ДФ, ПолеТекста1;
Процедура ПолеТекста1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ПолеТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Стиль.Высота = 200;
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеТекста1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_Нажатие");
Форма1.Открыть();
Нажатие_ПолеЧисла_метод.os
Перем ДФ, ПолеЧисла1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеЧисла1.Нажатие.ИмяМетода = "ПолеЧисла1_Нажатие"
, "", "!!! ") + "Нажатие_ПолеЧисла_метод.os" + " " + ТекущаяДата());
ПолеЧисла1.Нажатие();
КонецПроцедуры
Процедура ПолеЧисла1_Нажатие() Экспорт
// Сообщить("ПолеЧисла1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Стиль.Высота = 200;
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеЧисла1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_Нажатие");
Форма1.Открыть();
Нажатие_ПолеЧисла_событие.os
Перем ДФ, ПолеЧисла1;
Процедура ПолеЧисла1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ПолеЧисла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Стиль.Высота = 200;
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеЧисла1.Нажатие = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_Нажатие");
Форма1.Открыть();
Нажатие_Ползунок_метод.os
Перем ДФ, Ползунок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Ползунок1.Нажатие.ИмяМетода = "Ползунок1_Нажатие"
, "", "!!! ") + "Нажатие_Ползунок_метод.os" + " " + ТекущаяДата());
Ползунок1.Нажатие();
КонецПроцедуры
Процедура Ползунок1_Нажатие() Экспорт
// Сообщить("Ползунок1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Стиль.Высота = 200;
Ползунок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ползунок1.Нажатие = ДФ.Действие(ЭтотОбъект, "Ползунок1_Нажатие");
Форма1.Открыть();
Нажатие_Ползунок_событие.os
Перем ДФ, Ползунок1;
Процедура Ползунок1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Ползунок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Стиль.Высота = 200;
Ползунок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ползунок1.Нажатие = ДФ.Действие(ЭтотОбъект, "Ползунок1_Нажатие");
Форма1.Открыть();
Нажатие_РаскрываемыйБлок_метод.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
РаскрываемыйБлок1.Нажатие.ИмяМетода = "РаскрываемыйБлок1_Нажатие"
, "", "!!! ") + "Нажатие_РаскрываемыйБлок_метод.os" + " " + ТекущаяДата());
РаскрываемыйБлок1.Нажатие();
КонецПроцедуры
Процедура РаскрываемыйБлок1_Нажатие() Экспорт
// Сообщить("РаскрываемыйБлок1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.Стиль.Высота = 200;
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
РаскрываемыйБлок1.Нажатие = ДФ.Действие(ЭтотОбъект, "РаскрываемыйБлок1_Нажатие");
Форма1.Открыть();
Нажатие_РаскрываемыйБлок_событие.os
Перем ДФ, РаскрываемыйБлок1;
Процедура РаскрываемыйБлок1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_РаскрываемыйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.Стиль.Высота = 200;
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
РаскрываемыйБлок1.Нажатие = ДФ.Действие(ЭтотОбъект, "РаскрываемыйБлок1_Нажатие");
Форма1.Открыть();
Нажатие_Результат_метод.os
Перем ДФ, Результат1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Результат1.Нажатие.ИмяМетода = "Результат1_Нажатие"
, "", "!!! ") + "Нажатие_Результат_метод.os" + " " + ТекущаяДата());
Результат1.Нажатие();
КонецПроцедуры
Процедура Результат1_Нажатие() Экспорт
// Сообщить("Результат1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Текст = "Это Результат";
Результат1.Стиль.Высота = 200;
Результат1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Результат1.Нажатие = ДФ.Действие(ЭтотОбъект, "Результат1_Нажатие");
Форма1.Открыть();
Нажатие_Результат_событие.os
Перем ДФ, Результат1;
Процедура Результат1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Результат_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Текст = "Это Результат";
Результат1.Стиль.Высота = 200;
Результат1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Результат1.Нажатие = ДФ.Действие(ЭтотОбъект, "Результат1_Нажатие");
Форма1.Открыть();
Нажатие_СписокОпределений_метод.os
Перем ДФ, СписокОпределений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СписокОпределений1.Нажатие.ИмяМетода = "СписокОпределений1_Нажатие"
, "", "!!! ") + "Нажатие_СписокОпределений_метод.os" + " " + ТекущаяДата());
СписокОпределений1.Нажатие();
КонецПроцедуры
Процедура СписокОпределений1_Нажатие() Экспорт
// Сообщить("СписокОпределений1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Текст = "Это СписокОпределений";
СписокОпределений1.Стиль.Высота = 200;
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
СписокОпределений1.Нажатие = ДФ.Действие(ЭтотОбъект, "СписокОпределений1_Нажатие");
Форма1.Открыть();
Нажатие_СписокОпределений_событие.os
Перем ДФ, СписокОпределений1;
Процедура СписокОпределений1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_СписокОпределений_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Текст = "Это СписокОпределений";
СписокОпределений1.Стиль.Высота = 200;
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
СписокОпределений1.Нажатие = ДФ.Действие(ЭтотОбъект, "СписокОпределений1_Нажатие");
Форма1.Открыть();
Нажатие_Ссылка_метод.os
Перем ДФ, Ссылка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Ссылка1.Нажатие.ИмяМетода = "Ссылка1_Нажатие"
, "", "!!! ") + "Нажатие_Ссылка_метод.os" + " " + ТекущаяДата());
Ссылка1.Нажатие();
КонецПроцедуры
Процедура Ссылка1_Нажатие() Экспорт
// Сообщить("Ссылка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Текст = "Это Ссылка";
Ссылка1.Стиль.Высота = 200;
Ссылка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ссылка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Ссылка1_Нажатие");
Форма1.Открыть();
Нажатие_Ссылка_событие.os
Перем ДФ, Ссылка1;
Процедура Ссылка1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Ссылка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Текст = "Это Ссылка";
Ссылка1.Стиль.Высота = 200;
Ссылка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ссылка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Ссылка1_Нажатие");
Форма1.Открыть();
Нажатие_СтрокаТаблицы_метод.os
Перем ДФ, СтрокаТаблицы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СтрокаТаблицы1.Нажатие.ИмяМетода = "СтрокаТаблицы1_Нажатие"
, "", "!!! ") + "Нажатие_СтрокаТаблицы_метод.os" + " " + ТекущаяДата());
СтрокаТаблицы1.Нажатие();
КонецПроцедуры
Процедура СтрокаТаблицы1_Нажатие() Экспорт
// Сообщить("СтрокаТаблицы1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Текст = "Это СтрокаТаблицы";
СтрокаТаблицы1.Стиль.Высота = 200;
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
СтрокаТаблицы1.Нажатие = ДФ.Действие(ЭтотОбъект, "СтрокаТаблицы1_Нажатие");
Форма1.Открыть();
Нажатие_СтрокаТаблицы_событие.os
Перем ДФ, СтрокаТаблицы1;
Процедура СтрокаТаблицы1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_СтрокаТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Текст = "Это СтрокаТаблицы";
СтрокаТаблицы1.Стиль.Высота = 200;
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
СтрокаТаблицы1.Нажатие = ДФ.Действие(ЭтотОбъект, "СтрокаТаблицы1_Нажатие");
Форма1.Открыть();
Нажатие_Таблица_метод.os
Перем ДФ, Таблица1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Таблица1.Нажатие.ИмяМетода = "Таблица1_Нажатие"
, "", "!!! ") + "Нажатие_Таблица_метод.os" + " " + ТекущаяДата());
Таблица1.Нажатие();
КонецПроцедуры
Процедура Таблица1_Нажатие() Экспорт
// Сообщить("Таблица1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Текст = "Это Таблица";
Таблица1.Стиль.Высота = 200;
Таблица1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Таблица1.Нажатие = ДФ.Действие(ЭтотОбъект, "Таблица1_Нажатие");
Форма1.Открыть();
Нажатие_Таблица_событие.os
Перем ДФ, Таблица1;
Процедура Таблица1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Таблица_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Текст = "Это Таблица";
Таблица1.Стиль.Высота = 200;
Таблица1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Таблица1.Нажатие = ДФ.Действие(ЭтотОбъект, "Таблица1_Нажатие");
Форма1.Открыть();
Нажатие_Термин_метод.os
Перем ДФ, Термин1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Термин1.Нажатие.ИмяМетода = "Термин1_Нажатие"
, "", "!!! ") + "Нажатие_Термин_метод.os" + " " + ТекущаяДата());
Термин1.Нажатие();
КонецПроцедуры
Процедура Термин1_Нажатие() Экспорт
// Сообщить("Термин1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Текст = "Это Термин";
Термин1.Стиль.Высота = 200;
Термин1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Термин1.Нажатие = ДФ.Действие(ЭтотОбъект, "Термин1_Нажатие");
Форма1.Открыть();
Нажатие_Термин_событие.os
Перем ДФ, Термин1;
Процедура Термин1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Термин_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Текст = "Это Термин";
Термин1.Стиль.Высота = 200;
Термин1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Термин1.Нажатие = ДФ.Действие(ЭтотОбъект, "Термин1_Нажатие");
Форма1.Открыть();
Нажатие_УдаленыйТекст_метод.os
Перем ДФ, УдаленыйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
УдаленыйТекст1.Нажатие.ИмяМетода = "УдаленыйТекст1_Нажатие"
, "", "!!! ") + "Нажатие_УдаленыйТекст_метод.os" + " " + ТекущаяДата());
УдаленыйТекст1.Нажатие();
КонецПроцедуры
Процедура УдаленыйТекст1_Нажатие() Экспорт
// Сообщить("УдаленыйТекст1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Текст = "Это УдаленыйТекст";
УдаленыйТекст1.Стиль.Высота = 200;
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
УдаленыйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "УдаленыйТекст1_Нажатие");
Форма1.Открыть();
Нажатие_УдаленыйТекст_событие.os
Перем ДФ, УдаленыйТекст1;
Процедура УдаленыйТекст1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_УдаленыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Текст = "Это УдаленыйТекст";
УдаленыйТекст1.Стиль.Высота = 200;
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
УдаленыйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "УдаленыйТекст1_Нажатие");
Форма1.Открыть();
Нажатие_УпорядоченныйСписок_метод.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
УпорядоченныйСписок1.Нажатие.ИмяМетода = "УпорядоченныйСписок1_Нажатие"
, "", "!!! ") + "Нажатие_УпорядоченныйСписок_метод.os" + " " + ТекущаяДата());
УпорядоченныйСписок1.Нажатие();
КонецПроцедуры
Процедура УпорядоченныйСписок1_Нажатие() Экспорт
// Сообщить("УпорядоченныйСписок1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Текст = "Это УпорядоченныйСписок";
УпорядоченныйСписок1.Стиль.Высота = 200;
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
УпорядоченныйСписок1.Нажатие = ДФ.Действие(ЭтотОбъект, "УпорядоченныйСписок1_Нажатие");
Форма1.Открыть();
Нажатие_УпорядоченныйСписок_событие.os
Перем ДФ, УпорядоченныйСписок1;
Процедура УпорядоченныйСписок1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_УпорядоченныйСписок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Текст = "Это УпорядоченныйСписок";
УпорядоченныйСписок1.Стиль.Высота = 200;
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
УпорядоченныйСписок1.Нажатие = ДФ.Действие(ЭтотОбъект, "УпорядоченныйСписок1_Нажатие");
Форма1.Открыть();
Нажатие_Флажок_метод.os
Перем ДФ, Флажок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Флажок1.Нажатие.ИмяМетода = "Флажок1_Нажатие"
, "", "!!! ") + "Нажатие_Флажок_метод.os" + " " + ТекущаяДата());
Флажок1.Нажатие();
КонецПроцедуры
Процедура Флажок1_Нажатие() Экспорт
// Сообщить("Флажок1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Стиль.Высота = 200;
Флажок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Флажок1.Нажатие = ДФ.Действие(ЭтотОбъект, "Флажок1_Нажатие");
Форма1.Открыть();
Нажатие_Флажок_событие.os
Перем ДФ, Флажок1;
Процедура Флажок1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Флажок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Стиль.Высота = 200;
Флажок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Флажок1.Нажатие = ДФ.Действие(ЭтотОбъект, "Флажок1_Нажатие");
Форма1.Открыть();
Нажатие_ФорматированныйТекст_метод.os
Перем ДФ, ФорматированныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ФорматированныйТекст1.Нажатие.ИмяМетода = "ФорматированныйТекст1_Нажатие"
, "", "!!! ") + "Нажатие_ФорматированныйТекст_метод.os" + " " + ТекущаяДата());
ФорматированныйТекст1.Нажатие();
КонецПроцедуры
Процедура ФорматированныйТекст1_Нажатие() Экспорт
// Сообщить("ФорматированныйТекст1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Текст = "Это ФорматированныйТекст";
ФорматированныйТекст1.Стиль.Высота = 200;
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ФорматированныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "ФорматированныйТекст1_Нажатие");
Форма1.Открыть();
Нажатие_ФорматированныйТекст_событие.os
Перем ДФ, ФорматированныйТекст1;
Процедура ФорматированныйТекст1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ФорматированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Текст = "Это ФорматированныйТекст";
ФорматированныйТекст1.Стиль.Высота = 200;
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ФорматированныйТекст1.Нажатие = ДФ.Действие(ЭтотОбъект, "ФорматированныйТекст1_Нажатие");
Форма1.Открыть();
Нажатие_Холст_метод.os
Перем ДФ, Холст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Холст1.Нажатие.ИмяМетода = "Холст1_Нажатие"
, "", "!!! ") + "Нажатие_Холст_метод.os" + " " + ТекущаяДата());
Холст1.Нажатие();
КонецПроцедуры
Процедура Холст1_Нажатие() Экспорт
// Сообщить("Холст1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
Холст1.Стиль.Высота = 200;
Холст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Холст1.Нажатие = ДФ.Действие(ЭтотОбъект, "Холст1_Нажатие");
Форма1.Открыть();
Нажатие_Холст_событие.os
Перем ДФ, Холст1;
Процедура Холст1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Холст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
Холст1.Стиль.Высота = 200;
Холст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Холст1.Нажатие = ДФ.Действие(ЭтотОбъект, "Холст1_Нажатие");
Форма1.Открыть();
Нажатие_ШапкаТаблицы_метод.os
Перем ДФ, ШапкаТаблицы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ШапкаТаблицы1.Нажатие.ИмяМетода = "ШапкаТаблицы1_Нажатие"
, "", "!!! ") + "Нажатие_ШапкаТаблицы_метод.os" + " " + ТекущаяДата());
ШапкаТаблицы1.Нажатие();
КонецПроцедуры
Процедура ШапкаТаблицы1_Нажатие() Экспорт
// Сообщить("ШапкаТаблицы1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Текст = "Это ШапкаТаблицы";
ШапкаТаблицы1.Стиль.Высота = 200;
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ШапкаТаблицы1.Нажатие = ДФ.Действие(ЭтотОбъект, "ШапкаТаблицы1_Нажатие");
Форма1.Открыть();
Нажатие_ШапкаТаблицы_событие.os
Перем ДФ, ШапкаТаблицы1;
Процедура ШапкаТаблицы1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ШапкаТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Текст = "Это ШапкаТаблицы";
ШапкаТаблицы1.Стиль.Высота = 200;
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ШапкаТаблицы1.Нажатие = ДФ.Действие(ЭтотОбъект, "ШапкаТаблицы1_Нажатие");
Форма1.Открыть();
Нажатие_Шкала_метод.os
Перем ДФ, Шкала1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Шкала1.Нажатие.ИмяМетода = "Шкала1_Нажатие"
, "", "!!! ") + "Нажатие_Шкала_метод.os" + " " + ТекущаяДата());
Шкала1.Нажатие();
КонецПроцедуры
Процедура Шкала1_Нажатие() Экспорт
// Сообщить("Шкала1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Шкала1.Стиль.Высота = 200;
Шкала1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шкала1.Нажатие = ДФ.Действие(ЭтотОбъект, "Шкала1_Нажатие");
Форма1.Открыть();
Нажатие_Шкала_событие.os
Перем ДФ, Шкала1;
Процедура Шкала1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Шкала_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Шкала1.Стиль.Высота = 200;
Шкала1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шкала1.Нажатие = ДФ.Действие(ЭтотОбъект, "Шкала1_Нажатие");
Форма1.Открыть();
Нажатие_ЭлементМеню_событие.os
Перем ДФ, Сохранить;
Процедура Сохранить_Нажатие() Экспорт
Сообщить(?(
Сохранить.Нажатие.ИмяМетода = "Сохранить_Нажатие"
, "", "!!! ") + "Нажатие_ЭлементМеню_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Нажми меню Сохранить";
ГлавноеМеню = ДФ.Меню(ДФ.ТипМеню.Главное);
ПодменюМенюФайл = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюФайл = ДФ.ЭлементМеню("Файл", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюФайл);
Открыть = ДФ.ЭлементМеню("Открыть", ДФ.ТипЭлементаМеню.Стандартный, , "o", "ctrl");
ПодменюОткрыть = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
ТХТ = ДФ.ЭлементМеню("txt");
ДОК = ДФ.ЭлементМеню("doc");
ПодменюОткрыть.Добавить(ТХТ);
ПодменюОткрыть.Добавить(ДОК);
Открыть.Подменю = ПодменюОткрыть;
Сохранить = ДФ.ЭлементМеню("Сохранить", ДФ.ТипЭлементаМеню.Стандартный, , "s");
Сохранить.Нажатие = ДФ.Действие(ЭтотОбъект, "Сохранить_Нажатие");
Разделитель1 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Настройки = ДФ.ЭлементМеню("Настройки");
Разделитель2 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Выход = ДФ.ЭлементМеню("Выход", , , "e", "shift+alt");
ПодменюМенюФайл.Добавить(Открыть);
ПодменюМенюФайл.Добавить(Сохранить);
ПодменюМенюФайл.Добавить(Разделитель1);
ПодменюМенюФайл.Добавить(Настройки);
ПодменюМенюФайл.Добавить(Разделитель2);
ПодменюМенюФайл.Добавить(Выход);
ПодменюМенюПравка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюПравка = ДФ.ЭлементМеню("Правка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюПравка);
Отмена = ДФ.ЭлементМеню("Отмена");
Повтор = ДФ.ЭлементМеню("Повтор");
ПодменюМенюПравка.Добавить(Отмена);
ПодменюМенюПравка.Добавить(Повтор);
ПодменюМенюСправка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюСправка = ДФ.ЭлементМеню("Справка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюСправка);
ОПрограмме = ДФ.ЭлементМеню("О программе");
ПодменюМенюСправка.Добавить(ОПрограмме);
ГлавноеМеню.Добавить(МенюФайл);
ГлавноеМеню.Добавить(МенюПравка);
ГлавноеМеню.Добавить(МенюСправка);
Форма1.Меню = ГлавноеМеню;
Форма1.Открыть();
Нажатие_ЭлементПоляСписка_метод.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЭлементПоляСписка1.Нажатие.ИмяМетода = "ЭлементПоляСписка1_Нажатие"
, "", "!!! ") + "Нажатие_ЭлементПоляСписка_метод.os" + " " + ТекущаяДата());
ЭлементПоляСписка1.Нажатие();
КонецПроцедуры
Процедура ЭлементПоляСписка1_Нажатие() Экспорт
// Сообщить("ЭлементПоляСписка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Текст = "Это ЭлементПоляСписка";
ЭлементПоляСписка1.Стиль.Высота = 200;
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЭлементПоляСписка1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЭлементПоляСписка1_Нажатие");
Форма1.Открыть();
Нажатие_ЭлементПоляСписка_событие.os
Перем ДФ, ЭлементПоляСписка1;
Процедура ЭлементПоляСписка1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ЭлементПоляСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Текст = "Это ЭлементПоляСписка";
ЭлементПоляСписка1.Стиль.Высота = 200;
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЭлементПоляСписка1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЭлементПоляСписка1_Нажатие");
Форма1.Открыть();
Нажатие_ЭлементСписка_метод.os
Перем ДФ, ЭлементСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЭлементСписка1.Нажатие.ИмяМетода = "ЭлементСписка1_Нажатие"
, "", "!!! ") + "Нажатие_ЭлементСписка_метод.os" + " " + ТекущаяДата());
ЭлементСписка1.Нажатие();
КонецПроцедуры
Процедура ЭлементСписка1_Нажатие() Экспорт
// Сообщить("ЭлементСписка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Текст = "Это ЭлементСписка";
ЭлементСписка1.Стиль.Высота = 200;
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЭлементСписка1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЭлементСписка1_Нажатие");
Форма1.Открыть();
Нажатие_ЭлементСписка_событие.os
Перем ДФ, ЭлементСписка1;
Процедура ЭлементСписка1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ЭлементСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Текст = "Это ЭлементСписка";
ЭлементСписка1.Стиль.Высота = 200;
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЭлементСписка1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЭлементСписка1_Нажатие");
Форма1.Открыть();
Нажатие_Ячейка_метод.os
Перем ДФ, Ячейка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Ячейка1.Нажатие.ИмяМетода = "Ячейка1_Нажатие"
, "", "!!! ") + "Нажатие_Ячейка_метод.os" + " " + ТекущаяДата());
Ячейка1.Нажатие();
КонецПроцедуры
Процедура Ячейка1_Нажатие() Экспорт
// Сообщить("Ячейка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Текст = "Это Ячейка";
Ячейка1.Стиль.Высота = 200;
Ячейка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ячейка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Ячейка1_Нажатие");
Форма1.Открыть();
Нажатие_Ячейка_событие.os
Перем ДФ, Ячейка1;
Процедура Ячейка1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_Ячейка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Текст = "Это Ячейка";
Ячейка1.Стиль.Высота = 200;
Ячейка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ячейка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Ячейка1_Нажатие");
Форма1.Открыть();
Нажатие_ЯчейкаЗаголовка_метод.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЯчейкаЗаголовка1.Нажатие.ИмяМетода = "ЯчейкаЗаголовка1_Нажатие"
, "", "!!! ") + "Нажатие_ЯчейкаЗаголовка_метод.os" + " " + ТекущаяДата());
ЯчейкаЗаголовка1.Нажатие();
КонецПроцедуры
Процедура ЯчейкаЗаголовка1_Нажатие() Экспорт
// Сообщить("ЯчейкаЗаголовка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Текст = "Это ЯчейкаЗаголовка";
ЯчейкаЗаголовка1.Стиль.Высота = 200;
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЯчейкаЗаголовка1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЯчейкаЗаголовка1_Нажатие");
Форма1.Открыть();
Нажатие_ЯчейкаЗаголовка_событие.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура ЯчейкаЗаголовка1_Нажатие() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Нажатие_ЯчейкаЗаголовка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкните объект";
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Текст = "Это ЯчейкаЗаголовка";
ЯчейкаЗаголовка1.Стиль.Высота = 200;
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЯчейкаЗаголовка1.Нажатие = ДФ.Действие(ЭтотОбъект, "ЯчейкаЗаголовка1_Нажатие");
Форма1.Открыть();
Назначение_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ссылка1.Назначение = ДФ.Назначение.Новое
, "", "!!! ") + "Назначение_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "Назначение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ссылка1 = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка1.Адрес = "https://oscript.io/";
Ссылка1.Текст = "Инструмент автоматизации для специалистов по 1С";
Ссылка1.Назначение = ДФ.Назначение.Новое;
Форма1.Открыть();
НаибольшееЦелое_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().НаибольшееЦелое(3.14) = 3
, "", "!!! ") + "НаибольшееЦелое_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().НаибольшееЦелое(3.14);
Форма1.Открыть();
НаименьшееЦелое_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().НаименьшееЦел(3.14) = 4
, "", "!!! ") + "НаименьшееЦелое_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().НаименьшееЦел(3.14);
Форма1.Открыть();
НайтиЭлемент_ДекларативныеФормы_метод.os
Перем ДФ, Кнопка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.НайтиЭлемент(Кнопка1.КлючЭлемента).Текст = "Это Кнопка1"
, "", "!!! ") + "НайтиЭлемент_ДекларативныеФормы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Форма1.Открыть();
НаПаузе_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Не Аудио1.НаПаузе
, "", "!!! ") + "НаПаузе_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "НаПаузе", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Воспроизвести();
Форма1.Открыть();
Направление_Абзац_свойство.os
Перем ДФ, Абзац0;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац0 = ДФ.Абзац();
Абзац0.Родитель = Форма1;
Абзац0.Текст = "Абзац0";
Абзац0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Абзац1";
Абзац1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Абзац2 = ДФ.Абзац();
Абзац2.Родитель = Форма1;
Абзац2.Текст = "Абзац2";
Абзац2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Абзац3 = ДФ.Абзац();
Абзац3.Родитель = Форма1;
Абзац3.Текст = "Абзац3";
Абзац3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Абзац0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Артикль_свойство.os
Перем ДФ, Артикль0;
Процедура Свойство() Экспорт
Сообщить(?(
Артикль0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Артикль0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Артикль0 = ДФ.Артикль();
Артикль0.Родитель = Форма1;
Артикль0.Текст = "Артикль0";
Артикль0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Текст = "Артикль1";
Артикль1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Артикль2 = ДФ.Артикль();
Артикль2.Родитель = Форма1;
Артикль2.Текст = "Артикль2";
Артикль2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Артикль3 = ДФ.Артикль();
Артикль3.Родитель = Форма1;
Артикль3.Текст = "Артикль3";
Артикль3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Артикль0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Блок_свойство.os
Перем ДФ, Блок0;
Процедура Свойство() Экспорт
Сообщить(?(
Блок0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок0 = ДФ.Блок();
Блок0.Родитель = Форма1;
Блок0.Текст = "Блок0";
Блок0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Блок2 = ДФ.Блок();
Блок2.Родитель = Форма1;
Блок2.Текст = "Блок2";
Блок2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Блок3 = ДФ.Блок();
Блок3.Родитель = Форма1;
Блок3.Текст = "Блок3";
Блок3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Блок0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Группа_свойство.os
Перем ДФ, Группа0;
Процедура Свойство() Экспорт
Сообщить(?(
Группа0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Группа0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Группа0 = ДФ.Группа();
Группа0.Родитель = Форма1;
Группа0.Текст = "Группа0";
Группа0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Текст = "Группа1";
Группа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Группа2 = ДФ.Группа();
Группа2.Родитель = Форма1;
Группа2.Текст = "Группа2";
Группа2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Группа3 = ДФ.Группа();
Группа3.Родитель = Форма1;
Группа3.Текст = "Группа3";
Группа3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Группа0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Диалог_свойство.os
Перем ДФ, Диалог0;
Процедура Свойство() Экспорт
Сообщить(?(
Диалог0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Диалог0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Диалог0 = ДФ.Диалог();
Диалог0.Родитель = Форма1;
Диалог0.Текст = "Диалог0";
Диалог0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Текст = "Диалог1";
Диалог1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Диалог2 = ДФ.Диалог();
Диалог2.Родитель = Форма1;
Диалог2.Текст = "Диалог2";
Диалог2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Диалог3 = ДФ.Диалог();
Диалог3.Родитель = Форма1;
Диалог3.Текст = "Диалог3";
Диалог3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Диалог0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок0;
Процедура Свойство() Экспорт
Сообщить(?(
ДополнительныйБлок0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ДополнительныйБлок0 = ДФ.ДополнительныйБлок();
ДополнительныйБлок0.Родитель = Форма1;
ДополнительныйБлок0.Текст = "ДополнительныйБлок0";
ДополнительныйБлок0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "ДополнительныйБлок1";
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ДополнительныйБлок2 = ДФ.ДополнительныйБлок();
ДополнительныйБлок2.Родитель = Форма1;
ДополнительныйБлок2.Текст = "ДополнительныйБлок2";
ДополнительныйБлок2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ДополнительныйБлок3 = ДФ.ДополнительныйБлок();
ДополнительныйБлок3.Родитель = Форма1;
ДополнительныйБлок3.Текст = "ДополнительныйБлок3";
ДополнительныйБлок3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ДополнительныйБлок0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст0;
Процедура Свойство() Экспорт
Сообщить(?(
ЖирныйТекст0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЖирныйТекст0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЖирныйТекст0 = ДФ.ЖирныйТекст();
ЖирныйТекст0.Родитель = Форма1;
ЖирныйТекст0.Текст = "ЖирныйТекст0";
ЖирныйТекст0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Текст = "ЖирныйТекст1";
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЖирныйТекст2 = ДФ.ЖирныйТекст();
ЖирныйТекст2.Родитель = Форма1;
ЖирныйТекст2.Текст = "ЖирныйТекст2";
ЖирныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЖирныйТекст3 = ДФ.ЖирныйТекст();
ЖирныйТекст3.Родитель = Форма1;
ЖирныйТекст3.Текст = "ЖирныйТекст3";
ЖирныйТекст3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЖирныйТекст0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Заголовок1_свойство.os
Перем ДФ, Заголовок10;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок10.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок10, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок10 = ДФ.Заголовок1();
Заголовок10.Родитель = Форма1;
Заголовок10.Текст = "Заголовок10";
Заголовок10.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Текст = "Заголовок11";
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок12 = ДФ.Заголовок1();
Заголовок12.Родитель = Форма1;
Заголовок12.Текст = "Заголовок12";
Заголовок12.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок13 = ДФ.Заголовок1();
Заголовок13.Родитель = Форма1;
Заголовок13.Текст = "Заголовок13";
Заголовок13.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок10.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Заголовок2_свойство.os
Перем ДФ, Заголовок20;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок20.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок20, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок20 = ДФ.Заголовок2();
Заголовок20.Родитель = Форма1;
Заголовок20.Текст = "Заголовок20";
Заголовок20.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Текст = "Заголовок21";
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок22 = ДФ.Заголовок2();
Заголовок22.Родитель = Форма1;
Заголовок22.Текст = "Заголовок22";
Заголовок22.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок23 = ДФ.Заголовок2();
Заголовок23.Родитель = Форма1;
Заголовок23.Текст = "Заголовок23";
Заголовок23.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок20.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Заголовок3_свойство.os
Перем ДФ, Заголовок30;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок30.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок30, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок30 = ДФ.Заголовок3();
Заголовок30.Родитель = Форма1;
Заголовок30.Текст = "Заголовок30";
Заголовок30.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Текст = "Заголовок31";
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок32 = ДФ.Заголовок3();
Заголовок32.Родитель = Форма1;
Заголовок32.Текст = "Заголовок32";
Заголовок32.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок33 = ДФ.Заголовок3();
Заголовок33.Родитель = Форма1;
Заголовок33.Текст = "Заголовок33";
Заголовок33.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок30.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Заголовок4_свойство.os
Перем ДФ, Заголовок40;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок40.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок40, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок40 = ДФ.Заголовок4();
Заголовок40.Родитель = Форма1;
Заголовок40.Текст = "Заголовок40";
Заголовок40.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Текст = "Заголовок41";
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок42 = ДФ.Заголовок4();
Заголовок42.Родитель = Форма1;
Заголовок42.Текст = "Заголовок42";
Заголовок42.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок43 = ДФ.Заголовок4();
Заголовок43.Родитель = Форма1;
Заголовок43.Текст = "Заголовок43";
Заголовок43.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок40.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Заголовок5_свойство.os
Перем ДФ, Заголовок50;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок50.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок50, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок50 = ДФ.Заголовок5();
Заголовок50.Родитель = Форма1;
Заголовок50.Текст = "Заголовок50";
Заголовок50.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Текст = "Заголовок51";
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок52 = ДФ.Заголовок5();
Заголовок52.Родитель = Форма1;
Заголовок52.Текст = "Заголовок52";
Заголовок52.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок53 = ДФ.Заголовок5();
Заголовок53.Родитель = Форма1;
Заголовок53.Текст = "Заголовок53";
Заголовок53.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок50.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Заголовок6_свойство.os
Перем ДФ, Заголовок60;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок60.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок60, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок60 = ДФ.Заголовок6();
Заголовок60.Родитель = Форма1;
Заголовок60.Текст = "Заголовок60";
Заголовок60.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Текст = "Заголовок61";
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок62 = ДФ.Заголовок6();
Заголовок62.Родитель = Форма1;
Заголовок62.Текст = "Заголовок62";
Заголовок62.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок63 = ДФ.Заголовок6();
Заголовок63.Родитель = Форма1;
Заголовок63.Текст = "Заголовок63";
Заголовок63.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок60.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Заголовок_свойство.os
Перем ДФ, Заголовок0;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок0 = ДФ.Заголовок();
Заголовок0.Родитель = Форма1;
Заголовок0.Текст = "Заголовок0";
Заголовок0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Текст = "Заголовок1";
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок2 = ДФ.Заголовок();
Заголовок2.Родитель = Форма1;
Заголовок2.Текст = "Заголовок2";
Заголовок2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок3 = ДФ.Заголовок();
Заголовок3.Родитель = Форма1;
Заголовок3.Текст = "Заголовок3";
Заголовок3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Заголовок0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ЗаголовокГруппы_свойство.os
Перем ДФ, ЗаголовокГруппы0;
Процедура Свойство() Экспорт
Сообщить(?(
ЗаголовокГруппы0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокГруппы0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЗаголовокГруппы0 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы0.Родитель = Форма1;
ЗаголовокГруппы0.Текст = "ЗаголовокГруппы0";
ЗаголовокГруппы0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Текст = "ЗаголовокГруппы1";
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЗаголовокГруппы2 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы2.Родитель = Форма1;
ЗаголовокГруппы2.Текст = "ЗаголовокГруппы2";
ЗаголовокГруппы2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЗаголовокГруппы3 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы3.Родитель = Форма1;
ЗаголовокГруппы3.Текст = "ЗаголовокГруппы3";
ЗаголовокГруппы3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЗаголовокГруппы0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ДФ, ЗаголовокРаскрываемогоБлока0;
Процедура Свойство() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ЗаголовокРаскрываемогоБлока_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЗаголовокРаскрываемогоБлока0 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока0.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока0.Текст = "ЗаголовокРаскрываемогоБлока0";
ЗаголовокРаскрываемогоБлока0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Текст = "ЗаголовокРаскрываемогоБлока1";
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЗаголовокРаскрываемогоБлока2 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока2.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока2.Текст = "ЗаголовокРаскрываемогоБлока2";
ЗаголовокРаскрываемогоБлока2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЗаголовокРаскрываемогоБлока3 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока3.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока3.Текст = "ЗаголовокРаскрываемогоБлока3";
ЗаголовокРаскрываемогоБлока3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЗаголовокРаскрываемогоБлока0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Изображение_свойство.os
Перем ДФ, Изображение0;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Изображение0 = ДФ.Изображение();
Изображение0.Родитель = Форма1;
Изображение0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Изображение2 = ДФ.Изображение();
Изображение2.Родитель = Форма1;
Изображение2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Изображение3 = ДФ.Изображение();
Изображение3.Родитель = Форма1;
Изображение3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Изображение0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Индикатор_свойство.os
Перем ДФ, Индикатор0;
Процедура Свойство() Экспорт
Сообщить(?(
Индикатор0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Индикатор0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Индикатор0 = ДФ.Индикатор();
Индикатор0.Родитель = Форма1;
Индикатор0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Индикатор2 = ДФ.Индикатор();
Индикатор2.Родитель = Форма1;
Индикатор2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Индикатор3 = ДФ.Индикатор();
Индикатор3.Родитель = Форма1;
Индикатор3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Индикатор0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Итоги_свойство.os
Перем ДФ, Итоги0;
Процедура Свойство() Экспорт
Сообщить(?(
Итоги0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Итоги_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Итоги0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Итоги0 = ДФ.Итоги();
Итоги0.Родитель = Форма1;
Итоги0.Текст = "Итоги0";
Итоги0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Текст = "Итоги1";
Итоги1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Итоги2 = ДФ.Итоги();
Итоги2.Родитель = Форма1;
Итоги2.Текст = "Итоги2";
Итоги2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Итоги3 = ДФ.Итоги();
Итоги3.Родитель = Форма1;
Итоги3.Текст = "Итоги3";
Итоги3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Итоги0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Карта_свойство.os
Перем ДФ, Карта0;
Процедура Свойство() Экспорт
Сообщить(?(
Карта0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Карта_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Карта0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Карта0 = ДФ.Карта();
Карта0.Родитель = Форма1;
Карта0.Текст = "Карта0";
Карта0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Карта1 = ДФ.Карта();
Карта1.Родитель = Форма1;
Карта1.Текст = "Карта1";
Карта1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Карта2 = ДФ.Карта();
Карта2.Родитель = Форма1;
Карта2.Текст = "Карта2";
Карта2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Карта3 = ДФ.Карта();
Карта3.Родитель = Форма1;
Карта3.Текст = "Карта3";
Карта3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Карта0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Кнопка_свойство.os
Перем ДФ, Кнопка0;
Процедура Свойство() Экспорт
Сообщить(?(
Кнопка0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Кнопка0 = ДФ.Кнопка();
Кнопка0.Родитель = Форма1;
Кнопка0.Текст = "Кнопка0";
Кнопка0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Кнопка1";
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Кнопка2 = ДФ.Кнопка();
Кнопка2.Родитель = Форма1;
Кнопка2.Текст = "Кнопка2";
Кнопка2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Кнопка3 = ДФ.Кнопка();
Кнопка3.Родитель = Форма1;
Кнопка3.Текст = "Кнопка3";
Кнопка3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Кнопка0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Код_свойство.os
Перем ДФ, Код0;
Процедура Свойство() Экспорт
Сообщить(?(
Код0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Код_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Код0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Код0 = ДФ.Код();
Код0.Родитель = Форма1;
Код0.Текст = "Код0";
Код0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Текст = "Код1";
Код1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Код2 = ДФ.Код();
Код2.Родитель = Форма1;
Код2.Текст = "Код2";
Код2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Код3 = ДФ.Код();
Код3.Родитель = Форма1;
Код3.Текст = "Код3";
Код3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Код0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Колонка_свойство.os
Перем ДФ, Колонка0;
Процедура Свойство() Экспорт
Сообщить(?(
Колонка0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Колонка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонка0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Колонка0 = ДФ.Колонка();
Колонка0.Родитель = Форма1;
Колонка0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = Форма1;
Колонка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Колонка2 = ДФ.Колонка();
Колонка2.Родитель = Форма1;
Колонка2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Колонка3 = ДФ.Колонка();
Колонка3.Родитель = Форма1;
Колонка3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Колонка0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Колонтитул_свойство.os
Перем ДФ, Колонтитул0;
Процедура Свойство() Экспорт
Сообщить(?(
Колонтитул0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонтитул0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Колонтитул0 = ДФ.Колонтитул();
Колонтитул0.Родитель = Форма1;
Колонтитул0.Текст = "Колонтитул0";
Колонтитул0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Текст = "Колонтитул1";
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Колонтитул2 = ДФ.Колонтитул();
Колонтитул2.Родитель = Форма1;
Колонтитул2.Текст = "Колонтитул2";
Колонтитул2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Колонтитул3 = ДФ.Колонтитул();
Колонтитул3.Родитель = Форма1;
Колонтитул3.Текст = "Колонтитул3";
Колонтитул3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Колонтитул0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Контент_свойство.os
Перем ДФ, Контент0;
Процедура Свойство() Экспорт
Сообщить(?(
Контент0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Контент_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Контент0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Контент0 = Форма1.Контент;
Контент0.Текст = "Контент0";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Кнопка1";
Кнопка2 = ДФ.Кнопка();
Кнопка2.Родитель = Форма1;
Кнопка2.Текст = "Кнопка2";
Кнопка3 = ДФ.Кнопка();
Кнопка3.Родитель = Форма1;
Кнопка3.Текст = "Кнопка3";
Контент0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст0;
Процедура Свойство() Экспорт
Сообщить(?(
КурсивТекст0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(КурсивТекст0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
КурсивТекст0 = ДФ.КурсивТекст();
КурсивТекст0.Родитель = Форма1;
КурсивТекст0.Текст = "КурсивТекст0";
КурсивТекст0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Текст = "КурсивТекст1";
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
КурсивТекст2 = ДФ.КурсивТекст();
КурсивТекст2.Родитель = Форма1;
КурсивТекст2.Текст = "КурсивТекст2";
КурсивТекст2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
КурсивТекст3 = ДФ.КурсивТекст();
КурсивТекст3.Родитель = Форма1;
КурсивТекст3.Текст = "КурсивТекст3";
КурсивТекст3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
КурсивТекст0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Линия_свойство.os
Перем ДФ, Линия0;
Процедура Свойство() Экспорт
Сообщить(?(
Линия0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Линия0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Линия0 = ДФ.Линия();
Линия0.Родитель = Форма1;
Линия0.Текст = "Линия0";
Линия0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Линия1 = ДФ.Линия();
Линия1.Родитель = Форма1;
Линия1.Текст = "Линия1";
Линия1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Линия2 = ДФ.Линия();
Линия2.Родитель = Форма1;
Линия2.Текст = "Линия2";
Линия2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Линия3 = ДФ.Линия();
Линия3.Родитель = Форма1;
Линия3.Текст = "Линия3";
Линия3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Линия0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст0;
Процедура Свойство() Экспорт
Сообщить(?(
МаркированныйТекст0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МаркированныйТекст0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
МаркированныйТекст0 = ДФ.МаркированныйТекст();
МаркированныйТекст0.Родитель = Форма1;
МаркированныйТекст0.Текст = "МаркированныйТекст0";
МаркированныйТекст0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Текст = "МаркированныйТекст1";
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
МаркированныйТекст2 = ДФ.МаркированныйТекст();
МаркированныйТекст2.Родитель = Форма1;
МаркированныйТекст2.Текст = "МаркированныйТекст2";
МаркированныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
МаркированныйТекст3 = ДФ.МаркированныйТекст();
МаркированныйТекст3.Родитель = Форма1;
МаркированныйТекст3.Текст = "МаркированныйТекст3";
МаркированныйТекст3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
МаркированныйТекст0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_МедиаГруппа_свойство.os
Перем ДФ, МедиаГруппа0;
Процедура Свойство() Экспорт
Сообщить(?(
МедиаГруппа0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
МедиаГруппа0 = ДФ.МедиаГруппа();
МедиаГруппа0.Родитель = Форма1;
МедиаГруппа0.Текст = "МедиаГруппа0";
МедиаГруппа0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Текст = "МедиаГруппа1";
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
МедиаГруппа2 = ДФ.МедиаГруппа();
МедиаГруппа2.Родитель = Форма1;
МедиаГруппа2.Текст = "МедиаГруппа2";
МедиаГруппа2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
МедиаГруппа3 = ДФ.МедиаГруппа();
МедиаГруппа3.Родитель = Форма1;
МедиаГруппа3.Текст = "МедиаГруппа3";
МедиаГруппа3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
МедиаГруппа0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст0;
Процедура Свойство() Экспорт
Сообщить(?(
МелкийТекст0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МелкийТекст0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
МелкийТекст0 = ДФ.МелкийТекст();
МелкийТекст0.Родитель = Форма1;
МелкийТекст0.Текст = "МелкийТекст0";
МелкийТекст0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Текст = "МелкийТекст1";
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
МелкийТекст2 = ДФ.МелкийТекст();
МелкийТекст2.Родитель = Форма1;
МелкийТекст2.Текст = "МелкийТекст2";
МелкийТекст2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
МелкийТекст3 = ДФ.МелкийТекст();
МелкийТекст3.Родитель = Форма1;
МелкийТекст3.Текст = "МелкийТекст3";
МелкийТекст3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
МелкийТекст0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст0;
Процедура Свойство() Экспорт
Сообщить(?(
НадстрочныйТекст0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НадстрочныйТекст0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НадстрочныйТекст0 = ДФ.НадстрочныйТекст();
НадстрочныйТекст0.Родитель = Форма1;
НадстрочныйТекст0.Текст = "НадстрочныйТекст0";
НадстрочныйТекст0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Текст = "НадстрочныйТекст1";
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НадстрочныйТекст2 = ДФ.НадстрочныйТекст();
НадстрочныйТекст2.Родитель = Форма1;
НадстрочныйТекст2.Текст = "НадстрочныйТекст2";
НадстрочныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НадстрочныйТекст3 = ДФ.НадстрочныйТекст();
НадстрочныйТекст3.Родитель = Форма1;
НадстрочныйТекст3.Текст = "НадстрочныйТекст3";
НадстрочныйТекст3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НадстрочныйТекст0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст0;
Процедура Свойство() Экспорт
Сообщить(?(
НаправленныйТекст0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НаправленныйТекст0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НаправленныйТекст0 = ДФ.НаправленныйТекст();
НаправленныйТекст0.Родитель = Форма1;
НаправленныйТекст0.Текст = "НаправленныйТекст0";
НаправленныйТекст0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Текст = "НаправленныйТекст1";
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НаправленныйТекст2 = ДФ.НаправленныйТекст();
НаправленныйТекст2.Родитель = Форма1;
НаправленныйТекст2.Текст = "НаправленныйТекст2";
НаправленныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НаправленныйТекст3 = ДФ.НаправленныйТекст();
НаправленныйТекст3.Родитель = Форма1;
НаправленныйТекст3.Текст = "НаправленныйТекст3";
НаправленныйТекст3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НаправленныйТекст0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_НеупорядоченныйСписок_свойство.os
Перем ДФ, НеупорядоченныйСписок0;
Процедура Свойство() Экспорт
Сообщить(?(
НеупорядоченныйСписок0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НеупорядоченныйСписок0 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок0.Родитель = Форма1;
НеупорядоченныйСписок0.Текст = "НеупорядоченныйСписок0";
НеупорядоченныйСписок0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Текст = "НеупорядоченныйСписок1";
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НеупорядоченныйСписок2 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок2.Родитель = Форма1;
НеупорядоченныйСписок2.Текст = "НеупорядоченныйСписок2";
НеупорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НеупорядоченныйСписок3 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок3.Родитель = Форма1;
НеупорядоченныйСписок3.Текст = "НеупорядоченныйСписок3";
НеупорядоченныйСписок3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НеупорядоченныйСписок0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_НижнийКолонтитул_свойство.os
Перем ДФ, НижнийКолонтитул0;
Процедура Свойство() Экспорт
Сообщить(?(
НижнийКолонтитул0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НижнийКолонтитул0 = ДФ.НижнийКолонтитул();
НижнийКолонтитул0.Родитель = Форма1;
НижнийКолонтитул0.Текст = "НижнийКолонтитул0";
НижнийКолонтитул0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Текст = "НижнийКолонтитул1";
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НижнийКолонтитул2 = ДФ.НижнийКолонтитул();
НижнийКолонтитул2.Родитель = Форма1;
НижнийКолонтитул2.Текст = "НижнийКолонтитул2";
НижнийКолонтитул2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НижнийКолонтитул3 = ДФ.НижнийКолонтитул();
НижнийКолонтитул3.Родитель = Форма1;
НижнийКолонтитул3.Текст = "НижнийКолонтитул3";
НижнийКолонтитул3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
НижнийКолонтитул0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Область_свойство.os
Перем ДФ, Область0;
Процедура Свойство() Экспорт
Сообщить(?(
Область0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Область0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Область0 = ДФ.Область();
Область0.Родитель = Форма1;
Область0.Текст = "Область0";
Область0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Область1 = ДФ.Область();
Область1.Родитель = Форма1;
Область1.Текст = "Область1";
Область1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Область2 = ДФ.Область();
Область2.Родитель = Форма1;
Область2.Текст = "Область2";
Область2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Область3 = ДФ.Область();
Область3.Родитель = Форма1;
Область3.Текст = "Область3";
Область3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Область0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ОбластьТаблицы_свойство.os
Перем ДФ, ОбластьТаблицы0;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТаблицы0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ОбластьТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТаблицы0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОбластьТаблицы0 = ДФ.ОбластьТаблицы();
ОбластьТаблицы0.Родитель = Форма1;
ОбластьТаблицы0.Текст = "ОбластьТаблицы0";
ОбластьТаблицы0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Текст = "ОбластьТаблицы1";
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ОбластьТаблицы2 = ДФ.ОбластьТаблицы();
ОбластьТаблицы2.Родитель = Форма1;
ОбластьТаблицы2.Текст = "ОбластьТаблицы2";
ОбластьТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ОбластьТаблицы3 = ДФ.ОбластьТаблицы();
ОбластьТаблицы3.Родитель = Форма1;
ОбластьТаблицы3.Текст = "ОбластьТаблицы3";
ОбластьТаблицы3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ОбластьТаблицы0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста0;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОбластьТекста0 = ДФ.ОбластьТекста();
ОбластьТекста0.Родитель = Форма1;
ОбластьТекста0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ОбластьТекста2 = ДФ.ОбластьТекста();
ОбластьТекста2.Родитель = Форма1;
ОбластьТекста2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ОбластьТекста3 = ДФ.ОбластьТекста();
ОбластьТекста3.Родитель = Форма1;
ОбластьТекста3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ОбластьТекста0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ОписаниеМедиа_свойство.os
Перем ДФ, ОписаниеМедиа0;
Процедура Свойство() Экспорт
Сообщить(?(
ОписаниеМедиа0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОписаниеМедиа0 = ДФ.ОписаниеМедиа();
ОписаниеМедиа0.Родитель = Форма1;
ОписаниеМедиа0.Текст = "ОписаниеМедиа0";
ОписаниеМедиа0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Текст = "ОписаниеМедиа1";
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ОписаниеМедиа2 = ДФ.ОписаниеМедиа();
ОписаниеМедиа2.Родитель = Форма1;
ОписаниеМедиа2.Текст = "ОписаниеМедиа2";
ОписаниеМедиа2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ОписаниеМедиа3 = ДФ.ОписаниеМедиа();
ОписаниеМедиа3.Родитель = Форма1;
ОписаниеМедиа3.Текст = "ОписаниеМедиа3";
ОписаниеМедиа3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ОписаниеМедиа0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Определение_свойство.os
Перем ДФ, Определение0;
Процедура Свойство() Экспорт
Сообщить(?(
Определение0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Определение0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Определение0 = ДФ.Определение();
Определение0.Родитель = Форма1;
Определение0.Текст = "Определение0";
Определение0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Текст = "Определение1";
Определение1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Определение2 = ДФ.Определение();
Определение2.Родитель = Форма1;
Определение2.Текст = "Определение2";
Определение2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Определение3 = ДФ.Определение();
Определение3.Родитель = Форма1;
Определение3.Текст = "Определение3";
Определение3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Определение0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ПараметрыАнимации_свойство.os
Перем АнимацияВращение, АнимацияМасштаб;
Перем ДФ, ПараметрыАнимации1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПараметрыАнимации1.Направление = ДФ.НаправлениеАнимации.Чередовать
, "", "!!! ") + "Направление_ПараметрыАнимации_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
АнимацияВращение.Запустить();
АнимацияМасштаб.Запустить();
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
АнимацияВращение.Пауза();
АнимацияМасштаб.Пауза();
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
АнимацияВращение.Завершить();
АнимацияМасштаб.Завершить();
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
АнимацияВращение.Отменить();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Запустить";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Пауза";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка3 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Завершить";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Отменить вращение";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок2.Стиль.Ширина = 45;
Блок2.Стиль.Высота = 45;
Блок2.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок2.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок2.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок2.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок2";
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.Зеленый;
Кадр3.Сдвиг = "scale(1)";
Кадр3.Смещение = 0;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Желтый;
Кадр4.Сдвиг = "scale(1.05)";
Кадр4.Смещение = 0.1;
Кадр5 = ДФ.Стиль();
Кадр5.ЦветФона = ДФ.Цвет.Желтый;
Кадр5.Сдвиг = "scale(1.4)";
Кадр5.Смещение = 0.7;
Кадр6 = ДФ.Стиль();
Кадр6.ЦветФона = ДФ.Цвет.Красный;
Кадр6.Сдвиг = "scale(1.5)";
Кадр6.Смещение = 1;
Кадры2 = ДФ.Кадры();
Кадры2.Добавить(Кадр3);
Кадры2.Добавить(Кадр4);
Кадры2.Добавить(Кадр5);
Кадры2.Добавить(Кадр6);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Блок1.Анимация(Кадры1, ПараметрыАнимации1);
АнимацияМасштаб = Блок2.Анимация(Кадры2, ПараметрыАнимации1);
Форма1.Открыть();
Направление_Переключатель_свойство.os
Перем ДФ, Переключатель0;
Процедура Свойство() Экспорт
Сообщить(?(
Переключатель0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Переключатель0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Переключатель0 = ДФ.Переключатель();
Переключатель0.Родитель = Форма1;
Переключатель0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Переключатель2 = ДФ.Переключатель();
Переключатель2.Родитель = Форма1;
Переключатель2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Переключатель3 = ДФ.Переключатель();
Переключатель3.Родитель = Форма1;
Переключатель3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Переключатель0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Перенос_свойство.os
Перем ДФ, Перенос0;
Процедура Свойство() Экспорт
Сообщить(?(
Перенос0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Перенос_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Перенос0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Перенос0 = ДФ.Перенос();
Перенос0.Родитель = Форма1;
Перенос0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Перенос1 = ДФ.Перенос();
Перенос1.Родитель = Форма1;
Перенос1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Перенос2 = ДФ.Перенос();
Перенос2.Родитель = Форма1;
Перенос2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Перенос3 = ДФ.Перенос();
Перенос3.Родитель = Форма1;
Перенос3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Перенос0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Подпись_свойство.os
Перем ДФ, Подпись0;
Процедура Свойство() Экспорт
Сообщить(?(
Подпись0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Подпись0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Подпись0 = ДФ.Подпись();
Подпись0.Родитель = Форма1;
Подпись0.Текст = "Подпись0";
Подпись0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Подпись1";
Подпись1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Подпись2 = ДФ.Подпись();
Подпись2.Родитель = Форма1;
Подпись2.Текст = "Подпись2";
Подпись2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Подпись3 = ДФ.Подпись();
Подпись3.Родитель = Форма1;
Подпись3.Текст = "Подпись3";
Подпись3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Подпись0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст0;
Процедура Свойство() Экспорт
Сообщить(?(
ПодстрочныйТекст0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодстрочныйТекст0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПодстрочныйТекст0 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст0.Родитель = Форма1;
ПодстрочныйТекст0.Текст = "ПодстрочныйТекст0";
ПодстрочныйТекст0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Текст = "ПодстрочныйТекст1";
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПодстрочныйТекст2 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст2.Родитель = Форма1;
ПодстрочныйТекст2.Текст = "ПодстрочныйТекст2";
ПодстрочныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПодстрочныйТекст3 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст3.Родитель = Форма1;
ПодстрочныйТекст3.Текст = "ПодстрочныйТекст3";
ПодстрочныйТекст3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПодстрочныйТекст0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст0;
Процедура Свойство() Экспорт
Сообщить(?(
ПодчеркнутыйТекст0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодчеркнутыйТекст0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПодчеркнутыйТекст0 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст0.Родитель = Форма1;
ПодчеркнутыйТекст0.Текст = "ПодчеркнутыйТекст0";
ПодчеркнутыйТекст0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Текст = "ПодчеркнутыйТекст1";
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПодчеркнутыйТекст2 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст2.Родитель = Форма1;
ПодчеркнутыйТекст2.Текст = "ПодчеркнутыйТекст2";
ПодчеркнутыйТекст2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПодчеркнутыйТекст3 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст3.Родитель = Форма1;
ПодчеркнутыйТекст3.Текст = "ПодчеркнутыйТекст3";
ПодчеркнутыйТекст3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПодчеркнутыйТекст0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля0;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеПароля0 = ДФ.ПолеПароля();
ПолеПароля0.Родитель = Форма1;
ПолеПароля0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеПароля2 = ДФ.ПолеПароля();
ПолеПароля2.Родитель = Форма1;
ПолеПароля2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеПароля3 = ДФ.ПолеПароля();
ПолеПароля3.Родитель = Форма1;
ПолеПароля3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеПароля0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска0;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеПоиска0 = ДФ.ПолеПоиска();
ПолеПоиска0.Родитель = Форма1;
ПолеПоиска0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеПоиска2 = ДФ.ПолеПоиска();
ПолеПоиска2.Родитель = Форма1;
ПолеПоиска2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеПоиска3 = ДФ.ПолеПоиска();
ПолеПоиска3.Родитель = Форма1;
ПолеПоиска3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеПоиска0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка0;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка0 = ДФ.ПолеСписка();
ПолеСписка0.Родитель = Форма1;
ПолеСписка0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеСписка2 = ДФ.ПолеСписка();
ПолеСписка2.Родитель = Форма1;
ПолеСписка2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеСписка3 = ДФ.ПолеСписка();
ПолеСписка3.Родитель = Форма1;
ПолеСписка3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеСписка0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста0;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеТекста0 = ДФ.ПолеТекста();
ПолеТекста0.Родитель = Форма1;
ПолеТекста0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеТекста2 = ДФ.ПолеТекста();
ПолеТекста2.Родитель = Форма1;
ПолеТекста2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеТекста3 = ДФ.ПолеТекста();
ПолеТекста3.Родитель = Форма1;
ПолеТекста3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеТекста0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла0;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеЧисла0 = ДФ.ПолеЧисла();
ПолеЧисла0.Родитель = Форма1;
ПолеЧисла0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеЧисла2 = ДФ.ПолеЧисла();
ПолеЧисла2.Родитель = Форма1;
ПолеЧисла2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеЧисла3 = ДФ.ПолеЧисла();
ПолеЧисла3.Родитель = Форма1;
ПолеЧисла3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ПолеЧисла0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Ползунок_свойство.os
Перем ДФ, Ползунок0;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ползунок0 = ДФ.Ползунок();
Ползунок0.Родитель = Форма1;
Ползунок0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Ползунок2 = ДФ.Ползунок();
Ползунок2.Родитель = Форма1;
Ползунок2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Ползунок3 = ДФ.Ползунок();
Ползунок3.Родитель = Форма1;
Ползунок3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Ползунок0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок0;
Процедура Свойство() Экспорт
Сообщить(?(
РаскрываемыйБлок0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(РаскрываемыйБлок0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
РаскрываемыйБлок0 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок0.Родитель = Форма1;
РаскрываемыйБлок0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
РаскрываемыйБлок2 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок2.Родитель = Форма1;
РаскрываемыйБлок2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
РаскрываемыйБлок3 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок3.Родитель = Форма1;
РаскрываемыйБлок3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
РаскрываемыйБлок0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Результат_свойство.os
Перем ДФ, Результат0;
Процедура Свойство() Экспорт
Сообщить(?(
Результат0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Результат0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Результат0 = ДФ.Результат();
Результат0.Родитель = Форма1;
Результат0.Текст = "Результат0";
Результат0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Текст = "Результат1";
Результат1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Результат2 = ДФ.Результат();
Результат2.Родитель = Форма1;
Результат2.Текст = "Результат2";
Результат2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Результат3 = ДФ.Результат();
Результат3.Родитель = Форма1;
Результат3.Текст = "Результат3";
Результат3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Результат0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_СписокОпределений_свойство.os
Перем ДФ, СписокОпределений0;
Процедура Свойство() Экспорт
Сообщить(?(
СписокОпределений0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
СписокОпределений0 = ДФ.СписокОпределений();
СписокОпределений0.Родитель = Форма1;
СписокОпределений0.Текст = "СписокОпределений0";
СписокОпределений0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Текст = "СписокОпределений1";
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
СписокОпределений2 = ДФ.СписокОпределений();
СписокОпределений2.Родитель = Форма1;
СписокОпределений2.Текст = "СписокОпределений2";
СписокОпределений2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
СписокОпределений3 = ДФ.СписокОпределений();
СписокОпределений3.Родитель = Форма1;
СписокОпределений3.Текст = "СписокОпределений3";
СписокОпределений3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
СписокОпределений0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Ссылка_свойство.os
Перем ДФ, Ссылка0;
Процедура Свойство() Экспорт
Сообщить(?(
Ссылка0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ссылка0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ссылка0 = ДФ.Ссылка();
Ссылка0.Родитель = Форма1;
Ссылка0.Текст = "Ссылка0";
Ссылка0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Текст = "Ссылка1";
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Ссылка2 = ДФ.Ссылка();
Ссылка2.Родитель = Форма1;
Ссылка2.Текст = "Ссылка2";
Ссылка2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Ссылка3 = ДФ.Ссылка();
Ссылка3.Родитель = Форма1;
Ссылка3.Текст = "Ссылка3";
Ссылка3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Ссылка0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаТаблицы0;
Процедура Свойство() Экспорт
Сообщить(?(
СтрокаТаблицы0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СтрокаТаблицы0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
СтрокаТаблицы0 = ДФ.СтрокаТаблицы();
СтрокаТаблицы0.Родитель = Форма1;
СтрокаТаблицы0.Текст = "СтрокаТаблицы0";
СтрокаТаблицы0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Текст = "СтрокаТаблицы1";
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
СтрокаТаблицы2 = ДФ.СтрокаТаблицы();
СтрокаТаблицы2.Родитель = Форма1;
СтрокаТаблицы2.Текст = "СтрокаТаблицы2";
СтрокаТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
СтрокаТаблицы3 = ДФ.СтрокаТаблицы();
СтрокаТаблицы3.Родитель = Форма1;
СтрокаТаблицы3.Текст = "СтрокаТаблицы3";
СтрокаТаблицы3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
СтрокаТаблицы0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Таблица_свойство.os
Перем ДФ, Таблица0;
Процедура Свойство() Экспорт
Сообщить(?(
Таблица0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Таблица0 = ДФ.Таблица();
Таблица0.Родитель = Форма1;
Таблица0.Текст = "Таблица0";
Таблица0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Текст = "Таблица1";
Таблица1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Таблица2 = ДФ.Таблица();
Таблица2.Родитель = Форма1;
Таблица2.Текст = "Таблица2";
Таблица2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Таблица3 = ДФ.Таблица();
Таблица3.Родитель = Форма1;
Таблица3.Текст = "Таблица3";
Таблица3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Таблица0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Термин_свойство.os
Перем ДФ, Термин0;
Процедура Свойство() Экспорт
Сообщить(?(
Термин0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Термин0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Термин0 = ДФ.Термин();
Термин0.Родитель = Форма1;
Термин0.Текст = "Термин0";
Термин0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Текст = "Термин1";
Термин1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Термин2 = ДФ.Термин();
Термин2.Родитель = Форма1;
Термин2.Текст = "Термин2";
Термин2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Термин3 = ДФ.Термин();
Термин3.Родитель = Форма1;
Термин3.Текст = "Термин3";
Термин3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Термин0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст0;
Процедура Свойство() Экспорт
Сообщить(?(
УдаленыйТекст0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УдаленыйТекст0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
УдаленыйТекст0 = ДФ.УдаленыйТекст();
УдаленыйТекст0.Родитель = Форма1;
УдаленыйТекст0.Текст = "УдаленыйТекст0";
УдаленыйТекст0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Текст = "УдаленыйТекст1";
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
УдаленыйТекст2 = ДФ.УдаленыйТекст();
УдаленыйТекст2.Родитель = Форма1;
УдаленыйТекст2.Текст = "УдаленыйТекст2";
УдаленыйТекст2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
УдаленыйТекст3 = ДФ.УдаленыйТекст();
УдаленыйТекст3.Родитель = Форма1;
УдаленыйТекст3.Текст = "УдаленыйТекст3";
УдаленыйТекст3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
УдаленыйТекст0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок0;
Процедура Свойство() Экспорт
Сообщить(?(
УпорядоченныйСписок0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
УпорядоченныйСписок0 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок0.Родитель = Форма1;
УпорядоченныйСписок0.Текст = "УпорядоченныйСписок0";
УпорядоченныйСписок0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Текст = "УпорядоченныйСписок1";
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
УпорядоченныйСписок2 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок2.Родитель = Форма1;
УпорядоченныйСписок2.Текст = "УпорядоченныйСписок2";
УпорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
УпорядоченныйСписок3 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок3.Родитель = Форма1;
УпорядоченныйСписок3.Текст = "УпорядоченныйСписок3";
УпорядоченныйСписок3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
УпорядоченныйСписок0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Флажок_свойство.os
Перем ДФ, Флажок0;
Процедура Свойство() Экспорт
Сообщить(?(
Флажок0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Флажок0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Флажок0 = ДФ.Флажок();
Флажок0.Родитель = Форма1;
Флажок0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Флажок2 = ДФ.Флажок();
Флажок2.Родитель = Форма1;
Флажок2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Флажок3 = ДФ.Флажок();
Флажок3.Родитель = Форма1;
Флажок3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Флажок0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст0;
Процедура Свойство() Экспорт
Сообщить(?(
ФорматированныйТекст0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ФорматированныйТекст0 = ДФ.ФорматированныйТекст();
ФорматированныйТекст0.Родитель = Форма1;
ФорматированныйТекст0.Текст = "ФорматированныйТекст0";
ФорматированныйТекст0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Текст = "ФорматированныйТекст1";
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ФорматированныйТекст2 = ДФ.ФорматированныйТекст();
ФорматированныйТекст2.Родитель = Форма1;
ФорматированныйТекст2.Текст = "ФорматированныйТекст2";
ФорматированныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ФорматированныйТекст3 = ДФ.ФорматированныйТекст();
ФорматированныйТекст3.Родитель = Форма1;
ФорматированныйТекст3.Текст = "ФорматированныйТекст3";
ФорматированныйТекст3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ФорматированныйТекст0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Фрейм_свойство.os
Перем ДФ, Фрейм0;
Процедура Свойство() Экспорт
Сообщить(?(
Фрейм0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Фрейм_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Фрейм0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Фрейм0 = ДФ.Фрейм();
Фрейм0.Родитель = Форма1;
Фрейм0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Фрейм1 = ДФ.Фрейм();
Фрейм1.Родитель = Форма1;
Фрейм1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Фрейм2 = ДФ.Фрейм();
Фрейм2.Родитель = Форма1;
Фрейм2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Фрейм3 = ДФ.Фрейм();
Фрейм3.Родитель = Форма1;
Фрейм3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Фрейм0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Холст_свойство.os
Перем ДФ, Холст0;
Процедура Свойство() Экспорт
Сообщить(?(
Холст0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Холст0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Холст0 = ДФ.Холст();
Холст0.Родитель = Форма1;
Холст0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
Холст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Холст2 = ДФ.Холст();
Холст2.Родитель = Форма1;
Холст2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Холст3 = ДФ.Холст();
Холст3.Родитель = Форма1;
Холст3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Холст0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ШапкаТаблицы_свойство.os
Перем ДФ, ШапкаТаблицы0;
Процедура Свойство() Экспорт
Сообщить(?(
ШапкаТаблицы0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ШапкаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ШапкаТаблицы0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ШапкаТаблицы0 = ДФ.ШапкаТаблицы();
ШапкаТаблицы0.Родитель = Форма1;
ШапкаТаблицы0.Текст = "ШапкаТаблицы0";
ШапкаТаблицы0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Текст = "ШапкаТаблицы1";
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ШапкаТаблицы2 = ДФ.ШапкаТаблицы();
ШапкаТаблицы2.Родитель = Форма1;
ШапкаТаблицы2.Текст = "ШапкаТаблицы2";
ШапкаТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ШапкаТаблицы3 = ДФ.ШапкаТаблицы();
ШапкаТаблицы3.Родитель = Форма1;
ШапкаТаблицы3.Текст = "ШапкаТаблицы3";
ШапкаТаблицы3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ШапкаТаблицы0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Шкала_свойство.os
Перем ДФ, Шкала0;
Процедура Свойство() Экспорт
Сообщить(?(
Шкала0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Шкала0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Шкала0 = ДФ.Шкала();
Шкала0.Родитель = Форма1;
Шкала0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Шкала1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Шкала2 = ДФ.Шкала();
Шкала2.Родитель = Форма1;
Шкала2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Шкала3 = ДФ.Шкала();
Шкала3.Родитель = Форма1;
Шкала3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Шкала0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка0;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементПоляСписка0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЭлементПоляСписка0 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка0.Родитель = Форма1;
ЭлементПоляСписка0.Текст = "ЭлементПоляСписка0";
ЭлементПоляСписка0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Текст = "ЭлементПоляСписка1";
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = Форма1;
ЭлементПоляСписка2.Текст = "ЭлементПоляСписка2";
ЭлементПоляСписка2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЭлементПоляСписка3 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка3.Родитель = Форма1;
ЭлементПоляСписка3.Текст = "ЭлементПоляСписка3";
ЭлементПоляСписка3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЭлементПоляСписка0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ЭлементСписка_свойство.os
Перем ДФ, ЭлементСписка0;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементСписка0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЭлементСписка0 = ДФ.ЭлементСписка();
ЭлементСписка0.Родитель = Форма1;
ЭлементСписка0.Текст = "ЭлементСписка0";
ЭлементСписка0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Текст = "ЭлементСписка1";
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЭлементСписка2 = ДФ.ЭлементСписка();
ЭлементСписка2.Родитель = Форма1;
ЭлементСписка2.Текст = "ЭлементСписка2";
ЭлементСписка2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЭлементСписка3 = ДФ.ЭлементСписка();
ЭлементСписка3.Родитель = Форма1;
ЭлементСписка3.Текст = "ЭлементСписка3";
ЭлементСписка3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЭлементСписка0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_Ячейка_свойство.os
Перем ДФ, Ячейка0;
Процедура Свойство() Экспорт
Сообщить(?(
Ячейка0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ячейка0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ячейка0 = ДФ.Ячейка();
Ячейка0.Родитель = Форма1;
Ячейка0.Текст = "Ячейка0";
Ячейка0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Текст = "Ячейка1";
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Ячейка2 = ДФ.Ячейка();
Ячейка2.Родитель = Форма1;
Ячейка2.Текст = "Ячейка2";
Ячейка2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Ячейка3 = ДФ.Ячейка();
Ячейка3.Родитель = Форма1;
Ячейка3.Текст = "Ячейка3";
Ячейка3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Ячейка0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
Направление_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка0;
Процедура Свойство() Экспорт
Сообщить(?(
ЯчейкаЗаголовка0.Направление = ДФ.Направление.СправаНалево
, "", "!!! ") + "Направление_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка0, "Направление", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЯчейкаЗаголовка0 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка0.Родитель = Форма1;
ЯчейкаЗаголовка0.Текст = "ЯчейкаЗаголовка0";
ЯчейкаЗаголовка0.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Текст = "ЯчейкаЗаголовка1";
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЯчейкаЗаголовка2 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка2.Родитель = Форма1;
ЯчейкаЗаголовка2.Текст = "ЯчейкаЗаголовка2";
ЯчейкаЗаголовка2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЯчейкаЗаголовка3 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка3.Родитель = Форма1;
ЯчейкаЗаголовка3.Текст = "ЯчейкаЗаголовка3";
ЯчейкаЗаголовка3.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
ЯчейкаЗаголовка0.Направление = ДФ.Направление.СправаНалево;
Форма1.Открыть();
НаправлениеАнимации_СвойстваАнимации_свойство.os
Перем ДФ, Анимация1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Анимация1.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать
, "", "!!! ") + "НаправлениеАнимации_СвойстваАнимации_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Анимация1 = ДФ.СвойстваАнимации();
Анимация1.ИмяАнимации = Кадры1.Имя;
Анимация1.ДлительностьАнимации = 3000;
Анимация1.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце;
Анимация1.ЗадержкаАнимации = 600;
Анимация1.КоличествоПовторов = -1;
Анимация1.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать;
Анимация1.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад;
Анимация1.Состояние = ДФ.Состояние.Запущена;
Блок1.Стиль.Анимация = Анимация1;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
НаправлениеАнимации_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать
, "", "!!! ") + "НаправлениеАнимации_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "НаправлениеАнимации", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Блок1.Стиль.ИмяАнимации = Кадры1.Имя;
Блок1.Стиль.ДлительностьАнимации = 3000;
Блок1.Стиль.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце;
Блок1.Стиль.ЗадержкаАнимации = 600;
Блок1.Стиль.КоличествоПовторов = -1;
Блок1.Стиль.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать;
Блок1.Стиль.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад;
Блок1.Стиль.Состояние = ДФ.Состояние.Запущена;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
НаправлениеТекста_Контекст2d_свойство.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контекст2d1.НаправлениеТекста = ДФ.Направление.СправаНалево
, "", "!!! ") + "НаправлениеТекста_Контекст2d_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 300;
Холст1.Высота = 150;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Шрифт1 = ДФ.Шрифт( , , , 24, , "serif");
// Шрифт1 = ДФ.Шрифт();
// Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
// Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
// Шрифт1.РазмерШрифта = 20;
// Шрифт1.ВысотаСтроки = 50;
// Шрифт1.СемействоШрифтов = "serif";
Контекст2d1.Шрифт = Шрифт1;
Контекст2d1.НаправлениеТекста = ДФ.Направление.СлеваНаправо;
Контекст2d1.ЗаполнитьТекст("OneScript", 150, 50);
Контекст2d1.НаправлениеТекста = ДФ.Направление.СправаНалево;
Контекст2d1.ЗаполнитьТекст("OneScript", 150, 60);
Форма1.Открыть();
НаправлениеЭлементов_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.НаправлениеЭлементов = "column-reverse"
, "", "!!! ") + "НаправлениеЭлементов_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "НаправлениеЭлементов", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 350;
Блок1.Стиль.Высота = 350;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.Отображать = ДФ.Отображать.Гибкий;
Блок1.Стиль.НаправлениеЭлементов = ДФ.НаправлениеЭлементов.Строка;
// Блок1.Стиль.НаправлениеЭлементов = "row";
Блок1.Стиль.ПереносГибких = ДФ.ПереносГибких.Перенос;
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Ширина = 50;
Блок2.Стиль.Высота = 50;
Блок2.Стиль.ЦветФона = ДФ.Цвет.Коралловый;
Блок3 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок3.Стиль.Ширина = 50;
Блок3.Стиль.Высота = 50;
Блок3.Стиль.ЦветФона = ДФ.Цвет.СветлоСиний;
Блок4 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок4.Стиль.Ширина = 50;
Блок4.Стиль.Высота = 50;
Блок4.Стиль.ЦветФона = ДФ.Цвет.Хаки;
Блок5 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок5.Стиль.Ширина = 50;
Блок5.Стиль.Высота = 50;
Блок5.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Блок6 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок6.Стиль.Ширина = 50;
Блок6.Стиль.Высота = 50;
Блок6.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСерый;
Блок7 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок7.Стиль.Ширина = 50;
Блок7.Стиль.Высота = 50;
Блок7.Стиль.ЦветФона = ДФ.Цвет.СветлоЗеленый;
Блок1.Стиль.НаправлениеЭлементов = "column-reverse";
Форма1.Открыть();
НарезкаКартинкиГраницы_КартинкаГраницы_свойство.os
Перем ДФ, КартинкаГраницы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
КартинкаГраницы1.НарезкаКартинкиГраницы = 30
, "", "!!! ") + "НарезкаКартинкиГраницы_КартинкаГраницы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Текст = "Здравствуй МИР!";
Блок1.Стиль.Границы = ДФ.Границы(15, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Заполнение = ДФ.Заполнение(10, 20, 20, 10);
КартинкаГраницы1 = ДФ.КартинкаГраницы();
// КартинкаГраницы1.ИсточникКартинкиГраницы = "file:///C:/444/~Деклар Форма/abc.png";
КартинкаГраницы1.ИсточникКартинкиГраницы = "border.png";
КартинкаГраницы1.НарезкаКартинкиГраницы = 30;
КартинкаГраницы1.ШиринаКартинкиГраницы = 10;
КартинкаГраницы1.СмещениеКартинкиГраницы = 10;
КартинкаГраницы1.МозаикаКартинкиГраницы = ДФ.МозаикаКартинкиГраницы.Закруглять;
Блок1.Стиль.КартинкаГраницы = КартинкаГраницы1;
Форма1.Открыть();
НарезкаКартинкиГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.НарезкаКартинкиГраницы = "30"
, "", "!!! ") + "НарезкаКартинкиГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "НарезкаКартинкиГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.ЦветФона = ДФ.Цвет.СветлоСерый;
Блок1.Стиль.Границы = ДФ.Границы(30, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.ИсточникКартинкиГраницы = "border.png";
Блок1.Стиль.НарезкаКартинкиГраницы = 30;
Блок1.Стиль.ШиринаКартинкиГраницы = ДФ.Размер(10, 20);
Блок1.Стиль.СмещениеКартинкиГраницы = 0;
Блок1.Стиль.МозаикаКартинкиГраницы = ДФ.МозаикаКартинкиГраницы.Закруглять;
Форма1.Открыть();
Насыщенность_ФильтрИзображений_свойство.os
Перем ДФ, ФильтрИзображений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ФильтрИзображений1.Насыщенность = 8
, "", "!!! ") + "Насыщенность_ФильтрИзображений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Изображение1 = ДФ.Изображение();
Форма1.ДобавитьДочерний(Изображение1);
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Стиль.Ширина = 200;
ФильтрИзображений1 = ДФ.ФильтрИзображений();
ФильтрИзображений1.Насыщенность = 8;
Изображение1.Стиль.Фильтр = ФильтрИзображений1;
Форма1.Открыть();
Начало_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
УпорядоченныйСписок1.Начало = 10
, "", "!!! ") + "Начало_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "Начало", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 450;
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Начало = 10;
ЭлементСписка1 = УпорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Кот Матроскин";
ЭлементСписка2 = УпорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка2.Текст = "Пёс Шарик";
ЭлементСписка3 = УпорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка3.Текст = "Птица Галчонок";
Форма1.Открыть();
НачалоПеретаскивания_Абзац_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Абзац_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Абзац());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Артикль_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Артикль_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Артикль());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Аудио_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Аудио_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Аудио());
Источник.Источник = "Kaoma_Lambada.mp3";
Источник.Контролы = Истина;
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Блок_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Блок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Блок());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ВыборВремени_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ВыборВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ВыборДаты_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ВыборДаты_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ВыборДатыВремени_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ВыборДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ВыборМестнойДатыВремени_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ВыборМестнойДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ВыборМесяца_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ВыборМесяца_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ВыборНедели_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ВыборНедели_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ВыборФайла_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ВыборФайла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ВыборЦвета_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ВыборЦвета_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Группа_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Группа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Группа());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Диалог_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Диалог_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Диалог());
Источник.Показать();
Источник.Показать();
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ДополнительныйБлок_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ДополнительныйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ЖирныйТекст_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ЖирныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Заголовок1_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Заголовок1_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Заголовок2_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Заголовок2_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Заголовок3_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Заголовок3_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Заголовок4_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Заголовок4_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Заголовок5_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Заголовок5_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Заголовок6_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Заголовок6_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Изображение_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Изображение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Изображение());
Источник.Источник = "maslenica10.jpg";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Индикатор_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Индикатор_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Индикатор());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Кнопка_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Кнопка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_КурсивТекст_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_КурсивТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Линия_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Линия_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Линия());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_МаркированныйТекст_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_МаркированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_МелкийТекст_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_МелкийТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_НадстрочныйТекст_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_НадстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_НаправленныйТекст_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_НаправленныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ОбластьТекста_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ОбластьТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Переключатель_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Переключатель_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Подпись_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Подпись_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Подпись());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ПодстрочныйТекст_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ПодстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ПодчеркнутыйТекст_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ПодчеркнутыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ПолеПоиска_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ПолеПоиска_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ПолеТекста_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ПолеТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ПолеЧисла_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ПолеЧисла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Ползунок_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Ползунок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Ползунок());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_РаскрываемыйБлок_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_РаскрываемыйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Результат_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Результат_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Результат());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Ссылка_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Ссылка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Таблица_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Таблица_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Таблица());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_УдаленыйТекст_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_УдаленыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Флажок_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Флажок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Флажок());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_ФорматированныйТекст_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_ФорматированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачалоПеретаскивания_Шкала_событие.os
Перем ДФ, Источник;
Процедура НачалоПеретаскивания() Экспорт
Сообщить(?(
Источник.Перетаскиваемый
, "", "!!! ") + "НачалоПеретаскивания_Шкала_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Сдвинь мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Шкала());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.НачалоПеретаскивания = ДФ.Действие(ЭтотОбъект, "НачалоПеретаскивания");
Форма1.Открыть();
НачальнаяВысота_Форма_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "НачальнаяВысота_Форма_свойство.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяВысота = 250;
Форма1.Контент.Текст = "Форма1.НачальнаяВысота = 250";
Форма1.Открыть();
НачальнаяШирина_Форма_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "НачальнаяШирина_Форма_свойство.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 450;
Форма1.Контент.Текст = "Форма1.НачальнаяШирина = 450";
Форма1.Открыть();
Начать_Таймер_метод.os
Перем ДФ, Таймер1, Кнопка1;
Перем Таймер2, Кнопка3;
Перем Блок1, Блок2;
Процедура Форма1_Загружена() Экспорт
Таймер1.Начать();
Приостановить(300);
Таймер2.Начать();
// Сообщить("Форма1_Загружена " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
"" + Таймер1 = "ДфТаймер"
, "", "!!! ") + "Начать_Таймер_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Таймер1.Начать();
Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Таймер1.Остановить();
Сообщить("Кнопка2_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Блок1.Текст = "Таймер активен = " + Таймер1.Активен;
КонецПроцедуры
Процедура Таймер1_ПриСрабатыванииТаймера() Экспорт
Сообщить("Таймер1_ПриСрабатыванииТаймера");
Если Кнопка1.Стиль.Цветфона = ДФ.Цвет.МорскаяРакушка Тогда
Кнопка1.Стиль.Цветфона = ДФ.Цвет.Красный;
Иначе
Кнопка1.Стиль.Цветфона = ДФ.Цвет.МорскаяРакушка;
КонецЕсли;
Блок1.Текст = "" + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
|Таймер активен = " + Таймер1.Активен;
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
Таймер2.Начать();
Сообщить("Кнопка3_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
Таймер2.Остановить();
Сообщить("Кнопка4_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Блок2.Текст = "Таймер активен = " + Таймер2.Активен;
КонецПроцедуры
Процедура Таймер2_ПриСрабатыванииТаймера() Экспорт
Сообщить("Таймер2_ПриСрабатыванииТаймера");
Если Кнопка3.Стиль.Цветфона = ДФ.Цвет.СветлоСерый Тогда
Кнопка3.Стиль.Цветфона = ДФ.Цвет.СветлыйЗеленоватоГолубой;
Иначе
Кнопка3.Стиль.Цветфона = ДФ.Цвет.СветлоСерый;
КонецЕсли;
Блок2.Текст = "" + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
|Таймер активен = " + Таймер2.Активен;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 400;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Стиль.Высота = 100;
Абзац1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Кнопка1 = Абзац1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Начать";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Абзац1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Остановить";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Блок1 = Абзац1.ДобавитьДочерний(ДФ.Блок());
Таймер1 = ДФ.Таймер();
Таймер1.ПриСрабатыванииТаймера = ДФ.Действие(ЭтотОбъект, "Таймер1_ПриСрабатыванииТаймера");
Таймер1.Интервал = 1000;
Таймер1.Начать();
Абзац2 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац2.Стиль.Высота = 100;
Абзац2.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Кнопка3 = Абзац2.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Начать";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Абзац2.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Остановить";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок2 = Абзац2.ДобавитьДочерний(ДФ.Блок());
Таймер2 = ДФ.Таймер();
Таймер2.ПриСрабатыванииТаймера = ДФ.Действие(ЭтотОбъект, "Таймер2_ПриСрабатыванииТаймера");
Таймер2.Интервал = 1000;
Таймер2.Начать();
Форма1.Открыть();
НачатьПуть_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "НачатьПуть_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.НачатьПуть();
Контекст2d1.Дуга(100, 75, 50, 0, 2 * ДФ.Математика().Пи);
Контекст2d1.Начертить();
Форма1.Открыть();
Начертить_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "Начертить_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.НачатьПуть();
Контекст2d1.Дуга(100, 75, 50, 0, 2 * ДФ.Математика().Пи);
Контекст2d1.Начертить();
Форма1.Открыть();
Неопределено_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Свойство() Экспорт
Сообщить(?(
Флажок1.Неопределено
, "", "!!! ") + "Неопределено_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "Неопределено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Флажок1 = Форма1.ДобавитьДочерний(ДФ.Флажок());
Подпись1 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Текст = "Флажок1";
Флажок1.Неопределено = Истина;
Форма1.Открыть();
Непрозрачность_Стиль_свойство.os
Перем ДФ, Блок2;
Процедура Свойство() Экспорт
Сообщить(?(
Блок2.Стиль.Непрозрачность = "0.5"
, "", "!!! ") + "Непрозрачность_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок2.Стиль, "Непрозрачность", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 350;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Верх = 60;
Блок1.Стиль.Лево = 30;
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.ЦветФона = ДФ.Цвет.Коралловый;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Текст = "Блок1";
Блок2 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Блок2.Стиль.Верх = 30;
Блок2.Стиль.Ширина = 300;
Блок2.Стиль.Высота = 150;
Блок2.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок2.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок2.Стиль.Непрозрачность = 0.5;
Форма1.Открыть();
Непрозрачность_ФильтрИзображений_свойство.os
Перем ДФ, ФильтрИзображений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ФильтрИзображений1.Непрозрачность = 30
, "", "!!! ") + "Непрозрачность_ФильтрИзображений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Изображение1 = ДФ.Изображение();
Форма1.ДобавитьДочерний(Изображение1);
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Стиль.Ширина = 200;
ФильтрИзображений1 = ДФ.ФильтрИзображений();
ФильтрИзображений1.Непрозрачность = 30;
Изображение1.Стиль.Фильтр = ФильтрИзображений1;
Форма1.Открыть();
Несвободно_Стиль_свойство.os
Перем ДФ, Блок4;
Процедура Свойство() Экспорт
Сообщить(?(
Блок4.Стиль.Несвободно = ДФ.Несвободно.ЛевоПраво
, "", "!!! ") + "Несвободно_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок4.Стиль, "Несвободно", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная);
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Текст = "Блок2";
Блок2.Стиль.Ширина = 150;
Блок2.Стиль.Границы = ДФ.Границы(3, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Коралловый);
Блок2.Стиль.ГоризонтальноеВыравнивание = ДФ.ГоризонтальноеВыравнивание.Лево;
Блок2.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Блок3 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок3.Текст = "Блок3";
Блок3.Стиль.Ширина = 150;
Блок3.Стиль.Границы = ДФ.Границы(3, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Коралловый);
Блок3.Стиль.ГоризонтальноеВыравнивание = ДФ.ГоризонтальноеВыравнивание.Лево;
Блок3.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Блок4 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок4.Стиль.Несвободно = ДФ.Несвободно.ЛевоПраво;
Блок2.Стиль.Калибровка = ДФ.Калибровка.Границы;
Блок3.Стиль.Калибровка = ДФ.Калибровка.Границы;
Форма1.Открыть();
НижняяГраница_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.НижняяГраница = "4px double rgb(255, 0, 0)"
, "", "!!! ") + "НижняяГраница_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "НижняяГраница", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 150;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.НижняяГраница = ДФ.НижняяГраница(4, ДФ.СтильГраницы.Двойная, ДФ.Цвет.Красный);
Форма1.Открыть();
Низ_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Низ = "5px"
, "", "!!! ") + "Низ_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Низ", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Блок1.Стиль.Низ = 5;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Блок1;
Абзац1.Текст = "И снова лодочка скользит
|Неслышно по волнам,
|И солнце в зелени сквозит,
|Слетает сказка к нам.
|Как драгоценность берегу
|Тот день и нас на берегу.";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Форма1.Открыть();
Области_Карта_свойство.os
Перем ДФ, Карта1;
Процедура Свойство() Экспорт
// Для А = 0 По Карта1.Области.ВГраница() Цикл
// Сообщить("Адрес области " + А + " = " + Карта1.Области.Получить(А).Адрес);
// КонецЦикла;
Сообщить(?(
Карта1.Области.Количество() = 2
, "", "!!! ") + "Области_Карта_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Карта1, "Области", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Карта1 = ДФ.Карта();
Форма1.ДобавитьДочерний(Карта1);
Карта1.Идентификатор = "Карта1";
Карта1.Имя = "Карта1";
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
// Изображение1.Источник = "file:///C:/444/~Деклар Форма/maslenica10.jpg";
Изображение1.Источник = "maslenica10.jpg";
Изображение1.ИмяКарты = Карта1.Идентификатор;
Область1 = Карта1.ДобавитьДочерний(ДФ.Область());
Область1.Форма = ДФ.Круг(15, 15, 15);
Область1.Описание = "Это круг";
// Область1.Адрес = "file:///C:/444/~Деклар Форма/Motif.jpg";
Область1.Адрес = "Motif.jpg";
Область2 = Карта1.ДобавитьДочерний(ДФ.Область());
Область2.Форма = ДФ.Прямоугольник(69, 40, 40, 40);
Область2.Описание = "Это прямоугольник";
// Область2.Адрес = "file:///C:/444/~Деклар Форма/border.png";
Область2.Адрес = "border.png";
Форма1.Открыть();
ОбластиТаблицы_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "ОбластиТаблицы", ДФ.Действие(ЭтотОбъект, "ОбластиТаблицы"));
КонецПроцедуры
Процедура ОбластиТаблицы() Экспорт
ОбластиТаблицы = Таблица1.ОбластиТаблицы;
// Для А = 0 По ОбластиТаблицы.ВГраница() Цикл
// Эл = ОбластиТаблицы.Получить(А);
// Сообщить("Эл = " + Эл);
// КонецЦикла;
Сообщить(?(
ОбластиТаблицы.Количество() = 1
, "", "!!! ") + "ОбластиТаблицы_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
Форма1.Открыть();
ОбластьКартинки_Стиль_свойство.os
Перем ДФ, Контент, Фон1;
Процедура Свойство() Экспорт
Сообщить(?(
Контент.Стиль.ОбластьКартинки = ДФ.ОбластьКартинки.Содержимое
, "", "!!! ") + "ОбластьКартинки_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Контент.Стиль, "ОбластьКартинки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Контент.Стиль.ФоновоеВложение = ДФ.ФоновоеВложение.Фиксировано;
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Контент.Стиль.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент = Форма1.Контент;
Кнопка1 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "ФоновоеВложение = Фиксировано";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "ФоновоеВложение = Прокрутка";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка2.Стиль.ОтступСлева = 25;
Для А = 0 По 15 Цикл
Контент.ДобавитьДочерний(ДФ.Абзац()).Текст = "Алиса и сама не заметила, как очутилась на каминной полке.";
Контент.ДобавитьДочерний(ДФ.Перенос());
Контент.ДобавитьДочерний(ДФ.Перенос());
КонецЦикла;
Контент.Стиль.ЦветФона = ДФ.Цвет(243, 243, 243);
Контент.Стиль.ФоновоеИзображение = "img_flwr.gif";
Контент.Стиль.МозаикаКартинки = ДФ.МозаикаКартинки.НеПовторять;
Контент.Стиль.ПоложениеКартинки = ДФ.ПоложениеКартинки.ВерхПраво;
Контент.Стиль.ОбластьКартинки = ДФ.ОбластьКартинки.Содержимое;
Контент.Стиль.ОбластьРисования = ДФ.ОбластьРисования.Содержимое;
Контент.Стиль.РазмерКартинки = ДФ.Размер(400, 400);
Контент.Стиль.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Форма1.Открыть();
ОбластьКартинки_Фон_свойство.os
Перем ДФ, Контент, Фон1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Фон1.ОбластьКартинки = ДФ.ОбластьКартинки.Содержимое
, "", "!!! ") + "ОбластьКартинки_Фон_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Фиксировано;
Контент.Стиль.Фон = Фон1;
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Контент.Стиль.Фон = Фон1;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент = Форма1.Контент;
Кнопка1 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "ФоновоеВложение = Фиксировано";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "ФоновоеВложение = Прокрутка";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка2.Стиль.ОтступСлева = 25;
Для А = 0 По 15 Цикл
Контент.ДобавитьДочерний(ДФ.Абзац()).Текст = "Алиса и сама не заметила, как очутилась на каминной полке.";
Контент.ДобавитьДочерний(ДФ.Перенос());
Контент.ДобавитьДочерний(ДФ.Перенос());
КонецЦикла;
Фон1 = ДФ.Фон();
Фон1.ЦветФона = ДФ.Цвет(243, 243, 243);
Фон1.ФоновоеИзображение = "img_flwr.gif";
Фон1.МозаикаКартинки = ДФ.МозаикаКартинки.НеПовторять;
Фон1.ПоложениеКартинки = ДФ.ПоложениеКартинки.ВерхПраво;
Фон1.ОбластьКартинки = ДФ.ОбластьКартинки.Содержимое;
Фон1.ОбластьРисования = ДФ.ОбластьРисования.Содержимое;
Фон1.РазмерКартинки = ДФ.Размер(450, 450);
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Контент.Стиль.Фон = Фон1;
Форма1.Открыть();
ОбластьРисования_Стиль_свойство.os
Перем ДФ, Контент, Фон1;
Процедура Свойство() Экспорт
Сообщить(?(
Контент.Стиль.ОбластьРисования = ДФ.ОбластьРисования.Содержимое
, "", "!!! ") + "ОбластьРисования_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Контент.Стиль, "ОбластьРисования", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Контент.Стиль.ФоновоеВложение = ДФ.ФоновоеВложение.Фиксировано;
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Контент.Стиль.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент = Форма1.Контент;
Кнопка1 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "ФоновоеВложение = Фиксировано";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "ФоновоеВложение = Прокрутка";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка2.Стиль.ОтступСлева = 25;
Для А = 0 По 15 Цикл
Контент.ДобавитьДочерний(ДФ.Абзац()).Текст = "Алиса и сама не заметила, как очутилась на каминной полке.";
Контент.ДобавитьДочерний(ДФ.Перенос());
Контент.ДобавитьДочерний(ДФ.Перенос());
КонецЦикла;
Контент.Стиль.ЦветФона = ДФ.Цвет(243, 243, 243);
Контент.Стиль.ФоновоеИзображение = "img_flwr.gif";
Контент.Стиль.МозаикаКартинки = ДФ.МозаикаКартинки.НеПовторять;
Контент.Стиль.ПоложениеКартинки = ДФ.ПоложениеКартинки.ВерхПраво;
Контент.Стиль.ОбластьКартинки = ДФ.ОбластьКартинки.Содержимое;
Контент.Стиль.ОбластьРисования = ДФ.ОбластьРисования.Содержимое;
Контент.Стиль.РазмерКартинки = ДФ.Размер(400, 400);
Контент.Стиль.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Форма1.Открыть();
ОбластьРисования_Фон_свойство.os
Перем ДФ, Контент, Фон1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Фон1.ОбластьРисования = ДФ.ОбластьРисования.Содержимое
, "", "!!! ") + "ОбластьРисования_Фон_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Фиксировано;
Контент.Стиль.Фон = Фон1;
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Контент.Стиль.Фон = Фон1;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент = Форма1.Контент;
Кнопка1 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "ФоновоеВложение = Фиксировано";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "ФоновоеВложение = Прокрутка";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка2.Стиль.ОтступСлева = 25;
Для А = 0 По 15 Цикл
Контент.ДобавитьДочерний(ДФ.Абзац()).Текст = "Алиса и сама не заметила, как очутилась на каминной полке.";
Контент.ДобавитьДочерний(ДФ.Перенос());
Контент.ДобавитьДочерний(ДФ.Перенос());
КонецЦикла;
Фон1 = ДФ.Фон();
Фон1.ЦветФона = ДФ.Цвет(243, 243, 243);
Фон1.ФоновоеИзображение = "img_flwr.gif";
Фон1.МозаикаКартинки = ДФ.МозаикаКартинки.НеПовторять;
Фон1.ПоложениеКартинки = ДФ.ПоложениеКартинки.ВерхПраво;
Фон1.ОбластьКартинки = ДФ.ОбластьКартинки.Содержимое;
Фон1.ОбластьРисования = ДФ.ОбластьРисования.Содержимое;
Фон1.РазмерКартинки = ДФ.Размер(450, 450);
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Контент.Стиль.Фон = Фон1;
Форма1.Открыть();
Обратный_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
УпорядоченныйСписок1.Обратный
, "", "!!! ") + "Обратный_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "Обратный", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 450;
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Начало = 10;
ЭлементСписка1 = УпорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Кот Матроскин";
ЭлементСписка2 = УпорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка2.Текст = "Пёс Шарик";
ЭлементСписка3 = УпорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка3.Текст = "Птица Галчонок";
УпорядоченныйСписок1.Обратный = Истина;
Форма1.Открыть();
Обрезать_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "Обрезать_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.Прямоугольник(50, 20, 200, 120);
Контекст2d1.Начертить();
Контекст2d1.Обрезать();
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Красный;
Контекст2d1.ЗаполнитьПрямоугольник(0, 0, 150, 100);
Форма1.Открыть();
Обрезка_Стиль_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.Стиль.Обрезка = "rect(0px, 40px, 50px, 0px)"
, "", "!!! ") + "Обрезка_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1.Стиль, "Обрезка", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Изображение1 = ДФ.Изображение();
Форма1.ДобавитьДочерний(Изображение1);
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Изображение1.Стиль.Верх = 10;
Изображение1.Стиль.Обрезка = ДФ.Прямоугольник(0, 0, 40, 50);
Форма1.Открыть();
ОбщаяСтруктура_ДекларативныеФормы_свойство.os
Перем ДФ, ОбщаяСтруктура;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОбщаяСтруктура.Ключ1 = "Значение1"
, "", "!!! ") + "ОбщаяСтруктура_ДекларативныеФормы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбщаяСтруктура = ДФ.ОбщаяСтруктура;
ОбщаяСтруктура.Вставить("Ключ1", "Значение1");
// Для Каждого эл Из ОбщаяСтруктура Цикл
// Сообщить("ОбщаяСтруктура Ключ = " + эл.Ключ + " Значение = " + Эл.Значение);
// КонецЦикла;
Форма1.Открыть();
Окр_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().Окр(0.568534, 3) = 0.569
, "", "!!! ") + "Окр_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().Окр(0.568534, 3);
Форма1.Открыть();
Описание_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.Описание = "масленица"
, "", "!!! ") + "Описание_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "Описание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Изображение1 = ДФ.Изображение();
Форма1.ДобавитьДочерний(Изображение1);
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Описание = "масленица";
Форма1.Открыть();
Описание_Область_свойство.os
Перем ДФ, Область1;
Процедура Свойство() Экспорт
Сообщить(?(
Область1.Описание = "Это круг"
, "", "!!! ") + "Описание_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Область1, "Описание", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Карта1 = ДФ.Карта();
Форма1.ДобавитьДочерний(Карта1);
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
// Изображение1.Источник = "file:///C:/444/~Деклар Форма/maslenica10.jpg";
Изображение1.Источник = "maslenica10.jpg";
Изображение1.ИмяКарты = Карта1.Имя;
Изображение1.Стиль.Ширина = "500";
Изображение1.Стиль.Высота = "500";
Область1 = Карта1.ДобавитьДочерний(ДФ.Область());
Область1.Форма = ДФ.Круг(50, 50, 35);
Область1.Описание = "Это круг";
// Область1.Адрес = "file:///C:/444/~Деклар Форма/Motif.jpg";
Область1.Адрес = "Motif.jpg";
Область2 = Карта1.ДобавитьДочерний(ДФ.Область());
М1 = Новый Массив();
М1.Добавить(ДФ.Точка(100, 100));
М1.Добавить(ДФ.Точка(200, 80));
М1.Добавить(ДФ.Точка(300, 180));
М1.Добавить(ДФ.Точка(180, 220));
Область2.Форма = ДФ.Полигон(М1);
Область2.Описание = "Это Полигон";
// Область2.Адрес = "file:///C:/444/~Деклар Форма/Motif.jpg";
Область2.Адрес = "Motif.jpg";
Область3 = Карта1.ДобавитьДочерний(ДФ.Область());
Область3.Форма = ДФ.Прямоугольник(400, 400, 90, 90);
Область3.Описание = "Это прямоугольник";
// Область3.Адрес = "file:///C:/444/~Деклар Форма/Motif.jpg";
Область3.Адрес = "Motif.jpg";
Форма1.Открыть();
Оптимум_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Свойство() Экспорт
Сообщить(?(
Шкала1.Оптимум = 68.2
, "", "!!! ") + "Оптимум_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Шкала1, "Оптимум", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Шкала1.Стиль.Ширина = 250;
Шкала1.Минимум = 1.5;
Шкала1.Максимум = 100.9;
Шкала1.Значение = 65.45;
Шкала1.Оптимум = 68.2;
Форма1.Открыть();
Остановить_Таймер_метод.os
Перем ДФ, Таймер1, Кнопка1;
Перем Таймер2, Кнопка3;
Перем Блок1, Блок2;
Процедура Форма1_Загружена() Экспорт
Таймер1.Начать();
Приостановить(300);
Таймер2.Начать();
// Сообщить("Форма1_Загружена " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
"" + Таймер1 = "ДфТаймер"
, "", "!!! ") + "Остановить_Таймер_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Таймер1.Начать();
Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Таймер1.Остановить();
Сообщить("Кнопка2_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Блок1.Текст = "Таймер активен = " + Таймер1.Активен;
КонецПроцедуры
Процедура Таймер1_ПриСрабатыванииТаймера() Экспорт
Сообщить("Таймер1_ПриСрабатыванииТаймера");
Если Кнопка1.Стиль.Цветфона = ДФ.Цвет.МорскаяРакушка Тогда
Кнопка1.Стиль.Цветфона = ДФ.Цвет.Красный;
Иначе
Кнопка1.Стиль.Цветфона = ДФ.Цвет.МорскаяРакушка;
КонецЕсли;
Блок1.Текст = "" + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
|Таймер активен = " + Таймер1.Активен;
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
Таймер2.Начать();
Сообщить("Кнопка3_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
Таймер2.Остановить();
Сообщить("Кнопка4_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Блок2.Текст = "Таймер активен = " + Таймер2.Активен;
КонецПроцедуры
Процедура Таймер2_ПриСрабатыванииТаймера() Экспорт
Сообщить("Таймер2_ПриСрабатыванииТаймера");
Если Кнопка3.Стиль.Цветфона = ДФ.Цвет.СветлоСерый Тогда
Кнопка3.Стиль.Цветфона = ДФ.Цвет.СветлыйЗеленоватоГолубой;
Иначе
Кнопка3.Стиль.Цветфона = ДФ.Цвет.СветлоСерый;
КонецЕсли;
Блок2.Текст = "" + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
|Таймер активен = " + Таймер2.Активен;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 400;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Стиль.Высота = 100;
Абзац1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Кнопка1 = Абзац1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Начать";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Абзац1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Остановить";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Блок1 = Абзац1.ДобавитьДочерний(ДФ.Блок());
Таймер1 = ДФ.Таймер();
Таймер1.ПриСрабатыванииТаймера = ДФ.Действие(ЭтотОбъект, "Таймер1_ПриСрабатыванииТаймера");
Таймер1.Интервал = 1000;
Таймер1.Начать();
Абзац2 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац2.Стиль.Высота = 100;
Абзац2.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Кнопка3 = Абзац2.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Начать";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Абзац2.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Остановить";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок2 = Абзац2.ДобавитьДочерний(ДФ.Блок());
Таймер2 = ДФ.Таймер();
Таймер2.ПриСрабатыванииТаймера = ДФ.Действие(ЭтотОбъект, "Таймер2_ПриСрабатыванииТаймера");
Таймер2.Интервал = 1000;
Таймер2.Начать();
Форма1.Открыть();
ОстатокДеления_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().ОстатокДеления(10, 3) = 1
, "", "!!! ") + "ОстатокДеления_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().ОстатокДеления(10, 3);
Форма1.Открыть();
Отключено_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.Отключено
, "", "!!! ") + "Отключено_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Отключено = Истина;
Форма1.Открыть();
Отключено_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.Отключено
, "", "!!! ") + "Отключено_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Отключено = Истина;
Форма1.Открыть();
Отключено_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.Отключено
, "", "!!! ") + "Отключено_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Отключено = Истина;
Форма1.Открыть();
Отключено_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Отключено
, "", "!!! ") + "Отключено_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Отключено = Истина;
Форма1.Открыть();
Отключено_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.Отключено
, "", "!!! ") + "Отключено_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Отключено = Истина;
Форма1.Открыть();
Отключено_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.Отключено
, "", "!!! ") + "Отключено_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Отключено = Истина;
Форма1.Открыть();
Отключено_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборФайла1.Отключено
, "", "!!! ") + "Отключено_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.Отключено = Истина;
Форма1.Открыть();
Отключено_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборЦвета1.Отключено
, "", "!!! ") + "Отключено_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборЦвета1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.Отключено = Истина;
Форма1.Открыть();
Отключено_Группа_свойство.os
Перем ДФ, Группа1;
Процедура Свойство() Экспорт
Сообщить(?(
Группа1.Отключено
, "", "!!! ") + "Отключено_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Группа1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Отключено = Истина;
Форма1.Открыть();
Отключено_ГруппировкаПоляСписка_свойство.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.Отключено
, "", "!!! ") + "Отключено_ГруппировкаПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппировкаПоляСписка1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.Отключено = Истина;
Форма1.Открыть();
Отключено_Кнопка_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Сообщить(?(
Кнопка1.Отключено
, "", "!!! ") + "Отключено_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Отключено = Истина;
Форма1.Открыть();
Отключено_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.Отключено
, "", "!!! ") + "Отключено_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Отключено = Истина;
Форма1.Открыть();
Отключено_Переключатель_свойство.os
Перем ДФ, Переключатель1;
Процедура Свойство() Экспорт
Сообщить(?(
Переключатель1.Отключено
, "", "!!! ") + "Отключено_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Переключатель1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Отключено = Истина;
Форма1.Открыть();
Отключено_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.Отключено
, "", "!!! ") + "Отключено_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Отключено = Истина;
Форма1.Открыть();
Отключено_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.Отключено
, "", "!!! ") + "Отключено_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Отключено = Истина;
Форма1.Открыть();
Отключено_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.Отключено
, "", "!!! ") + "Отключено_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Отключено = Истина;
Форма1.Открыть();
Отключено_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.Отключено
, "", "!!! ") + "Отключено_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Отключено = Истина;
Форма1.Открыть();
Отключено_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.Отключено
, "", "!!! ") + "Отключено_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Отключено = Истина;
Форма1.Открыть();
Отключено_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.Отключено
, "", "!!! ") + "Отключено_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Отключено = Истина;
Форма1.Открыть();
Отключено_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Свойство() Экспорт
Сообщить(?(
Флажок1.Отключено
, "", "!!! ") + "Отключено_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Отключено = Истина;
Форма1.Открыть();
Отключено_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементПоляСписка1.Отключено
, "", "!!! ") + "Отключено_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка1, "Отключено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Отключено = Истина;
Форма1.Открыть();
Открыт_Диалог_свойство.os
Перем ДФ, Диалог1;
Процедура Свойство() Экспорт
Сообщить(?(
Диалог1.Открыт
, "", "!!! ") + "Открыт_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "Открыт", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Стиль.ЦветФона = ДФ.Цвет("Бежевый");
Диалог1.Показать();
Форма1.Открыть();
Открыт_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
РаскрываемыйБлок1.Открыт
, "", "!!! ") + "Открыт_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(РаскрываемыйБлок1, "Открыт", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
РаскрываемыйБлок1.ДобавитьДочерний(ЗаголовокРаскрываемогоБлока1);
ЗаголовокРаскрываемогоБлока1.Текст = "Жители деревни Простоквашино";
НеупорядоченныйСписок1 = РаскрываемыйБлок1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
ЭлементСписка1 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Кот Матроскин";
ЭлементСписка2 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка2.Текст = "Пёс Шарик";
ЭлементСписка3 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка3.Текст = "Птица Галчонок";
РаскрываемыйБлок1.Открыт = Истина;
Форма1.Открыть();
Открыть_Форма_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Открыть_Форма_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Открыть();
ОткрытьВБраузере_ДекларативныеФормы_свойство.os
Перем ДФ;
Перем Блок2, Блок3, Блок4;
Перем Результат1, Ползунок1, ПолеЧисла1;
Процедура СоздатьТекстВкладки3()
Абзац4 = Блок4.ДобавитьДочерний(ДФ.Абзац());
Абзац4.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Абзац4.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шрифт1 = ДФ.Шрифт();
Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
Шрифт1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
Шрифт1.РазмерШрифта = 20;
Шрифт1.ВысотаСтроки = 50;
Шрифт1.СемействоШрифтов = "arial,serif";
Абзац4.Стиль.Шрифт = Шрифт1;
КонецПроцедуры
Процедура СоздатьПолзунокВкладки2()
Подпись5 = Блок3.ДобавитьДочерний(ДФ.Подпись());
Подпись5.Текст = "0";
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Блок3;
Ползунок1.Значение = 85;
Ползунок1.Ввод = ДФ.Действие(ЭтотОбъект, "Ползунок1_Ввод");
Подпись6 = Блок3.ДобавитьДочерний(ДФ.Подпись());
Подпись6.Текст = "100 + ";
ПолеЧисла1 = Блок3.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Значение = 20;
ПолеЧисла1.Ввод = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_Ввод");
Подпись7 = Блок3.ДобавитьДочерний(ДФ.Подпись());
Подпись7.Текст = " = ";
Результат1 = Блок3.ДобавитьДочерний(ДФ.Результат());
Результат1.Значение = Ползунок1.Значение + ПолеЧисла1.Значение;
КонецПроцедуры
Процедура Ползунок1_Ввод() Экспорт
Результат1.Значение = ДФ.АргументыСобытия.Значение + ПолеЧисла1.Значение;
Сообщить(?(
ДФ.ОткрытьВБраузере
, "", "!!! ") + "ОткрытьВБраузере_ДекларативныеФормы_свойство.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПолеЧисла1_Ввод() Экспорт
Результат1.Значение = ДФ.АргументыСобытия.Значение + Ползунок1.Значение;
КонецПроцедуры
Процедура СоздатьТаблицуВкладки1()
Таблица1 = Блок2.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Стиль1 = Таблица1.Стиль;
Стиль1.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Стиль1.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Родитель = СтрокаШарик;
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Родитель = СтрокаГалчонок;
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Родитель = СтрокаИтого;
Ячейка7.Текст = "10";
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
ДФ.ОткрытьВБраузере = Истина;
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 800;
Форма1.НачальнаяВысота = 500;
Форма1.Контент.Стиль.ЦветФона = ДФ.Цвет.СветлоСерый;
ДФ.cssПуть = "styles.css";
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Двинь ползунком на Вкладка № 2
|и закрой программу";
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Класс = "tabs";
Переключатель1 = Блок1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель1.Имя = "inset";
Переключатель1.Идентификатор = "tab_1";
Переключатель1.Помечен = Истина;
Подпись1 = Блок1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Текст = "Вкладка № 1";
Подпись1.Связь = "tab_1";
Переключатель2 = Блок1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель2.Имя = "inset";
Переключатель2.Идентификатор = "tab_2";
Переключатель2.Помечен = Ложь;
Подпись2 = Блок1.ДобавитьДочерний(ДФ.Подпись());
Подпись2.Текст = "Вкладка № 2";
Подпись2.Связь = "tab_2";
Переключатель3 = Блок1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель3.Имя = "inset";
Переключатель3.Идентификатор = "tab_3";
Переключатель3.Помечен = Ложь;
Подпись3 = Блок1.ДобавитьДочерний(ДФ.Подпись());
Подпись3.Текст = "Вкладка № 3";
Подпись3.Связь = "tab_3";
Переключатель4 = Блок1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель4.Имя = "inset";
Переключатель4.Идентификатор = "tab_4";
Переключатель4.Помечен = Ложь;
Подпись4 = Блок1.ДобавитьДочерний(ДФ.Подпись());
Подпись4.Текст = "Вкладка № 4";
Подпись4.Связь = "tab_4";
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Идентификатор = "txt_1";
Блок3 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок3.Идентификатор = "txt_2";
Абзац3 = Блок3.ДобавитьДочерний(ДФ.Абзац());
Абзац3.Текст = "Вторая вкладка";
Блок4 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок4.Идентификатор = "txt_3";
Блок5 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок5.Идентификатор = "txt_4";
Абзац5 = Блок5.ДобавитьДочерний(ДФ.Абзац());
Абзац5.Текст = "Четвертая вкладка";
//===========================================
СоздатьТаблицуВкладки1();
СоздатьПолзунокВкладки2();
СоздатьТекстВкладки3();
Форма1.Открыть();
// // Содержимое файла стилей styles.css.
// .tabs { width: 100%; padding: 0px; margin: 0 auto; }
// .tabs>input { display: none; }
// .tabs>div {
// display: none;
// padding: 12px;
// border: 1px solid #C0C0C0;
// background: #FFFFFF;
// }
// .tabs>label {
// display: inline-block;
// padding: 7px;
// margin: 0 -5px -1px 0;
// text-align: center;
// color: #666666;
// border: 1px solid #C0C0C0;
// background: #E0E0E0;
// cursor: pointer;
// }
// .tabs>input:checked + label {
// color: #000000;
// border: 1px solid #C0C0C0;
// border-bottom: 1px solid #FFFFFF;
// background: #FFFFFF;
// }
// #tab_1:checked ~ #txt_1,
// #tab_2:checked ~ #txt_2,
// #tab_3:checked ~ #txt_3,
// #tab_4:checked ~ #txt_4 { display: block; }
Отложено_Скрипт_свойство.os
Перем ДФ, Скрипт1;
Процедура Свойство() Экспорт
Сообщить(?(
Не Скрипт1.Отложено
, "", "!!! ") + "Отложено_Скрипт_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Скрипт1, "Отложено", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Скрипт1 = Форма1.ДобавитьДочерний(ДФ.Скрипт());
Скрипт1.Текст = "
|let str;
|str = ""Добавили JavaScript-код"";
|//alert(str);
|";
Скрипт1.Отложено = Ложь;
Форма1.Открыть();
Отменить_Анимация_метод.os
Перем ДФ, АнимацияВращение, АнимацияМасштаб;
Процедура Кнопка1_Нажатие() Экспорт
АнимацияВращение.Запустить();
АнимацияМасштаб.Запустить();
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
АнимацияВращение.Пауза();
АнимацияМасштаб.Пауза();
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
АнимацияВращение.Завершить();
АнимацияМасштаб.Завершить();
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
АнимацияВращение.Отменить();
Сообщить(?(
Истина
, "", "!!! ") + "Отменить_Анимация_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Нажми кнопку Отменить вращение";
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Запустить";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Пауза";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка3 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Завершить";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Отменить вращение";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = ДФ.Поворот(0);
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = ДФ.Поворот(180);
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок2.Стиль.Ширина = 45;
Блок2.Стиль.Высота = 45;
Блок2.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок2.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок2.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок2.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок2";
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.Зеленый;
Кадр3.Сдвиг = ДФ.Масштаб(1, 1);
Кадр3.Смещение = 0;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Желтый;
Кадр4.Сдвиг = ДФ.Масштаб(1.05, 1.05);
Кадр4.Смещение = 0.1;
Кадр5 = ДФ.Стиль();
Кадр5.ЦветФона = ДФ.Цвет.Желтый;
Кадр5.Сдвиг = ДФ.Масштаб(1.4, 1.4);
Кадр5.Смещение = 0.7;
Кадр6 = ДФ.Стиль();
Кадр6.ЦветФона = ДФ.Цвет.Красный;
Кадр6.Сдвиг = ДФ.Масштаб(1.5, 1.5);
Кадр6.Смещение = 1;
Кадры2 = ДФ.Кадры();
Кадры2.Добавить(Кадр3);
Кадры2.Добавить(Кадр4);
Кадры2.Добавить(Кадр5);
Кадры2.Добавить(Кадр6);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Блок1.Анимация(Кадры1, ПараметрыАнимации1);
АнимацияМасштаб = Блок2.Анимация(Кадры2, ПараметрыАнимации1);
Форма1.Открыть();
Отображать_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Отображать = ДФ.Отображать.Гибкий
, "", "!!! ") + "Отображать_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Отображать", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 400;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Стиль.Отображать = ДФ.Отображать.Гибкий;
Блок1.Стиль.РасположениеСодержимого = ДФ.РасположениеСодержимого.Вокруг;
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.ЦветФона = ДФ.Цвет.Коралловый;
Блок2.Стиль.Ширина = 70;
Блок2.Стиль.Высота = 70;
Блок3 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок3.Стиль.ЦветФона = ДФ.Цвет.СветлоСиний;
Блок3.Стиль.Ширина = 70;
Блок3.Стиль.Высота = 70;
Блок4 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок4.Стиль.ЦветФона = ДФ.Цвет.Хаки;
Блок4.Стиль.Ширина = 70;
Блок4.Стиль.Высота = 70;
Блок5 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок5.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Блок5.Стиль.Ширина = 70;
Блок5.Стиль.Высота = 70;
Форма1.Открыть();
Отправитель_АргументыСобытия_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Отправитель = ДФ.АргументыСобытия.Отправитель;
// Сообщить("Отправитель.Текст = " + Отправитель.Текст + " " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Отправитель.Текст = "Это Кнопка1"
, "", "!!! ") + "Отправитель_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Нажми кнопку";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие", Новый Структура("Поле1","ЧтоТоТам"));
Форма1.Открыть();
Отправитель_ДекларативныеФормы_свойство.os
Перем ДФ;
Процедура Кнопка1_Нажатие() Экспорт
Параметр = ДФ.АргументыСобытия.Параметр;
Отправитель = ДФ.Отправитель;
Сообщить(?(
Отправитель.Текст = "Это Кнопка1"
, "", "!!! ") + "Отправитель_ДекларативныеФормы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие", Новый Структура("Поле1","ЧтоТоТам"));
// Добавим вызов обработчика события Кнопка1_Нажатие.
ДФ.СтрокаФункций = ДФ.СтрокаФункций + "sendPost(""" + Кнопка1.КлючЭлемента + "|click"");";
// Сообщить("ДФ.СтрокаФункций = " + ДФ.СтрокаФункций);
Форма1.Открыть();
Отступ_Стиль_свойство.os
Перем ДФ, Абзац2;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац2.Стиль.Отступ = "20px 10px 20px 30px"
, "", "!!! ") + "Отступ_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац2.Стиль, "Отступ", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 450;
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
Абзац1 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "– Заберусь-ка я на вершину вон того холма, – решила Алиса, – оттуда весь сад как на ладони. ";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Абзац2 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Абзац());
Абзац2.Стиль.ЦветФона = ДФ.Цвет("БледноЖелтый");
Абзац2.Стиль.Отступ = ДФ.Отступ(20, 10, 20, 30);
Абзац2.Текст = "
|А вот и дорожка ведет туда… нет, обратно… нет, туда-обратно…
|– Она обнаружила, что дорожка бежит как-то странно, зигзагами – туда-сюда… ";
Абзац3 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Абзац());
Абзац3.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Абзац3.Текст = "
|– Все-таки надеюсь, – говорила Алиса, шагая, – она в конце концов приведет меня…
|Ой, ну когда же это кончится? Не дорожка, а завитушка какая-то! Ну наконец-то я вышла на прямую.
|Нет, опять кривая. Так я и знала – привела обратно к дому. Ничего, ничего, теперь выберем дорожку попрямее.";
Форма1.Открыть();
ОтступСверху_Отступ_свойство.os
Перем ДФ, Отступ1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Отступ1.ОтступСверху = 20
, "", "!!! ") + "ОтступСверху_Отступ_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 450;
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
Абзац1 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "– Заберусь-ка я на вершину вон того холма, – решила Алиса, – оттуда весь сад как на ладони. ";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Абзац2 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Абзац());
Абзац2.Стиль.ЦветФона = ДФ.Цвет("БледноЖелтый");
Отступ1 = ДФ.Отступ();
Отступ1.ОтступСверху = 20;
Отступ1.ОтступСправа = 10;
Отступ1.ОтступСнизу = 20;
Отступ1.ОтступСлева = 30;
Абзац2.Стиль.Отступ = Отступ1;
Абзац2.Текст = "
|А вот и дорожка ведет туда… нет, обратно… нет, туда-обратно…
|– Она обнаружила, что дорожка бежит как-то странно, зигзагами – туда-сюда… ";
Абзац3 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Абзац());
Абзац3.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Абзац3.Текст = "
|– Все-таки надеюсь, – говорила Алиса, шагая, – она в конце концов приведет меня…
|Ой, ну когда же это кончится? Не дорожка, а завитушка какая-то! Ну наконец-то я вышла на прямую.
|Нет, опять кривая. Так я и знала – привела обратно к дому. Ничего, ничего, теперь выберем дорожку попрямее.";
Форма1.Открыть();
ОтступСверху_Стиль_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Сообщить(?(
Кнопка1.Стиль.ОтступСверху = "25px"
, "", "!!! ") + "ОтступСверху_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1.Стиль, "ОтступСверху", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Кнопка1 = Блок1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Кнопка1";
Кнопка1.Стиль.ОтступСверху = 25;
Кнопка1.Стиль.ОтступСлева = 25;
Форма1.Открыть();
ОтступСлева_Отступ_свойство.os
Перем ДФ, Отступ1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Отступ1.ОтступСлева = 30
, "", "!!! ") + "ОтступСлева_Отступ_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 450;
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
Абзац1 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "– Заберусь-ка я на вершину вон того холма, – решила Алиса, – оттуда весь сад как на ладони. ";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Абзац2 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Абзац());
Абзац2.Стиль.ЦветФона = ДФ.Цвет("БледноЖелтый");
Отступ1 = ДФ.Отступ();
Отступ1.ОтступСверху = 20;
Отступ1.ОтступСправа = 10;
Отступ1.ОтступСнизу = 20;
Отступ1.ОтступСлева = 30;
Абзац2.Стиль.Отступ = Отступ1;
Абзац2.Текст = "
|А вот и дорожка ведет туда… нет, обратно… нет, туда-обратно…
|– Она обнаружила, что дорожка бежит как-то странно, зигзагами – туда-сюда… ";
Абзац3 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Абзац());
Абзац3.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Абзац3.Текст = "
|– Все-таки надеюсь, – говорила Алиса, шагая, – она в конце концов приведет меня…
|Ой, ну когда же это кончится? Не дорожка, а завитушка какая-то! Ну наконец-то я вышла на прямую.
|Нет, опять кривая. Так я и знала – привела обратно к дому. Ничего, ничего, теперь выберем дорожку попрямее.";
Форма1.Открыть();
ОтступСлева_Стиль_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Сообщить(?(
Кнопка1.Стиль.ОтступСлева = "25px"
, "", "!!! ") + "ОтступСлева_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1.Стиль, "ОтступСлева", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Кнопка1 = Блок1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Кнопка1";
Кнопка1.Стиль.ОтступСверху = 25;
Кнопка1.Стиль.ОтступСлева = 25;
Форма1.Открыть();
ОтступСнизу_Отступ_свойство.os
Перем ДФ, Отступ1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Отступ1.ОтступСнизу = 20
, "", "!!! ") + "ОтступСнизу_Отступ_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 450;
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
Абзац1 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "– Заберусь-ка я на вершину вон того холма, – решила Алиса, – оттуда весь сад как на ладони. ";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Абзац2 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Абзац());
Абзац2.Стиль.ЦветФона = ДФ.Цвет("БледноЖелтый");
Отступ1 = ДФ.Отступ();
Отступ1.ОтступСверху = 20;
Отступ1.ОтступСправа = 10;
Отступ1.ОтступСнизу = 20;
Отступ1.ОтступСлева = 30;
Абзац2.Стиль.Отступ = Отступ1;
Абзац2.Текст = "
|А вот и дорожка ведет туда… нет, обратно… нет, туда-обратно…
|– Она обнаружила, что дорожка бежит как-то странно, зигзагами – туда-сюда… ";
Абзац3 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Абзац());
Абзац3.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Абзац3.Текст = "
|– Все-таки надеюсь, – говорила Алиса, шагая, – она в конце концов приведет меня…
|Ой, ну когда же это кончится? Не дорожка, а завитушка какая-то! Ну наконец-то я вышла на прямую.
|Нет, опять кривая. Так я и знала – привела обратно к дому. Ничего, ничего, теперь выберем дорожку попрямее.";
Форма1.Открыть();
ОтступСнизу_Стиль_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Сообщить(?(
Кнопка1.Стиль.ОтступСнизу = "50px"
, "", "!!! ") + "ОтступСнизу_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1.Стиль, "ОтступСнизу", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Кнопка1 = Блок1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Кнопка1";
Кнопка2 = Блок1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Кнопка2";
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Текст = "Блок2";
Кнопка1.Стиль.ОтступСправа = 50;
Кнопка1.Стиль.ОтступСнизу = 50;
Форма1.Открыть();
ОтступСправа_Отступ_свойство.os
Перем ДФ, Отступ1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Отступ1.ОтступСправа = 10
, "", "!!! ") + "ОтступСправа_Отступ_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 450;
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
Абзац1 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "– Заберусь-ка я на вершину вон того холма, – решила Алиса, – оттуда весь сад как на ладони. ";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Абзац2 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Абзац());
Абзац2.Стиль.ЦветФона = ДФ.Цвет("БледноЖелтый");
Отступ1 = ДФ.Отступ();
Отступ1.ОтступСверху = 20;
Отступ1.ОтступСправа = 10;
Отступ1.ОтступСнизу = 20;
Отступ1.ОтступСлева = 30;
Абзац2.Стиль.Отступ = Отступ1;
Абзац2.Текст = "
|А вот и дорожка ведет туда… нет, обратно… нет, туда-обратно…
|– Она обнаружила, что дорожка бежит как-то странно, зигзагами – туда-сюда… ";
Абзац3 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Абзац());
Абзац3.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Абзац3.Текст = "
|– Все-таки надеюсь, – говорила Алиса, шагая, – она в конце концов приведет меня…
|Ой, ну когда же это кончится? Не дорожка, а завитушка какая-то! Ну наконец-то я вышла на прямую.
|Нет, опять кривая. Так я и знала – привела обратно к дому. Ничего, ничего, теперь выберем дорожку попрямее.";
Форма1.Открыть();
ОтступСправа_Стиль_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Сообщить(?(
Кнопка1.Стиль.ОтступСправа = "50px"
, "", "!!! ") + "ОтступСправа_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1.Стиль, "ОтступСправа", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Кнопка1 = Блок1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Кнопка1";
Кнопка2 = Блок1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Кнопка2";
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Текст = "Блок2";
Кнопка1.Стиль.ОтступСправа = 50;
Кнопка1.Стиль.ОтступСнизу = 50;
Форма1.Открыть();
ОтступТекста_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ОтступТекста = "50px"
, "", "!!! ") + "ОтступТекста_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ОтступТекста", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.ЦветФона = ДФ.Цвет.ТуманноБелый;
Блок1.Текст = "1. Алиса встречает Черную Королеву, становится Белой Пешкой и начинает игру с клетки e2.
|А Черная Королева с клетки e2 стремительно убегает на клетку h5.
|2. Алиса в летающем поезде переносится с клетки d4 на d2 и встречает двух толстеньких Братцев.
|А Белая Королева несется за шалью с клетки c1 на с4.
|3. Алиса встречается с Белой Королевой, оказавшейся рядышком, на клетке с4, и отдает ей шаль.
|А Белая Королева вдруг превращается в Овцу и оказывается уже в странном магазинчике на клетке с5.
|4. Алиса переносится из магазина на реку и обратно и попадает с клетки d4 на d5.
|А Белая Королева в овечьих колечках вдруг исчезает и переносится далеко-далеко – на клетку f8.
|5. Алиса из удивительного магазинчика попадает прямиком в гости к Желтку-Белтку на клетку d6.
|А Белая Королева выскакивает из леса, спасаясь от Рыцаря на Черном Коне, и попадает на клетку с8.";
Блок1.Стиль.ОтступТекста = 50;
Форма1.Открыть();
ОттенкиСерого_ФильтрИзображений_свойство.os
Перем ДФ, ФильтрИзображений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ФильтрИзображений1.ОттенкиСерого = 70
, "", "!!! ") + "ОттенкиСерого_ФильтрИзображений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Изображение1 = ДФ.Изображение();
Форма1.ДобавитьДочерний(Изображение1);
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Стиль.Ширина = 200;
ФильтрИзображений1 = ДФ.ФильтрИзображений();
ФильтрИзображений1.ОттенкиСерого = 70;
Изображение1.Стиль.Фильтр = ФильтрИзображений1;
Форма1.Открыть();
ОформлениеТекстаЛиния_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ОформлениеТекстаЛиния = ДФ.ОформлениеТекстаЛиния.ПодТекстом
, "", "!!! ") + "ОформлениеТекстаЛиния_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ОформлениеТекстаЛиния", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 250;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "– Забавный стишок! – промолвила Алиса.
|– В нем что-то есть.
|– Честно говоря, кто этот ЧТО-ТО, Алиса объяснить не смогла бы, но ей стыдно было в этом признаться даже самой себе.";
Абзац1.Стиль.ОформлениеТекстаСтиль = ДФ.ОформлениеТекстаСтиль.Волнистая;
Абзац1.Стиль.ОформлениеТекстаЛиния = ДФ.ОформлениеТекстаЛиния.ПодТекстом;
Абзац1.Стиль.ОформлениеТекстаЦвет = ДФ.Цвет.Синий;
Форма1.Открыть();
ОформлениеТекстаСтиль_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ОформлениеТекстаСтиль = ДФ.ОформлениеТекстаСтиль.Волнистая
, "", "!!! ") + "ОформлениеТекстаСтиль_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ОформлениеТекстаСтиль", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 250;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "– Забавный стишок! – промолвила Алиса.
|– В нем что-то есть.
|– Честно говоря, кто этот ЧТО-ТО, Алиса объяснить не смогла бы, но ей стыдно было в этом признаться даже самой себе.";
Абзац1.Стиль.ОформлениеТекстаСтиль = ДФ.ОформлениеТекстаСтиль.Волнистая;
Абзац1.Стиль.ОформлениеТекстаЛиния = ДФ.ОформлениеТекстаЛиния.ПодТекстом;
Абзац1.Стиль.ОформлениеТекстаЦвет = ДФ.Цвет.Синий;
Форма1.Открыть();
ОформлениеТекстаЦвет_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ОформлениеТекстаЦвет = "rgb(0, 0, 255)"
, "", "!!! ") + "ОформлениеТекстаЦвет_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ОформлениеТекстаЦвет", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 250;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "– Забавный стишок! – промолвила Алиса.
|– В нем что-то есть.
|– Честно говоря, кто этот ЧТО-ТО, Алиса объяснить не смогла бы, но ей стыдно было в этом признаться даже самой себе.";
Абзац1.Стиль.ОформлениеТекстаСтиль = ДФ.ОформлениеТекстаСтиль.Волнистая;
Абзац1.Стиль.ОформлениеТекстаЛиния = ДФ.ОформлениеТекстаЛиния.ПодТекстом;
Абзац1.Стиль.ОформлениеТекстаЦвет = ДФ.Цвет.Синий;
Форма1.Открыть();
ОчиститьПрямоугольник_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "ОчиститьПрямоугольник_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Красный;
Контекст2d1.ЗаполнитьПрямоугольник(20, 20, 200, 100);
Контекст2d1.ОчиститьПрямоугольник(40, 40, 50, 50);
Форма1.Открыть();
Параметр_АргументыСобытия_свойство.os
Перем ДФ;
Процедура Кнопка1_Нажатие() Экспорт
// Параметр = ДФ.АргументыСобытия.Параметр;
// Сообщить("Параметр[""Поле1""] = " + Параметр["Поле1"] + " " + ТекущаяУниверсальнаяДатаВМиллисекундах());
// Сообщить("Параметр[""Число25""] = " + Параметр["Число25"] + " " + ТекущаяУниверсальнаяДатаВМиллисекундах());
// Сообщить("Параметр[""Число48""] = " + Параметр["Число48"] + " " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
ДФ.АргументыСобытия.Параметр["Число25"] = 25
, "", "!!! ") + "Параметр_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Контент.Текст = "Щелкни кнопкой мыши по кнопке";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Структура1 = Новый Структура("Поле1","ЧтоТоТам");
Структура1.Вставить("Число25", 25);
Структура1.Вставить("Число48", 48);
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие", Структура1);
Форма1.Открыть();
Параметр_Действие_свойство.os
Перем ДФ, Действие, Структура1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Действие.Параметр = Структура1
, "", "!!! ") + "Параметр_Действие_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Структура1 = Новый Структура("Поле1","ЧтоТоТам");
Структура1.Вставить("Число25", 25);
Структура1.Вставить("Число48", 48);
Действие = ДФ.Действие(ЭтотОбъект, "");
Действие.ИмяМетода = "Форма1_Загружена";
Действие.Параметр = Структура1;
Форма1.Загружена = Действие;
Форма1.Открыть();
Пауза_Анимация_метод.os
Перем ДФ, АнимацияВращение, АнимацияМасштаб;
Процедура Кнопка1_Нажатие() Экспорт
АнимацияВращение.Запустить();
АнимацияМасштаб.Запустить();
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
АнимацияВращение.Пауза();
АнимацияМасштаб.Пауза();
Сообщить(?(
Истина
, "", "!!! ") + "Пауза_Анимация_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
АнимацияВращение.Завершить();
АнимацияМасштаб.Завершить();
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
АнимацияВращение.Отменить();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Нажми кнопку Пауза";
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Запустить";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Пауза";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка3 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Завершить";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Отменить вращение";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = ДФ.Поворот(0);
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = ДФ.Поворот(180);
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок2.Стиль.Ширина = 45;
Блок2.Стиль.Высота = 45;
Блок2.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок2.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок2.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок2.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок2";
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.Зеленый;
Кадр3.Сдвиг = ДФ.Масштаб(1, 1);
Кадр3.Смещение = 0;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Желтый;
Кадр4.Сдвиг = ДФ.Масштаб(1.05, 1.05);
Кадр4.Смещение = 0.1;
Кадр5 = ДФ.Стиль();
Кадр5.ЦветФона = ДФ.Цвет.Желтый;
Кадр5.Сдвиг = ДФ.Масштаб(1.4, 1.4);
Кадр5.Смещение = 0.7;
Кадр6 = ДФ.Стиль();
Кадр6.ЦветФона = ДФ.Цвет.Красный;
Кадр6.Сдвиг = ДФ.Масштаб(1.5, 1.5);
Кадр6.Смещение = 1;
Кадры2 = ДФ.Кадры();
Кадры2.Добавить(Кадр3);
Кадры2.Добавить(Кадр4);
Кадры2.Добавить(Кадр5);
Кадры2.Добавить(Кадр6);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Блок1.Анимация(Кадры1, ПараметрыАнимации1);
АнимацияМасштаб = Блок2.Анимация(Кадры2, ПараметрыАнимации1);
Форма1.Открыть();
Пауза_Аудио_метод.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Аудио1.НаПаузе
, "", "!!! ") + "Пауза_Аудио_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "НаПаузе", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Воспроизвести();
Аудио1.Пауза();
Форма1.Открыть();
ПерейтиКТочке_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "ПерейтиКТочке_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.НачатьПуть();
Контекст2d1.ПерейтиКТочке(20, 20);
Контекст2d1.Линия(100, 20);
Контекст2d1.ДугаМежду(150, 20, 150, 70, 50);
Контекст2d1.Линия(150, 120);
Контекст2d1.Начертить();
Форма1.Открыть();
Перемещаемый_Абзац_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Абзац());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Артикль_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Артикль());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Аудио_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Аудио());
Источник.Источник = "Kaoma_Lambada.mp3";
Источник.Контролы = Истина;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Блок_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Блок());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ВыборВремени_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ВыборДаты_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ВыборДатыВремени_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ВыборМесяца_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ВыборНедели_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ВыборФайла_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ВыборЦвета_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Группа_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Группа());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Диалог_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Диалог());
Источник.Показать();
Источник.Показать();
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ДополнительныйБлок_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ЖирныйТекст_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Заголовок1_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Заголовок2_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Заголовок3_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Заголовок4_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Заголовок5_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Заголовок6_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Изображение_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Изображение());
Источник.Источник = "maslenica10.jpg";
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Индикатор_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Индикатор());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Кнопка_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_КурсивТекст_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Линия_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Линия());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_МаркированныйТекст_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_МелкийТекст_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_НадстрочныйТекст_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_НаправленныйТекст_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ОбластьТекста_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Переключатель_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Подпись_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Подпись());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ПодстрочныйТекст_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ПодчеркнутыйТекст_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ПолеПароля_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеПароля());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ПолеПоиска_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ПолеСписка_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеСписка());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ПолеТекста_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ПолеЧисла_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Ползунок_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Ползунок());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_РаскрываемыйБлок_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Результат_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Результат());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Ссылка_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Таблица_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Таблица());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_УдаленыйТекст_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Флажок_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Флажок());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_ФорматированныйТекст_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Фрейм_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Фрейм_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Фрейм());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Холст_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Холст());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
Перемещаемый_Шкала_свойство.os
Перем ДФ, Источник;
Процедура Свойство() Экспорт
Сообщить(?(
Источник.Перемещаемый
, "", "!!! ") + "Перемещаемый_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Источник, "Перемещаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Источник = Форма1.ДобавитьДочерний(ДФ.Шкала());
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 100;
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Перемещаемый = Истина;
Форма1.Открыть();
ПереносГибких_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ПереносГибких = "nowrap"
, "", "!!! ") + "ПереносГибких_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ПереносГибких", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 200;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.Отображать = ДФ.Отображать.Гибкий;
Блок1.Стиль.НаправлениеЭлементов = ДФ.НаправлениеЭлементов.Строка;
Блок1.Стиль.ПереносГибких = ДФ.ПереносГибких.Перенос;
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Ширина = 50;
Блок2.Стиль.Высота = 50;
Блок2.Стиль.ЦветФона = ДФ.Цвет.Коралловый;
Блок3 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок3.Стиль.Ширина = 50;
Блок3.Стиль.Высота = 50;
Блок3.Стиль.ЦветФона = ДФ.Цвет.СветлоСиний;
Блок4 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок4.Стиль.Ширина = 50;
Блок4.Стиль.Высота = 50;
Блок4.Стиль.ЦветФона = ДФ.Цвет.Хаки;
Блок5 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок5.Стиль.Ширина = 50;
Блок5.Стиль.Высота = 50;
Блок5.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Блок6 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок6.Стиль.Ширина = 50;
Блок6.Стиль.Высота = 50;
Блок6.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСерый;
Блок7 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок7.Стиль.Ширина = 50;
Блок7.Стиль.Высота = 50;
Блок7.Стиль.ЦветФона = ДФ.Цвет.СветлоЗеленый;
Блок1.Стиль.ПереносГибких = "nowrap";
Форма1.Открыть();
ПереносСлов_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ПереносСлов = ДФ.ПереносСлов.Разбивать
, "", "!!! ") + "ПереносСлов_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ПереносСлов", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Стиль.Ширина = 270;
Абзац1.Стиль.Высота = 270;
Абзац1.Текст = "ЭтоДлинноеНеразрывноеСловоЭтоДлинноеНеразрывноеСловоЭтоДлинноеНеразрывноеСловоЭтоДлинноеНеразрывноеСловоЭтоДлинноеНеразрывноеСловоЭтоДлинноеНеразрывноеСловоЭтоДлинноеНеразрывноеСловоЭтоДлинноеНеразрывноеСлово";
Абзац1.Стиль.ПереносСлов = ДФ.ПереносСлов.Разбивать;
Форма1.Открыть();
ПереносТекста_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.ПереносТекста = ДФ.ПереносТекста.Переносить
, "", "!!! ") + "ПереносТекста_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "ПереносТекста", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Текст = "– Забавный стишок! – промолвила Алиса.
|– В нем что-то есть.
|– Честно говоря, кто этот ЧТО-ТО, Алиса объяснить не смогла бы, но ей стыдно было в этом признаться даже самой себе. И она пробормотала:
|– Если собраться с мыслями, то, я думаю, здесь кто-то кого-то чем-то и зачем-то свержил, то есть отсвечил. Но что это я! – спохватилась она.
|– Тут еще столько надо успеть. Обежать все комнаты. Заглянуть в сад!";
ОбластьТекста1.ПереносТекста = ДФ.ПереносТекста.Переносить;
ОбластьТекста1.Колонки = 25;
Форма1.Открыть();
Переполнение_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Переполнение = ДФ.Переполнение.Прокрутка
, "", "!!! ") + "Переполнение_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Переполнение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 210;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Текст = "Алисе это замечание Розы совсем не понравилось, и она ее поскорей перебила:
|– Как вы думаете, сегодня мы увидим здесь этот, как вы говорите, цветок?
|– Непременно, – сказала Роза. – Каждый день тут появляется. Подумаешь, гордится своими шипами! А всего-то навсего у нее их девять.
|– Где же у нее шипы? – всполошилась Алиса.
|– Прямо на лепестках, – пренебрежительно ответила Роза. – Кстати, а где твои шипы?
|– Идет! Идет! – крикнул Пион. – Слышите, как топает? Бум! Бум! Просто земля дрожит.
|И тут появилась Черная Королева.
|«Ого! Как выросла! – подумала Алиса. – Когда я нашла ее в золе, она была не больше моего пальца. А теперь я ей по плечо».
|– У нас такой чудесный воздух, что все тянутся вверх не по дням, а по часам, – сказала Роза, будто подслушала мысли Алисы.
|– Пойду навстречу ей, – сказала Алиса, как бы извиняясь перед цветами.
|С ними было, конечно, весело поболтать, но беседа с Королевой наверняка намного интересней.
|– Если хочешь встретиться, – посоветовала Роза, – иди не к ней, а от нее.";
Блок1.Стиль.Переполнение = ДФ.Переполнение.Прокрутка;
Форма1.Открыть();
ПереполнениеИгрек_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ПереполнениеИгрек = ДФ.Переполнение.Прокрутка
, "", "!!! ") + "ПереполнениеИгрек_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ПереполнениеИгрек", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 210;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Текст = "Алисе это замечание Розы совсем не понравилось, и она ее поскорей перебила:
|– Как вы думаете, сегодня мы увидим здесь этот, как вы говорите, цветок?
|– Непременно, – сказала Роза. – Каждый день тут появляется. Подумаешь, гордится своими шипами! А всего-то навсего у нее их девять.
|– Где же у нее шипы? – всполошилась Алиса.
|– Прямо на лепестках, – пренебрежительно ответила Роза. – Кстати, а где твои шипы?
|– Идет! Идет! – крикнул Пион. – Слышите, как топает? Бум! Бум! Просто земля дрожит.
|И тут появилась Черная Королева.
|«Ого! Как выросла! – подумала Алиса. – Когда я нашла ее в золе, она была не больше моего пальца. А теперь я ей по плечо».
|– У нас такой чудесный воздух, что все тянутся вверх не по дням, а по часам, – сказала Роза, будто подслушала мысли Алисы.
|– Пойду навстречу ей, – сказала Алиса, как бы извиняясь перед цветами.
|С ними было, конечно, весело поболтать, но беседа с Королевой наверняка намного интересней.
|– Если хочешь встретиться, – посоветовала Роза, – иди не к ней, а от нее.";
Блок1.Стиль.ПереполнениеИгрек = ДФ.Переполнение.Прокрутка;
Форма1.Открыть();
ПереполнениеИкс_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ПереполнениеИкс = ДФ.Переполнение.Прокрутка
, "", "!!! ") + "ПереполнениеИкс_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ПереполнениеИкс", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 210;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Текст = "Алисе это замечание Розы совсем не понравилось, и она ее поскорей перебила:
|– Как вы думаете, сегодня мы увидим здесь этот, как вы говорите, цветок?
|– Непременно, – сказала Роза. – Каждый день тут появляется. Подумаешь, гордится своими шипами! А всего-то навсего у нее их девять.
|– Где же у нее шипы? – всполошилась Алиса.
|– Прямо на лепестках, – пренебрежительно ответила Роза. – Кстати, а где твои шипы?
|– Идет! Идет! – крикнул Пион. – Слышите, как топает? Бум! Бум! Просто земля дрожит.
|И тут появилась Черная Королева.
|«Ого! Как выросла! – подумала Алиса. – Когда я нашла ее в золе, она была не больше моего пальца. А теперь я ей по плечо».
|– У нас такой чудесный воздух, что все тянутся вверх не по дням, а по часам, – сказала Роза, будто подслушала мысли Алисы.
|– Пойду навстречу ей, – сказала Алиса, как бы извиняясь перед цветами.
|С ними было, конечно, весело поболтать, но беседа с Королевой наверняка намного интересней.
|– Если хочешь встретиться, – посоветовала Роза, – иди не к ней, а от нее.";
Блок1.Стиль.Пробелы = ДФ.Пробелы.НеПереносить;
Блок1.Стиль.ПереполнениеИкс = ДФ.Переполнение.Прокрутка;
Форма1.Открыть();
ПереполнениеТекста_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ПереполнениеТекста = ДФ.ПереполнениеТекста.Многоточие
, "", "!!! ") + "ПереполнениеТекста_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ПереполнениеТекста", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 250;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "– Забавный стишок! – промолвила Алиса.
|– В нем что-то есть.
|– Честно говоря, кто этот ЧТО-ТО, Алиса объяснить не смогла бы, но ей стыдно было в этом признаться даже самой себе.";
Абзац1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Абзац1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Абзац1.Стиль.Ширина = 175;
Абзац1.Стиль.Пробелы = ДФ.Пробелы.НеПереносить;
Абзац1.Стиль.Переполнение = ДФ.Переполнение.Скрыто;
Абзац1.Стиль.ПереполнениеТекста = ДФ.ПереполнениеТекста.Многоточие;
Форма1.Открыть();
Перетаскиваемый_Абзац_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Абзац1.Стиль.Ширина = 100;
Абзац1.Стиль.Высота = 50;
Абзац1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Абзац1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Артикль_свойство.os
Перем ДФ, Артикль1;
Процедура Свойство() Экспорт
Сообщить(?(
Артикль1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Артикль1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Артикль1 = Форма1.ДобавитьДочерний(ДФ.Артикль());
Артикль1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Артикль1.Стиль.Ширина = 100;
Артикль1.Стиль.Высота = 50;
Артикль1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Артикль1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Аудио1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Аудио1 = Форма1.ДобавитьДочерний(ДФ.Аудио());
Аудио1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Аудио1.Стиль.Ширина = 100;
Аудио1.Стиль.Высота = 50;
Аудио1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Блок_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.Высота = 50;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ВыборВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборВремени1.Стиль.Ширина = 100;
ВыборВремени1.Стиль.Высота = 50;
ВыборВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ВыборВремени1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ВыборДаты1 = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборДаты1.Стиль.Ширина = 100;
ВыборДаты1.Стиль.Высота = 50;
ВыборДаты1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ВыборДаты1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ВыборДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборДатыВремени1.Стиль.Ширина = 100;
ВыборДатыВремени1.Стиль.Высота = 50;
ВыборДатыВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ВыборДатыВремени1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ВыборМестнойДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборМестнойДатыВремени1.Стиль.Ширина = 100;
ВыборМестнойДатыВремени1.Стиль.Высота = 50;
ВыборМестнойДатыВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ВыборМестнойДатыВремени1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ВыборМесяца1 = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборМесяца1.Стиль.Ширина = 100;
ВыборМесяца1.Стиль.Высота = 50;
ВыборМесяца1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ВыборМесяца1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ВыборНедели1 = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборНедели1.Стиль.Ширина = 100;
ВыборНедели1.Стиль.Высота = 50;
ВыборНедели1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ВыборНедели1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборФайла1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ВыборФайла1 = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборФайла1.Стиль.Ширина = 100;
ВыборФайла1.Стиль.Высота = 50;
ВыборФайла1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ВыборФайла1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборЦвета1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборЦвета1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ВыборЦвета1 = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборЦвета1.Стиль.Ширина = 100;
ВыборЦвета1.Стиль.Высота = 50;
ВыборЦвета1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ВыборЦвета1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Группа_свойство.os
Перем ДФ, Группа1;
Процедура Свойство() Экспорт
Сообщить(?(
Группа1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Группа1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Группа1 = Форма1.ДобавитьДочерний(ДФ.Группа());
Группа1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Группа1.Стиль.Ширина = 100;
Группа1.Стиль.Высота = 50;
Группа1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Группа1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Диалог_свойство.os
Перем ДФ, Диалог1;
Процедура Свойство() Экспорт
Сообщить(?(
Диалог1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Диалог1 = Форма1.ДобавитьДочерний(ДФ.Диалог());
Диалог1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Диалог1.Стиль.Ширина = 100;
Диалог1.Стиль.Высота = 50;
Диалог1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Диалог1.Перетаскиваемый = Истина;
Диалог1.Показать();
Форма1.Открыть();
Перетаскиваемый_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
ДополнительныйБлок1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ДополнительныйБлок1 = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ДополнительныйБлок1.Стиль.Ширина = 100;
ДополнительныйБлок1.Стиль.Высота = 50;
ДополнительныйБлок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ДополнительныйБлок1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ЖирныйТекст1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЖирныйТекст1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ЖирныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЖирныйТекст1.Стиль.Ширина = 100;
ЖирныйТекст1.Стиль.Высота = 50;
ЖирныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ЖирныйТекст1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Заголовок1_свойство.os
Перем ДФ, Заголовок11;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок11.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок11, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Заголовок11 = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок11.Стиль.Ширина = 100;
Заголовок11.Стиль.Высота = 50;
Заголовок11.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Заголовок11.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Заголовок2_свойство.os
Перем ДФ, Заголовок21;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок21.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок21, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Заголовок21 = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок21.Стиль.Ширина = 100;
Заголовок21.Стиль.Высота = 50;
Заголовок21.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Заголовок21.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Заголовок3_свойство.os
Перем ДФ, Заголовок31;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок31.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок31, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Заголовок31 = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок31.Стиль.Ширина = 100;
Заголовок31.Стиль.Высота = 50;
Заголовок31.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Заголовок31.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Заголовок4_свойство.os
Перем ДФ, Заголовок41;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок41.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок41, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Заголовок41 = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок41.Стиль.Ширина = 100;
Заголовок41.Стиль.Высота = 50;
Заголовок41.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Заголовок41.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Заголовок5_свойство.os
Перем ДФ, Заголовок51;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок51.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок51, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Заголовок51 = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок51.Стиль.Ширина = 100;
Заголовок51.Стиль.Высота = 50;
Заголовок51.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Заголовок51.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Заголовок6_свойство.os
Перем ДФ, Заголовок61;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок61.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок61, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Заголовок61 = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок61.Стиль.Ширина = 100;
Заголовок61.Стиль.Высота = 50;
Заголовок61.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Заголовок61.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Изображение1.Стиль.Ширина = 100;
Изображение1.Стиль.Высота = 50;
Изображение1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Индикатор_свойство.os
Перем ДФ, Индикатор1;
Процедура Свойство() Экспорт
Сообщить(?(
Индикатор1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Индикатор1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Индикатор1 = Форма1.ДобавитьДочерний(ДФ.Индикатор());
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Индикатор1.Стиль.Ширина = 100;
Индикатор1.Стиль.Высота = 50;
Индикатор1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Индикатор1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Кнопка_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Сообщить(?(
Кнопка1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Кнопка1.Стиль.Ширина = 100;
Кнопка1.Стиль.Высота = 50;
Кнопка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Кнопка1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
КурсивТекст1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(КурсивТекст1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
КурсивТекст1 = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
КурсивТекст1.Стиль.Ширина = 100;
КурсивТекст1.Стиль.Высота = 50;
КурсивТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
КурсивТекст1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Линия_свойство.os
Перем ДФ, Линия1;
Процедура Свойство() Экспорт
Сообщить(?(
Линия1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Линия1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Линия1 = Форма1.ДобавитьДочерний(ДФ.Линия());
Линия1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Линия1.Стиль.Ширина = 100;
Линия1.Стиль.Высота = 50;
Линия1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Линия1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
МаркированныйТекст1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МаркированныйТекст1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
МаркированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
МаркированныйТекст1.Стиль.Ширина = 100;
МаркированныйТекст1.Стиль.Высота = 50;
МаркированныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
МаркированныйТекст1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
МелкийТекст1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МелкийТекст1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
МелкийТекст1 = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
МелкийТекст1.Стиль.Ширина = 100;
МелкийТекст1.Стиль.Высота = 50;
МелкийТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
МелкийТекст1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
НадстрочныйТекст1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НадстрочныйТекст1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
НадстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НадстрочныйТекст1.Стиль.Ширина = 100;
НадстрочныйТекст1.Стиль.Высота = 50;
НадстрочныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
НадстрочныйТекст1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
НаправленныйТекст1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НаправленныйТекст1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
НаправленныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НаправленныйТекст1.Стиль.Ширина = 100;
НаправленныйТекст1.Стиль.Высота = 50;
НаправленныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
НаправленныйТекст1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОбластьТекста1.Стиль.Ширина = 100;
ОбластьТекста1.Стиль.Высота = 50;
ОбластьТекста1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ОбластьТекста1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Переключатель_свойство.os
Перем ДФ, Переключатель1;
Процедура Свойство() Экспорт
Сообщить(?(
Переключатель1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Переключатель1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Переключатель1 = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Переключатель1.Стиль.Ширина = 100;
Переключатель1.Стиль.Высота = 50;
Переключатель1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Переключатель1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Подпись_свойство.os
Перем ДФ, Подпись1;
Процедура Свойство() Экспорт
Сообщить(?(
Подпись1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Подпись1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Подпись1 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Подпись1.Стиль.Ширина = 100;
Подпись1.Стиль.Высота = 50;
Подпись1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Подпись1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ПодстрочныйТекст1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодстрочныйТекст1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ПодстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПодстрочныйТекст1.Стиль.Ширина = 100;
ПодстрочныйТекст1.Стиль.Высота = 50;
ПодстрочныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ПодстрочныйТекст1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ПодчеркнутыйТекст1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодчеркнутыйТекст1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ПодчеркнутыйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПодчеркнутыйТекст1.Стиль.Ширина = 100;
ПодчеркнутыйТекст1.Стиль.Высота = 50;
ПодчеркнутыйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ПодчеркнутыйТекст1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ПолеПоиска1 = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеПоиска1.Стиль.Ширина = 100;
ПолеПоиска1.Стиль.Высота = 50;
ПолеПоиска1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ПолеПоиска1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ПолеТекста1 = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеТекста1.Стиль.Ширина = 100;
ПолеТекста1.Стиль.Высота = 50;
ПолеТекста1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ПолеТекста1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ПолеЧисла1 = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеЧисла1.Стиль.Ширина = 100;
ПолеЧисла1.Стиль.Высота = 50;
ПолеЧисла1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ПолеЧисла1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Ползунок1 = Форма1.ДобавитьДочерний(ДФ.Ползунок());
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ползунок1.Стиль.Ширина = 100;
Ползунок1.Стиль.Высота = 50;
Ползунок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Ползунок1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
РаскрываемыйБлок1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(РаскрываемыйБлок1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
РаскрываемыйБлок1.Стиль.Ширина = 100;
РаскрываемыйБлок1.Стиль.Высота = 50;
РаскрываемыйБлок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
РаскрываемыйБлок1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Результат_свойство.os
Перем ДФ, Результат1;
Процедура Свойство() Экспорт
Сообщить(?(
Результат1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Результат1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Результат1 = Форма1.ДобавитьДочерний(ДФ.Результат());
Результат1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Результат1.Стиль.Ширина = 100;
Результат1.Стиль.Высота = 50;
Результат1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Результат1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ссылка1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Ссылка1 = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ссылка1.Стиль.Ширина = 100;
Ссылка1.Стиль.Высота = 50;
Ссылка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Ссылка1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Сообщить(?(
Таблица1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Таблица1.Стиль.Ширина = 100;
Таблица1.Стиль.Высота = 50;
Таблица1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Таблица1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
УдаленыйТекст1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УдаленыйТекст1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
УдаленыйТекст1 = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
УдаленыйТекст1.Стиль.Ширина = 100;
УдаленыйТекст1.Стиль.Высота = 50;
УдаленыйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
УдаленыйТекст1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Свойство() Экспорт
Сообщить(?(
Флажок1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Флажок1 = Форма1.ДобавитьДочерний(ДФ.Флажок());
Флажок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Флажок1.Стиль.Ширина = 100;
Флажок1.Стиль.Высота = 50;
Флажок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Флажок1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ФорматированныйТекст1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
ФорматированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ФорматированныйТекст1.Стиль.Ширина = 100;
ФорматированныйТекст1.Стиль.Высота = 50;
ФорматированныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ФорматированныйТекст1.Перетаскиваемый = Истина;
Форма1.Открыть();
Перетаскиваемый_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Свойство() Экспорт
Сообщить(?(
Шкала1.Перетаскиваемый
, "", "!!! ") + "Перетаскиваемый_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Шкала1, "Перетаскиваемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 150;
Шкала1 = Форма1.ДобавитьДочерний(ДФ.Шкала());
Шкала1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Шкала1.Стиль.Ширина = 100;
Шкала1.Стиль.Высота = 50;
Шкала1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Шкала1.Перетаскиваемый = Истина;
Форма1.Открыть();
Переход_Стиль_свойство.os
Перем ДФ, Блок1, Переход1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Переход = "width 1500ms ease-out 200ms, height"
, "", "!!! ") + "Переход_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Переход", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура МышьНадЭлементом() Экспорт
Блок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 200;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Блок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.Высота = 100;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.Высота = 100;
Блок1.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Красный);
Блок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Блок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Переход1 = ДФ.Переход();
Переход1.СвойствоПерехода = "Ширина, Высота";
Переход1.ВремяПерехода = 1500;
Переход1.ФункцияПерехода = ДФ.ФункцияПерехода.МедленноВконце;
Переход1.ЗадержкаПерехода = 200;
Блок1.Стиль.Переход = Переход1;
Форма1.Открыть();
Перспектива_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Перспектива = "200px"
, "", "!!! ") + "Перспектива_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Перспектива", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 500;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Отступ = ДФ.Отступ(, , , , Истина);
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Стиль.Перспектива = 200;
Блок1.Текст = "Блок1";
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Заполнение = ДФ.Заполнение(50, 50, 50, 50);
Блок2.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Блок2.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Блок2.Стиль.Сдвиг = ДФ.ПоворотИкс(45);
Блок2.Текст = "Алиса как можно вежливее объяснила, что немного заблудилась, а теперь разобралась, что к чему и что куда, и идет себе своей дорогой.";
Форма1.Открыть();
Пи_Математика_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().Пи = 3.14159265358979
, "", "!!! ") + "Пи_Математика_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().Пи;
Форма1.Открыть();
Повернуть_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "Повернуть_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.Повернуть(20 * ДФ.Математика().Пи / 180);
Контекст2d1.ЗаполнитьПрямоугольник(50, 20, 100, 50);
Форма1.Открыть();
ПоворотОттенка_ФильтрИзображений_свойство.os
Перем ДФ, ФильтрИзображений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ФильтрИзображений1.ПоворотОттенка = 30
, "", "!!! ") + "ПоворотОттенка_ФильтрИзображений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Изображение1 = ДФ.Изображение();
Форма1.ДобавитьДочерний(Изображение1);
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Стиль.Ширина = 200;
ФильтрИзображений1 = ДФ.ФильтрИзображений();
ФильтрИзображений1.ПоворотОттенка = 30;
Изображение1.Стиль.Фильтр = ФильтрИзображений1;
Форма1.Открыть();
Повтор_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Аудио1.Повтор
, "", "!!! ") + "Повтор_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "Повтор", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Повтор = Истина;
Форма1.Открыть();
Подменю_ЭлементМеню_свойство.os
Перем ДФ, Открыть, ПодменюОткрыть;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Открыть.Подменю = ПодменюОткрыть
, "", "!!! ") + "Подменю_ЭлементМеню_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ГлавноеМеню = ДФ.Меню(ДФ.ТипМеню.Главное);
ПодменюМенюФайл = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюФайл = ДФ.ЭлементМеню("Файл", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюФайл);
Открыть = ДФ.ЭлементМеню("Открыть", ДФ.ТипЭлементаМеню.Стандартный);
ПодменюОткрыть = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
ТХТ = ДФ.ЭлементМеню("txt");
ДОК = ДФ.ЭлементМеню("doc");
ПодменюОткрыть.Добавить(ТХТ);
ПодменюОткрыть.Добавить(ДОК);
Открыть.Подменю = ПодменюОткрыть;
// Сообщить("Открыть.Подменю = " + Открыть.Подменю);
Сохранить = ДФ.ЭлементМеню("Сохранить");
Разделитель1 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Настройки = ДФ.ЭлементМеню("Настройки");
Разделитель2 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Выход = ДФ.ЭлементМеню("Выход");
ПодменюМенюФайл.Добавить(Открыть);
ПодменюМенюФайл.Добавить(Сохранить);
ПодменюМенюФайл.Добавить(Разделитель1);
ПодменюМенюФайл.Добавить(Настройки);
ПодменюМенюФайл.Добавить(Разделитель2);
ПодменюМенюФайл.Добавить(Выход);
ПодменюМенюПравка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюПравка = ДФ.ЭлементМеню("Правка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюПравка);
Отмена = ДФ.ЭлементМеню("Отмена");
Повтор = ДФ.ЭлементМеню("Повтор");
ПодменюМенюПравка.Добавить(Отмена);
ПодменюМенюПравка.Добавить(Повтор);
ПодменюМенюСправка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюСправка = ДФ.ЭлементМеню("Справка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюСправка);
ОПрограмме = ДФ.ЭлементМеню("О программе");
ПодменюМенюСправка.Добавить(ОПрограмме);
ГлавноеМеню.Добавить(МенюФайл);
ГлавноеМеню.Добавить(МенюПравка);
ГлавноеМеню.Добавить(МенюСправка);
Форма1.Меню = ГлавноеМеню;
Форма1.Открыть();
Подсказка_Лоток_свойство.os
Перем ДФ, Лоток1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Лоток1.Подсказка = "Подсказка"
, "", "!!! ") + "Подсказка_Лоток_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Лоток1_Нажатие() Экспорт
Сообщить("Лоток1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Лоток1 = ДФ.Лоток();
Лоток1.Заголовок = "Заголовок";
Лоток1.Подсказка = "Подсказка";
Лоток1.Значок = "icon.png";
Лоток1.Нажатие = ДФ.Действие(ЭтотОбъект, "Лоток1_Нажатие");
Форма1.Открыть();
Подсказка_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ссылка1.Подсказка = "Сценарный язык"
, "", "!!! ") + "Подсказка_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "Подсказка", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ссылка1 = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка1.Адрес = "https://oscript.io/";
Ссылка1.Текст = "Инструмент автоматизации для специалистов по 1С";
Ссылка1.Подсказка = "Сценарный язык";
Форма1.Открыть();
Позиция_Индикатор_свойство.os
Перем ДФ, Индикатор1;
Процедура Свойство() Экспорт
Сообщить(?(
Индикатор1.Позиция = 75
, "", "!!! ") + "Позиция_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Индикатор1, "Позиция", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Индикатор1 = ДФ.Индикатор();
Форма1.ДобавитьДочерний(Индикатор1);
Индикатор1.Значение = 75;
Индикатор1.Максимум = 100;
Форма1.Открыть();
Позиция_ОкноСообщений_свойство.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + ОкноСообщений1.Позиция = "ДфТочка"
, "", "!!! ") + "Позиция_ОкноСообщений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.Позиция = ДФ.Точка(55, 100);
ОкноСообщений1.Показать();
Форма1.Открыть();
Позиция_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Позиция = ДФ.Позиция.Абсолютно
, "", "!!! ") + "Позиция_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Позиция", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Абзац1";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 300;
Блок1.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Блок1.Стиль.Верх = 48;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Блок1;
Абзац1.Текст = "И снова лодочка скользит
|Неслышно по волнам,
|И солнце в зелени сквозит,
|Слетает сказка к нам.
|Как драгоценность берегу
|Тот день и нас на берегу.";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Форма1.Открыть();
Позиция_Форма_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Позиция_Форма_свойство.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Контент.Текст = "Позиция формы должна быть ДФ.ПозицияФормы.Центр";
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Открыть();
ПозицияОбъекта_Стиль_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.Стиль.ПозицияОбъекта = "20px 10px"
, "", "!!! ") + "ПозицияОбъекта_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1.Стиль, "ПозицияОбъекта", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Изображение1 = ДФ.Изображение();
Форма1.ДобавитьДочерний(Изображение1);
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Ширина = 300;
Изображение1.Высота = 200;
Изображение1.Стиль.ВписываниеОбъекта = ДФ.ВписываниеОбъекта.Накрыть;
Изображение1.Стиль.Границы = ДФ.Границы(5, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Изображение1.Стиль.ПозицияОбъекта = ДФ.Точка(20, 10);
Форма1.Открыть();
ПозицияСтиляСписка_Стиль_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.Стиль.ПозицияСтиляСписка = ДФ.ПозицияСтиляСписка.Внутри
, "", "!!! ") + "ПозицияСтиляСписка_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1.Стиль, "ПозицияСтиляСписка", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
РаскрываемыйБлок1.ДобавитьДочерний(ЗаголовокРаскрываемогоБлока1);
ЗаголовокРаскрываемогоБлока1.Текст = "Жители деревни Простоквашино";
НеупорядоченныйСписок1 = РаскрываемыйБлок1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
ЭлементСписка1 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Кот Матроскин";
ЭлементСписка2 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка2.Текст = "Пёс Шарик";
ЭлементСписка3 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка3.Текст = "Птица Галчонок";
НеупорядоченныйСписок1.Стиль.КартинкаСтиляСписка = "icon.png";
РаскрываемыйБлок1.Открыт = Истина;
НеупорядоченныйСписок1.Стиль.ПозицияСтиляСписка = ДФ.ПозицияСтиляСписка.Внутри;
Форма1.Открыть();
ПозицияСтиляСписка_СтильСписка_свойство.os
Перем ДФ, СтильСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СтильСписка1.ПозицияСтиляСписка = ДФ.ПозицияСтиляСписка.Внутри
, "", "!!! ") + "ПозицияСтиляСписка_СтильСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 400;
СтильСписка1 = ДФ.СтильСписка();
СтильСписка1.ТипСтиляСписка = ДФ.ТипСтиляСписка.ЗакрашенныйКруг;
СтильСписка1.ПозицияСтиляСписка = ДФ.ПозицияСтиляСписка.Внутри;
СтильСписка1.КартинкаСтиляСписка = "icon.png";
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
РаскрываемыйБлок1.ДобавитьДочерний(ЗаголовокРаскрываемогоБлока1);
ЗаголовокРаскрываемогоБлока1.Текст = "Жители деревни Простоквашино";
НеупорядоченныйСписок1 = РаскрываемыйБлок1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
ЭлементСписка1 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Кот Матроскин";
ЭлементСписка2 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка2.Текст = "Пёс Шарик";
ЭлементСписка3 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка3.Текст = "Птица Галчонок";
НеупорядоченныйСписок1.Стиль.СтильСписка = СтильСписка1;
Форма1.Открыть();
Показать_Диалог_метод.os
Перем ДФ, Диалог1;
Процедура Свойство() Экспорт
Сообщить(?(
Диалог1.Открыт
, "", "!!! ") + "Показать_Диалог_метод.os.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "Открыт", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Стиль.ЦветФона = ДФ.Цвет("Бежевый");
Диалог1.Показать();
Форма1.Открыть();
Показать_Меню_метод.os
Перем ДФ, МенюСправка;
Перем ГлавноеМеню;
Процедура Абзац1_ПриОтпусканииМыши() Экспорт
Если ДФ.АргументыСобытия.Кнопка = ДФ.КнопкиМыши.Правая Тогда
ГлавноеМеню.Показать(ДФ.АргументыСобытия.Икс, ДФ.АргументыСобытия.Игрек);
КонецЕсли;
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + МенюСправка = "ДфЭлементМеню"
, "", "!!! ") + "Показать_Меню_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГлавноеМеню = ДФ.Меню(ДФ.ТипМеню.Контекстное);
ПодменюМенюФайл = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюФайл = ДФ.ЭлементМеню("Файл", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюФайл);
Открыть = ДФ.ЭлементМеню("Открыть", ДФ.ТипЭлементаМеню.Стандартный);
Сохранить = ДФ.ЭлементМеню("Сохранить");
Разделитель1 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Настройки = ДФ.ЭлементМеню("Настройки");
Разделитель2 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Выход = ДФ.ЭлементМеню("Выход");
ПодменюМенюФайл.Добавить(Открыть);
ПодменюМенюФайл.Добавить(Сохранить);
ПодменюМенюФайл.Добавить(Разделитель1);
ПодменюМенюФайл.Добавить(Настройки);
ПодменюМенюФайл.Добавить(Разделитель2);
ПодменюМенюФайл.Добавить(Выход);
ПодменюМенюПравка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюПравка = ДФ.ЭлементМеню("Правка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюПравка);
Отмена = ДФ.ЭлементМеню("Отмена");
Повтор = ДФ.ЭлементМеню("Повтор");
ПодменюМенюПравка.Добавить(Отмена);
ПодменюМенюПравка.Добавить(Повтор);
ПодменюМенюСправка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюСправка = ДФ.ЭлементМеню("Справка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюСправка);
ОПрограмме = ДФ.ЭлементМеню("О программе");
ПодменюМенюСправка.Добавить(ОПрограмме);
ГлавноеМеню.Добавить(МенюФайл);
ГлавноеМеню.Добавить(МенюПравка);
ГлавноеМеню.Добавить(МенюСправка);
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Кликни правой кнопкой мыши по абзацу.";
Абзац1.Стиль.Высота = 400;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "Абзац1_ПриОтпусканииМыши");
Форма1.Открыть();
Показать_ОкноСообщений_метод.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Показать_ОкноСообщений_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.Показать();
Форма1.Открыть();
Показать_Уведомления_метод.os
Перем ДФ, Уведомления1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Показать_Уведомления_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Форма1.Открыть();
Показать_Форма_свойство.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Показать_Форма_свойство.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Контент.Текст = "Форма показана, можно закрывать";
Форма1.Показать = Истина;
Форма1.Открыть();
ПоказатьВПанели_Форма_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "ПоказатьВПанели_Форма_свойство.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Контент.Текст = "Форма1.ПоказатьВПанели = Ложь";
Форма1.ПоказатьВПанели = Ложь;
Форма1.Открыть();
ПоказатьМодально_Диалог_метод.os
Перем ДФ, Диалог1;
Процедура Свойство() Экспорт
Сообщить(?(
Диалог1.Открыт
, "", "!!! ") + "ПоказатьМодально_Диалог_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "Открыт", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Стиль.ЦветФона = ДФ.Цвет("Бежевый");
Диалог1.ПоказатьМодально();
Форма1.Открыть();
Полноэкранный_Форма_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Полноэкранный_Форма_свойство.os" + " " + ТекущаяДата());
Приостановить(5000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Контент.Текст = "Форма1.Полноэкранный = Истина";
Форма1.Полноэкранный = Истина;
Форма1.Открыть();
ПоложениеЗаголовка_Стиль_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Сообщить(?(
Таблица1.Стиль.ПоложениеЗаголовка = ДФ.ПоложениеЗаголовка.Низ
, "", "!!! ") + "ПоложениеЗаголовка_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1.Стиль, "ПоложениеЗаголовка", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
Таблица1.Стиль.ПоложениеЗаголовка = ДФ.ПоложениеЗаголовка.Низ;
Форма1.Открыть();
ПоложениеЗет_ТочкаСдвига_свойство.os
Перем ДФ, ТочкаСдвига1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ТочкаСдвига1.ПоложениеЗет = 40
, "", "!!! ") + "ПоложениеЗет_ТочкаСдвига_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ТочкаСдвига1 = ДФ.ТочкаСдвига();
ТочкаСдвига1.ПоложениеИкс = 20;
ТочкаСдвига1.ПоложениеИгрек = 30;
ТочкаСдвига1.ПоложениеЗет = 40;
Форма1.Открыть();
ПоложениеИгрек_ТочкаСдвига_свойство.os
Перем ДФ, ТочкаСдвига1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ТочкаСдвига1.ПоложениеИгрек = 30
, "", "!!! ") + "ПоложениеИгрек_ТочкаСдвига_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ТочкаСдвига1 = ДФ.ТочкаСдвига();
ТочкаСдвига1.ПоложениеИкс = 20;
ТочкаСдвига1.ПоложениеИгрек = 30;
ТочкаСдвига1.ПоложениеЗет = 40;
Форма1.Открыть();
ПоложениеИкс_ТочкаСдвига_свойство.os
Перем ДФ, ТочкаСдвига1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ТочкаСдвига1.ПоложениеИкс = 20
, "", "!!! ") + "ПоложениеИкс_ТочкаСдвига_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ТочкаСдвига1 = ДФ.ТочкаСдвига();
ТочкаСдвига1.ПоложениеИкс = 20;
ТочкаСдвига1.ПоложениеИгрек = 30;
ТочкаСдвига1.ПоложениеЗет = 40;
Форма1.Открыть();
ПоложениеКартинки_Стиль_свойство.os
Перем ДФ, Контент, Фон1;
Процедура Свойство() Экспорт
Сообщить(?(
Контент.Стиль.ПоложениеКартинки = "right top"
, "", "!!! ") + "ПоложениеКартинки_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Контент.Стиль, "ПоложениеКартинки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Контент.Стиль.ФоновоеВложение = ДФ.ФоновоеВложение.Фиксировано;
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Контент.Стиль.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент = Форма1.Контент;
Кнопка1 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "ФоновоеВложение = Фиксировано";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "ФоновоеВложение = Прокрутка";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка2.Стиль.ОтступСлева = 25;
Для А = 0 По 15 Цикл
Контент.ДобавитьДочерний(ДФ.Абзац()).Текст = "Алиса и сама не заметила, как очутилась на каминной полке.";
Контент.ДобавитьДочерний(ДФ.Перенос());
Контент.ДобавитьДочерний(ДФ.Перенос());
КонецЦикла;
Контент.Стиль.ЦветФона = ДФ.Цвет(243, 243, 243);
Контент.Стиль.ФоновоеИзображение = "img_flwr.gif";
Контент.Стиль.МозаикаКартинки = ДФ.МозаикаКартинки.НеПовторять;
Контент.Стиль.ПоложениеКартинки = ДФ.ПоложениеКартинки.ВерхПраво;
Контент.Стиль.ОбластьКартинки = ДФ.ОбластьКартинки.Содержимое;
Контент.Стиль.ОбластьРисования = ДФ.ОбластьРисования.Содержимое;
Контент.Стиль.РазмерКартинки = ДФ.Размер(400, 400);
Контент.Стиль.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Форма1.Открыть();
ПоложениеКартинки_Фон_свойство.os
Перем ДФ, Контент, Фон1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Фон1.ПоложениеКартинки = ДФ.ПоложениеКартинки.ВерхПраво
, "", "!!! ") + "ПоложениеКартинки_Фон_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Фиксировано;
Контент.Стиль.Фон = Фон1;
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Контент.Стиль.Фон = Фон1;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент = Форма1.Контент;
Кнопка1 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "ФоновоеВложение = Фиксировано";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "ФоновоеВложение = Прокрутка";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка2.Стиль.ОтступСлева = 25;
Для А = 0 По 15 Цикл
Контент.ДобавитьДочерний(ДФ.Абзац()).Текст = "Алиса и сама не заметила, как очутилась на каминной полке.";
Контент.ДобавитьДочерний(ДФ.Перенос());
Контент.ДобавитьДочерний(ДФ.Перенос());
КонецЦикла;
Фон1 = ДФ.Фон();
Фон1.ЦветФона = ДФ.Цвет(243, 243, 243);
Фон1.ФоновоеИзображение = "img_flwr.gif";
Фон1.МозаикаКартинки = ДФ.МозаикаКартинки.НеПовторять;
Фон1.ПоложениеКартинки = ДФ.ПоложениеКартинки.ВерхПраво;
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Контент.Стиль.Фон = Фон1;
Форма1.Открыть();
ПолучитьСвойство_ДекларативныеФормы_метод.os
Перем ДФ, Кнопка5;
Процедура Свойство() Экспорт
Сообщить(?(
Кнопка5.СмещениеЛево > 0
, "", "!!! ") + "ПолучитьСвойство_ДекларативныеФормы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка5, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Кнопка5 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка5.Текст = "Объект";
Кнопка5.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Форма1.Открыть();
ПоместитьДанныеРисунка_Контекст2d_метод.os
Перем ДФ, ДанныеРисунка2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДанныеРисунка2.Цвет = ДФ.Цвет.Синий
, "", "!!! ") + "ПоместитьДанныеРисунка_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 650;
Холст1.Высота = 550;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
ДанныеРисунка1 = Контекст2d1.СоздатьДанныеРисунка(600, 500);
ДанныеРисунка2 = Контекст2d1.СоздатьДанныеРисунка(ДанныеРисунка1);
ДанныеРисунка2.Цвет = ДФ.Цвет.Синий;
Контекст2d1.ПоместитьДанныеРисунка(ДанныеРисунка2, 10, 10);
Форма1.Открыть();
Помечен_АргументыСобытия_свойство.os
Перем ДФ, Флажок1;
Процедура Флажок1_ПриИзменении() Экспорт
// Сообщить("ДФ.АргументыСобытия.Помечен = " + ДФ.АргументыСобытия.Помечен);
// Сообщить("Флажок1.Помечен = " + Флажок1.Помечен);
Сообщить(?(
ДФ.АргументыСобытия.Помечен
, "", "!!! ") + "Помечен_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Отметь флажок";
Флажок1 = Форма1.ДобавитьДочерний(ДФ.Флажок());
Флажок1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "Флажок1_ПриИзменении");
Форма1.Открыть();
Помечен_Переключатель_свойство.os
Перем ДФ, Переключатель1;
Процедура Свойство() Экспорт
Сообщить(?(
Переключатель1.Помечен
, "", "!!! ") + "Помечен_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Переключатель1, "Помечен", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ДополнительныйБлок1 = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
Переключатель1 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель1.Имя = "тумблер";
Переключатель1.Идентификатор = "тум1";
Подпись1 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Текст = "тумблер1";
Перенос1 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Перенос());
Переключатель2 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель2.Имя = "тумблер";
Переключатель2.Идентификатор = "тум2";
Подпись2 = ДополнительныйБлок1.ДобавитьДочерний(ДФ.Подпись());
Подпись2.Текст = "тумблер2";
Переключатель1.Помечен = Истина;
Форма1.Открыть();
Помечен_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Свойство() Экспорт
Сообщить(?(
Флажок1.Помечен
, "", "!!! ") + "Помечен_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "Помечен", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Флажок1 = Форма1.ДобавитьДочерний(ДФ.Флажок());
Подпись1 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Текст = "Флажок1";
Флажок1.Помечен = Истина;
Форма1.Открыть();
Помечен_ЭлементМеню_свойство.os
Перем ДФ, Сохранить;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Сохранить.Помечен
, "", "!!! ") + "Помечен_ЭлементМеню_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ГлавноеМеню = ДФ.Меню(ДФ.ТипМеню.Главное);
ПодменюМенюФайл = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюФайл = ДФ.ЭлементМеню("Файл", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюФайл);
Открыть = ДФ.ЭлементМеню("Открыть", ДФ.ТипЭлементаМеню.Стандартный);
ПодменюОткрыть = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
ТХТ = ДФ.ЭлементМеню("txt");
ДОК = ДФ.ЭлементМеню("doc");
ПодменюОткрыть.Добавить(ТХТ);
ПодменюОткрыть.Добавить(ДОК);
Открыть.Подменю = ПодменюОткрыть;
Сохранить = ДФ.ЭлементМеню("Сохранить", ДФ.ТипЭлементаМеню.Флажок);
Сохранить.Помечен = Истина;
Разделитель1 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Настройки = ДФ.ЭлементМеню("Настройки");
Разделитель2 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Выход = ДФ.ЭлементМеню("Выход");
ПодменюМенюФайл.Добавить(Открыть);
ПодменюМенюФайл.Добавить(Сохранить);
ПодменюМенюФайл.Добавить(Разделитель1);
ПодменюМенюФайл.Добавить(Настройки);
ПодменюМенюФайл.Добавить(Разделитель2);
ПодменюМенюФайл.Добавить(Выход);
ПодменюМенюПравка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюПравка = ДФ.ЭлементМеню("Правка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюПравка);
Отмена = ДФ.ЭлементМеню("Отмена");
Повтор = ДФ.ЭлементМеню("Повтор");
ПодменюМенюПравка.Добавить(Отмена);
ПодменюМенюПравка.Добавить(Повтор);
ПодменюМенюСправка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюСправка = ДФ.ЭлементМеню("Справка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюСправка);
ОПрограмме = ДФ.ЭлементМеню("О программе");
ПодменюМенюСправка.Добавить(ОПрограмме);
ГлавноеМеню.Добавить(МенюФайл);
ГлавноеМеню.Добавить(МенюПравка);
ГлавноеМеню.Добавить(МенюСправка);
Форма1.Меню = ГлавноеМеню;
Форма1.Открыть();
ПортСервераОтправки_ДекларативныеФормы_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.ПортСервераОтправки = 4020
, "", "!!! ") + "ПортСервераОтправки_ДекларативныеФормы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
ДФ.ПортСервераПриема = 4000;
ДФ.ПортСервераОтправки = 4020;
Форма1.Открыть();
ПортСервераПриема_ДекларативныеФормы_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.ПортСервераПриема = 4000
, "", "!!! ") + "ПортСервераПриема_ДекларативныеФормы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
ДФ.ПортСервераПриема = 4000;
ДФ.ПортСервераОтправки = 4020;
Форма1.Открыть();
Порядок_Стиль_свойство.os
Перем ДФ, Блок2;
Процедура Свойство() Экспорт
Сообщить(?(
Блок2.Стиль.Порядок = 4
, "", "!!! ") + "Порядок_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок2.Стиль, "Порядок", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет(0, 0, 0));
Блок1.Стиль.Отображать = ДФ.Отображать.Гибкий;
Стиль1 = ДФ.Стиль();
Стиль1.Ширина = 70;
Стиль1.Высота = 70;
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль = Стиль1;
Блок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Блок3 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок3.Стиль = Стиль1;
Блок3.Стиль.ЦветФона = ДФ.Цвет.Синий;
Блок4 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок4.Стиль = Стиль1;
Блок4.Стиль.ЦветФона = ДФ.Цвет.Зеленый;
Блок5 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок5.Стиль = Стиль1;
Блок5.Стиль.ЦветФона = ДФ.Цвет.Желтый;
Блок2.Стиль.Порядок = 4;
Блок3.Стиль.Порядок = 3;
Блок4.Стиль.Порядок = 2;
Блок5.Стиль.Порядок = 1;
Форма1.Открыть();
ПорядокОбхода_Абзац_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Абзац1";
Абзац1.ПорядокОбхода = 1;
Абзац2 = ДФ.Абзац();
Абзац2.Родитель = Форма1;
Абзац2.Текст = "Абзац2";
Абзац2.ПорядокОбхода = 3;
Абзац3 = ДФ.Абзац();
Абзац3.Родитель = Форма1;
Абзац3.Текст = "Абзац3";
Абзац3.ПорядокОбхода = 2;
Абзац4 = ДФ.Абзац();
Абзац4.Родитель = Форма1;
Абзац4.Текст = "Абзац4";
Абзац4.ПорядокОбхода = 4;
Абзац5 = ДФ.Абзац();
Абзац5.Родитель = Форма1;
Абзац5.Текст = "Абзац5";
Абзац5.ПорядокОбхода = 6;
Абзац6 = ДФ.Абзац();
Абзац6.Родитель = Форма1;
Абзац6.Текст = "Абзац6";
Абзац6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Артикль_свойство.os
Перем ДФ, Артикль1;
Процедура Свойство() Экспорт
Сообщить(?(
Артикль1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Артикль1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Текст = "Артикль1";
Артикль1.ПорядокОбхода = 1;
Артикль2 = ДФ.Артикль();
Артикль2.Родитель = Форма1;
Артикль2.Текст = "Артикль2";
Артикль2.ПорядокОбхода = 3;
Артикль3 = ДФ.Артикль();
Артикль3.Родитель = Форма1;
Артикль3.Текст = "Артикль3";
Артикль3.ПорядокОбхода = 2;
Артикль4 = ДФ.Артикль();
Артикль4.Родитель = Форма1;
Артикль4.Текст = "Артикль4";
Артикль4.ПорядокОбхода = 4;
Артикль5 = ДФ.Артикль();
Артикль5.Родитель = Форма1;
Артикль5.Текст = "Артикль5";
Артикль5.ПорядокОбхода = 6;
Артикль6 = ДФ.Артикль();
Артикль6.Родитель = Форма1;
Артикль6.Текст = "Артикль6";
Артикль6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Аудио1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.ПорядокОбхода = 1;
Аудио2 = ДФ.Аудио();
Аудио2.Родитель = Форма1;
Аудио2.ПорядокОбхода = 3;
Аудио3 = ДФ.Аудио();
Аудио3.Родитель = Форма1;
Аудио3.ПорядокОбхода = 2;
Аудио4 = ДФ.Аудио();
Аудио4.Родитель = Форма1;
Аудио4.ПорядокОбхода = 4;
Аудио5 = ДФ.Аудио();
Аудио5.Родитель = Форма1;
Аудио5.ПорядокОбхода = 6;
Аудио6 = ДФ.Аудио();
Аудио6.Родитель = Форма1;
Аудио6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Блок_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Блок1";
Блок1.ПорядокОбхода = 1;
Блок2 = ДФ.Блок();
Блок2.Родитель = Форма1;
Блок2.Текст = "Блок2";
Блок2.ПорядокОбхода = 3;
Блок3 = ДФ.Блок();
Блок3.Родитель = Форма1;
Блок3.Текст = "Блок3";
Блок3.ПорядокОбхода = 2;
Блок4 = ДФ.Блок();
Блок4.Родитель = Форма1;
Блок4.Текст = "Блок4";
Блок4.ПорядокОбхода = 4;
Блок5 = ДФ.Блок();
Блок5.Родитель = Форма1;
Блок5.Текст = "Блок5";
Блок5.ПорядокОбхода = 6;
Блок6 = ДФ.Блок();
Блок6.Родитель = Форма1;
Блок6.Текст = "Блок6";
Блок6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.ПорядокОбхода = 1;
ВыборВремени2 = ДФ.ВыборВремени();
ВыборВремени2.Родитель = Форма1;
ВыборВремени2.ПорядокОбхода = 3;
ВыборВремени3 = ДФ.ВыборВремени();
ВыборВремени3.Родитель = Форма1;
ВыборВремени3.ПорядокОбхода = 2;
ВыборВремени4 = ДФ.ВыборВремени();
ВыборВремени4.Родитель = Форма1;
ВыборВремени4.ПорядокОбхода = 4;
ВыборВремени5 = ДФ.ВыборВремени();
ВыборВремени5.Родитель = Форма1;
ВыборВремени5.ПорядокОбхода = 6;
ВыборВремени6 = ДФ.ВыборВремени();
ВыборВремени6.Родитель = Форма1;
ВыборВремени6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.ПорядокОбхода = 1;
ВыборДаты2 = ДФ.ВыборДаты();
ВыборДаты2.Родитель = Форма1;
ВыборДаты2.ПорядокОбхода = 3;
ВыборДаты3 = ДФ.ВыборДаты();
ВыборДаты3.Родитель = Форма1;
ВыборДаты3.ПорядокОбхода = 2;
ВыборДаты4 = ДФ.ВыборДаты();
ВыборДаты4.Родитель = Форма1;
ВыборДаты4.ПорядокОбхода = 4;
ВыборДаты5 = ДФ.ВыборДаты();
ВыборДаты5.Родитель = Форма1;
ВыборДаты5.ПорядокОбхода = 6;
ВыборДаты6 = ДФ.ВыборДаты();
ВыборДаты6.Родитель = Форма1;
ВыборДаты6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.ПорядокОбхода = 1;
ВыборДатыВремени2 = ДФ.ВыборДатыВремени();
ВыборДатыВремени2.Родитель = Форма1;
ВыборДатыВремени2.ПорядокОбхода = 3;
ВыборДатыВремени3 = ДФ.ВыборДатыВремени();
ВыборДатыВремени3.Родитель = Форма1;
ВыборДатыВремени3.ПорядокОбхода = 2;
ВыборДатыВремени4 = ДФ.ВыборДатыВремени();
ВыборДатыВремени4.Родитель = Форма1;
ВыборДатыВремени4.ПорядокОбхода = 4;
ВыборДатыВремени5 = ДФ.ВыборДатыВремени();
ВыборДатыВремени5.Родитель = Форма1;
ВыборДатыВремени5.ПорядокОбхода = 6;
ВыборДатыВремени6 = ДФ.ВыборДатыВремени();
ВыборДатыВремени6.Родитель = Форма1;
ВыборДатыВремени6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.ПорядокОбхода = 1;
ВыборМестнойДатыВремени2 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени2.Родитель = Форма1;
ВыборМестнойДатыВремени2.ПорядокОбхода = 3;
ВыборМестнойДатыВремени3 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени3.Родитель = Форма1;
ВыборМестнойДатыВремени3.ПорядокОбхода = 2;
ВыборМестнойДатыВремени4 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени4.Родитель = Форма1;
ВыборМестнойДатыВремени4.ПорядокОбхода = 4;
ВыборМестнойДатыВремени5 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени5.Родитель = Форма1;
ВыборМестнойДатыВремени5.ПорядокОбхода = 6;
ВыборМестнойДатыВремени6 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени6.Родитель = Форма1;
ВыборМестнойДатыВремени6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.ПорядокОбхода = 1;
ВыборМесяца2 = ДФ.ВыборМесяца();
ВыборМесяца2.Родитель = Форма1;
ВыборМесяца2.ПорядокОбхода = 3;
ВыборМесяца3 = ДФ.ВыборМесяца();
ВыборМесяца3.Родитель = Форма1;
ВыборМесяца3.ПорядокОбхода = 2;
ВыборМесяца4 = ДФ.ВыборМесяца();
ВыборМесяца4.Родитель = Форма1;
ВыборМесяца4.ПорядокОбхода = 4;
ВыборМесяца5 = ДФ.ВыборМесяца();
ВыборМесяца5.Родитель = Форма1;
ВыборМесяца5.ПорядокОбхода = 6;
ВыборМесяца6 = ДФ.ВыборМесяца();
ВыборМесяца6.Родитель = Форма1;
ВыборМесяца6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.ПорядокОбхода = 1;
ВыборНедели2 = ДФ.ВыборНедели();
ВыборНедели2.Родитель = Форма1;
ВыборНедели2.ПорядокОбхода = 3;
ВыборНедели3 = ДФ.ВыборНедели();
ВыборНедели3.Родитель = Форма1;
ВыборНедели3.ПорядокОбхода = 2;
ВыборНедели4 = ДФ.ВыборНедели();
ВыборНедели4.Родитель = Форма1;
ВыборНедели4.ПорядокОбхода = 4;
ВыборНедели5 = ДФ.ВыборНедели();
ВыборНедели5.Родитель = Форма1;
ВыборНедели5.ПорядокОбхода = 6;
ВыборНедели6 = ДФ.ВыборНедели();
ВыборНедели6.Родитель = Форма1;
ВыборНедели6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборФайла1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.ПорядокОбхода = 1;
ВыборФайла2 = ДФ.ВыборФайла();
ВыборФайла2.Родитель = Форма1;
ВыборФайла2.ПорядокОбхода = 3;
ВыборФайла3 = ДФ.ВыборФайла();
ВыборФайла3.Родитель = Форма1;
ВыборФайла3.ПорядокОбхода = 2;
ВыборФайла4 = ДФ.ВыборФайла();
ВыборФайла4.Родитель = Форма1;
ВыборФайла4.ПорядокОбхода = 4;
ВыборФайла5 = ДФ.ВыборФайла();
ВыборФайла5.Родитель = Форма1;
ВыборФайла5.ПорядокОбхода = 6;
ВыборФайла6 = ДФ.ВыборФайла();
ВыборФайла6.Родитель = Форма1;
ВыборФайла6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборЦвета1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборЦвета1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.ПорядокОбхода = 1;
ВыборЦвета2 = ДФ.ВыборЦвета();
ВыборЦвета2.Родитель = Форма1;
ВыборЦвета2.ПорядокОбхода = 3;
ВыборЦвета3 = ДФ.ВыборЦвета();
ВыборЦвета3.Родитель = Форма1;
ВыборЦвета3.ПорядокОбхода = 2;
ВыборЦвета4 = ДФ.ВыборЦвета();
ВыборЦвета4.Родитель = Форма1;
ВыборЦвета4.ПорядокОбхода = 4;
ВыборЦвета5 = ДФ.ВыборЦвета();
ВыборЦвета5.Родитель = Форма1;
ВыборЦвета5.ПорядокОбхода = 6;
ВыборЦвета6 = ДФ.ВыборЦвета();
ВыборЦвета6.Родитель = Форма1;
ВыборЦвета6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Группа_свойство.os
Перем ДФ, Группа1;
Процедура Свойство() Экспорт
Сообщить(?(
Группа1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Группа1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Текст = "Группа1";
Группа1.ПорядокОбхода = 1;
Группа2 = ДФ.Группа();
Группа2.Родитель = Форма1;
Группа2.Текст = "Группа2";
Группа2.ПорядокОбхода = 3;
Группа3 = ДФ.Группа();
Группа3.Родитель = Форма1;
Группа3.Текст = "Группа3";
Группа3.ПорядокОбхода = 2;
Группа4 = ДФ.Группа();
Группа4.Родитель = Форма1;
Группа4.Текст = "Группа4";
Группа4.ПорядокОбхода = 4;
Группа5 = ДФ.Группа();
Группа5.Родитель = Форма1;
Группа5.Текст = "Группа5";
Группа5.ПорядокОбхода = 6;
Группа6 = ДФ.Группа();
Группа6.Родитель = Форма1;
Группа6.Текст = "Группа6";
Группа6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ГруппаКолонок_свойство.os
Перем ДФ, ГруппаКолонок1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппаКолонок1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ГруппаКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппаКолонок1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Форма1;
ГруппаКолонок1.ПорядокОбхода = 1;
ГруппаКолонок2 = ДФ.ГруппаКолонок();
ГруппаКолонок2.Родитель = Форма1;
ГруппаКолонок2.ПорядокОбхода = 3;
ГруппаКолонок3 = ДФ.ГруппаКолонок();
ГруппаКолонок3.Родитель = Форма1;
ГруппаКолонок3.ПорядокОбхода = 2;
ГруппаКолонок4 = ДФ.ГруппаКолонок();
ГруппаКолонок4.Родитель = Форма1;
ГруппаКолонок4.ПорядокОбхода = 4;
ГруппаКолонок5 = ДФ.ГруппаКолонок();
ГруппаКолонок5.Родитель = Форма1;
ГруппаКолонок5.ПорядокОбхода = 6;
ГруппаКолонок6 = ДФ.ГруппаКолонок();
ГруппаКолонок6.Родитель = Форма1;
ГруппаКолонок6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ГруппировкаПоляСписка_свойство.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ГруппировкаПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппировкаПоляСписка1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.ПорядокОбхода = 1;
ГруппировкаПоляСписка2 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка2.Родитель = Форма1;
ГруппировкаПоляСписка2.ПорядокОбхода = 3;
ГруппировкаПоляСписка3 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка3.Родитель = Форма1;
ГруппировкаПоляСписка3.ПорядокОбхода = 2;
ГруппировкаПоляСписка4 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка4.Родитель = Форма1;
ГруппировкаПоляСписка4.ПорядокОбхода = 4;
ГруппировкаПоляСписка5 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка5.Родитель = Форма1;
ГруппировкаПоляСписка5.ПорядокОбхода = 6;
ГруппировкаПоляСписка6 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка6.Родитель = Форма1;
ГруппировкаПоляСписка6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Диалог_свойство.os
Перем ДФ, Диалог1;
Процедура Свойство() Экспорт
Сообщить(?(
Диалог1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Текст = "Диалог1";
Диалог1.ПорядокОбхода = 1;
Диалог2 = ДФ.Диалог();
Диалог2.Родитель = Форма1;
Диалог2.Текст = "Диалог2";
Диалог2.ПорядокОбхода = 3;
Диалог3 = ДФ.Диалог();
Диалог3.Родитель = Форма1;
Диалог3.Текст = "Диалог3";
Диалог3.ПорядокОбхода = 2;
Диалог4 = ДФ.Диалог();
Диалог4.Родитель = Форма1;
Диалог4.Текст = "Диалог4";
Диалог4.ПорядокОбхода = 4;
Диалог5 = ДФ.Диалог();
Диалог5.Родитель = Форма1;
Диалог5.Текст = "Диалог5";
Диалог5.ПорядокОбхода = 6;
Диалог6 = ДФ.Диалог();
Диалог6.Родитель = Форма1;
Диалог6.Текст = "Диалог6";
Диалог6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
ДополнительныйБлок1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "ДополнительныйБлок1";
ДополнительныйБлок1.ПорядокОбхода = 1;
ДополнительныйБлок2 = ДФ.ДополнительныйБлок();
ДополнительныйБлок2.Родитель = Форма1;
ДополнительныйБлок2.Текст = "ДополнительныйБлок2";
ДополнительныйБлок2.ПорядокОбхода = 3;
ДополнительныйБлок3 = ДФ.ДополнительныйБлок();
ДополнительныйБлок3.Родитель = Форма1;
ДополнительныйБлок3.Текст = "ДополнительныйБлок3";
ДополнительныйБлок3.ПорядокОбхода = 2;
ДополнительныйБлок4 = ДФ.ДополнительныйБлок();
ДополнительныйБлок4.Родитель = Форма1;
ДополнительныйБлок4.Текст = "ДополнительныйБлок4";
ДополнительныйБлок4.ПорядокОбхода = 4;
ДополнительныйБлок5 = ДФ.ДополнительныйБлок();
ДополнительныйБлок5.Родитель = Форма1;
ДополнительныйБлок5.Текст = "ДополнительныйБлок5";
ДополнительныйБлок5.ПорядокОбхода = 6;
ДополнительныйБлок6 = ДФ.ДополнительныйБлок();
ДополнительныйБлок6.Родитель = Форма1;
ДополнительныйБлок6.Текст = "ДополнительныйБлок6";
ДополнительныйБлок6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ЖирныйТекст1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЖирныйТекст1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Текст = "ЖирныйТекст1";
ЖирныйТекст1.ПорядокОбхода = 1;
ЖирныйТекст2 = ДФ.ЖирныйТекст();
ЖирныйТекст2.Родитель = Форма1;
ЖирныйТекст2.Текст = "ЖирныйТекст2";
ЖирныйТекст2.ПорядокОбхода = 3;
ЖирныйТекст3 = ДФ.ЖирныйТекст();
ЖирныйТекст3.Родитель = Форма1;
ЖирныйТекст3.Текст = "ЖирныйТекст3";
ЖирныйТекст3.ПорядокОбхода = 2;
ЖирныйТекст4 = ДФ.ЖирныйТекст();
ЖирныйТекст4.Родитель = Форма1;
ЖирныйТекст4.Текст = "ЖирныйТекст4";
ЖирныйТекст4.ПорядокОбхода = 4;
ЖирныйТекст5 = ДФ.ЖирныйТекст();
ЖирныйТекст5.Родитель = Форма1;
ЖирныйТекст5.Текст = "ЖирныйТекст5";
ЖирныйТекст5.ПорядокОбхода = 6;
ЖирныйТекст6 = ДФ.ЖирныйТекст();
ЖирныйТекст6.Родитель = Форма1;
ЖирныйТекст6.Текст = "ЖирныйТекст6";
ЖирныйТекст6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Заголовок1_свойство.os
Перем ДФ, Заголовок11;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок11.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок11, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Текст = "Заголовок11";
Заголовок11.ПорядокОбхода = 1;
Заголовок12 = ДФ.Заголовок1();
Заголовок12.Родитель = Форма1;
Заголовок12.Текст = "Заголовок12";
Заголовок12.ПорядокОбхода = 3;
Заголовок13 = ДФ.Заголовок1();
Заголовок13.Родитель = Форма1;
Заголовок13.Текст = "Заголовок13";
Заголовок13.ПорядокОбхода = 2;
Заголовок14 = ДФ.Заголовок1();
Заголовок14.Родитель = Форма1;
Заголовок14.Текст = "Заголовок14";
Заголовок14.ПорядокОбхода = 4;
Заголовок15 = ДФ.Заголовок1();
Заголовок15.Родитель = Форма1;
Заголовок15.Текст = "Заголовок15";
Заголовок15.ПорядокОбхода = 6;
Заголовок16 = ДФ.Заголовок1();
Заголовок16.Родитель = Форма1;
Заголовок16.Текст = "Заголовок16";
Заголовок16.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Заголовок2_свойство.os
Перем ДФ, Заголовок21;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок21.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок21, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Текст = "Заголовок21";
Заголовок21.ПорядокОбхода = 1;
Заголовок22 = ДФ.Заголовок2();
Заголовок22.Родитель = Форма1;
Заголовок22.Текст = "Заголовок22";
Заголовок22.ПорядокОбхода = 3;
Заголовок23 = ДФ.Заголовок2();
Заголовок23.Родитель = Форма1;
Заголовок23.Текст = "Заголовок23";
Заголовок23.ПорядокОбхода = 2;
Заголовок24 = ДФ.Заголовок2();
Заголовок24.Родитель = Форма1;
Заголовок24.Текст = "Заголовок24";
Заголовок24.ПорядокОбхода = 4;
Заголовок25 = ДФ.Заголовок2();
Заголовок25.Родитель = Форма1;
Заголовок25.Текст = "Заголовок25";
Заголовок25.ПорядокОбхода = 6;
Заголовок26 = ДФ.Заголовок2();
Заголовок26.Родитель = Форма1;
Заголовок26.Текст = "Заголовок26";
Заголовок26.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Заголовок3_свойство.os
Перем ДФ, Заголовок31;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок31.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок31, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Текст = "Заголовок31";
Заголовок31.ПорядокОбхода = 1;
Заголовок32 = ДФ.Заголовок3();
Заголовок32.Родитель = Форма1;
Заголовок32.Текст = "Заголовок32";
Заголовок32.ПорядокОбхода = 3;
Заголовок33 = ДФ.Заголовок3();
Заголовок33.Родитель = Форма1;
Заголовок33.Текст = "Заголовок33";
Заголовок33.ПорядокОбхода = 2;
Заголовок34 = ДФ.Заголовок3();
Заголовок34.Родитель = Форма1;
Заголовок34.Текст = "Заголовок34";
Заголовок34.ПорядокОбхода = 4;
Заголовок35 = ДФ.Заголовок3();
Заголовок35.Родитель = Форма1;
Заголовок35.Текст = "Заголовок35";
Заголовок35.ПорядокОбхода = 6;
Заголовок36 = ДФ.Заголовок3();
Заголовок36.Родитель = Форма1;
Заголовок36.Текст = "Заголовок36";
Заголовок36.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Заголовок4_свойство.os
Перем ДФ, Заголовок41;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок41.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок41, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Текст = "Заголовок41";
Заголовок41.ПорядокОбхода = 1;
Заголовок42 = ДФ.Заголовок4();
Заголовок42.Родитель = Форма1;
Заголовок42.Текст = "Заголовок42";
Заголовок42.ПорядокОбхода = 3;
Заголовок43 = ДФ.Заголовок4();
Заголовок43.Родитель = Форма1;
Заголовок43.Текст = "Заголовок43";
Заголовок43.ПорядокОбхода = 2;
Заголовок44 = ДФ.Заголовок4();
Заголовок44.Родитель = Форма1;
Заголовок44.Текст = "Заголовок44";
Заголовок44.ПорядокОбхода = 4;
Заголовок45 = ДФ.Заголовок4();
Заголовок45.Родитель = Форма1;
Заголовок45.Текст = "Заголовок45";
Заголовок45.ПорядокОбхода = 6;
Заголовок46 = ДФ.Заголовок4();
Заголовок46.Родитель = Форма1;
Заголовок46.Текст = "Заголовок46";
Заголовок46.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Заголовок5_свойство.os
Перем ДФ, Заголовок51;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок51.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок51, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Текст = "Заголовок51";
Заголовок51.ПорядокОбхода = 1;
Заголовок52 = ДФ.Заголовок5();
Заголовок52.Родитель = Форма1;
Заголовок52.Текст = "Заголовок52";
Заголовок52.ПорядокОбхода = 3;
Заголовок53 = ДФ.Заголовок5();
Заголовок53.Родитель = Форма1;
Заголовок53.Текст = "Заголовок53";
Заголовок53.ПорядокОбхода = 2;
Заголовок54 = ДФ.Заголовок5();
Заголовок54.Родитель = Форма1;
Заголовок54.Текст = "Заголовок54";
Заголовок54.ПорядокОбхода = 4;
Заголовок55 = ДФ.Заголовок5();
Заголовок55.Родитель = Форма1;
Заголовок55.Текст = "Заголовок55";
Заголовок55.ПорядокОбхода = 6;
Заголовок56 = ДФ.Заголовок5();
Заголовок56.Родитель = Форма1;
Заголовок56.Текст = "Заголовок56";
Заголовок56.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Заголовок6_свойство.os
Перем ДФ, Заголовок61;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок61.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок61, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Текст = "Заголовок61";
Заголовок61.ПорядокОбхода = 1;
Заголовок62 = ДФ.Заголовок6();
Заголовок62.Родитель = Форма1;
Заголовок62.Текст = "Заголовок62";
Заголовок62.ПорядокОбхода = 3;
Заголовок63 = ДФ.Заголовок6();
Заголовок63.Родитель = Форма1;
Заголовок63.Текст = "Заголовок63";
Заголовок63.ПорядокОбхода = 2;
Заголовок64 = ДФ.Заголовок6();
Заголовок64.Родитель = Форма1;
Заголовок64.Текст = "Заголовок64";
Заголовок64.ПорядокОбхода = 4;
Заголовок65 = ДФ.Заголовок6();
Заголовок65.Родитель = Форма1;
Заголовок65.Текст = "Заголовок65";
Заголовок65.ПорядокОбхода = 6;
Заголовок66 = ДФ.Заголовок6();
Заголовок66.Родитель = Форма1;
Заголовок66.Текст = "Заголовок66";
Заголовок66.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Заголовок_свойство.os
Перем ДФ, Заголовок1;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Текст = "Заголовок1";
Заголовок1.ПорядокОбхода = 1;
Заголовок2 = ДФ.Заголовок();
Заголовок2.Родитель = Форма1;
Заголовок2.Текст = "Заголовок2";
Заголовок2.ПорядокОбхода = 3;
Заголовок3 = ДФ.Заголовок();
Заголовок3.Родитель = Форма1;
Заголовок3.Текст = "Заголовок3";
Заголовок3.ПорядокОбхода = 2;
Заголовок4 = ДФ.Заголовок();
Заголовок4.Родитель = Форма1;
Заголовок4.Текст = "Заголовок4";
Заголовок4.ПорядокОбхода = 4;
Заголовок5 = ДФ.Заголовок();
Заголовок5.Родитель = Форма1;
Заголовок5.Текст = "Заголовок5";
Заголовок5.ПорядокОбхода = 6;
Заголовок6 = ДФ.Заголовок();
Заголовок6.Родитель = Форма1;
Заголовок6.Текст = "Заголовок6";
Заголовок6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ЗаголовокГруппы_свойство.os
Перем ДФ, ЗаголовокГруппы1;
Процедура Свойство() Экспорт
Сообщить(?(
ЗаголовокГруппы1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Текст = "ЗаголовокГруппы1";
ЗаголовокГруппы1.ПорядокОбхода = 1;
ЗаголовокГруппы2 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы2.Родитель = Форма1;
ЗаголовокГруппы2.Текст = "ЗаголовокГруппы2";
ЗаголовокГруппы2.ПорядокОбхода = 3;
ЗаголовокГруппы3 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы3.Родитель = Форма1;
ЗаголовокГруппы3.Текст = "ЗаголовокГруппы3";
ЗаголовокГруппы3.ПорядокОбхода = 2;
ЗаголовокГруппы4 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы4.Родитель = Форма1;
ЗаголовокГруппы4.Текст = "ЗаголовокГруппы4";
ЗаголовокГруппы4.ПорядокОбхода = 4;
ЗаголовокГруппы5 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы5.Родитель = Форма1;
ЗаголовокГруппы5.Текст = "ЗаголовокГруппы5";
ЗаголовокГруппы5.ПорядокОбхода = 6;
ЗаголовокГруппы6 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы6.Родитель = Форма1;
ЗаголовокГруппы6.Текст = "ЗаголовокГруппы6";
ЗаголовокГруппы6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура Свойство() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ЗаголовокРаскрываемогоБлока_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Текст = "ЗаголовокРаскрываемогоБлока1";
ЗаголовокРаскрываемогоБлока1.ПорядокОбхода = 1;
ЗаголовокРаскрываемогоБлока2 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока2.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока2.Текст = "ЗаголовокРаскрываемогоБлока2";
ЗаголовокРаскрываемогоБлока2.ПорядокОбхода = 3;
ЗаголовокРаскрываемогоБлока3 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока3.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока3.Текст = "ЗаголовокРаскрываемогоБлока3";
ЗаголовокРаскрываемогоБлока3.ПорядокОбхода = 2;
ЗаголовокРаскрываемогоБлока4 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока4.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока4.Текст = "ЗаголовокРаскрываемогоБлока4";
ЗаголовокРаскрываемогоБлока4.ПорядокОбхода = 4;
ЗаголовокРаскрываемогоБлока5 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока5.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока5.Текст = "ЗаголовокРаскрываемогоБлока5";
ЗаголовокРаскрываемогоБлока5.ПорядокОбхода = 6;
ЗаголовокРаскрываемогоБлока6 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока6.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока6.Текст = "ЗаголовокРаскрываемогоБлока6";
ЗаголовокРаскрываемогоБлока6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.ПорядокОбхода = 1;
Изображение2 = ДФ.Изображение();
Изображение2.Родитель = Форма1;
Изображение2.ПорядокОбхода = 3;
Изображение3 = ДФ.Изображение();
Изображение3.Родитель = Форма1;
Изображение3.ПорядокОбхода = 2;
Изображение4 = ДФ.Изображение();
Изображение4.Родитель = Форма1;
Изображение4.ПорядокОбхода = 4;
Изображение5 = ДФ.Изображение();
Изображение5.Родитель = Форма1;
Изображение5.ПорядокОбхода = 6;
Изображение6 = ДФ.Изображение();
Изображение6.Родитель = Форма1;
Изображение6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Индикатор_свойство.os
Перем ДФ, Индикатор1;
Процедура Свойство() Экспорт
Сообщить(?(
Индикатор1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Индикатор1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.ПорядокОбхода = 1;
Индикатор2 = ДФ.Индикатор();
Индикатор2.Родитель = Форма1;
Индикатор2.ПорядокОбхода = 3;
Индикатор3 = ДФ.Индикатор();
Индикатор3.Родитель = Форма1;
Индикатор3.ПорядокОбхода = 2;
Индикатор4 = ДФ.Индикатор();
Индикатор4.Родитель = Форма1;
Индикатор4.ПорядокОбхода = 4;
Индикатор5 = ДФ.Индикатор();
Индикатор5.Родитель = Форма1;
Индикатор5.ПорядокОбхода = 6;
Индикатор6 = ДФ.Индикатор();
Индикатор6.Родитель = Форма1;
Индикатор6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Итоги_свойство.os
Перем ДФ, Итоги1;
Процедура Свойство() Экспорт
Сообщить(?(
Итоги1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Итоги_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Итоги1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Текст = "Итоги1";
Итоги1.ПорядокОбхода = 1;
Итоги2 = ДФ.Итоги();
Итоги2.Родитель = Форма1;
Итоги2.Текст = "Итоги2";
Итоги2.ПорядокОбхода = 3;
Итоги3 = ДФ.Итоги();
Итоги3.Родитель = Форма1;
Итоги3.Текст = "Итоги3";
Итоги3.ПорядокОбхода = 2;
Итоги4 = ДФ.Итоги();
Итоги4.Родитель = Форма1;
Итоги4.Текст = "Итоги4";
Итоги4.ПорядокОбхода = 4;
Итоги5 = ДФ.Итоги();
Итоги5.Родитель = Форма1;
Итоги5.Текст = "Итоги5";
Итоги5.ПорядокОбхода = 6;
Итоги6 = ДФ.Итоги();
Итоги6.Родитель = Форма1;
Итоги6.Текст = "Итоги6";
Итоги6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Карта_свойство.os
Перем ДФ, Карта1;
Процедура Свойство() Экспорт
Сообщить(?(
Карта1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Карта_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Карта1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Карта1 = ДФ.Карта();
Карта1.Родитель = Форма1;
Карта1.Текст = "Карта1";
Карта1.ПорядокОбхода = 1;
Карта2 = ДФ.Карта();
Карта2.Родитель = Форма1;
Карта2.Текст = "Карта2";
Карта2.ПорядокОбхода = 3;
Карта3 = ДФ.Карта();
Карта3.Родитель = Форма1;
Карта3.Текст = "Карта3";
Карта3.ПорядокОбхода = 2;
Карта4 = ДФ.Карта();
Карта4.Родитель = Форма1;
Карта4.Текст = "Карта4";
Карта4.ПорядокОбхода = 4;
Карта5 = ДФ.Карта();
Карта5.Родитель = Форма1;
Карта5.Текст = "Карта5";
Карта5.ПорядокОбхода = 6;
Карта6 = ДФ.Карта();
Карта6.Родитель = Форма1;
Карта6.Текст = "Карта6";
Карта6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Кнопка_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Сообщить(?(
Кнопка1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Кнопка1";
Кнопка1.ПорядокОбхода = 1;
Кнопка2 = ДФ.Кнопка();
Кнопка2.Родитель = Форма1;
Кнопка2.Текст = "Кнопка2";
Кнопка2.ПорядокОбхода = 3;
Кнопка3 = ДФ.Кнопка();
Кнопка3.Родитель = Форма1;
Кнопка3.Текст = "Кнопка3";
Кнопка3.ПорядокОбхода = 2;
Кнопка4 = ДФ.Кнопка();
Кнопка4.Родитель = Форма1;
Кнопка4.Текст = "Кнопка4";
Кнопка4.ПорядокОбхода = 4;
Кнопка5 = ДФ.Кнопка();
Кнопка5.Родитель = Форма1;
Кнопка5.Текст = "Кнопка5";
Кнопка5.ПорядокОбхода = 6;
Кнопка6 = ДФ.Кнопка();
Кнопка6.Родитель = Форма1;
Кнопка6.Текст = "Кнопка6";
Кнопка6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Код_свойство.os
Перем ДФ, Код1;
Процедура Свойство() Экспорт
Сообщить(?(
Код1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Код_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Код1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Текст = "Код1";
Код1.ПорядокОбхода = 1;
Код2 = ДФ.Код();
Код2.Родитель = Форма1;
Код2.Текст = "Код2";
Код2.ПорядокОбхода = 3;
Код3 = ДФ.Код();
Код3.Родитель = Форма1;
Код3.Текст = "Код3";
Код3.ПорядокОбхода = 2;
Код4 = ДФ.Код();
Код4.Родитель = Форма1;
Код4.Текст = "Код4";
Код4.ПорядокОбхода = 4;
Код5 = ДФ.Код();
Код5.Родитель = Форма1;
Код5.Текст = "Код5";
Код5.ПорядокОбхода = 6;
Код6 = ДФ.Код();
Код6.Родитель = Форма1;
Код6.Текст = "Код6";
Код6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Колонка_свойство.os
Перем ДФ, Колонка1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонка1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Колонка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонка1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = Форма1;
Колонка1.ПорядокОбхода = 1;
Колонка2 = ДФ.Колонка();
Колонка2.Родитель = Форма1;
Колонка2.ПорядокОбхода = 3;
Колонка3 = ДФ.Колонка();
Колонка3.Родитель = Форма1;
Колонка3.ПорядокОбхода = 2;
Колонка4 = ДФ.Колонка();
Колонка4.Родитель = Форма1;
Колонка4.ПорядокОбхода = 4;
Колонка5 = ДФ.Колонка();
Колонка5.Родитель = Форма1;
Колонка5.ПорядокОбхода = 6;
Колонка6 = ДФ.Колонка();
Колонка6.Родитель = Форма1;
Колонка6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Колонтитул_свойство.os
Перем ДФ, Колонтитул1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонтитул1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонтитул1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Текст = "Колонтитул1";
Колонтитул1.ПорядокОбхода = 1;
Колонтитул2 = ДФ.Колонтитул();
Колонтитул2.Родитель = Форма1;
Колонтитул2.Текст = "Колонтитул2";
Колонтитул2.ПорядокОбхода = 3;
Колонтитул3 = ДФ.Колонтитул();
Колонтитул3.Родитель = Форма1;
Колонтитул3.Текст = "Колонтитул3";
Колонтитул3.ПорядокОбхода = 2;
Колонтитул4 = ДФ.Колонтитул();
Колонтитул4.Родитель = Форма1;
Колонтитул4.Текст = "Колонтитул4";
Колонтитул4.ПорядокОбхода = 4;
Колонтитул5 = ДФ.Колонтитул();
Колонтитул5.Родитель = Форма1;
Колонтитул5.Текст = "Колонтитул5";
Колонтитул5.ПорядокОбхода = 6;
Колонтитул6 = ДФ.Колонтитул();
Колонтитул6.Родитель = Форма1;
Колонтитул6.Текст = "Колонтитул6";
Колонтитул6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
КурсивТекст1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(КурсивТекст1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Текст = "КурсивТекст1";
КурсивТекст1.ПорядокОбхода = 1;
КурсивТекст2 = ДФ.КурсивТекст();
КурсивТекст2.Родитель = Форма1;
КурсивТекст2.Текст = "КурсивТекст2";
КурсивТекст2.ПорядокОбхода = 3;
КурсивТекст3 = ДФ.КурсивТекст();
КурсивТекст3.Родитель = Форма1;
КурсивТекст3.Текст = "КурсивТекст3";
КурсивТекст3.ПорядокОбхода = 2;
КурсивТекст4 = ДФ.КурсивТекст();
КурсивТекст4.Родитель = Форма1;
КурсивТекст4.Текст = "КурсивТекст4";
КурсивТекст4.ПорядокОбхода = 4;
КурсивТекст5 = ДФ.КурсивТекст();
КурсивТекст5.Родитель = Форма1;
КурсивТекст5.Текст = "КурсивТекст5";
КурсивТекст5.ПорядокОбхода = 6;
КурсивТекст6 = ДФ.КурсивТекст();
КурсивТекст6.Родитель = Форма1;
КурсивТекст6.Текст = "КурсивТекст6";
КурсивТекст6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Линия_свойство.os
Перем ДФ, Линия1;
Процедура Свойство() Экспорт
Сообщить(?(
Линия1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Линия1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Линия1 = ДФ.Линия();
Линия1.Родитель = Форма1;
Линия1.Текст = "Линия1";
Линия1.ПорядокОбхода = 1;
Линия2 = ДФ.Линия();
Линия2.Родитель = Форма1;
Линия2.Текст = "Линия2";
Линия2.ПорядокОбхода = 3;
Линия3 = ДФ.Линия();
Линия3.Родитель = Форма1;
Линия3.Текст = "Линия3";
Линия3.ПорядокОбхода = 2;
Линия4 = ДФ.Линия();
Линия4.Родитель = Форма1;
Линия4.Текст = "Линия4";
Линия4.ПорядокОбхода = 4;
Линия5 = ДФ.Линия();
Линия5.Родитель = Форма1;
Линия5.Текст = "Линия5";
Линия5.ПорядокОбхода = 6;
Линия6 = ДФ.Линия();
Линия6.Родитель = Форма1;
Линия6.Текст = "Линия6";
Линия6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
МаркированныйТекст1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МаркированныйТекст1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Текст = "МаркированныйТекст1";
МаркированныйТекст1.ПорядокОбхода = 1;
МаркированныйТекст2 = ДФ.МаркированныйТекст();
МаркированныйТекст2.Родитель = Форма1;
МаркированныйТекст2.Текст = "МаркированныйТекст2";
МаркированныйТекст2.ПорядокОбхода = 3;
МаркированныйТекст3 = ДФ.МаркированныйТекст();
МаркированныйТекст3.Родитель = Форма1;
МаркированныйТекст3.Текст = "МаркированныйТекст3";
МаркированныйТекст3.ПорядокОбхода = 2;
МаркированныйТекст4 = ДФ.МаркированныйТекст();
МаркированныйТекст4.Родитель = Форма1;
МаркированныйТекст4.Текст = "МаркированныйТекст4";
МаркированныйТекст4.ПорядокОбхода = 4;
МаркированныйТекст5 = ДФ.МаркированныйТекст();
МаркированныйТекст5.Родитель = Форма1;
МаркированныйТекст5.Текст = "МаркированныйТекст5";
МаркированныйТекст5.ПорядокОбхода = 6;
МаркированныйТекст6 = ДФ.МаркированныйТекст();
МаркированныйТекст6.Родитель = Форма1;
МаркированныйТекст6.Текст = "МаркированныйТекст6";
МаркированныйТекст6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_МедиаГруппа_свойство.os
Перем ДФ, МедиаГруппа1;
Процедура Свойство() Экспорт
Сообщить(?(
МедиаГруппа1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Текст = "МедиаГруппа1";
МедиаГруппа1.ПорядокОбхода = 1;
МедиаГруппа2 = ДФ.МедиаГруппа();
МедиаГруппа2.Родитель = Форма1;
МедиаГруппа2.Текст = "МедиаГруппа2";
МедиаГруппа2.ПорядокОбхода = 3;
МедиаГруппа3 = ДФ.МедиаГруппа();
МедиаГруппа3.Родитель = Форма1;
МедиаГруппа3.Текст = "МедиаГруппа3";
МедиаГруппа3.ПорядокОбхода = 2;
МедиаГруппа4 = ДФ.МедиаГруппа();
МедиаГруппа4.Родитель = Форма1;
МедиаГруппа4.Текст = "МедиаГруппа4";
МедиаГруппа4.ПорядокОбхода = 4;
МедиаГруппа5 = ДФ.МедиаГруппа();
МедиаГруппа5.Родитель = Форма1;
МедиаГруппа5.Текст = "МедиаГруппа5";
МедиаГруппа5.ПорядокОбхода = 6;
МедиаГруппа6 = ДФ.МедиаГруппа();
МедиаГруппа6.Родитель = Форма1;
МедиаГруппа6.Текст = "МедиаГруппа6";
МедиаГруппа6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
МелкийТекст1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МелкийТекст1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Текст = "МелкийТекст1";
МелкийТекст1.ПорядокОбхода = 1;
МелкийТекст2 = ДФ.МелкийТекст();
МелкийТекст2.Родитель = Форма1;
МелкийТекст2.Текст = "МелкийТекст2";
МелкийТекст2.ПорядокОбхода = 3;
МелкийТекст3 = ДФ.МелкийТекст();
МелкийТекст3.Родитель = Форма1;
МелкийТекст3.Текст = "МелкийТекст3";
МелкийТекст3.ПорядокОбхода = 2;
МелкийТекст4 = ДФ.МелкийТекст();
МелкийТекст4.Родитель = Форма1;
МелкийТекст4.Текст = "МелкийТекст4";
МелкийТекст4.ПорядокОбхода = 4;
МелкийТекст5 = ДФ.МелкийТекст();
МелкийТекст5.Родитель = Форма1;
МелкийТекст5.Текст = "МелкийТекст5";
МелкийТекст5.ПорядокОбхода = 6;
МелкийТекст6 = ДФ.МелкийТекст();
МелкийТекст6.Родитель = Форма1;
МелкийТекст6.Текст = "МелкийТекст6";
МелкийТекст6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
НадстрочныйТекст1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НадстрочныйТекст1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Текст = "НадстрочныйТекст1";
НадстрочныйТекст1.ПорядокОбхода = 1;
НадстрочныйТекст2 = ДФ.НадстрочныйТекст();
НадстрочныйТекст2.Родитель = Форма1;
НадстрочныйТекст2.Текст = "НадстрочныйТекст2";
НадстрочныйТекст2.ПорядокОбхода = 3;
НадстрочныйТекст3 = ДФ.НадстрочныйТекст();
НадстрочныйТекст3.Родитель = Форма1;
НадстрочныйТекст3.Текст = "НадстрочныйТекст3";
НадстрочныйТекст3.ПорядокОбхода = 2;
НадстрочныйТекст4 = ДФ.НадстрочныйТекст();
НадстрочныйТекст4.Родитель = Форма1;
НадстрочныйТекст4.Текст = "НадстрочныйТекст4";
НадстрочныйТекст4.ПорядокОбхода = 4;
НадстрочныйТекст5 = ДФ.НадстрочныйТекст();
НадстрочныйТекст5.Родитель = Форма1;
НадстрочныйТекст5.Текст = "НадстрочныйТекст5";
НадстрочныйТекст5.ПорядокОбхода = 6;
НадстрочныйТекст6 = ДФ.НадстрочныйТекст();
НадстрочныйТекст6.Родитель = Форма1;
НадстрочныйТекст6.Текст = "НадстрочныйТекст6";
НадстрочныйТекст6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
НаправленныйТекст1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НаправленныйТекст1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Текст = "НаправленныйТекст1";
НаправленныйТекст1.ПорядокОбхода = 1;
НаправленныйТекст2 = ДФ.НаправленныйТекст();
НаправленныйТекст2.Родитель = Форма1;
НаправленныйТекст2.Текст = "НаправленныйТекст2";
НаправленныйТекст2.ПорядокОбхода = 3;
НаправленныйТекст3 = ДФ.НаправленныйТекст();
НаправленныйТекст3.Родитель = Форма1;
НаправленныйТекст3.Текст = "НаправленныйТекст3";
НаправленныйТекст3.ПорядокОбхода = 2;
НаправленныйТекст4 = ДФ.НаправленныйТекст();
НаправленныйТекст4.Родитель = Форма1;
НаправленныйТекст4.Текст = "НаправленныйТекст4";
НаправленныйТекст4.ПорядокОбхода = 4;
НаправленныйТекст5 = ДФ.НаправленныйТекст();
НаправленныйТекст5.Родитель = Форма1;
НаправленныйТекст5.Текст = "НаправленныйТекст5";
НаправленныйТекст5.ПорядокОбхода = 6;
НаправленныйТекст6 = ДФ.НаправленныйТекст();
НаправленныйТекст6.Родитель = Форма1;
НаправленныйТекст6.Текст = "НаправленныйТекст6";
НаправленныйТекст6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_НеупорядоченныйСписок_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Текст = "НеупорядоченныйСписок1";
НеупорядоченныйСписок1.ПорядокОбхода = 1;
НеупорядоченныйСписок2 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок2.Родитель = Форма1;
НеупорядоченныйСписок2.Текст = "НеупорядоченныйСписок2";
НеупорядоченныйСписок2.ПорядокОбхода = 3;
НеупорядоченныйСписок3 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок3.Родитель = Форма1;
НеупорядоченныйСписок3.Текст = "НеупорядоченныйСписок3";
НеупорядоченныйСписок3.ПорядокОбхода = 2;
НеупорядоченныйСписок4 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок4.Родитель = Форма1;
НеупорядоченныйСписок4.Текст = "НеупорядоченныйСписок4";
НеупорядоченныйСписок4.ПорядокОбхода = 4;
НеупорядоченныйСписок5 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок5.Родитель = Форма1;
НеупорядоченныйСписок5.Текст = "НеупорядоченныйСписок5";
НеупорядоченныйСписок5.ПорядокОбхода = 6;
НеупорядоченныйСписок6 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок6.Родитель = Форма1;
НеупорядоченныйСписок6.Текст = "НеупорядоченныйСписок6";
НеупорядоченныйСписок6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_НижнийКолонтитул_свойство.os
Перем ДФ, НижнийКолонтитул1;
Процедура Свойство() Экспорт
Сообщить(?(
НижнийКолонтитул1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Текст = "НижнийКолонтитул1";
НижнийКолонтитул1.ПорядокОбхода = 1;
НижнийКолонтитул2 = ДФ.НижнийКолонтитул();
НижнийКолонтитул2.Родитель = Форма1;
НижнийКолонтитул2.Текст = "НижнийКолонтитул2";
НижнийКолонтитул2.ПорядокОбхода = 3;
НижнийКолонтитул3 = ДФ.НижнийКолонтитул();
НижнийКолонтитул3.Родитель = Форма1;
НижнийКолонтитул3.Текст = "НижнийКолонтитул3";
НижнийКолонтитул3.ПорядокОбхода = 2;
НижнийКолонтитул4 = ДФ.НижнийКолонтитул();
НижнийКолонтитул4.Родитель = Форма1;
НижнийКолонтитул4.Текст = "НижнийКолонтитул4";
НижнийКолонтитул4.ПорядокОбхода = 4;
НижнийКолонтитул5 = ДФ.НижнийКолонтитул();
НижнийКолонтитул5.Родитель = Форма1;
НижнийКолонтитул5.Текст = "НижнийКолонтитул5";
НижнийКолонтитул5.ПорядокОбхода = 6;
НижнийКолонтитул6 = ДФ.НижнийКолонтитул();
НижнийКолонтитул6.Родитель = Форма1;
НижнийКолонтитул6.Текст = "НижнийКолонтитул6";
НижнийКолонтитул6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Область_свойство.os
Перем ДФ, Область1;
Процедура Свойство() Экспорт
Сообщить(?(
Область1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Область1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Область1 = ДФ.Область();
Область1.Родитель = Форма1;
Область1.Текст = "Область1";
Область1.ПорядокОбхода = 1;
Область2 = ДФ.Область();
Область2.Родитель = Форма1;
Область2.Текст = "Область2";
Область2.ПорядокОбхода = 3;
Область3 = ДФ.Область();
Область3.Родитель = Форма1;
Область3.Текст = "Область3";
Область3.ПорядокОбхода = 2;
Область4 = ДФ.Область();
Область4.Родитель = Форма1;
Область4.Текст = "Область4";
Область4.ПорядокОбхода = 4;
Область5 = ДФ.Область();
Область5.Родитель = Форма1;
Область5.Текст = "Область5";
Область5.ПорядокОбхода = 6;
Область6 = ДФ.Область();
Область6.Родитель = Форма1;
Область6.Текст = "Область6";
Область6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ОбластьТаблицы_свойство.os
Перем ДФ, ОбластьТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТаблицы1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ОбластьТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТаблицы1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Текст = "ОбластьТаблицы1";
ОбластьТаблицы1.ПорядокОбхода = 1;
ОбластьТаблицы2 = ДФ.ОбластьТаблицы();
ОбластьТаблицы2.Родитель = Форма1;
ОбластьТаблицы2.Текст = "ОбластьТаблицы2";
ОбластьТаблицы2.ПорядокОбхода = 3;
ОбластьТаблицы3 = ДФ.ОбластьТаблицы();
ОбластьТаблицы3.Родитель = Форма1;
ОбластьТаблицы3.Текст = "ОбластьТаблицы3";
ОбластьТаблицы3.ПорядокОбхода = 2;
ОбластьТаблицы4 = ДФ.ОбластьТаблицы();
ОбластьТаблицы4.Родитель = Форма1;
ОбластьТаблицы4.Текст = "ОбластьТаблицы4";
ОбластьТаблицы4.ПорядокОбхода = 4;
ОбластьТаблицы5 = ДФ.ОбластьТаблицы();
ОбластьТаблицы5.Родитель = Форма1;
ОбластьТаблицы5.Текст = "ОбластьТаблицы5";
ОбластьТаблицы5.ПорядокОбхода = 6;
ОбластьТаблицы6 = ДФ.ОбластьТаблицы();
ОбластьТаблицы6.Родитель = Форма1;
ОбластьТаблицы6.Текст = "ОбластьТаблицы6";
ОбластьТаблицы6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.ПорядокОбхода = 1;
ОбластьТекста2 = ДФ.ОбластьТекста();
ОбластьТекста2.Родитель = Форма1;
ОбластьТекста2.ПорядокОбхода = 3;
ОбластьТекста3 = ДФ.ОбластьТекста();
ОбластьТекста3.Родитель = Форма1;
ОбластьТекста3.ПорядокОбхода = 2;
ОбластьТекста4 = ДФ.ОбластьТекста();
ОбластьТекста4.Родитель = Форма1;
ОбластьТекста4.ПорядокОбхода = 4;
ОбластьТекста5 = ДФ.ОбластьТекста();
ОбластьТекста5.Родитель = Форма1;
ОбластьТекста5.ПорядокОбхода = 6;
ОбластьТекста6 = ДФ.ОбластьТекста();
ОбластьТекста6.Родитель = Форма1;
ОбластьТекста6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ОписаниеМедиа_свойство.os
Перем ДФ, ОписаниеМедиа1;
Процедура Свойство() Экспорт
Сообщить(?(
ОписаниеМедиа1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Текст = "ОписаниеМедиа1";
ОписаниеМедиа1.ПорядокОбхода = 1;
ОписаниеМедиа2 = ДФ.ОписаниеМедиа();
ОписаниеМедиа2.Родитель = Форма1;
ОписаниеМедиа2.Текст = "ОписаниеМедиа2";
ОписаниеМедиа2.ПорядокОбхода = 3;
ОписаниеМедиа3 = ДФ.ОписаниеМедиа();
ОписаниеМедиа3.Родитель = Форма1;
ОписаниеМедиа3.Текст = "ОписаниеМедиа3";
ОписаниеМедиа3.ПорядокОбхода = 2;
ОписаниеМедиа4 = ДФ.ОписаниеМедиа();
ОписаниеМедиа4.Родитель = Форма1;
ОписаниеМедиа4.Текст = "ОписаниеМедиа4";
ОписаниеМедиа4.ПорядокОбхода = 4;
ОписаниеМедиа5 = ДФ.ОписаниеМедиа();
ОписаниеМедиа5.Родитель = Форма1;
ОписаниеМедиа5.Текст = "ОписаниеМедиа5";
ОписаниеМедиа5.ПорядокОбхода = 6;
ОписаниеМедиа6 = ДФ.ОписаниеМедиа();
ОписаниеМедиа6.Родитель = Форма1;
ОписаниеМедиа6.Текст = "ОписаниеМедиа6";
ОписаниеМедиа6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Определение_свойство.os
Перем ДФ, Определение1;
Процедура Свойство() Экспорт
Сообщить(?(
Определение1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Определение1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Текст = "Определение1";
Определение1.ПорядокОбхода = 1;
Определение2 = ДФ.Определение();
Определение2.Родитель = Форма1;
Определение2.Текст = "Определение2";
Определение2.ПорядокОбхода = 3;
Определение3 = ДФ.Определение();
Определение3.Родитель = Форма1;
Определение3.Текст = "Определение3";
Определение3.ПорядокОбхода = 2;
Определение4 = ДФ.Определение();
Определение4.Родитель = Форма1;
Определение4.Текст = "Определение4";
Определение4.ПорядокОбхода = 4;
Определение5 = ДФ.Определение();
Определение5.Родитель = Форма1;
Определение5.Текст = "Определение5";
Определение5.ПорядокОбхода = 6;
Определение6 = ДФ.Определение();
Определение6.Родитель = Форма1;
Определение6.Текст = "Определение6";
Определение6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Переключатель_свойство.os
Перем ДФ, Переключатель1;
Процедура Свойство() Экспорт
Сообщить(?(
Переключатель1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Переключатель1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.ПорядокОбхода = 1;
Переключатель2 = ДФ.Переключатель();
Переключатель2.Родитель = Форма1;
Переключатель2.ПорядокОбхода = 3;
Переключатель3 = ДФ.Переключатель();
Переключатель3.Родитель = Форма1;
Переключатель3.ПорядокОбхода = 2;
Переключатель4 = ДФ.Переключатель();
Переключатель4.Родитель = Форма1;
Переключатель4.ПорядокОбхода = 4;
Переключатель5 = ДФ.Переключатель();
Переключатель5.Родитель = Форма1;
Переключатель5.ПорядокОбхода = 6;
Переключатель6 = ДФ.Переключатель();
Переключатель6.Родитель = Форма1;
Переключатель6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Перенос_свойство.os
Перем ДФ, Перенос1;
Процедура Свойство() Экспорт
Сообщить(?(
Перенос1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Перенос_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Перенос1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Перенос1 = ДФ.Перенос();
Перенос1.Родитель = Форма1;
Перенос1.ПорядокОбхода = 1;
Перенос2 = ДФ.Перенос();
Перенос2.Родитель = Форма1;
Перенос2.ПорядокОбхода = 3;
Перенос3 = ДФ.Перенос();
Перенос3.Родитель = Форма1;
Перенос3.ПорядокОбхода = 2;
Перенос4 = ДФ.Перенос();
Перенос4.Родитель = Форма1;
Перенос4.ПорядокОбхода = 4;
Перенос5 = ДФ.Перенос();
Перенос5.Родитель = Форма1;
Перенос5.ПорядокОбхода = 6;
Перенос6 = ДФ.Перенос();
Перенос6.Родитель = Форма1;
Перенос6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Подпись_свойство.os
Перем ДФ, Подпись1;
Процедура Свойство() Экспорт
Сообщить(?(
Подпись1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Подпись1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Подпись1";
Подпись1.ПорядокОбхода = 1;
Подпись2 = ДФ.Подпись();
Подпись2.Родитель = Форма1;
Подпись2.Текст = "Подпись2";
Подпись2.ПорядокОбхода = 3;
Подпись3 = ДФ.Подпись();
Подпись3.Родитель = Форма1;
Подпись3.Текст = "Подпись3";
Подпись3.ПорядокОбхода = 2;
Подпись4 = ДФ.Подпись();
Подпись4.Родитель = Форма1;
Подпись4.Текст = "Подпись4";
Подпись4.ПорядокОбхода = 4;
Подпись5 = ДФ.Подпись();
Подпись5.Родитель = Форма1;
Подпись5.Текст = "Подпись5";
Подпись5.ПорядокОбхода = 6;
Подпись6 = ДФ.Подпись();
Подпись6.Родитель = Форма1;
Подпись6.Текст = "Подпись6";
Подпись6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ПодстрочныйТекст1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодстрочныйТекст1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Текст = "ПодстрочныйТекст1";
ПодстрочныйТекст1.ПорядокОбхода = 1;
ПодстрочныйТекст2 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст2.Родитель = Форма1;
ПодстрочныйТекст2.Текст = "ПодстрочныйТекст2";
ПодстрочныйТекст2.ПорядокОбхода = 3;
ПодстрочныйТекст3 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст3.Родитель = Форма1;
ПодстрочныйТекст3.Текст = "ПодстрочныйТекст3";
ПодстрочныйТекст3.ПорядокОбхода = 2;
ПодстрочныйТекст4 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст4.Родитель = Форма1;
ПодстрочныйТекст4.Текст = "ПодстрочныйТекст4";
ПодстрочныйТекст4.ПорядокОбхода = 4;
ПодстрочныйТекст5 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст5.Родитель = Форма1;
ПодстрочныйТекст5.Текст = "ПодстрочныйТекст5";
ПодстрочныйТекст5.ПорядокОбхода = 6;
ПодстрочныйТекст6 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст6.Родитель = Форма1;
ПодстрочныйТекст6.Текст = "ПодстрочныйТекст6";
ПодстрочныйТекст6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ПодчеркнутыйТекст1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодчеркнутыйТекст1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Текст = "ПодчеркнутыйТекст1";
ПодчеркнутыйТекст1.ПорядокОбхода = 1;
ПодчеркнутыйТекст2 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст2.Родитель = Форма1;
ПодчеркнутыйТекст2.Текст = "ПодчеркнутыйТекст2";
ПодчеркнутыйТекст2.ПорядокОбхода = 3;
ПодчеркнутыйТекст3 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст3.Родитель = Форма1;
ПодчеркнутыйТекст3.Текст = "ПодчеркнутыйТекст3";
ПодчеркнутыйТекст3.ПорядокОбхода = 2;
ПодчеркнутыйТекст4 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст4.Родитель = Форма1;
ПодчеркнутыйТекст4.Текст = "ПодчеркнутыйТекст4";
ПодчеркнутыйТекст4.ПорядокОбхода = 4;
ПодчеркнутыйТекст5 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст5.Родитель = Форма1;
ПодчеркнутыйТекст5.Текст = "ПодчеркнутыйТекст5";
ПодчеркнутыйТекст5.ПорядокОбхода = 6;
ПодчеркнутыйТекст6 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст6.Родитель = Форма1;
ПодчеркнутыйТекст6.Текст = "ПодчеркнутыйТекст6";
ПодчеркнутыйТекст6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.ПорядокОбхода = 1;
ПолеПароля2 = ДФ.ПолеПароля();
ПолеПароля2.Родитель = Форма1;
ПолеПароля2.ПорядокОбхода = 3;
ПолеПароля3 = ДФ.ПолеПароля();
ПолеПароля3.Родитель = Форма1;
ПолеПароля3.ПорядокОбхода = 2;
ПолеПароля4 = ДФ.ПолеПароля();
ПолеПароля4.Родитель = Форма1;
ПолеПароля4.ПорядокОбхода = 4;
ПолеПароля5 = ДФ.ПолеПароля();
ПолеПароля5.Родитель = Форма1;
ПолеПароля5.ПорядокОбхода = 6;
ПолеПароля6 = ДФ.ПолеПароля();
ПолеПароля6.Родитель = Форма1;
ПолеПароля6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.ПорядокОбхода = 1;
ПолеПоиска2 = ДФ.ПолеПоиска();
ПолеПоиска2.Родитель = Форма1;
ПолеПоиска2.ПорядокОбхода = 3;
ПолеПоиска3 = ДФ.ПолеПоиска();
ПолеПоиска3.Родитель = Форма1;
ПолеПоиска3.ПорядокОбхода = 2;
ПолеПоиска4 = ДФ.ПолеПоиска();
ПолеПоиска4.Родитель = Форма1;
ПолеПоиска4.ПорядокОбхода = 4;
ПолеПоиска5 = ДФ.ПолеПоиска();
ПолеПоиска5.Родитель = Форма1;
ПолеПоиска5.ПорядокОбхода = 6;
ПолеПоиска6 = ДФ.ПолеПоиска();
ПолеПоиска6.Родитель = Форма1;
ПолеПоиска6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.ПорядокОбхода = 1;
ПолеСписка2 = ДФ.ПолеСписка();
ПолеСписка2.Родитель = Форма1;
ПолеСписка2.ПорядокОбхода = 3;
ПолеСписка3 = ДФ.ПолеСписка();
ПолеСписка3.Родитель = Форма1;
ПолеСписка3.ПорядокОбхода = 2;
ПолеСписка4 = ДФ.ПолеСписка();
ПолеСписка4.Родитель = Форма1;
ПолеСписка4.ПорядокОбхода = 4;
ПолеСписка5 = ДФ.ПолеСписка();
ПолеСписка5.Родитель = Форма1;
ПолеСписка5.ПорядокОбхода = 6;
ПолеСписка6 = ДФ.ПолеСписка();
ПолеСписка6.Родитель = Форма1;
ПолеСписка6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.ПорядокОбхода = 1;
ПолеТекста2 = ДФ.ПолеТекста();
ПолеТекста2.Родитель = Форма1;
ПолеТекста2.ПорядокОбхода = 3;
ПолеТекста3 = ДФ.ПолеТекста();
ПолеТекста3.Родитель = Форма1;
ПолеТекста3.ПорядокОбхода = 2;
ПолеТекста4 = ДФ.ПолеТекста();
ПолеТекста4.Родитель = Форма1;
ПолеТекста4.ПорядокОбхода = 4;
ПолеТекста5 = ДФ.ПолеТекста();
ПолеТекста5.Родитель = Форма1;
ПолеТекста5.ПорядокОбхода = 6;
ПолеТекста6 = ДФ.ПолеТекста();
ПолеТекста6.Родитель = Форма1;
ПолеТекста6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.ПорядокОбхода = 1;
ПолеЧисла2 = ДФ.ПолеЧисла();
ПолеЧисла2.Родитель = Форма1;
ПолеЧисла2.ПорядокОбхода = 3;
ПолеЧисла3 = ДФ.ПолеЧисла();
ПолеЧисла3.Родитель = Форма1;
ПолеЧисла3.ПорядокОбхода = 2;
ПолеЧисла4 = ДФ.ПолеЧисла();
ПолеЧисла4.Родитель = Форма1;
ПолеЧисла4.ПорядокОбхода = 4;
ПолеЧисла5 = ДФ.ПолеЧисла();
ПолеЧисла5.Родитель = Форма1;
ПолеЧисла5.ПорядокОбхода = 6;
ПолеЧисла6 = ДФ.ПолеЧисла();
ПолеЧисла6.Родитель = Форма1;
ПолеЧисла6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.ПорядокОбхода = 1;
Ползунок2 = ДФ.Ползунок();
Ползунок2.Родитель = Форма1;
Ползунок2.ПорядокОбхода = 3;
Ползунок3 = ДФ.Ползунок();
Ползунок3.Родитель = Форма1;
Ползунок3.ПорядокОбхода = 2;
Ползунок4 = ДФ.Ползунок();
Ползунок4.Родитель = Форма1;
Ползунок4.ПорядокОбхода = 4;
Ползунок5 = ДФ.Ползунок();
Ползунок5.Родитель = Форма1;
Ползунок5.ПорядокОбхода = 6;
Ползунок6 = ДФ.Ползунок();
Ползунок6.Родитель = Форма1;
Ползунок6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
РаскрываемыйБлок1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(РаскрываемыйБлок1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.ПорядокОбхода = 1;
РаскрываемыйБлок2 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок2.Родитель = Форма1;
РаскрываемыйБлок2.ПорядокОбхода = 3;
РаскрываемыйБлок3 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок3.Родитель = Форма1;
РаскрываемыйБлок3.ПорядокОбхода = 2;
РаскрываемыйБлок4 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок4.Родитель = Форма1;
РаскрываемыйБлок4.ПорядокОбхода = 4;
РаскрываемыйБлок5 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок5.Родитель = Форма1;
РаскрываемыйБлок5.ПорядокОбхода = 6;
РаскрываемыйБлок6 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок6.Родитель = Форма1;
РаскрываемыйБлок6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Результат_свойство.os
Перем ДФ, Результат1;
Процедура Свойство() Экспорт
Сообщить(?(
Результат1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Результат1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Текст = "Результат1";
Результат1.ПорядокОбхода = 1;
Результат2 = ДФ.Результат();
Результат2.Родитель = Форма1;
Результат2.Текст = "Результат2";
Результат2.ПорядокОбхода = 3;
Результат3 = ДФ.Результат();
Результат3.Родитель = Форма1;
Результат3.Текст = "Результат3";
Результат3.ПорядокОбхода = 2;
Результат4 = ДФ.Результат();
Результат4.Родитель = Форма1;
Результат4.Текст = "Результат4";
Результат4.ПорядокОбхода = 4;
Результат5 = ДФ.Результат();
Результат5.Родитель = Форма1;
Результат5.Текст = "Результат5";
Результат5.ПорядокОбхода = 6;
Результат6 = ДФ.Результат();
Результат6.Родитель = Форма1;
Результат6.Текст = "Результат6";
Результат6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_СписокОпределений_свойство.os
Перем ДФ, СписокОпределений1;
Процедура Свойство() Экспорт
Сообщить(?(
СписокОпределений1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Текст = "СписокОпределений1";
СписокОпределений1.ПорядокОбхода = 1;
СписокОпределений2 = ДФ.СписокОпределений();
СписокОпределений2.Родитель = Форма1;
СписокОпределений2.Текст = "СписокОпределений2";
СписокОпределений2.ПорядокОбхода = 3;
СписокОпределений3 = ДФ.СписокОпределений();
СписокОпределений3.Родитель = Форма1;
СписокОпределений3.Текст = "СписокОпределений3";
СписокОпределений3.ПорядокОбхода = 2;
СписокОпределений4 = ДФ.СписокОпределений();
СписокОпределений4.Родитель = Форма1;
СписокОпределений4.Текст = "СписокОпределений4";
СписокОпределений4.ПорядокОбхода = 4;
СписокОпределений5 = ДФ.СписокОпределений();
СписокОпределений5.Родитель = Форма1;
СписокОпределений5.Текст = "СписокОпределений5";
СписокОпределений5.ПорядокОбхода = 6;
СписокОпределений6 = ДФ.СписокОпределений();
СписокОпределений6.Родитель = Форма1;
СписокОпределений6.Текст = "СписокОпределений6";
СписокОпределений6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ссылка1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Текст = "Ссылка1";
Ссылка1.ПорядокОбхода = 1;
Ссылка2 = ДФ.Ссылка();
Ссылка2.Родитель = Форма1;
Ссылка2.Текст = "Ссылка2";
Ссылка2.ПорядокОбхода = 3;
Ссылка3 = ДФ.Ссылка();
Ссылка3.Родитель = Форма1;
Ссылка3.Текст = "Ссылка3";
Ссылка3.ПорядокОбхода = 2;
Ссылка4 = ДФ.Ссылка();
Ссылка4.Родитель = Форма1;
Ссылка4.Текст = "Ссылка4";
Ссылка4.ПорядокОбхода = 4;
Ссылка5 = ДФ.Ссылка();
Ссылка5.Родитель = Форма1;
Ссылка5.Текст = "Ссылка5";
Ссылка5.ПорядокОбхода = 6;
Ссылка6 = ДФ.Ссылка();
Ссылка6.Родитель = Форма1;
Ссылка6.Текст = "Ссылка6";
Ссылка6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
СтрокаТаблицы1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СтрокаТаблицы1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Текст = "СтрокаТаблицы1";
СтрокаТаблицы1.ПорядокОбхода = 1;
СтрокаТаблицы2 = ДФ.СтрокаТаблицы();
СтрокаТаблицы2.Родитель = Форма1;
СтрокаТаблицы2.Текст = "СтрокаТаблицы2";
СтрокаТаблицы2.ПорядокОбхода = 3;
СтрокаТаблицы3 = ДФ.СтрокаТаблицы();
СтрокаТаблицы3.Родитель = Форма1;
СтрокаТаблицы3.Текст = "СтрокаТаблицы3";
СтрокаТаблицы3.ПорядокОбхода = 2;
СтрокаТаблицы4 = ДФ.СтрокаТаблицы();
СтрокаТаблицы4.Родитель = Форма1;
СтрокаТаблицы4.Текст = "СтрокаТаблицы4";
СтрокаТаблицы4.ПорядокОбхода = 4;
СтрокаТаблицы5 = ДФ.СтрокаТаблицы();
СтрокаТаблицы5.Родитель = Форма1;
СтрокаТаблицы5.Текст = "СтрокаТаблицы5";
СтрокаТаблицы5.ПорядокОбхода = 6;
СтрокаТаблицы6 = ДФ.СтрокаТаблицы();
СтрокаТаблицы6.Родитель = Форма1;
СтрокаТаблицы6.Текст = "СтрокаТаблицы6";
СтрокаТаблицы6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Сообщить(?(
Таблица1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Текст = "Таблица1";
Таблица1.ПорядокОбхода = 1;
Таблица2 = ДФ.Таблица();
Таблица2.Родитель = Форма1;
Таблица2.Текст = "Таблица2";
Таблица2.ПорядокОбхода = 3;
Таблица3 = ДФ.Таблица();
Таблица3.Родитель = Форма1;
Таблица3.Текст = "Таблица3";
Таблица3.ПорядокОбхода = 2;
Таблица4 = ДФ.Таблица();
Таблица4.Родитель = Форма1;
Таблица4.Текст = "Таблица4";
Таблица4.ПорядокОбхода = 4;
Таблица5 = ДФ.Таблица();
Таблица5.Родитель = Форма1;
Таблица5.Текст = "Таблица5";
Таблица5.ПорядокОбхода = 6;
Таблица6 = ДФ.Таблица();
Таблица6.Родитель = Форма1;
Таблица6.Текст = "Таблица6";
Таблица6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Термин_свойство.os
Перем ДФ, Термин1;
Процедура Свойство() Экспорт
Сообщить(?(
Термин1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Термин1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Текст = "Термин1";
Термин1.ПорядокОбхода = 1;
Термин2 = ДФ.Термин();
Термин2.Родитель = Форма1;
Термин2.Текст = "Термин2";
Термин2.ПорядокОбхода = 3;
Термин3 = ДФ.Термин();
Термин3.Родитель = Форма1;
Термин3.Текст = "Термин3";
Термин3.ПорядокОбхода = 2;
Термин4 = ДФ.Термин();
Термин4.Родитель = Форма1;
Термин4.Текст = "Термин4";
Термин4.ПорядокОбхода = 4;
Термин5 = ДФ.Термин();
Термин5.Родитель = Форма1;
Термин5.Текст = "Термин5";
Термин5.ПорядокОбхода = 6;
Термин6 = ДФ.Термин();
Термин6.Родитель = Форма1;
Термин6.Текст = "Термин6";
Термин6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
УдаленыйТекст1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УдаленыйТекст1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Текст = "УдаленыйТекст1";
УдаленыйТекст1.ПорядокОбхода = 1;
УдаленыйТекст2 = ДФ.УдаленыйТекст();
УдаленыйТекст2.Родитель = Форма1;
УдаленыйТекст2.Текст = "УдаленыйТекст2";
УдаленыйТекст2.ПорядокОбхода = 3;
УдаленыйТекст3 = ДФ.УдаленыйТекст();
УдаленыйТекст3.Родитель = Форма1;
УдаленыйТекст3.Текст = "УдаленыйТекст3";
УдаленыйТекст3.ПорядокОбхода = 2;
УдаленыйТекст4 = ДФ.УдаленыйТекст();
УдаленыйТекст4.Родитель = Форма1;
УдаленыйТекст4.Текст = "УдаленыйТекст4";
УдаленыйТекст4.ПорядокОбхода = 4;
УдаленыйТекст5 = ДФ.УдаленыйТекст();
УдаленыйТекст5.Родитель = Форма1;
УдаленыйТекст5.Текст = "УдаленыйТекст5";
УдаленыйТекст5.ПорядокОбхода = 6;
УдаленыйТекст6 = ДФ.УдаленыйТекст();
УдаленыйТекст6.Родитель = Форма1;
УдаленыйТекст6.Текст = "УдаленыйТекст6";
УдаленыйТекст6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
УпорядоченныйСписок1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Текст = "УпорядоченныйСписок1";
УпорядоченныйСписок1.ПорядокОбхода = 1;
УпорядоченныйСписок2 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок2.Родитель = Форма1;
УпорядоченныйСписок2.Текст = "УпорядоченныйСписок2";
УпорядоченныйСписок2.ПорядокОбхода = 3;
УпорядоченныйСписок3 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок3.Родитель = Форма1;
УпорядоченныйСписок3.Текст = "УпорядоченныйСписок3";
УпорядоченныйСписок3.ПорядокОбхода = 2;
УпорядоченныйСписок4 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок4.Родитель = Форма1;
УпорядоченныйСписок4.Текст = "УпорядоченныйСписок4";
УпорядоченныйСписок4.ПорядокОбхода = 4;
УпорядоченныйСписок5 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок5.Родитель = Форма1;
УпорядоченныйСписок5.Текст = "УпорядоченныйСписок5";
УпорядоченныйСписок5.ПорядокОбхода = 6;
УпорядоченныйСписок6 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок6.Родитель = Форма1;
УпорядоченныйСписок6.Текст = "УпорядоченныйСписок6";
УпорядоченныйСписок6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Свойство() Экспорт
Сообщить(?(
Флажок1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.ПорядокОбхода = 1;
Флажок2 = ДФ.Флажок();
Флажок2.Родитель = Форма1;
Флажок2.ПорядокОбхода = 3;
Флажок3 = ДФ.Флажок();
Флажок3.Родитель = Форма1;
Флажок3.ПорядокОбхода = 2;
Флажок4 = ДФ.Флажок();
Флажок4.Родитель = Форма1;
Флажок4.ПорядокОбхода = 4;
Флажок5 = ДФ.Флажок();
Флажок5.Родитель = Форма1;
Флажок5.ПорядокОбхода = 6;
Флажок6 = ДФ.Флажок();
Флажок6.Родитель = Форма1;
Флажок6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ФорматированныйТекст1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Текст = "ФорматированныйТекст1";
ФорматированныйТекст1.ПорядокОбхода = 1;
ФорматированныйТекст2 = ДФ.ФорматированныйТекст();
ФорматированныйТекст2.Родитель = Форма1;
ФорматированныйТекст2.Текст = "ФорматированныйТекст2";
ФорматированныйТекст2.ПорядокОбхода = 3;
ФорматированныйТекст3 = ДФ.ФорматированныйТекст();
ФорматированныйТекст3.Родитель = Форма1;
ФорматированныйТекст3.Текст = "ФорматированныйТекст3";
ФорматированныйТекст3.ПорядокОбхода = 2;
ФорматированныйТекст4 = ДФ.ФорматированныйТекст();
ФорматированныйТекст4.Родитель = Форма1;
ФорматированныйТекст4.Текст = "ФорматированныйТекст4";
ФорматированныйТекст4.ПорядокОбхода = 4;
ФорматированныйТекст5 = ДФ.ФорматированныйТекст();
ФорматированныйТекст5.Родитель = Форма1;
ФорматированныйТекст5.Текст = "ФорматированныйТекст5";
ФорматированныйТекст5.ПорядокОбхода = 6;
ФорматированныйТекст6 = ДФ.ФорматированныйТекст();
ФорматированныйТекст6.Родитель = Форма1;
ФорматированныйТекст6.Текст = "ФорматированныйТекст6";
ФорматированныйТекст6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Фрейм_свойство.os
Перем ДФ, Фрейм1;
Процедура Свойство() Экспорт
Сообщить(?(
Фрейм1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Фрейм_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Фрейм1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Фрейм1 = ДФ.Фрейм();
Фрейм1.Родитель = Форма1;
Фрейм1.ПорядокОбхода = 1;
Фрейм2 = ДФ.Фрейм();
Фрейм2.Родитель = Форма1;
Фрейм2.ПорядокОбхода = 3;
Фрейм3 = ДФ.Фрейм();
Фрейм3.Родитель = Форма1;
Фрейм3.ПорядокОбхода = 2;
Фрейм4 = ДФ.Фрейм();
Фрейм4.Родитель = Форма1;
Фрейм4.ПорядокОбхода = 4;
Фрейм5 = ДФ.Фрейм();
Фрейм5.Родитель = Форма1;
Фрейм5.ПорядокОбхода = 6;
Фрейм6 = ДФ.Фрейм();
Фрейм6.Родитель = Форма1;
Фрейм6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Холст_свойство.os
Перем ДФ, Холст1;
Процедура Свойство() Экспорт
Сообщить(?(
Холст1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Холст1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
Холст1.ПорядокОбхода = 1;
Холст2 = ДФ.Холст();
Холст2.Родитель = Форма1;
Холст2.ПорядокОбхода = 3;
Холст3 = ДФ.Холст();
Холст3.Родитель = Форма1;
Холст3.ПорядокОбхода = 2;
Холст4 = ДФ.Холст();
Холст4.Родитель = Форма1;
Холст4.ПорядокОбхода = 4;
Холст5 = ДФ.Холст();
Холст5.Родитель = Форма1;
Холст5.ПорядокОбхода = 6;
Холст6 = ДФ.Холст();
Холст6.Родитель = Форма1;
Холст6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ШапкаТаблицы_свойство.os
Перем ДФ, ШапкаТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
ШапкаТаблицы1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ШапкаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ШапкаТаблицы1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Текст = "ШапкаТаблицы1";
ШапкаТаблицы1.ПорядокОбхода = 1;
ШапкаТаблицы2 = ДФ.ШапкаТаблицы();
ШапкаТаблицы2.Родитель = Форма1;
ШапкаТаблицы2.Текст = "ШапкаТаблицы2";
ШапкаТаблицы2.ПорядокОбхода = 3;
ШапкаТаблицы3 = ДФ.ШапкаТаблицы();
ШапкаТаблицы3.Родитель = Форма1;
ШапкаТаблицы3.Текст = "ШапкаТаблицы3";
ШапкаТаблицы3.ПорядокОбхода = 2;
ШапкаТаблицы4 = ДФ.ШапкаТаблицы();
ШапкаТаблицы4.Родитель = Форма1;
ШапкаТаблицы4.Текст = "ШапкаТаблицы4";
ШапкаТаблицы4.ПорядокОбхода = 4;
ШапкаТаблицы5 = ДФ.ШапкаТаблицы();
ШапкаТаблицы5.Родитель = Форма1;
ШапкаТаблицы5.Текст = "ШапкаТаблицы5";
ШапкаТаблицы5.ПорядокОбхода = 6;
ШапкаТаблицы6 = ДФ.ШапкаТаблицы();
ШапкаТаблицы6.Родитель = Форма1;
ШапкаТаблицы6.Текст = "ШапкаТаблицы6";
ШапкаТаблицы6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Свойство() Экспорт
Сообщить(?(
Шкала1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Шкала1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Шкала1.ПорядокОбхода = 1;
Шкала2 = ДФ.Шкала();
Шкала2.Родитель = Форма1;
Шкала2.ПорядокОбхода = 3;
Шкала3 = ДФ.Шкала();
Шкала3.Родитель = Форма1;
Шкала3.ПорядокОбхода = 2;
Шкала4 = ДФ.Шкала();
Шкала4.Родитель = Форма1;
Шкала4.ПорядокОбхода = 4;
Шкала5 = ДФ.Шкала();
Шкала5.Родитель = Форма1;
Шкала5.ПорядокОбхода = 6;
Шкала6 = ДФ.Шкала();
Шкала6.Родитель = Форма1;
Шкала6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементПоляСписка1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Текст = "ЭлементПоляСписка1";
ЭлементПоляСписка1.ПорядокОбхода = 1;
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = Форма1;
ЭлементПоляСписка2.Текст = "ЭлементПоляСписка2";
ЭлементПоляСписка2.ПорядокОбхода = 3;
ЭлементПоляСписка3 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка3.Родитель = Форма1;
ЭлементПоляСписка3.Текст = "ЭлементПоляСписка3";
ЭлементПоляСписка3.ПорядокОбхода = 2;
ЭлементПоляСписка4 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка4.Родитель = Форма1;
ЭлементПоляСписка4.Текст = "ЭлементПоляСписка4";
ЭлементПоляСписка4.ПорядокОбхода = 4;
ЭлементПоляСписка5 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка5.Родитель = Форма1;
ЭлементПоляСписка5.Текст = "ЭлементПоляСписка5";
ЭлементПоляСписка5.ПорядокОбхода = 6;
ЭлементПоляСписка6 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка6.Родитель = Форма1;
ЭлементПоляСписка6.Текст = "ЭлементПоляСписка6";
ЭлементПоляСписка6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ЭлементСписка_свойство.os
Перем ДФ, ЭлементСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементСписка1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Текст = "ЭлементСписка1";
ЭлементСписка1.ПорядокОбхода = 1;
ЭлементСписка2 = ДФ.ЭлементСписка();
ЭлементСписка2.Родитель = Форма1;
ЭлементСписка2.Текст = "ЭлементСписка2";
ЭлементСписка2.ПорядокОбхода = 3;
ЭлементСписка3 = ДФ.ЭлементСписка();
ЭлементСписка3.Родитель = Форма1;
ЭлементСписка3.Текст = "ЭлементСписка3";
ЭлементСписка3.ПорядокОбхода = 2;
ЭлементСписка4 = ДФ.ЭлементСписка();
ЭлементСписка4.Родитель = Форма1;
ЭлементСписка4.Текст = "ЭлементСписка4";
ЭлементСписка4.ПорядокОбхода = 4;
ЭлементСписка5 = ДФ.ЭлементСписка();
ЭлементСписка5.Родитель = Форма1;
ЭлементСписка5.Текст = "ЭлементСписка5";
ЭлементСписка5.ПорядокОбхода = 6;
ЭлементСписка6 = ДФ.ЭлементСписка();
ЭлементСписка6.Родитель = Форма1;
ЭлементСписка6.Текст = "ЭлементСписка6";
ЭлементСписка6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ячейка1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ячейка1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Текст = "Ячейка1";
Ячейка1.ПорядокОбхода = 1;
Ячейка2 = ДФ.Ячейка();
Ячейка2.Родитель = Форма1;
Ячейка2.Текст = "Ячейка2";
Ячейка2.ПорядокОбхода = 3;
Ячейка3 = ДФ.Ячейка();
Ячейка3.Родитель = Форма1;
Ячейка3.Текст = "Ячейка3";
Ячейка3.ПорядокОбхода = 2;
Ячейка4 = ДФ.Ячейка();
Ячейка4.Родитель = Форма1;
Ячейка4.Текст = "Ячейка4";
Ячейка4.ПорядокОбхода = 4;
Ячейка5 = ДФ.Ячейка();
Ячейка5.Родитель = Форма1;
Ячейка5.Текст = "Ячейка5";
Ячейка5.ПорядокОбхода = 6;
Ячейка6 = ДФ.Ячейка();
Ячейка6.Родитель = Форма1;
Ячейка6.Текст = "Ячейка6";
Ячейка6.ПорядокОбхода = 5;
Форма1.Открыть();
ПорядокОбхода_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЯчейкаЗаголовка1.ПорядокОбхода = 1
, "", "!!! ") + "ПорядокОбхода_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка1, "ПорядокОбхода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Текст = "ЯчейкаЗаголовка1";
ЯчейкаЗаголовка1.ПорядокОбхода = 1;
ЯчейкаЗаголовка2 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка2.Родитель = Форма1;
ЯчейкаЗаголовка2.Текст = "ЯчейкаЗаголовка2";
ЯчейкаЗаголовка2.ПорядокОбхода = 3;
ЯчейкаЗаголовка3 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка3.Родитель = Форма1;
ЯчейкаЗаголовка3.Текст = "ЯчейкаЗаголовка3";
ЯчейкаЗаголовка3.ПорядокОбхода = 2;
ЯчейкаЗаголовка4 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка4.Родитель = Форма1;
ЯчейкаЗаголовка4.Текст = "ЯчейкаЗаголовка4";
ЯчейкаЗаголовка4.ПорядокОбхода = 4;
ЯчейкаЗаголовка5 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка5.Родитель = Форма1;
ЯчейкаЗаголовка5.Текст = "ЯчейкаЗаголовка5";
ЯчейкаЗаголовка5.ПорядокОбхода = 6;
ЯчейкаЗаголовка6 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка6.Родитель = Форма1;
ЯчейкаЗаголовка6.Текст = "ЯчейкаЗаголовка6";
ЯчейкаЗаголовка6.ПорядокОбхода = 5;
Форма1.Открыть();
ПраваяГраница_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ПраваяГраница = "4px double rgb(255, 0, 0)"
, "", "!!! ") + "ПраваяГраница_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ПраваяГраница", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 250;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 150;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.ПраваяГраница = ДФ.ПраваяГраница(4, ДФ.СтильГраницы.Двойная, ДФ.Цвет.Красный);
Форма1.Открыть();
Право_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Право = "200px"
, "", "!!! ") + "Право_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Право", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Блок1.Стиль.Право = 200;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Блок1;
Абзац1.Текст = "И снова лодочка скользит
|Неслышно по волнам,
|И солнце в зелени сквозит,
|Слетает сказка к нам.
|Как драгоценность берегу
|Тот день и нас на берегу.";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Форма1.Открыть();
ПравыйРадиусВерхнейГраницы_РадиусГраницы_свойство.os
Перем ДФ, РадиусГраницы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
РадиусГраницы1.ПравыйРадиусВерхнейГраницы = 10
, "", "!!! ") + "ПравыйРадиусВерхнейГраницы_РадиусГраницы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
РадиусГраницы1 = ДФ.РадиусГраницы();
РадиусГраницы1.ЛевыйРадиусВерхнейГраницы = 10;
РадиусГраницы1.ПравыйРадиусВерхнейГраницы = 10;
РадиусГраницы1.ПравыйРадиусНижнейГраницы = 20;
РадиусГраницы1.ЛевыйРадиусНижнейГраницы = 20;
РадиусГраницы2 = ДФ.РадиусГраницы(10, 10, 20, 20);
Форма1.Открыть();
ПравыйРадиусВерхнейГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ПравыйРадиусВерхнейГраницы = "25px"
, "", "!!! ") + "ПравыйРадиусВерхнейГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ПравыйРадиусВерхнейГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 300;
Блок1.Текст = "Блок1";
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
// Блок1.Стиль.ЛевыйРадиусНижнейГраницы = "25px";
Блок1.Стиль.ЛевыйРадиусНижнейГраницы = 25;
// Блок1.Стиль.ПравыйРадиусНижнейГраницы = "25px";
Блок1.Стиль.ПравыйРадиусНижнейГраницы = 25;
// Блок1.Стиль.ПравыйРадиусВерхнейГраницы = "25px";
Блок1.Стиль.ПравыйРадиусВерхнейГраницы = 25;
// Блок1.Стиль.ЛевыйРадиусВерхнейГраницы = "25px";
Блок1.Стиль.ЛевыйРадиусВерхнейГраницы = 25;
Форма1.Открыть();
ПравыйРадиусНижнейГраницы_РадиусГраницы_свойство.os
Перем ДФ, РадиусГраницы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
РадиусГраницы1.ПравыйРадиусНижнейГраницы = 20
, "", "!!! ") + "ПравыйРадиусНижнейГраницы_РадиусГраницы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
РадиусГраницы1 = ДФ.РадиусГраницы();
РадиусГраницы1.ЛевыйРадиусВерхнейГраницы = 10;
РадиусГраницы1.ПравыйРадиусВерхнейГраницы = 10;
РадиусГраницы1.ПравыйРадиусНижнейГраницы = 20;
РадиусГраницы1.ЛевыйРадиусНижнейГраницы = 20;
РадиусГраницы2 = ДФ.РадиусГраницы(10, 10, 20, 20);
Форма1.Открыть();
ПравыйРадиусНижнейГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ПравыйРадиусНижнейГраницы = "25px"
, "", "!!! ") + "ПравыйРадиусНижнейГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ПравыйРадиусНижнейГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 300;
Блок1.Текст = "Блок1";
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
// Блок1.Стиль.ЛевыйРадиусНижнейГраницы = "25px";
Блок1.Стиль.ЛевыйРадиусНижнейГраницы = 25;
// Блок1.Стиль.ПравыйРадиусНижнейГраницы = "25px";
Блок1.Стиль.ПравыйРадиусНижнейГраницы = 25;
Форма1.Открыть();
ПределСреза_Контекст2d_свойство.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контекст2d1.ПределСреза = 5
, "", "!!! ") + "ПределСреза_Контекст2d_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.ШиринаЛинии = 10;
Контекст2d1.СтильУглаПересечения = ДФ.СтильУглаПересечения.Острый;
Контекст2d1.ПределСреза = 5;
Контекст2d1.ПерейтиКТочке(20, 20);
Контекст2d1.Линия(50, 27);
Контекст2d1.Линия(20, 34);
Контекст2d1.Начертить();
Форма1.Открыть();
Преобразовать_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "Преобразовать_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 300;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.ЗаполнитьПрямоугольник(10, 10, 100, 50);
Контекст2d1.Преобразовать(70, 70);
Контекст2d1.ЗаполнитьПрямоугольник(10, 10, 100, 50);
Форма1.Открыть();
ПриИзменении_ВыборВремени_событие.os
Перем ДФ, ВыборВремени1;
Процедура ВыборВремени1_ПриИзменении() Экспорт
// Сообщить("" + ВыборВремени1.Значение);
Сообщить(?(
Истина
, "", "!!! ") + "ПриИзменении_ВыборВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Измени ВыборВремени1";
ВыборВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
ВыборВремени1.Значение = "22:00";
ВыборВремени1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "ВыборВремени1_ПриИзменении");
Форма1.Открыть();
ПриИзменении_ВыборДаты_событие.os
Перем ДФ, ВыборДаты1;
Процедура ВыборДаты1_ПриИзменении() Экспорт
// Сообщить("" + ВыборДаты1.Значение);
Сообщить(?(
ВыборДаты1.ПриИзменении.ИмяМетода = "ВыборДаты1_ПриИзменении"
, "", "!!! ") + "ПриИзменении_ВыборДаты_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Измени ВыборДаты1";
ВыборДаты1 = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
ВыборДаты1.Значение = "2014-02-09";
ВыборДаты1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_ПриИзменении");
Форма1.Открыть();
ПриИзменении_ВыборДатыВремени_событие.os
Перем ДФ, ВыборДатыВремени1;
Процедура ВыборДатыВремени1_ПриИзменении() Экспорт
// Сообщить("" + ВыборДатыВремени1.Значение);
Сообщить(?(
ВыборДатыВремени1.ПриИзменении.ИмяМетода = "ВыборДатыВремени1_ПриИзменении"
, "", "!!! ") + "ПриИзменении_ВыборДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Измени ВыборДатыВремени1";
ВыборДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
ВыборДатыВремени1.Значение = "2014-02-06T10:57Z";
ВыборДатыВремени1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_ПриИзменении");
Форма1.Открыть();
ПриИзменении_ВыборМесяца_событие.os
Перем ДФ, ВыборМесяца1;
Процедура ВыборМесяца1_ПриИзменении() Экспорт
// Сообщить("" + ВыборМесяца1.Значение);
Сообщить(?(
ВыборМесяца1.ПриИзменении.ИмяМетода = "ВыборМесяца1_ПриИзменении"
, "", "!!! ") + "ПриИзменении_ВыборМесяца_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Измени ВыборМесяца1";
ВыборМесяца1 = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
ВыборМесяца1.Значение = "2014-05";
ВыборМесяца1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_ПриИзменении");
Форма1.Открыть();
ПриИзменении_ВыборНедели_событие.os
Перем ДФ, ВыборНедели1;
Процедура ВыборНедели1_ПриИзменении() Экспорт
// Сообщить("" + ВыборНедели1.Значение);
Сообщить(?(
ВыборНедели1.ПриИзменении.ИмяМетода = "ВыборНедели1_ПриИзменении"
, "", "!!! ") + "ПриИзменении_ВыборНедели_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Измени ВыборНедели1";
ВыборНедели1 = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
ВыборНедели1.Значение = "2014-W15";
ВыборНедели1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_ПриИзменении");
Форма1.Открыть();
ПриИзменении_ВыборФайла_событие.os
Перем ДФ, ВыборФайла1;
Процедура ВыборФайла1_ПриИзменении() Экспорт
// Для А = 0 По ВыборФайла1.Файлы.ВГраница() Цикл
// Сообщить("" + ВыборФайла1.Файлы.Получить(А));
// КонецЦикла;
Сообщить(?(
ВыборФайла1.ПриИзменении.ИмяМетода = "ВыборФайла1_ПриИзменении"
, "", "!!! ") + "ПриИзменении_ВыборФайла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Измени ВыборФайла1";
ВыборФайла1 = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
ВыборФайла1.МножественныйВыбор = Истина;
ВыборФайла1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "ВыборФайла1_ПриИзменении");
Форма1.Открыть();
ПриИзменении_ВыборЦвета_событие.os
Перем ДФ, ВыборЦвета1;
Процедура ВыборЦвета1_ПриИзменении() Экспорт
// Сообщить("" + ВыборЦвета1.Значение);
Сообщить(?(
ВыборЦвета1.ПриИзменении.ИмяМетода = "ВыборЦвета1_ПриИзменении"
, "", "!!! ") + "ПриИзменении_ВыборЦвета_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Измени ВыборЦвета1";
ВыборЦвета1 = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
ВыборЦвета1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "ВыборЦвета1_ПриИзменении");
Форма1.Открыть();
ПриИзменении_ОбластьТекста_событие.os
Перем ДФ, ОбластьТекста1;
Процедура ОбластьТекста1_ПриИзменении() Экспорт
// Сообщить("" + ОбластьТекста1.Значение);
Сообщить(?(
ОбластьТекста1.ПриИзменении.ИмяМетода = "ОбластьТекста1_ПриИзменении"
, "", "!!! ") + "ПриИзменении_ОбластьТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Измени ОбластьТекста1";
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Значение = "ОбластьТекста1";
ОбластьТекста1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_ПриИзменении");
Форма1.Открыть();
ПриИзменении_Переключатель_событие.os
Перем ДФ, Переключатель1;
Процедура Переключатель1_ПриИзменении() Экспорт
// Сообщить("" + Переключатель1.Значение);
Сообщить(?(
Переключатель1.ПриИзменении.ИмяМетода = "Переключатель1_ПриИзменении"
, "", "!!! ") + "ПриИзменении_Переключатель_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Измени Переключатель1";
Переключатель1 = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель1.Имя = "перекл";
Переключатель2 = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель2.Имя = "перекл";
Переключатель1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "Переключатель1_ПриИзменении");
Форма1.Открыть();
ПриИзменении_ПолеПароля_событие.os
Перем ДФ, ПолеПароля1;
Процедура ПолеПароля1_ПриИзменении() Экспорт
// Сообщить("" + ПолеПароля1.Значение);
Сообщить(?(
ПолеПароля1.ПриИзменении.ИмяМетода = "ПолеПароля1_ПриИзменении"
, "", "!!! ") + "ПриИзменении_ПолеПароля_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Измени ПолеПароля1";
ПолеПароля1 = Форма1.ДобавитьДочерний(ДФ.ПолеПароля());
ПолеПароля1.Значение = "пароль";
ПолеПароля1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_ПриИзменении");
Форма1.Открыть();
ПриИзменении_ПолеПоиска_событие.os
Перем ДФ, ПолеПоиска1;
Процедура ПолеПоиска1_ПриИзменении() Экспорт
// Сообщить("" + ПолеПоиска1.Значение);
Сообщить(?(
ПолеПоиска1.ПриИзменении.ИмяМетода = "ПолеПоиска1_ПриИзменении"
, "", "!!! ") + "ПриИзменении_ПолеПоиска_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Измени ПолеПоиска1";
ПолеПоиска1 = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
ПолеПоиска1.Значение = "абракадабра";
ПолеПоиска1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_ПриИзменении");
Форма1.Открыть();
ПриИзменении_ПолеСписка_событие.os
Перем ДФ, ПолеСписка1;
Процедура ПолеСписка1_ПриИзменении() Экспорт
// Сообщить("" + ПолеСписка1.Значение);
Сообщить(?(
ПолеСписка1.ПриИзменении.ИмяМетода = "ПолеСписка1_ПриИзменении"
, "", "!!! ") + "ПриИзменении_ПолеСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Измени ПолеСписка1";
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Ширина = 150;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = ПолеСписка1;
ГруппировкаПоляСписка1.Надпись = "Жители деревни Простоквашино";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка1.Значение = "Кот";
ЭлементПоляСписка1.Текст = "Матроскин";
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Пёс";
ЭлементПоляСписка2.Текст = "Шарик";
ЭлементПоляСписка3 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка3.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка3.Значение = "Птица";
ЭлементПоляСписка3.Текст = "Галчонок";
ПолеСписка1.Значение = "Птица";
ПолеСписка1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "ПолеСписка1_ПриИзменении");
Форма1.Открыть();
ПриИзменении_ПолеТекста_событие.os
Перем ДФ, ПолеТекста1;
Процедура ПолеТекста1_ПриИзменении() Экспорт
// Сообщить("" + ПолеТекста1.Значение);
Сообщить(?(
ПолеТекста1.ПриИзменении.ИмяМетода = "ПолеТекста1_ПриИзменении"
, "", "!!! ") + "ПриИзменении_ПолеТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Измени ПолеТекста1";
ПолеТекста1 = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
ПолеТекста1.Значение = "ПолеТекста1";
ПолеТекста1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_ПриИзменении");
Форма1.Открыть();
ПриИзменении_ПолеЧисла_событие.os
Перем ДФ, ПолеЧисла1;
Процедура ПолеЧисла1_ПриИзменении() Экспорт
// Сообщить("" + ПолеЧисла1.Значение);
Сообщить(?(
ПолеЧисла1.ПриИзменении.ИмяМетода = "ПолеЧисла1_ПриИзменении"
, "", "!!! ") + "ПриИзменении_ПолеЧисла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Измени ПолеЧисла1";
ПолеЧисла1 = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Шаг = 0.5;
ПолеЧисла1.Значение = 77.5;
ПолеЧисла1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_ПриИзменении");
Форма1.Открыть();
ПриИзменении_Ползунок_событие.os
Перем ДФ, Ползунок1;
Процедура Ползунок1_ПриИзменении() Экспорт
// Сообщить("" + Ползунок1.Значение);
Сообщить(?(
Ползунок1.ПриИзменении.ИмяМетода = "Ползунок1_ПриИзменении"
, "", "!!! ") + "ПриИзменении_Ползунок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Измени Ползунок1, можно стрелками вправо - влево.";
Ползунок1 = Форма1.ДобавитьДочерний(ДФ.Ползунок());
Ползунок1.Шаг = 0.5;
Ползунок1.Значение = 15.5;
Ползунок1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "Ползунок1_ПриИзменении");
Форма1.Открыть();
ПриИзменении_Флажок_событие.os
Перем ДФ, Флажок1;
Процедура Флажок1_ПриИзменении() Экспорт
Сообщить(?(
Флажок1.ПриИзменении.ИмяМетода = "Флажок1_ПриИзменении"
, "", "!!! ") + "ПриИзменении_Флажок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Измени Флажок1";
Флажок1 = Форма1.ДобавитьДочерний(ДФ.Флажок());
Флажок1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "Флажок1_ПриИзменении");
Флажок1.Помечен = Ложь;
Форма1.Открыть();
ПриНажатииМыши_Абзац_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Абзац_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Абзац());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Артикль_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Артикль_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Артикль());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Блок_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Блок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Блок());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ВыборВремени_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ВыборВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ВыборДаты_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ВыборДаты_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ВыборДатыВремени_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ВыборДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ВыборМестнойДатыВремени_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ВыборМестнойДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ВыборМесяца_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ВыборМесяца_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ВыборНедели_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ВыборНедели_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ВыборФайла_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ВыборФайла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ВыборЦвета_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ВыборЦвета_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Группа_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Группа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Группа());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ГруппировкаПоляСписка_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ГруппировкаПоляСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ГруппировкаПоляСписка());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Диалог_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Диалог_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Диалог());
Источник.Показать();
Источник.Показать();
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ДополнительныйБлок_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ДополнительныйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ЖирныйТекст_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ЖирныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Заголовок1_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Заголовок1_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Заголовок2_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Заголовок2_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Заголовок3_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Заголовок3_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Заголовок4_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Заголовок4_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Заголовок5_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Заголовок5_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Заголовок6_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Заголовок6_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Заголовок_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Заголовок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ЗаголовокГруппы_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ЗаголовокГруппы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ЗаголовокГруппы());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ЗаголовокРаскрываемогоБлока_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ЗаголовокРаскрываемогоБлока_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ЗаголовокРаскрываемогоБлока());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Изображение_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Изображение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Изображение());
Источник.Источник = "maslenica10.jpg";
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Индикатор_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Индикатор_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Индикатор());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Карта_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Карта_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Карта());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Кнопка_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Кнопка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Код_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Код_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Код());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Колонтитул_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Колонтитул_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Колонтитул());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_КурсивТекст_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_КурсивТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Линия_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Линия_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Линия());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_МаркированныйТекст_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_МаркированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_МедиаГруппа_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_МедиаГруппа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.МедиаГруппа());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_МелкийТекст_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_МелкийТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_НадстрочныйТекст_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_НадстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_НаправленныйТекст_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_НаправленныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_НеупорядоченныйСписок_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_НеупорядоченныйСписок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_НижнийКолонтитул_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_НижнийКолонтитул_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.НижнийКолонтитул());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Область_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Область_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Область());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ОбластьТекста_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ОбластьТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ОписаниеМедиа_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ОписаниеМедиа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ОписаниеМедиа());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Определение_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Определение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Определение());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Переключатель_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Переключатель_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Подпись_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Подпись_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Подпись());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ПодстрочныйТекст_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ПодстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ПодчеркнутыйТекст_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ПодчеркнутыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ПолеПароля_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ПолеПароля_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеПароля());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ПолеПоиска_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ПолеПоиска_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ПолеСписка_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ПолеСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеСписка());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ПолеТекста_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ПолеТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_РаскрываемыйБлок_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_РаскрываемыйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Результат_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Результат_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Результат());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_СписокОпределений_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_СписокОпределений_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.СписокОпределений());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Ссылка_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Ссылка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Таблица_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Таблица_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Таблица());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Термин_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Термин_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Термин());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_УдаленыйТекст_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_УдаленыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_УпорядоченныйСписок_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_УпорядоченныйСписок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.УпорядоченныйСписок());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ФорматированныйТекст_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ФорматированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Холст_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Холст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Холст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Шкала_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Шкала_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Шкала());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ЭлементПоляСписка_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ЭлементПоляСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ЭлементПоляСписка());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ЭлементСписка_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ЭлементСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ЭлементСписка());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_Ячейка_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_Ячейка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Ячейка());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
ПриНажатииМыши_ЯчейкаЗаголовка_событие.os
Перем ДФ, Информация;
Процедура ПриНажатииМыши() Экспорт
Информация.Текст = "" + Символы.ПС +
"ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "" + Символы.ПС +
"ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "" + Символы.ПС +
"ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "" + Символы.ПС +
"ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "" + Символы.ПС +
"ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "" + Символы.ПС +
"ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "" + Символы.ПС +
"";
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриНажатииМыши_ЯчейкаЗаголовка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Нажми мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриНажатииМыши = ДФ.Действие(ЭтотОбъект, "ПриНажатииМыши");
Информация = Форма1.ДобавитьДочерний(ДФ.Абзац());
Информация.Текст = "Информация";
Форма1.Открыть();
Принимаемый_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборФайла1.Принимаемый = ДФ.ТипВыбранногоФайла.Изображение
, "", "!!! ") + "Принимаемый_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1, "Принимаемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.Принимаемый = ДФ.ТипВыбранногоФайла.Изображение;
Форма1.Открыть();
ПриОтпусканииМыши_Абзац_событие.os
Перем ДФ, Абзац1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Абзац1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Абзац_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Абзац1";
Абзац1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Абзац1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Абзац1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Артикль_событие.os
Перем ДФ, Артикль1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Артикль1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Артикль_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Артикль1 = Форма1.ДобавитьДочерний(ДФ.Артикль());
Артикль1.Текст = "Артикль1";
Артикль1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Артикль1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Артикль1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Блок_событие.os
Перем ДФ, Блок1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Блок1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Блок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Текст = "Блок1";
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Блок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ВыборВремени_событие.os
Перем ДФ, ВыборВремени1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ВыборВремени1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ВыборВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ВыборВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
ВыборВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборВремени1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ВыборДаты_событие.os
Перем ДФ, ВыборДаты1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ВыборДаты1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ВыборДаты_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ВыборДаты1 = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
ВыборДаты1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборДаты1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ВыборДатыВремени_событие.os
Перем ДФ, ВыборДатыВремени1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ВыборДатыВремени1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ВыборДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ВыборДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
ВыборДатыВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборДатыВремени1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ВыборМестнойДатыВремени_событие.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ВыборМестнойДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ВыборМестнойДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
ВыборМестнойДатыВремени1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборМестнойДатыВремени1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ВыборМесяца_событие.os
Перем ДФ, ВыборМесяца1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ВыборМесяца1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ВыборМесяца_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ВыборМесяца1 = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
ВыборМесяца1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборМесяца1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ВыборНедели_событие.os
Перем ДФ, ВыборНедели1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ВыборНедели1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ВыборНедели_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ВыборНедели1 = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
ВыборНедели1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборНедели1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ВыборФайла_событие.os
Перем ДФ, ВыборФайла1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ВыборФайла1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ВыборФайла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ВыборФайла1 = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
ВыборФайла1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборФайла1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ВыборЦвета_событие.os
Перем ДФ, ВыборЦвета1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ВыборЦвета1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ВыборЦвета_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ВыборЦвета1 = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
ВыборЦвета1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ВыборЦвета1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Группа_событие.os
Перем ДФ, Группа1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Группа1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Группа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Группа1 = Форма1.ДобавитьДочерний(ДФ.Группа());
Группа1.Текст = "Группа1";
Группа1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Группа1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Группа1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ГруппировкаПоляСписка_событие.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ГруппировкаПоляСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ГруппировкаПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ГруппировкаПоляСписка());
ГруппировкаПоляСписка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ГруппировкаПоляСписка1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Диалог_событие.os
Перем ДФ, Диалог1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Диалог1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Диалог_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Диалог1 = Форма1.ДобавитьДочерний(ДФ.Диалог());
Диалог1.Текст = "Диалог1";
Диалог1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Диалог1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Диалог1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Диалог1.Показать();
Форма1.Открыть();
ПриОтпусканииМыши_ДополнительныйБлок_событие.os
Перем ДФ, ДополнительныйБлок1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ДополнительныйБлок1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ДополнительныйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ДополнительныйБлок1 = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
ДополнительныйБлок1.Текст = "ДополнительныйБлок1";
ДополнительныйБлок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ДополнительныйБлок1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ЖирныйТекст_событие.os
Перем ДФ, ЖирныйТекст1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ЖирныйТекст1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ЖирныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЖирныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
ЖирныйТекст1.Текст = "ЖирныйТекст1";
ЖирныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЖирныйТекст1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Заголовок1_событие.os
Перем ДФ, Заголовок11;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Заголовок11.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Заголовок1_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок11 = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок11.Текст = "Заголовок11";
Заголовок11.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок11.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Заголовок2_событие.os
Перем ДФ, Заголовок21;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Заголовок21.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Заголовок2_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок21 = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок21.Текст = "Заголовок21";
Заголовок21.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок21.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Заголовок3_событие.os
Перем ДФ, Заголовок31;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Заголовок31.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Заголовок3_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок31 = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок31.Текст = "Заголовок31";
Заголовок31.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок31.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Заголовок4_событие.os
Перем ДФ, Заголовок41;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Заголовок41.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Заголовок4_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок41 = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Заголовок41.Текст = "Заголовок41";
Заголовок41.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок41.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Заголовок5_событие.os
Перем ДФ, Заголовок51;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Заголовок51.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Заголовок5_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок51 = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Заголовок51.Текст = "Заголовок51";
Заголовок51.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок51.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Заголовок6_событие.os
Перем ДФ, Заголовок61;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Заголовок61.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Заголовок6_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок61 = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Заголовок61.Текст = "Заголовок61";
Заголовок61.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок61.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Заголовок_событие.os
Перем ДФ, Заголовок1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Заголовок1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Заголовок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок1 = Форма1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Заголовок1";
Заголовок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Заголовок1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ЗаголовокГруппы_событие.os
Перем ДФ, ЗаголовокГруппы1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ЗаголовокГруппы1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ЗаголовокГруппы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЗаголовокГруппы1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокГруппы());
ЗаголовокГруппы1.Текст = "ЗаголовокГруппы1";
ЗаголовокГруппы1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЗаголовокГруппы1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ЗаголовокРаскрываемогоБлока_событие.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ЗаголовокРаскрываемогоБлока_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЗаголовокРаскрываемогоБлока1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокРаскрываемогоБлока());
ЗаголовокРаскрываемогоБлока1.Текст = "ЗаголовокРаскрываемогоБлока1";
ЗаголовокРаскрываемогоБлока1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЗаголовокРаскрываемогоБлока1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Изображение_событие.os
Перем ДФ, Изображение1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Изображение1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Изображение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Изображение1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Изображение1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Индикатор_событие.os
Перем ДФ, Индикатор1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Индикатор1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Индикатор_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Индикатор1 = Форма1.ДобавитьДочерний(ДФ.Индикатор());
Индикатор1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Индикатор1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Итоги_событие.os
Перем ДФ, Итоги1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Итоги1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Итоги_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Итоги1 = Форма1.ДобавитьДочерний(ДФ.Итоги());
Итоги1.Текст = "Итоги1";
Итоги1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Итоги1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Итоги1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Карта_событие.os
Перем ДФ, Карта1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Карта1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Карта_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Карта1 = Форма1.ДобавитьДочерний(ДФ.Карта());
Карта1.Текст = "Карта1";
Карта1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Карта1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Карта1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Кнопка_событие.os
Перем ДФ, Кнопка1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Кнопка1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Кнопка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Кнопка1";
Кнопка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Кнопка1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Код_событие.os
Перем ДФ, Код1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Код1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Код_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Код1 = Форма1.ДобавитьДочерний(ДФ.Код());
Код1.Текст = "Код1";
Код1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Код1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Код1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Колонтитул_событие.os
Перем ДФ, Колонтитул1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Колонтитул1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Колонтитул_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Колонтитул1 = Форма1.ДобавитьДочерний(ДФ.Колонтитул());
Колонтитул1.Текст = "Колонтитул1";
Колонтитул1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Колонтитул1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_КурсивТекст_событие.os
Перем ДФ, КурсивТекст1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
КурсивТекст1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_КурсивТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
КурсивТекст1 = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
КурсивТекст1.Текст = "КурсивТекст1";
КурсивТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
КурсивТекст1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Линия_событие.os
Перем ДФ, Линия1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Линия1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Линия_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Линия1 = Форма1.ДобавитьДочерний(ДФ.Линия());
Линия1.Текст = "Линия1";
Линия1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Линия1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Линия1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_МаркированныйТекст_событие.os
Перем ДФ, МаркированныйТекст1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
МаркированныйТекст1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_МаркированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
МаркированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
МаркированныйТекст1.Текст = "МаркированныйТекст1";
МаркированныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
МаркированныйТекст1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_МедиаГруппа_событие.os
Перем ДФ, МедиаГруппа1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
МедиаГруппа1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_МедиаГруппа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
МедиаГруппа1 = Форма1.ДобавитьДочерний(ДФ.МедиаГруппа());
МедиаГруппа1.Текст = "МедиаГруппа1";
МедиаГруппа1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
МедиаГруппа1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_МелкийТекст_событие.os
Перем ДФ, МелкийТекст1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
МелкийТекст1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_МелкийТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
МелкийТекст1 = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
МелкийТекст1.Текст = "МелкийТекст1";
МелкийТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
МелкийТекст1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_НадстрочныйТекст_событие.os
Перем ДФ, НадстрочныйТекст1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
НадстрочныйТекст1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_НадстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
НадстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
НадстрочныйТекст1.Текст = "НадстрочныйТекст1";
НадстрочныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
НадстрочныйТекст1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_НаправленныйТекст_событие.os
Перем ДФ, НаправленныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НаправленныйТекст1.ПриОтпусканииМыши.ИмяМетода = "НаправленныйТекст1_ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_НаправленныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура НаправленныйТекст1_ПриОтпусканииМыши() Экспорт
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "НаправленныйТекст1_ПриОтпусканииМыши");
Форма1.Открыть();
ПриОтпусканииМыши_НеупорядоченныйСписок_событие.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_НеупорядоченныйСписок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
НеупорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
НеупорядоченныйСписок1.Текст = "НеупорядоченныйСписок1";
НеупорядоченныйСписок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
НеупорядоченныйСписок1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_НижнийКолонтитул_событие.os
Перем ДФ, НижнийКолонтитул1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
НижнийКолонтитул1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_НижнийКолонтитул_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
НижнийКолонтитул1 = Форма1.ДобавитьДочерний(ДФ.НижнийКолонтитул());
НижнийКолонтитул1.Текст = "НижнийКолонтитул1";
НижнийКолонтитул1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
НижнийКолонтитул1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Область_событие.os
Перем ДФ, Область1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Область1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Область_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Область1 = Форма1.ДобавитьДочерний(ДФ.Область());
Область1.Текст = "Область1";
Область1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Область1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Область1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ОбластьТаблицы_событие.os
Перем ДФ, ОбластьТаблицы1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ОбластьТаблицы1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ОбластьТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ОбластьТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
ОбластьТаблицы1.Текст = "ОбластьТаблицы1";
ОбластьТаблицы1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ОбластьТаблицы1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ОбластьТекста_событие.os
Перем ДФ, ОбластьТекста1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ОбластьТекста1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ОбластьТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Текст = "ОбластьТекста1";
ОбластьТекста1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ОбластьТекста1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ОписаниеМедиа_событие.os
Перем ДФ, ОписаниеМедиа1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ОписаниеМедиа1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ОписаниеМедиа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ОписаниеМедиа1 = Форма1.ДобавитьДочерний(ДФ.ОписаниеМедиа());
ОписаниеМедиа1.Текст = "ОписаниеМедиа1";
ОписаниеМедиа1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ОписаниеМедиа1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Определение_событие.os
Перем ДФ, Определение1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Определение1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Определение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Определение1 = Форма1.ДобавитьДочерний(ДФ.Определение());
Определение1.Текст = "Определение1";
Определение1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Определение1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Определение1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Переключатель_событие.os
Перем ДФ, Переключатель1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Переключатель1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Переключатель_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Переключатель1 = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Переключатель1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Перенос_событие.os
Перем ДФ, Перенос1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Перенос1.ПриОтпусканииМыши.ИмяМетода = "Перенос1_ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Перенос_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Перенос1_ПриОтпусканииМыши() Экспорт
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Перенос1 = ДФ.Перенос();
Перенос1.Родитель = Форма1;
Перенос1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "Перенос1_ПриОтпусканииМыши");
Форма1.Открыть();
ПриОтпусканииМыши_Подпись_событие.os
Перем ДФ, Подпись1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Подпись1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Подпись_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Подпись1 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Текст = "Подпись1";
Подпись1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Подпись1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Подпись1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ПодстрочныйТекст_событие.os
Перем ДФ, ПодстрочныйТекст1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ПодстрочныйТекст1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ПодстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ПодстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
ПодстрочныйТекст1.Текст = "ПодстрочныйТекст1";
ПодстрочныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПодстрочныйТекст1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ПодчеркнутыйТекст_событие.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ПодчеркнутыйТекст1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ПодчеркнутыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ПодчеркнутыйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
ПодчеркнутыйТекст1.Текст = "ПодчеркнутыйТекст1";
ПодчеркнутыйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПодчеркнутыйТекст1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ПолеПароля_событие.os
Перем ДФ, ПолеПароля1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ПолеПароля1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ПолеПароля_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ПолеПароля1 = Форма1.ДобавитьДочерний(ДФ.ПолеПароля());
ПолеПароля1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПолеПароля1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ПолеПоиска_событие.os
Перем ДФ, ПолеПоиска1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ПолеПоиска1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ПолеПоиска_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ПолеПоиска1 = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
ПолеПоиска1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПолеПоиска1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ПолеСписка_событие.os
Перем ДФ, ПолеСписка1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ПолеСписка1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ПолеСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ПолеСписка1 = Форма1.ДобавитьДочерний(ДФ.ПолеСписка());
ПолеСписка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПолеСписка1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ПолеТекста_событие.os
Перем ДФ, ПолеТекста1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ПолеТекста1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ПолеТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ПолеТекста1 = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
ПолеТекста1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ПолеТекста1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_РаскрываемыйБлок_событие.os
Перем ДФ, РаскрываемыйБлок1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
РаскрываемыйБлок1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_РаскрываемыйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
РаскрываемыйБлок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
РаскрываемыйБлок1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Результат_событие.os
Перем ДФ, Результат1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Результат1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Результат_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Результат1 = Форма1.ДобавитьДочерний(ДФ.Результат());
Результат1.Текст = "Результат1";
Результат1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Результат1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Результат1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_СписокОпределений_событие.os
Перем ДФ, СписокОпределений1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
СписокОпределений1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_СписокОпределений_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
СписокОпределений1 = Форма1.ДобавитьДочерний(ДФ.СписокОпределений());
СписокОпределений1.Текст = "СписокОпределений1";
СписокОпределений1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
СписокОпределений1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Ссылка_событие.os
Перем ДФ, Ссылка1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Ссылка1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Ссылка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Ссылка1 = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка1.Текст = "Ссылка1";
Ссылка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Ссылка1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_СтрокаТаблицы_событие.os
Перем ДФ, СтрокаТаблицы1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
СтрокаТаблицы1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_СтрокаТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
СтрокаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаТаблицы1.Текст = "СтрокаТаблицы1";
СтрокаТаблицы1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
СтрокаТаблицы1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Таблица_событие.os
Перем ДФ, Таблица1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Таблица1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Таблица_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Текст = "Таблица1";
Таблица1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Таблица1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Таблица1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Термин_событие.os
Перем ДФ, Термин1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Термин1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Термин_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Термин1 = Форма1.ДобавитьДочерний(ДФ.Термин());
Термин1.Текст = "Термин1";
Термин1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Термин1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Термин1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_УдаленыйТекст_событие.os
Перем ДФ, УдаленыйТекст1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
УдаленыйТекст1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_УдаленыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
УдаленыйТекст1 = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
УдаленыйТекст1.Текст = "УдаленыйТекст1";
УдаленыйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
УдаленыйТекст1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_УпорядоченныйСписок_событие.os
Перем ДФ, УпорядоченныйСписок1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
УпорядоченныйСписок1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_УпорядоченныйСписок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
УпорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.УпорядоченныйСписок());
УпорядоченныйСписок1.Текст = "УпорядоченныйСписок1";
УпорядоченныйСписок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
УпорядоченныйСписок1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ФорматированныйТекст_событие.os
Перем ДФ, ФорматированныйТекст1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ФорматированныйТекст1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ФорматированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ФорматированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
ФорматированныйТекст1.Текст = "ФорматированныйТекст1";
ФорматированныйТекст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ФорматированныйТекст1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Холст_событие.os
Перем ДФ, Холст1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Холст1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Холст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Холст1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Холст1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ШапкаТаблицы_событие.os
Перем ДФ, ШапкаТаблицы1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ШапкаТаблицы1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ШапкаТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ШапкаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
ШапкаТаблицы1.Текст = "ШапкаТаблицы1";
ШапкаТаблицы1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ШапкаТаблицы1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Шкала_событие.os
Перем ДФ, Шкала1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Шкала1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Шкала_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Шкала1 = Форма1.ДобавитьДочерний(ДФ.Шкала());
Шкала1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Шкала1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Шкала1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ЭлементПоляСписка_событие.os
Перем ДФ, ЭлементПоляСписка1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ЭлементПоляСписка1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ЭлементПоляСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЭлементПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементПоляСписка());
ЭлементПоляСписка1.Текст = "ЭлементПоляСписка1";
ЭлементПоляСписка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЭлементПоляСписка1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ЭлементСписка_событие.os
Перем ДФ, ЭлементСписка1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ЭлементСписка1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ЭлементСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЭлементСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "ЭлементСписка1";
ЭлементСписка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЭлементСписка1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_Ячейка_событие.os
Перем ДФ, Ячейка1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
Ячейка1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_Ячейка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Ячейка1 = Форма1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Ячейка1";
Ячейка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Ячейка1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриОтпусканииМыши_ЯчейкаЗаголовка_событие.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура ПриОтпусканииМыши() Экспорт
Сообщить(?(
ЯчейкаЗаголовка1.ПриОтпусканииМыши.ИмяМетода = "ПриОтпусканииМыши"
, "", "!!! ") + "ПриОтпусканииМыши_ЯчейкаЗаголовка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЯчейкаЗаголовка1 = Форма1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "ЯчейкаЗаголовка1";
ЯчейкаЗаголовка1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
ЯчейкаЗаголовка1.ПриОтпусканииМыши = ДФ.Действие(ЭтотОбъект, "ПриОтпусканииМыши");
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.БелаяДымка;
Форма1.Открыть();
ПриПеремещенииМыши_Абзац_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Абзац_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Абзац());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Артикль_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Артикль_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Артикль());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Блок_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Блок_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Блок());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ВыборВремени_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ВыборВремени_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ВыборДаты_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ВыборДаты_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ВыборДатыВремени_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ВыборДатыВремени_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ВыборМестнойДатыВремени_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ВыборМестнойДатыВремени_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ВыборМесяца_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ВыборМесяца_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ВыборНедели_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ВыборНедели_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ВыборФайла_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ВыборФайла_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ВыборЦвета_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ВыборЦвета_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Группа_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Группа_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Группа());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ГруппировкаПоляСписка_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ГруппировкаПоляСписка_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ГруппировкаПоляСписка());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Диалог_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Диалог_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Диалог());
Источник.Показать();
Источник.Показать();
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ДополнительныйБлок_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ДополнительныйБлок_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ЖирныйТекст_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ЖирныйТекст_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Заголовок1_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Заголовок1_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Заголовок2_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Заголовок2_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Заголовок3_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Заголовок3_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Заголовок4_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Заголовок4_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Заголовок5_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Заголовок5_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Заголовок6_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Заголовок6_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Заголовок_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Заголовок_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ЗаголовокГруппы_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ЗаголовокГруппы_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ЗаголовокГруппы());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ЗаголовокРаскрываемогоБлока_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ЗаголовокРаскрываемогоБлока_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ЗаголовокРаскрываемогоБлока());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Изображение_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Изображение_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Изображение());
Источник.Источник = "maslenica10.jpg";
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Индикатор_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Индикатор_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Индикатор());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Карта_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Карта_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Карта());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Кнопка_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Кнопка_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Код_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Код_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Код());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Колонтитул_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Колонтитул_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Колонтитул());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_КурсивТекст_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_КурсивТекст_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Линия_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Линия_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Линия());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_МаркированныйТекст_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_МаркированныйТекст_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_МедиаГруппа_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_МедиаГруппа_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.МедиаГруппа());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_МелкийТекст_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_МелкийТекст_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_НадстрочныйТекст_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_НадстрочныйТекст_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_НаправленныйТекст_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_НаправленныйТекст_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_НеупорядоченныйСписок_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_НеупорядоченныйСписок_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_НижнийКолонтитул_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_НижнийКолонтитул_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.НижнийКолонтитул());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Область_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Область_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Область());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ОбластьТекста_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ОбластьТекста_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ОписаниеМедиа_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ОписаниеМедиа_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ОписаниеМедиа());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Определение_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Определение_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Определение());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Переключатель_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Переключатель_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Подпись_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Подпись_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Подпись());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ПодстрочныйТекст_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ПодстрочныйТекст_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ПодчеркнутыйТекст_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ПодчеркнутыйТекст_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ПолеПароля_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ПолеПароля_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеПароля());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ПолеПоиска_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ПолеПоиска_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ПолеСписка_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ПолеСписка_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеСписка());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ПолеТекста_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ПолеТекста_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_РаскрываемыйБлок_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_РаскрываемыйБлок_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Результат_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Результат_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Результат());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_СписокОпределений_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_СписокОпределений_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.СписокОпределений());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Ссылка_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Ссылка_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Таблица_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Таблица_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Таблица());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Термин_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Термин_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Термин());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_УдаленыйТекст_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_УдаленыйТекст_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_УпорядоченныйСписок_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_УпорядоченныйСписок_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.УпорядоченныйСписок());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ФорматированныйТекст_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ФорматированныйТекст_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Холст_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Холст_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Холст());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Шкала_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Шкала_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Шкала());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ЭлементПоляСписка_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ЭлементПоляСписка_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ЭлементПоляСписка());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ЭлементСписка_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ЭлементСписка_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ЭлементСписка());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_Ячейка_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_Ячейка_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Ячейка());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПеремещенииМыши_ЯчейкаЗаголовка_событие.os
Перем ДФ;
Процедура ПриПеремещенииМыши() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.ИксФормы > 0
, "", "!!! ") + "ПриПеремещенииМыши_ЯчейкаЗаголовка_событие.os" + " " + ТекущаяДата());
Приостановить(1000);
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
Источник.Стиль.ЦветФона = ДФ.Цвет.Красный;
Источник.Стиль.Ширина = 100;
Источник.Стиль.Высота = 50;
Источник.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "ПриПеремещенииМыши");
Форма1.Открыть();
ПриПрокручивании_Форма_событие.os
Перем ДФ, Абзац1, Форма1, БлокИндикаторПрокрутки;
Процедура МышьНадЭлементом() Экспорт
Параметр = ДФ.АргументыСобытия.Параметр;
Параметр["ЭтаСсылка"].Стиль.ЦветФона = ДФ.Цвет(0, 0, 0);
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Параметр = ДФ.АргументыСобытия.Параметр;
Параметр["ЭтаСсылка"].Стиль.ЦветФона = ДФ.Цвет.ТемноСерый;
КонецПроцедуры
Процедура Нажатие() Экспорт
Абзац1.Текст = "Нажатие " + ДФ.АргументыСобытия.Параметр["ЭтаСсылка"].Источник + " " + ТекущаяУниверсальнаяДатаВМиллисекундах();
КонецПроцедуры
Процедура Форма1_ПриПрокручивании() Экспорт
// Сообщить("Прокручено = " + ДФ.АргументыСобытия.Прокручено);
// Сообщить("Прокручено = " + Форма1.Прокручено);
БлокИндикаторПрокрутки.Стиль.Ширина = Строка(Форма1.Прокручено) + "%";
Сообщить(?(
СтрНайти(БлокИндикаторПрокрутки.Стиль.Ширина, "%") > 0
, "", "!!! ") + "ПриПрокручивании_Форма_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 600;
Форма1.НачальнаяВысота = 300;
Форма1.ПриПрокручивании = ДФ.Действие(ЭтотОбъект, "Форма1_ПриПрокручивании");
Форма1.Заголовок = "Прокрути текст";
Контент = Форма1.Контент;
Контент.Стиль.Отступ = ДФ.Отступ(0, 0, 0, 0, Истина);
Контент.Стиль.РазмерШрифта = 28;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Позиция = ДФ.Позиция.Фиксировано;
Блок1.Стиль.Верх = 0;
Блок1.Стиль.Ширина = "100%";
Блок1.Стиль.ЦветФона = ДФ.Цвет(241, 241, 241);
Заголовок2 = Блок1.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок2.Текст = "Индикатор прокрутки";
Заголовок2.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
БлокКонтейнерИндикатора = Блок1.ДобавитьДочерний(ДФ.Блок());
БлокКонтейнерИндикатора.Стиль.Ширина = "100%";
БлокКонтейнерИндикатора.Стиль.Высота = 8;
БлокКонтейнерИндикатора.Стиль.Фон = ДФ.Цвет(204, 204, 204);
БлокИндикаторПрокрутки = БлокКонтейнерИндикатора.ДобавитьДочерний(ДФ.Блок());
БлокИндикаторПрокрутки.Стиль.Высота = 8;
БлокИндикаторПрокрутки.Стиль.Фон = ДФ.Цвет(76, 175, 80);
БлокИндикаторПрокрутки.Стиль.Ширина = "0%";
БлокКонтент = Форма1.ДобавитьДочерний(ДФ.Блок());
БлокКонтент.Стиль.Ширина = "80%";
БлокКонтент.Стиль.Отступ = "50px auto 0 auto";
БлокКонтент.Стиль.Заполнение = ДФ.Заполнение(100, 0, 0, 0);
Заголовок3 = БлокКонтент.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок3.Текст = "Прокрутите вниз, чтобы увидеть эффект";
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Алиса так увлеклась, что сама захлопала в ладоши и тут же, конечно, упустила клубок.
|Но она этого не заметила даже, а в восторге представила себе живые танцующие деревья.";
Абзац2 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац2.Текст = "– Вот было бы здорово! – воскликнула Алиса. – Они бы веселились до самой осени. А потом сложили бы листочки на землю и заснули на всю зиму.
|Послушай, – обратилась она вдруг к котенку, – а в шахматы играть ты умеешь? Ну что же тут смешного? Обычное дело. И потом, я сама видела, как ты внимательно следишь за игрой в шахматы.
|На днях, когда я сказала: «Шах!» – ты даже мурлыкнул. А правда же отличный был ход? Если бы не этот противный конь, я бы непременно выиграла.
|Он так незаметно подкрался! Слушай, котик, а давай играть КАК БУДТО!";
Абзац3 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац3.Текст = "Алиса обожала эти слова – КАК БУДТО. С ними можно было играть во что угодно.
|Вчера, например, она предложила сестре: «Давай играть, КАК БУДТО мы шахматные Короли и Королевы».
|Но сестра не понимает никаких КАК БУДТО.
|«Это невозможно, – сказала она рассудительно. – Нас ведь всего две, а королей и королев – четыре».
|«Ну и что! – возразила Алиса. – Это же КАК БУДТО. Ты будешь одной из Королев, а я КАК БУДТО сразу всеми остальными».";
Форма1.Открыть();
ПриСрабатыванииТаймера_Таймер_событие.os
Перем ДФ, Таймер1, Кнопка1;
Перем Таймер2, Кнопка3;
Перем Блок1, Блок2;
Процедура Форма1_Загружена() Экспорт
Таймер1.Начать();
Приостановить(300);
Таймер2.Начать();
// Сообщить("Форма1_Загружена " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Таймер1.ПриСрабатыванииТаймера.ИмяМетода = "Таймер1_ПриСрабатыванииТаймера"
, "", "!!! ") + "ПриСрабатыванииТаймера_Таймер_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Таймер1.Начать();
Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Таймер1.Остановить();
Сообщить("Кнопка2_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
Процедура Таймер1_ПриСрабатыванииТаймера() Экспорт
Сообщить("Таймер1_ПриСрабатыванииТаймера");
Если Кнопка1.Стиль.Цветфона = ДФ.Цвет.МорскаяРакушка Тогда
Кнопка1.Стиль.Цветфона = ДФ.Цвет.Красный;
Иначе
Кнопка1.Стиль.Цветфона = ДФ.Цвет.МорскаяРакушка;
КонецЕсли;
Блок1.Текст = "" + ТекущаяУниверсальнаяДатаВМиллисекундах();
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
Таймер2.Начать();
Сообщить("Кнопка3_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
Таймер2.Остановить();
Сообщить("Кнопка4_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
Процедура Таймер2_ПриСрабатыванииТаймера() Экспорт
Сообщить("Таймер2_ПриСрабатыванииТаймера");
Если Кнопка3.Стиль.Цветфона = ДФ.Цвет.СветлоСерый Тогда
Кнопка3.Стиль.Цветфона = ДФ.Цвет.СветлыйЗеленоватоГолубой;
Иначе
Кнопка3.Стиль.Цветфона = ДФ.Цвет.СветлоСерый;
КонецЕсли;
Блок2.Текст = "" + ТекущаяУниверсальнаяДатаВМиллисекундах();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 400;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Стиль.Высота = 100;
Абзац1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Кнопка1 = Абзац1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Начать";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Абзац1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Остановить";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Блок1 = Абзац1.ДобавитьДочерний(ДФ.Блок());
Таймер1 = ДФ.Таймер();
Таймер1.ПриСрабатыванииТаймера = ДФ.Действие(ЭтотОбъект, "Таймер1_ПриСрабатыванииТаймера");
Таймер1.Интервал = 1000;
Таймер1.Начать();
Абзац2 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац2.Стиль.Высота = 100;
Абзац2.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Кнопка3 = Абзац2.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Начать";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Абзац2.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Остановить";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок2 = Абзац2.ДобавитьДочерний(ДФ.Блок());
Таймер2 = ДФ.Таймер();
Таймер2.ПриСрабатыванииТаймера = ДФ.Действие(ЭтотОбъект, "Таймер2_ПриСрабатыванииТаймера");
Таймер2.Интервал = 1000;
Таймер2.Начать();
Форма1.Открыть();
Пробелы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Пробелы = ДФ.Пробелы.НеПереносить
, "", "!!! ") + "Пробелы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Пробелы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 210;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Текст = "Алисе это замечание Розы совсем не понравилось, и она ее поскорей перебила:
|– Как вы думаете, сегодня мы увидим здесь этот, как вы говорите, цветок?
|– Непременно, – сказала Роза. – Каждый день тут появляется. Подумаешь, гордится своими шипами! А всего-то навсего у нее их девять.
|– Где же у нее шипы? – всполошилась Алиса.
|– Прямо на лепестках, – пренебрежительно ответила Роза. – Кстати, а где твои шипы?
|– Идет! Идет! – крикнул Пион. – Слышите, как топает? Бум! Бум! Просто земля дрожит.
|И тут появилась Черная Королева.
|«Ого! Как выросла! – подумала Алиса. – Когда я нашла ее в золе, она была не больше моего пальца. А теперь я ей по плечо».
|– У нас такой чудесный воздух, что все тянутся вверх не по дням, а по часам, – сказала Роза, будто подслушала мысли Алисы.
|– Пойду навстречу ей, – сказала Алиса, как бы извиняясь перед цветами.
|С ними было, конечно, весело поболтать, но беседа с Королевой наверняка намного интересней.
|– Если хочешь встретиться, – посоветовала Роза, – иди не к ней, а от нее.";
Блок1.Стиль.Пробелы = ДФ.Пробелы.НеПереносить;
Блок1.Стиль.ПереполнениеИкс = ДФ.Переполнение.Прокрутка;
Форма1.Открыть();
Прозрачный_Форма_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Прозрачный_Форма_свойство.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Контент.Текст = "Форма1.Прозрачный = Истина";
Форма1.Прозрачный = Истина;
Форма1.Открыть();
ПрокрутитьДо_Абзац_метод.os
Перем ДФ, Абзац2;
Процедура Кнопка1_Нажатие() Экспорт
Абзац2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Абзац_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1 = Блок2.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Абзац2 = Блок2.ДобавитьДочерний(ДФ.Абзац());
Абзац2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Абзац3 = Блок2.ДобавитьДочерний(ДФ.Абзац());
Абзац3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Артикль_метод.os
Перем ДФ, Артикль2;
Процедура Кнопка1_Нажатие() Экспорт
Артикль2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Артикль_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Артикль1 = Блок2.ДобавитьДочерний(ДФ.Артикль());
Артикль1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Артикль2 = Блок2.ДобавитьДочерний(ДФ.Артикль());
Артикль2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Артикль3 = Блок2.ДобавитьДочерний(ДФ.Артикль());
Артикль3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Блок_метод.os
Перем ДФ, Блок2;
Процедура Кнопка1_Нажатие() Экспорт
Блок2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Блок_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Блок1 = Блок2.ДобавитьДочерний(ДФ.Блок());
Блок1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Блок2 = Блок2.ДобавитьДочерний(ДФ.Блок());
Блок2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Блок3 = Блок2.ДобавитьДочерний(ДФ.Блок());
Блок3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ВыборВремени_метод.os
Перем ДФ, ВыборВремени2;
Процедура Кнопка1_Нажатие() Экспорт
ВыборВремени2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ВыборВремени_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборВремени1 = Блок2.ДобавитьДочерний(ДФ.ВыборВремени());
ВыборВремени2 = Блок2.ДобавитьДочерний(ДФ.ВыборВремени());
ВыборВремени3 = Блок2.ДобавитьДочерний(ДФ.ВыборВремени());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ВыборДаты_метод.os
Перем ДФ, ВыборДаты2;
Процедура Кнопка1_Нажатие() Экспорт
ВыборДаты2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ВыборДаты_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборДаты1 = Блок2.ДобавитьДочерний(ДФ.ВыборДаты());
ВыборДаты2 = Блок2.ДобавитьДочерний(ДФ.ВыборДаты());
ВыборДаты3 = Блок2.ДобавитьДочерний(ДФ.ВыборДаты());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ВыборДатыВремени_метод.os
Перем ДФ, ВыборДатыВремени2;
Процедура Кнопка1_Нажатие() Экспорт
ВыборДатыВремени2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ВыборДатыВремени_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборДатыВремени1 = Блок2.ДобавитьДочерний(ДФ.ВыборДатыВремени());
ВыборДатыВремени2 = Блок2.ДобавитьДочерний(ДФ.ВыборДатыВремени());
ВыборДатыВремени3 = Блок2.ДобавитьДочерний(ДФ.ВыборДатыВремени());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ВыборМестнойДатыВремени_метод.os
Перем ДФ, ВыборМестнойДатыВремени2;
Процедура Кнопка1_Нажатие() Экспорт
ВыборМестнойДатыВремени2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ВыборМестнойДатыВремени_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборМестнойДатыВремени1 = Блок2.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
ВыборМестнойДатыВремени2 = Блок2.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
ВыборМестнойДатыВремени3 = Блок2.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ВыборМесяца_метод.os
Перем ДФ, ВыборМесяца2;
Процедура Кнопка1_Нажатие() Экспорт
ВыборМесяца2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ВыборМесяца_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборМесяца1 = Блок2.ДобавитьДочерний(ДФ.ВыборМесяца());
ВыборМесяца2 = Блок2.ДобавитьДочерний(ДФ.ВыборМесяца());
ВыборМесяца3 = Блок2.ДобавитьДочерний(ДФ.ВыборМесяца());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ВыборНедели_метод.os
Перем ДФ, ВыборНедели2;
Процедура Кнопка1_Нажатие() Экспорт
ВыборНедели2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ВыборНедели_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборНедели1 = Блок2.ДобавитьДочерний(ДФ.ВыборНедели());
ВыборНедели2 = Блок2.ДобавитьДочерний(ДФ.ВыборНедели());
ВыборНедели3 = Блок2.ДобавитьДочерний(ДФ.ВыборНедели());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ВыборФайла_метод.os
Перем ДФ, ВыборФайла2;
Процедура Кнопка1_Нажатие() Экспорт
ВыборФайла2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ВыборФайла_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборФайла1 = Блок2.ДобавитьДочерний(ДФ.ВыборФайла());
ВыборФайла2 = Блок2.ДобавитьДочерний(ДФ.ВыборФайла());
ВыборФайла3 = Блок2.ДобавитьДочерний(ДФ.ВыборФайла());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ВыборЦвета_метод.os
Перем ДФ, ВыборЦвета2;
Процедура Кнопка1_Нажатие() Экспорт
ВыборЦвета2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ВыборЦвета_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборЦвета1 = Блок2.ДобавитьДочерний(ДФ.ВыборЦвета());
ВыборЦвета2 = Блок2.ДобавитьДочерний(ДФ.ВыборЦвета());
ВыборЦвета3 = Блок2.ДобавитьДочерний(ДФ.ВыборЦвета());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Группа_метод.os
Перем ДФ, Группа2;
Процедура Кнопка1_Нажатие() Экспорт
Группа2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Группа_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Группа1 = Блок2.ДобавитьДочерний(ДФ.Группа());
Группа1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Группа2 = Блок2.ДобавитьДочерний(ДФ.Группа());
Группа2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Группа3 = Блок2.ДобавитьДочерний(ДФ.Группа());
Группа3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ГруппаКолонок_метод.os
Перем ДФ, ГруппаКолонок2;
Процедура Кнопка1_Нажатие() Экспорт
ГруппаКолонок2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ГруппаКолонок_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ГруппаКолонок1 = Блок2.ДобавитьДочерний(ДФ.ГруппаКолонок());
ГруппаКолонок2 = Блок2.ДобавитьДочерний(ДФ.ГруппаКолонок());
ГруппаКолонок3 = Блок2.ДобавитьДочерний(ДФ.ГруппаКолонок());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ГруппировкаПоляСписка_метод.os
Перем ДФ, ГруппировкаПоляСписка2;
Процедура Кнопка1_Нажатие() Экспорт
ГруппировкаПоляСписка2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ГруппировкаПоляСписка_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ГруппировкаПоляСписка1 = Блок2.ДобавитьДочерний(ДФ.ГруппировкаПоляСписка());
ГруппировкаПоляСписка2 = Блок2.ДобавитьДочерний(ДФ.ГруппировкаПоляСписка());
ГруппировкаПоляСписка3 = Блок2.ДобавитьДочерний(ДФ.ГруппировкаПоляСписка());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ДополнительныйБлок_метод.os
Перем ДФ, ДополнительныйБлок2;
Процедура Кнопка1_Нажатие() Экспорт
ДополнительныйБлок2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ДополнительныйБлок_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ДополнительныйБлок1 = Блок2.ДобавитьДочерний(ДФ.ДополнительныйБлок());
ДополнительныйБлок1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
ДополнительныйБлок2 = Блок2.ДобавитьДочерний(ДФ.ДополнительныйБлок());
ДополнительныйБлок2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
ДополнительныйБлок3 = Блок2.ДобавитьДочерний(ДФ.ДополнительныйБлок());
ДополнительныйБлок3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ЖирныйТекст_метод.os
Перем ДФ, ЖирныйТекст2;
Процедура Кнопка1_Нажатие() Экспорт
ЖирныйТекст2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ЖирныйТекст_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЖирныйТекст1 = Блок2.ДобавитьДочерний(ДФ.ЖирныйТекст());
ЖирныйТекст1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
ЖирныйТекст2 = Блок2.ДобавитьДочерний(ДФ.ЖирныйТекст());
ЖирныйТекст2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
ЖирныйТекст3 = Блок2.ДобавитьДочерний(ДФ.ЖирныйТекст());
ЖирныйТекст3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Заголовок1_метод.os
Перем ДФ, Заголовок12;
Процедура Кнопка1_Нажатие() Экспорт
Заголовок12.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Заголовок1_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок11 = Блок2.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок11.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Заголовок12 = Блок2.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок12.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Заголовок13 = Блок2.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок13.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Заголовок2_метод.os
Перем ДФ, Заголовок22;
Процедура Кнопка1_Нажатие() Экспорт
Заголовок22.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Заголовок2_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок21 = Блок2.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок21.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Заголовок22 = Блок2.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок22.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Заголовок23 = Блок2.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок23.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Заголовок3_метод.os
Перем ДФ, Заголовок32;
Процедура Кнопка1_Нажатие() Экспорт
Заголовок32.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Заголовок3_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок31 = Блок2.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок31.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Заголовок32 = Блок2.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок32.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Заголовок33 = Блок2.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок33.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Заголовок4_метод.os
Перем ДФ, Заголовок42;
Процедура Кнопка1_Нажатие() Экспорт
Заголовок42.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Заголовок4_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок41 = Блок2.ДобавитьДочерний(ДФ.Заголовок4());
Заголовок41.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Заголовок42 = Блок2.ДобавитьДочерний(ДФ.Заголовок4());
Заголовок42.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Заголовок43 = Блок2.ДобавитьДочерний(ДФ.Заголовок4());
Заголовок43.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Заголовок5_метод.os
Перем ДФ, Заголовок52;
Процедура Кнопка1_Нажатие() Экспорт
Заголовок52.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Заголовок5_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок51 = Блок2.ДобавитьДочерний(ДФ.Заголовок5());
Заголовок51.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Заголовок52 = Блок2.ДобавитьДочерний(ДФ.Заголовок5());
Заголовок52.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Заголовок53 = Блок2.ДобавитьДочерний(ДФ.Заголовок5());
Заголовок53.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Заголовок6_метод.os
Перем ДФ, Заголовок62;
Процедура Кнопка1_Нажатие() Экспорт
Заголовок62.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Заголовок6_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок61 = Блок2.ДобавитьДочерний(ДФ.Заголовок6());
Заголовок61.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Заголовок62 = Блок2.ДобавитьДочерний(ДФ.Заголовок6());
Заголовок62.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Заголовок63 = Блок2.ДобавитьДочерний(ДФ.Заголовок6());
Заголовок63.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Заголовок_метод.os
Перем ДФ, Заголовок2;
Процедура Кнопка1_Нажатие() Экспорт
Заголовок2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Заголовок_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок1 = Блок2.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Заголовок2 = Блок2.ДобавитьДочерний(ДФ.Заголовок());
Заголовок2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Заголовок3 = Блок2.ДобавитьДочерний(ДФ.Заголовок());
Заголовок3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ЗаголовокГруппы_метод.os
Перем ДФ, ЗаголовокГруппы2;
Процедура Кнопка1_Нажатие() Экспорт
ЗаголовокГруппы2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ЗаголовокГруппы_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЗаголовокГруппы1 = Блок2.ДобавитьДочерний(ДФ.ЗаголовокГруппы());
ЗаголовокГруппы1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
ЗаголовокГруппы2 = Блок2.ДобавитьДочерний(ДФ.ЗаголовокГруппы());
ЗаголовокГруппы2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
ЗаголовокГруппы3 = Блок2.ДобавитьДочерний(ДФ.ЗаголовокГруппы());
ЗаголовокГруппы3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ЗаголовокРаскрываемогоБлока_метод.os
Перем ДФ, ЗаголовокРаскрываемогоБлока2;
Процедура Кнопка1_Нажатие() Экспорт
ЗаголовокРаскрываемогоБлока2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ЗаголовокРаскрываемогоБлока_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЗаголовокРаскрываемогоБлока1 = Блок2.ДобавитьДочерний(ДФ.ЗаголовокРаскрываемогоБлока());
ЗаголовокРаскрываемогоБлока1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
ЗаголовокРаскрываемогоБлока2 = Блок2.ДобавитьДочерний(ДФ.ЗаголовокРаскрываемогоБлока());
ЗаголовокРаскрываемогоБлока2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
ЗаголовокРаскрываемогоБлока3 = Блок2.ДобавитьДочерний(ДФ.ЗаголовокРаскрываемогоБлока());
ЗаголовокРаскрываемогоБлока3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Изображение_метод.os
Перем ДФ, Изображение2;
Процедура Кнопка1_Нажатие() Экспорт
Изображение2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Изображение_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Изображение1 = Блок2.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Источник = "maslenica10.jpg";
Изображение2 = Блок2.ДобавитьДочерний(ДФ.Изображение());
Изображение2.Источник = "maslenica10.jpg";
Изображение3 = Блок2.ДобавитьДочерний(ДФ.Изображение());
Изображение3.Источник = "maslenica10.jpg";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Индикатор_метод.os
Перем ДФ, Индикатор2;
Процедура Кнопка1_Нажатие() Экспорт
Индикатор2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Индикатор_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Индикатор1 = Блок2.ДобавитьДочерний(ДФ.Индикатор());
Индикатор2 = Блок2.ДобавитьДочерний(ДФ.Индикатор());
Индикатор3 = Блок2.ДобавитьДочерний(ДФ.Индикатор());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Итоги_метод.os
Перем ДФ, Итоги2;
Процедура Кнопка1_Нажатие() Экспорт
Итоги2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Итоги_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Итоги1 = Блок2.ДобавитьДочерний(ДФ.Итоги());
Итоги1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Итоги2 = Блок2.ДобавитьДочерний(ДФ.Итоги());
Итоги2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Итоги3 = Блок2.ДобавитьДочерний(ДФ.Итоги());
Итоги3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Карта_метод.os
Перем ДФ, Карта2;
Процедура Кнопка1_Нажатие() Экспорт
Карта2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Карта_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Карта1 = Блок2.ДобавитьДочерний(ДФ.Карта());
Карта1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Карта2 = Блок2.ДобавитьДочерний(ДФ.Карта());
Карта2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Карта3 = Блок2.ДобавитьДочерний(ДФ.Карта());
Карта3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Кнопка_метод.os
Перем ДФ, Кнопка2;
Процедура Кнопка1_Нажатие() Экспорт
Кнопка2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Кнопка_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Кнопка1 = Блок2.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Кнопка2 = Блок2.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка3 = Блок2.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Код_метод.os
Перем ДФ, Код2;
Процедура Кнопка1_Нажатие() Экспорт
Код2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Код_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Код1 = Блок2.ДобавитьДочерний(ДФ.Код());
Код1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Код2 = Блок2.ДобавитьДочерний(ДФ.Код());
Код2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Код3 = Блок2.ДобавитьДочерний(ДФ.Код());
Код3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Колонка_метод.os
Перем ДФ, Колонка2;
Процедура Кнопка1_Нажатие() Экспорт
Колонка2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Колонка_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Колонка1 = Блок2.ДобавитьДочерний(ДФ.Колонка());
Колонка2 = Блок2.ДобавитьДочерний(ДФ.Колонка());
Колонка3 = Блок2.ДобавитьДочерний(ДФ.Колонка());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Колонтитул_метод.os
Перем ДФ, Колонтитул2;
Процедура Кнопка1_Нажатие() Экспорт
Колонтитул2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Колонтитул_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Колонтитул1 = Блок2.ДобавитьДочерний(ДФ.Колонтитул());
Колонтитул1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Колонтитул2 = Блок2.ДобавитьДочерний(ДФ.Колонтитул());
Колонтитул2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Колонтитул3 = Блок2.ДобавитьДочерний(ДФ.Колонтитул());
Колонтитул3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_КурсивТекст_метод.os
Перем ДФ, КурсивТекст2;
Процедура Кнопка1_Нажатие() Экспорт
КурсивТекст2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_КурсивТекст_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
КурсивТекст1 = Блок2.ДобавитьДочерний(ДФ.КурсивТекст());
КурсивТекст1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
КурсивТекст2 = Блок2.ДобавитьДочерний(ДФ.КурсивТекст());
КурсивТекст2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
КурсивТекст3 = Блок2.ДобавитьДочерний(ДФ.КурсивТекст());
КурсивТекст3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Линия_метод.os
Перем ДФ, Линия2;
Процедура Кнопка1_Нажатие() Экспорт
Линия2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Линия_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Линия1 = Блок2.ДобавитьДочерний(ДФ.Линия());
Линия1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Линия2 = Блок2.ДобавитьДочерний(ДФ.Линия());
Линия2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Линия3 = Блок2.ДобавитьДочерний(ДФ.Линия());
Линия3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_МаркированныйТекст_метод.os
Перем ДФ, МаркированныйТекст2;
Процедура Кнопка1_Нажатие() Экспорт
МаркированныйТекст2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_МаркированныйТекст_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
МаркированныйТекст1 = Блок2.ДобавитьДочерний(ДФ.МаркированныйТекст());
МаркированныйТекст1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
МаркированныйТекст2 = Блок2.ДобавитьДочерний(ДФ.МаркированныйТекст());
МаркированныйТекст2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
МаркированныйТекст3 = Блок2.ДобавитьДочерний(ДФ.МаркированныйТекст());
МаркированныйТекст3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_МедиаГруппа_метод.os
Перем ДФ, МедиаГруппа2;
Процедура Кнопка1_Нажатие() Экспорт
МедиаГруппа2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_МедиаГруппа_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
МедиаГруппа1 = Блок2.ДобавитьДочерний(ДФ.МедиаГруппа());
МедиаГруппа1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
МедиаГруппа2 = Блок2.ДобавитьДочерний(ДФ.МедиаГруппа());
МедиаГруппа2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
МедиаГруппа3 = Блок2.ДобавитьДочерний(ДФ.МедиаГруппа());
МедиаГруппа3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_МелкийТекст_метод.os
Перем ДФ, МелкийТекст2;
Процедура Кнопка1_Нажатие() Экспорт
МелкийТекст2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_МелкийТекст_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
МелкийТекст1 = Блок2.ДобавитьДочерний(ДФ.МелкийТекст());
МелкийТекст1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
МелкийТекст2 = Блок2.ДобавитьДочерний(ДФ.МелкийТекст());
МелкийТекст2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
МелкийТекст3 = Блок2.ДобавитьДочерний(ДФ.МелкийТекст());
МелкийТекст3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_НадстрочныйТекст_метод.os
Перем ДФ, НадстрочныйТекст2;
Процедура Кнопка1_Нажатие() Экспорт
НадстрочныйТекст2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_НадстрочныйТекст_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
НадстрочныйТекст1 = Блок2.ДобавитьДочерний(ДФ.НадстрочныйТекст());
НадстрочныйТекст1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
НадстрочныйТекст2 = Блок2.ДобавитьДочерний(ДФ.НадстрочныйТекст());
НадстрочныйТекст2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
НадстрочныйТекст3 = Блок2.ДобавитьДочерний(ДФ.НадстрочныйТекст());
НадстрочныйТекст3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_НаправленныйТекст_метод.os
Перем ДФ, НаправленныйТекст2;
Процедура Кнопка1_Нажатие() Экспорт
НаправленныйТекст2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_НаправленныйТекст_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
НаправленныйТекст1 = Блок2.ДобавитьДочерний(ДФ.НаправленныйТекст());
НаправленныйТекст1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
НаправленныйТекст2 = Блок2.ДобавитьДочерний(ДФ.НаправленныйТекст());
НаправленныйТекст2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
НаправленныйТекст3 = Блок2.ДобавитьДочерний(ДФ.НаправленныйТекст());
НаправленныйТекст3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_НеупорядоченныйСписок_метод.os
Перем ДФ, НеупорядоченныйСписок2;
Процедура Кнопка1_Нажатие() Экспорт
НеупорядоченныйСписок2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_НеупорядоченныйСписок_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
НеупорядоченныйСписок1 = Блок2.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
НеупорядоченныйСписок1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
НеупорядоченныйСписок2 = Блок2.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
НеупорядоченныйСписок2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
НеупорядоченныйСписок3 = Блок2.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
НеупорядоченныйСписок3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_НижнийКолонтитул_метод.os
Перем ДФ, НижнийКолонтитул2;
Процедура Кнопка1_Нажатие() Экспорт
НижнийКолонтитул2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_НижнийКолонтитул_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
НижнийКолонтитул1 = Блок2.ДобавитьДочерний(ДФ.НижнийКолонтитул());
НижнийКолонтитул1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
НижнийКолонтитул2 = Блок2.ДобавитьДочерний(ДФ.НижнийКолонтитул());
НижнийКолонтитул2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
НижнийКолонтитул3 = Блок2.ДобавитьДочерний(ДФ.НижнийКолонтитул());
НижнийКолонтитул3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Область_метод.os
Перем ДФ, Область2;
Процедура Кнопка1_Нажатие() Экспорт
Область2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Область_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Область1 = Блок2.ДобавитьДочерний(ДФ.Область());
Область1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Область2 = Блок2.ДобавитьДочерний(ДФ.Область());
Область2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Область3 = Блок2.ДобавитьДочерний(ДФ.Область());
Область3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ОбластьТаблицы_метод.os
Перем ДФ, ОбластьТаблицы2;
Процедура Кнопка1_Нажатие() Экспорт
ОбластьТаблицы2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ОбластьТаблицы_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ОбластьТаблицы1 = Блок2.ДобавитьДочерний(ДФ.ОбластьТаблицы());
ОбластьТаблицы1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
ОбластьТаблицы2 = Блок2.ДобавитьДочерний(ДФ.ОбластьТаблицы());
ОбластьТаблицы2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
ОбластьТаблицы3 = Блок2.ДобавитьДочерний(ДФ.ОбластьТаблицы());
ОбластьТаблицы3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ОбластьТекста_метод.os
Перем ДФ, ОбластьТекста2;
Процедура Кнопка1_Нажатие() Экспорт
ОбластьТекста2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ОбластьТекста_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ОбластьТекста1 = Блок2.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
ОбластьТекста2 = Блок2.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
ОбластьТекста3 = Блок2.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ОписаниеМедиа_метод.os
Перем ДФ, ОписаниеМедиа2;
Процедура Кнопка1_Нажатие() Экспорт
ОписаниеМедиа2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ОписаниеМедиа_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ОписаниеМедиа1 = Блок2.ДобавитьДочерний(ДФ.ОписаниеМедиа());
ОписаниеМедиа1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
ОписаниеМедиа2 = Блок2.ДобавитьДочерний(ДФ.ОписаниеМедиа());
ОписаниеМедиа2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
ОписаниеМедиа3 = Блок2.ДобавитьДочерний(ДФ.ОписаниеМедиа());
ОписаниеМедиа3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Определение_метод.os
Перем ДФ, Определение2;
Процедура Кнопка1_Нажатие() Экспорт
Определение2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Определение_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Определение1 = Блок2.ДобавитьДочерний(ДФ.Определение());
Определение1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Определение2 = Блок2.ДобавитьДочерний(ДФ.Определение());
Определение2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Определение3 = Блок2.ДобавитьДочерний(ДФ.Определение());
Определение3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Переключатель_метод.os
Перем ДФ, Переключатель2;
Процедура Кнопка1_Нажатие() Экспорт
Переключатель2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Переключатель_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Переключатель1 = Блок2.ДобавитьДочерний(ДФ.Переключатель());
Переключатель2 = Блок2.ДобавитьДочерний(ДФ.Переключатель());
Переключатель3 = Блок2.ДобавитьДочерний(ДФ.Переключатель());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Перенос_метод.os
Перем ДФ, Перенос2;
Процедура Кнопка1_Нажатие() Экспорт
Перенос2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Перенос_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Перенос1 = Блок2.ДобавитьДочерний(ДФ.Перенос());
Перенос2 = Блок2.ДобавитьДочерний(ДФ.Перенос());
Перенос3 = Блок2.ДобавитьДочерний(ДФ.Перенос());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Подпись_метод.os
Перем ДФ, Подпись2;
Процедура Кнопка1_Нажатие() Экспорт
Подпись2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Подпись_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Подпись1 = Блок2.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Подпись2 = Блок2.ДобавитьДочерний(ДФ.Подпись());
Подпись2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Подпись3 = Блок2.ДобавитьДочерний(ДФ.Подпись());
Подпись3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ПодстрочныйТекст_метод.os
Перем ДФ, ПодстрочныйТекст2;
Процедура Кнопка1_Нажатие() Экспорт
ПодстрочныйТекст2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ПодстрочныйТекст_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПодстрочныйТекст1 = Блок2.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
ПодстрочныйТекст1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
ПодстрочныйТекст2 = Блок2.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
ПодстрочныйТекст2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
ПодстрочныйТекст3 = Блок2.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
ПодстрочныйТекст3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ПодчеркнутыйТекст_метод.os
Перем ДФ, ПодчеркнутыйТекст2;
Процедура Кнопка1_Нажатие() Экспорт
ПодчеркнутыйТекст2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ПодчеркнутыйТекст_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПодчеркнутыйТекст1 = Блок2.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
ПодчеркнутыйТекст1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
ПодчеркнутыйТекст2 = Блок2.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
ПодчеркнутыйТекст2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
ПодчеркнутыйТекст3 = Блок2.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
ПодчеркнутыйТекст3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ПолеПароля_метод.os
Перем ДФ, ПолеПароля2;
Процедура Кнопка1_Нажатие() Экспорт
ПолеПароля2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ПолеПароля_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПолеПароля1 = Блок2.ДобавитьДочерний(ДФ.ПолеПароля());
ПолеПароля2 = Блок2.ДобавитьДочерний(ДФ.ПолеПароля());
ПолеПароля3 = Блок2.ДобавитьДочерний(ДФ.ПолеПароля());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ПолеПоиска_метод.os
Перем ДФ, ПолеПоиска2;
Процедура Кнопка1_Нажатие() Экспорт
ПолеПоиска2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ПолеПоиска_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПолеПоиска1 = Блок2.ДобавитьДочерний(ДФ.ПолеПоиска());
ПолеПоиска2 = Блок2.ДобавитьДочерний(ДФ.ПолеПоиска());
ПолеПоиска3 = Блок2.ДобавитьДочерний(ДФ.ПолеПоиска());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ПолеСписка_метод.os
Перем ДФ, ПолеСписка2;
Процедура Кнопка1_Нажатие() Экспорт
ПолеСписка2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ПолеСписка_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПолеСписка1 = Блок2.ДобавитьДочерний(ДФ.ПолеСписка());
ПолеСписка2 = Блок2.ДобавитьДочерний(ДФ.ПолеСписка());
ПолеСписка3 = Блок2.ДобавитьДочерний(ДФ.ПолеСписка());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ПолеТекста_метод.os
Перем ДФ, ПолеТекста2;
Процедура Кнопка1_Нажатие() Экспорт
ПолеТекста2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ПолеТекста_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПолеТекста1 = Блок2.ДобавитьДочерний(ДФ.ПолеТекста());
ПолеТекста2 = Блок2.ДобавитьДочерний(ДФ.ПолеТекста());
ПолеТекста3 = Блок2.ДобавитьДочерний(ДФ.ПолеТекста());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ПолеЧисла_метод.os
Перем ДФ, ПолеЧисла2;
Процедура Кнопка1_Нажатие() Экспорт
ПолеЧисла2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ПолеЧисла_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПолеЧисла1 = Блок2.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла2 = Блок2.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла3 = Блок2.ДобавитьДочерний(ДФ.ПолеЧисла());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Ползунок_метод.os
Перем ДФ, Ползунок2;
Процедура Кнопка1_Нажатие() Экспорт
Ползунок2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Ползунок_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Ползунок1 = Блок2.ДобавитьДочерний(ДФ.Ползунок());
Ползунок2 = Блок2.ДобавитьДочерний(ДФ.Ползунок());
Ползунок3 = Блок2.ДобавитьДочерний(ДФ.Ползунок());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_РаскрываемыйБлок_метод.os
Перем ДФ, РаскрываемыйБлок2;
Процедура Кнопка1_Нажатие() Экспорт
РаскрываемыйБлок2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_РаскрываемыйБлок_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
РаскрываемыйБлок1 = Блок2.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
РаскрываемыйБлок2 = Блок2.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
РаскрываемыйБлок3 = Блок2.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Результат_метод.os
Перем ДФ, Результат2;
Процедура Кнопка1_Нажатие() Экспорт
Результат2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Результат_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Результат1 = Блок2.ДобавитьДочерний(ДФ.Результат());
Результат1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Результат2 = Блок2.ДобавитьДочерний(ДФ.Результат());
Результат2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Результат3 = Блок2.ДобавитьДочерний(ДФ.Результат());
Результат3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_СписокОпределений_метод.os
Перем ДФ, СписокОпределений2;
Процедура Кнопка1_Нажатие() Экспорт
СписокОпределений2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_СписокОпределений_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
СписокОпределений1 = Блок2.ДобавитьДочерний(ДФ.СписокОпределений());
СписокОпределений1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
СписокОпределений2 = Блок2.ДобавитьДочерний(ДФ.СписокОпределений());
СписокОпределений2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
СписокОпределений3 = Блок2.ДобавитьДочерний(ДФ.СписокОпределений());
СписокОпределений3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Ссылка_метод.os
Перем ДФ, Ссылка2;
Процедура Кнопка1_Нажатие() Экспорт
Ссылка2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Ссылка_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Ссылка1 = Блок2.ДобавитьДочерний(ДФ.Ссылка());
Ссылка1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Ссылка2 = Блок2.ДобавитьДочерний(ДФ.Ссылка());
Ссылка2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Ссылка3 = Блок2.ДобавитьДочерний(ДФ.Ссылка());
Ссылка3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_СтрокаТаблицы_метод.os
Перем ДФ, СтрокаТаблицы2;
Процедура Кнопка1_Нажатие() Экспорт
СтрокаТаблицы2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_СтрокаТаблицы_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
СтрокаТаблицы1 = Блок2.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаТаблицы1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
СтрокаТаблицы2 = Блок2.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаТаблицы2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
СтрокаТаблицы3 = Блок2.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаТаблицы3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Таблица_метод.os
Перем ДФ, Таблица2;
Процедура Кнопка1_Нажатие() Экспорт
Таблица2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Таблица_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Таблица1 = Блок2.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Таблица2 = Блок2.ДобавитьДочерний(ДФ.Таблица());
Таблица2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Таблица3 = Блок2.ДобавитьДочерний(ДФ.Таблица());
Таблица3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Термин_метод.os
Перем ДФ, Термин2;
Процедура Кнопка1_Нажатие() Экспорт
Термин2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Термин_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Термин1 = Блок2.ДобавитьДочерний(ДФ.Термин());
Термин1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Термин2 = Блок2.ДобавитьДочерний(ДФ.Термин());
Термин2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Термин3 = Блок2.ДобавитьДочерний(ДФ.Термин());
Термин3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_УдаленыйТекст_метод.os
Перем ДФ, УдаленыйТекст2;
Процедура Кнопка1_Нажатие() Экспорт
УдаленыйТекст2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_УдаленыйТекст_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
УдаленыйТекст1 = Блок2.ДобавитьДочерний(ДФ.УдаленыйТекст());
УдаленыйТекст1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
УдаленыйТекст2 = Блок2.ДобавитьДочерний(ДФ.УдаленыйТекст());
УдаленыйТекст2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
УдаленыйТекст3 = Блок2.ДобавитьДочерний(ДФ.УдаленыйТекст());
УдаленыйТекст3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_УпорядоченныйСписок_метод.os
Перем ДФ, УпорядоченныйСписок2;
Процедура Кнопка1_Нажатие() Экспорт
УпорядоченныйСписок2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_УпорядоченныйСписок_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
УпорядоченныйСписок1 = Блок2.ДобавитьДочерний(ДФ.УпорядоченныйСписок());
УпорядоченныйСписок1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
УпорядоченныйСписок2 = Блок2.ДобавитьДочерний(ДФ.УпорядоченныйСписок());
УпорядоченныйСписок2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
УпорядоченныйСписок3 = Блок2.ДобавитьДочерний(ДФ.УпорядоченныйСписок());
УпорядоченныйСписок3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Флажок_метод.os
Перем ДФ, Флажок2;
Процедура Кнопка1_Нажатие() Экспорт
Флажок2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Флажок_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Флажок1 = Блок2.ДобавитьДочерний(ДФ.Флажок());
Флажок2 = Блок2.ДобавитьДочерний(ДФ.Флажок());
Флажок3 = Блок2.ДобавитьДочерний(ДФ.Флажок());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ФорматированныйТекст_метод.os
Перем ДФ, ФорматированныйТекст2;
Процедура Кнопка1_Нажатие() Экспорт
ФорматированныйТекст2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ФорматированныйТекст_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ФорматированныйТекст1 = Блок2.ДобавитьДочерний(ДФ.ФорматированныйТекст());
ФорматированныйТекст1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
ФорматированныйТекст2 = Блок2.ДобавитьДочерний(ДФ.ФорматированныйТекст());
ФорматированныйТекст2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
ФорматированныйТекст3 = Блок2.ДобавитьДочерний(ДФ.ФорматированныйТекст());
ФорматированныйТекст3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Фрейм_метод.os
Перем ДФ, Фрейм2;
Процедура Кнопка1_Нажатие() Экспорт
Фрейм2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Фрейм_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Фрейм1 = Блок2.ДобавитьДочерний(ДФ.Фрейм());
Фрейм2 = Блок2.ДобавитьДочерний(ДФ.Фрейм());
Фрейм3 = Блок2.ДобавитьДочерний(ДФ.Фрейм());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ШапкаТаблицы_метод.os
Перем ДФ, ШапкаТаблицы2;
Процедура Кнопка1_Нажатие() Экспорт
ШапкаТаблицы2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ШапкаТаблицы_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ШапкаТаблицы1 = Блок2.ДобавитьДочерний(ДФ.ШапкаТаблицы());
ШапкаТаблицы1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
ШапкаТаблицы2 = Блок2.ДобавитьДочерний(ДФ.ШапкаТаблицы());
ШапкаТаблицы2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
ШапкаТаблицы3 = Блок2.ДобавитьДочерний(ДФ.ШапкаТаблицы());
ШапкаТаблицы3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Шкала_метод.os
Перем ДФ, Шкала2;
Процедура Кнопка1_Нажатие() Экспорт
Шкала2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Шкала_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Шкала1 = Блок2.ДобавитьДочерний(ДФ.Шкала());
Шкала2 = Блок2.ДобавитьДочерний(ДФ.Шкала());
Шкала3 = Блок2.ДобавитьДочерний(ДФ.Шкала());
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ЭлементПоляСписка_метод.os
Перем ДФ, ЭлементПоляСписка2;
Процедура Кнопка1_Нажатие() Экспорт
ЭлементПоляСписка2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ЭлементПоляСписка_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЭлементПоляСписка1 = Блок2.ДобавитьДочерний(ДФ.ЭлементПоляСписка());
ЭлементПоляСписка1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
ЭлементПоляСписка2 = Блок2.ДобавитьДочерний(ДФ.ЭлементПоляСписка());
ЭлементПоляСписка2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
ЭлементПоляСписка3 = Блок2.ДобавитьДочерний(ДФ.ЭлементПоляСписка());
ЭлементПоляСписка3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ЭлементСписка_метод.os
Перем ДФ, ЭлементСписка2;
Процедура Кнопка1_Нажатие() Экспорт
ЭлементСписка2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ЭлементСписка_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЭлементСписка1 = Блок2.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
ЭлементСписка2 = Блок2.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
ЭлементСписка3 = Блок2.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_Ячейка_метод.os
Перем ДФ, Ячейка2;
Процедура Кнопка1_Нажатие() Экспорт
Ячейка2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_Ячейка_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Ячейка1 = Блок2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
Ячейка2 = Блок2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Ячейка3 = Блок2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
ПрокрутитьДо_ЯчейкаЗаголовка_метод.os
Перем ДФ, ЯчейкаЗаголовка2;
Процедура Кнопка1_Нажатие() Экспорт
ЯчейкаЗаголовка2.ПрокрутитьДо();
// Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
Сообщить(?(
Истина
, "", "!!! ") + "ПрокрутитьДо_ЯчейкаЗаголовка_метод.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЯчейкаЗаголовка1 = Блок2.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " +
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " +
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" +
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " +
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " +
"пробежал Белый Кролик с розовыми глазами." +
"В этом не было ничего очень уж замечательного. " +
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" +
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " +
"но в то время все представлялось ей совершенно естественным.)";
ЯчейкаЗаголовка2 = Блок2.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
ЯчейкаЗаголовка3 = Блок2.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
Прокручено_АргументыСобытия_свойство.os
Перем ДФ, Абзац1, Форма1, БлокИндикаторПрокрутки;
Процедура МышьНадЭлементом() Экспорт
Параметр = ДФ.АргументыСобытия.Параметр;
Параметр["ЭтаСсылка"].Стиль.ЦветФона = ДФ.Цвет(0, 0, 0);
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Параметр = ДФ.АргументыСобытия.Параметр;
Параметр["ЭтаСсылка"].Стиль.ЦветФона = ДФ.Цвет.ТемноСерый;
КонецПроцедуры
Процедура Нажатие() Экспорт
Абзац1.Текст = "Нажатие " + ДФ.АргументыСобытия.Параметр["ЭтаСсылка"].Источник + " " + ТекущаяУниверсальнаяДатаВМиллисекундах();
КонецПроцедуры
Процедура Форма1_ПриПрокручивании() Экспорт
// Сообщить("Прокручено = " + ДФ.АргументыСобытия.Прокручено);
// Сообщить("Прокручено = " + Форма1.Прокручено);
БлокИндикаторПрокрутки.Стиль.Ширина = Строка(ДФ.АргументыСобытия.Прокручено) + "%";
Сообщить(?(
ДФ.АргументыСобытия.Прокручено > 0
, "", "!!! ") + "Прокручено_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 600;
Форма1.НачальнаяВысота = 300;
Форма1.ПриПрокручивании = ДФ.Действие(ЭтотОбъект, "Форма1_ПриПрокручивании");
Форма1.Заголовок = "Прокрути текст";
Контент = Форма1.Контент;
Контент.Стиль.Отступ = ДФ.Отступ(0, 0, 0, 0, Истина);
Контент.Стиль.РазмерШрифта = 28;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Позиция = ДФ.Позиция.Фиксировано;
Блок1.Стиль.Верх = 0;
Блок1.Стиль.Ширина = "100%";
Блок1.Стиль.ЦветФона = ДФ.Цвет(241, 241, 241);
Заголовок2 = Блок1.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок2.Текст = "Индикатор прокрутки";
Заголовок2.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
БлокКонтейнерИндикатора = Блок1.ДобавитьДочерний(ДФ.Блок());
БлокКонтейнерИндикатора.Стиль.Ширина = "100%";
БлокКонтейнерИндикатора.Стиль.Высота = 8;
БлокКонтейнерИндикатора.Стиль.Фон = ДФ.Цвет(204, 204, 204);
БлокИндикаторПрокрутки = БлокКонтейнерИндикатора.ДобавитьДочерний(ДФ.Блок());
БлокИндикаторПрокрутки.Стиль.Высота = 8;
БлокИндикаторПрокрутки.Стиль.Фон = ДФ.Цвет(76, 175, 80);
БлокИндикаторПрокрутки.Стиль.Ширина = "0%";
БлокКонтент = Форма1.ДобавитьДочерний(ДФ.Блок());
БлокКонтент.Стиль.Ширина = "80%";
БлокКонтент.Стиль.Отступ = "50px auto 0 auto";
БлокКонтент.Стиль.Заполнение = ДФ.Заполнение(100, 0, 0, 0);
Заголовок3 = БлокКонтент.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок3.Текст = "Прокрутите вниз, чтобы увидеть эффект";
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Алиса так увлеклась, что сама захлопала в ладоши и тут же, конечно, упустила клубок.
|Но она этого не заметила даже, а в восторге представила себе живые танцующие деревья.";
Абзац2 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац2.Текст = "– Вот было бы здорово! – воскликнула Алиса. – Они бы веселились до самой осени. А потом сложили бы листочки на землю и заснули на всю зиму.
|Послушай, – обратилась она вдруг к котенку, – а в шахматы играть ты умеешь? Ну что же тут смешного? Обычное дело. И потом, я сама видела, как ты внимательно следишь за игрой в шахматы.
|На днях, когда я сказала: «Шах!» – ты даже мурлыкнул. А правда же отличный был ход? Если бы не этот противный конь, я бы непременно выиграла.
|Он так незаметно подкрался! Слушай, котик, а давай играть КАК БУДТО!";
Абзац3 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац3.Текст = "Алиса обожала эти слова – КАК БУДТО. С ними можно было играть во что угодно.
|Вчера, например, она предложила сестре: «Давай играть, КАК БУДТО мы шахматные Короли и Королевы».
|Но сестра не понимает никаких КАК БУДТО.
|«Это невозможно, – сказала она рассудительно. – Нас ведь всего две, а королей и королев – четыре».
|«Ну и что! – возразила Алиса. – Это же КАК БУДТО. Ты будешь одной из Королев, а я КАК БУДТО сразу всеми остальными».";
Форма1.Открыть();
Прокручено_Форма_свойство.os
Перем ДФ, Абзац1, Форма1, БлокИндикаторПрокрутки;
Процедура МышьНадЭлементом() Экспорт
Параметр = ДФ.АргументыСобытия.Параметр;
Параметр["ЭтаСсылка"].Стиль.ЦветФона = ДФ.Цвет(0, 0, 0);
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Параметр = ДФ.АргументыСобытия.Параметр;
Параметр["ЭтаСсылка"].Стиль.ЦветФона = ДФ.Цвет.ТемноСерый;
КонецПроцедуры
Процедура Нажатие() Экспорт
Абзац1.Текст = "Нажатие " + ДФ.АргументыСобытия.Параметр["ЭтаСсылка"].Источник + " " + ТекущаяУниверсальнаяДатаВМиллисекундах();
КонецПроцедуры
Процедура Форма1_ПриПрокручивании() Экспорт
// Сообщить("Прокручено = " + ДФ.АргументыСобытия.Прокручено);
// Сообщить("Прокручено = " + Форма1.Прокручено);
БлокИндикаторПрокрутки.Стиль.Ширина = Строка(Форма1.Прокручено) + "%";
Сообщить(?(
Форма1.Прокручено > 0
, "", "!!! ") + "Прокручено_Форма_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 600;
Форма1.НачальнаяВысота = 300;
Форма1.ПриПрокручивании = ДФ.Действие(ЭтотОбъект, "Форма1_ПриПрокручивании");
Форма1.Заголовок = "Прокрути текст";
Контент = Форма1.Контент;
Контент.Стиль.Отступ = ДФ.Отступ(0, 0, 0, 0, Истина);
Контент.Стиль.РазмерШрифта = 28;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Позиция = ДФ.Позиция.Фиксировано;
Блок1.Стиль.Верх = 0;
Блок1.Стиль.Ширина = "100%";
Блок1.Стиль.ЦветФона = ДФ.Цвет(241, 241, 241);
Заголовок2 = Блок1.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок2.Текст = "Индикатор прокрутки";
Заголовок2.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
БлокКонтейнерИндикатора = Блок1.ДобавитьДочерний(ДФ.Блок());
БлокКонтейнерИндикатора.Стиль.Ширина = "100%";
БлокКонтейнерИндикатора.Стиль.Высота = 8;
БлокКонтейнерИндикатора.Стиль.Фон = ДФ.Цвет(204, 204, 204);
БлокИндикаторПрокрутки = БлокКонтейнерИндикатора.ДобавитьДочерний(ДФ.Блок());
БлокИндикаторПрокрутки.Стиль.Высота = 8;
БлокИндикаторПрокрутки.Стиль.Фон = ДФ.Цвет(76, 175, 80);
БлокИндикаторПрокрутки.Стиль.Ширина = "0%";
БлокКонтент = Форма1.ДобавитьДочерний(ДФ.Блок());
БлокКонтент.Стиль.Ширина = "80%";
БлокКонтент.Стиль.Отступ = "50px auto 0 auto";
БлокКонтент.Стиль.Заполнение = ДФ.Заполнение(100, 0, 0, 0);
Заголовок3 = БлокКонтент.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок3.Текст = "Прокрутите вниз, чтобы увидеть эффект";
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Алиса так увлеклась, что сама захлопала в ладоши и тут же, конечно, упустила клубок.
|Но она этого не заметила даже, а в восторге представила себе живые танцующие деревья.";
Абзац2 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац2.Текст = "– Вот было бы здорово! – воскликнула Алиса. – Они бы веселились до самой осени. А потом сложили бы листочки на землю и заснули на всю зиму.
|Послушай, – обратилась она вдруг к котенку, – а в шахматы играть ты умеешь? Ну что же тут смешного? Обычное дело. И потом, я сама видела, как ты внимательно следишь за игрой в шахматы.
|На днях, когда я сказала: «Шах!» – ты даже мурлыкнул. А правда же отличный был ход? Если бы не этот противный конь, я бы непременно выиграла.
|Он так незаметно подкрался! Слушай, котик, а давай играть КАК БУДТО!";
Абзац3 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац3.Текст = "Алиса обожала эти слова – КАК БУДТО. С ними можно было играть во что угодно.
|Вчера, например, она предложила сестре: «Давай играть, КАК БУДТО мы шахматные Короли и Королевы».
|Но сестра не понимает никаких КАК БУДТО.
|«Это невозможно, – сказала она рассудительно. – Нас ведь всего две, а королей и королев – четыре».
|«Ну и что! – возразила Алиса. – Это же КАК БУДТО. Ты будешь одной из Королев, а я КАК БУДТО сразу всеми остальными».";
Форма1.Открыть();
ПрописныеТекста_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ПрописныеТекста = ДФ.ПрописныеТекста.ПерваяПрописная
, "", "!!! ") + "ПрописныеТекста_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ПрописныеТекста", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 250;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "– Забавный стишок! – промолвила Алиса.
|– В нем что-то есть.
|– Честно говоря, кто этот ЧТО-ТО, Алиса объяснить не смогла бы, но ей стыдно было в этом признаться даже самой себе.";
Абзац1.Стиль.ПрописныеТекста = ДФ.ПрописныеТекста.ПерваяПрописная;
Форма1.Открыть();
Прямоугольник_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "Прямоугольник_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.НачатьПуть();
Контекст2d1.Прямоугольник(10, 10, 100, 100);
Контекст2d1.Начертить();
Форма1.Открыть();
ПустыеЯчейки_Стиль_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Сообщить(?(
Таблица1.Стиль.ПустыеЯчейки = ДФ.ПустыеЯчейки.Скрыть
, "", "!!! ") + "ПустыеЯчейки_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1.Стиль, "ПустыеЯчейки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Строка1 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Ячейка1 = Строка1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Январь";
Ячейка2 = Строка1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "Февраль";
Строка2 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Ячейка3 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Март";
Ячейка4 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Таблица1.Стиль.ПустыеЯчейки = ДФ.ПустыеЯчейки.Скрыть;
Форма1.Открыть();
Радиус_Круг_свойство.os
Перем ДФ, Круг1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Круг1.Радиус = 20
, "", "!!! ") + "Радиус_Круг_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Круг1 = ДФ.Круг();
Круг1.Икс = 50;
Круг1.Игрек = 60;
Круг1.Радиус = 20;
Круг2 = ДФ.Круг(20, 20, 8);
Форма1.Открыть();
РадиусГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.РадиусГраницы = "25px"
, "", "!!! ") + "РадиусГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "РадиусГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 300;
Блок1.Текст = "Блок1";
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
// РадиусГраницы1 = ДФ.РадиусГраницы(25, 25, 25, 25);
РадиусГраницы1 = ДФ.РадиусГраницы();
РадиусГраницы1.ЛевыйРадиусВерхнейГраницы = 25;
РадиусГраницы1.ПравыйРадиусВерхнейГраницы = 25;
РадиусГраницы1.ПравыйРадиусНижнейГраницы = 25;
РадиусГраницы1.ЛевыйРадиусНижнейГраницы = 25;
Блок1.Стиль.РадиусГраницы = РадиусГраницы1;
Форма1.Открыть();
РазделительКолонок_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.РазделительКолонок = "medium double rgb(0, 0, 255)"
, "", "!!! ") + "РазделительКолонок_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "РазделительКолонок", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РазделительКолонок1 = ДФ.РазделительКолонок(ДФ.ШиринаГраницы.Средняя, ДФ.СтильГраницы.Двойная, ДФ.Цвет.Синий);
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("БелаяДымка");
Абзац1.Текст = "И тут появилась Черная Королева.
|«Ого! Как выросла! – подумала Алиса. – Когда я нашла ее в золе, она была не больше моего пальца. А теперь я ей по плечо».
|– У нас такой чудесный воздух, что все тянутся вверх не по дням, а по часам, – сказала Роза, будто подслушала мысли Алисы.
|– Пойду навстречу ей, – сказала Алиса, как бы извиняясь перед цветами.
|С ними было, конечно, весело поболтать, но беседа с Королевой наверняка намного интересней.
|– Если хочешь встретиться, – посоветовала Роза, – иди не к ней, а от нее.
|Такой явной глупости Алиса и слушать не стала. И, конечно же, пошла прямиком к Королеве. Но, к ее изумлению, Королева мгновенно исчезла из виду.
|А дорожка снова привела Алису к дому. Раздосадованная, Алиса отпрянула от дома и оглянулась. Королева маячила вдалеке позади нее.
|Алиса заколебалась: уж не права ли была Роза и не следует ли двинуться в противоположную от Королевы сторону? Так она и сделала.
|И все вышло чудесно! Буквально через минуту она столкнулась нос к носу с Королевой. И что удивительно, холм, до которого она так
|долго не могла дойти, возвышался прямо перед ней.
|– Ты откуда взялась? – строго спросила Королева. – Куда идешь? Гляди в глаза! Говори почтительно! Не маши руками, не верти головой и не дрыгай ногами!
|Алиса как можно вежливее объяснила, что немного заблудилась, а теперь разобралась, что к чему и что куда, и идет себе своей дорогой.";
Абзац1.Стиль.РазделительКолонок = РазделительКолонок1;
Абзац1.Стиль.КоличествоКолонок = 3;
Форма1.Открыть();
Разлиновка_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Сообщить(?(
Таблица1.Разлиновка = ДФ.Разлиновка.Все
, "", "!!! ") + "Разлиновка_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "Разлиновка", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Стиль1 = Таблица1.Стиль;
Стиль1.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Стиль1.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Таблица1;
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Таблица1;
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = ГруппаКолонок1;
Колонка1.Стиль.Ширина = 200;
Колонка2 = ДФ.Колонка();
Колонка2.Родитель = ГруппаКолонок1;
Колонка2.Стиль.Ширина = 100;
Колонка3 = ДФ.Колонка();
Колонка3.Родитель = ГруппаКолонок1;
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Таблица1;
СтрокаШапка = ДФ.СтрокаТаблицы();
СтрокаШапка.Родитель = Таблица1;
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = СтрокаШапка;
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка2.Родитель = СтрокаШапка;
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка3.Родитель = СтрокаШапка;
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Таблица1;
СтрокаМатроскин = ДФ.СтрокаТаблицы();
СтрокаМатроскин.Родитель = ОбластьТаблицы1;
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка4.Родитель = СтрокаМатроскин;
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = СтрокаМатроскин;
Ячейка1.Текст = "Кот";
Ячейка2 = ДФ.Ячейка();
Ячейка2.Родитель = СтрокаМатроскин;
Ячейка2.Текст = "4";
СтрокаШарик = ДФ.СтрокаТаблицы();
СтрокаШарик.Родитель = ОбластьТаблицы1;
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка5.Родитель = СтрокаШарик;
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = ДФ.Ячейка();
Ячейка3.Родитель = СтрокаШарик;
Ячейка3.Текст = "Пёс";
Ячейка4 = ДФ.Ячейка();
Ячейка4.Родитель = СтрокаШарик;
Ячейка4.Текст = "4";
СтрокаГалчонок = ДФ.СтрокаТаблицы();
СтрокаГалчонок.Родитель = ОбластьТаблицы1;
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка6.Родитель = СтрокаГалчонок;
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = ДФ.Ячейка();
Ячейка5.Родитель = СтрокаГалчонок;
Ячейка5.Текст = "Птица";
Ячейка6 = ДФ.Ячейка();
Ячейка6.Родитель = СтрокаГалчонок;
Ячейка6.Текст = "2";
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Таблица1;
СтрокаИтого = ДФ.СтрокаТаблицы();
СтрокаИтого.Родитель = Итоги1;
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка7.Родитель = СтрокаИтого;
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = ДФ.Ячейка();
Ячейка7.Родитель = СтрокаИтого;
Ячейка7.Текст = "10";
Форма1.Открыть();
Размер_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.Размер = 30
, "", "!!! ") + "Размер_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "Размер", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ПолеПароля1 = Форма1.ДобавитьДочерний(ДФ.ПолеПароля());
ПолеПароля1.Значение = "psw123";
ПолеПароля1.Размер = 30;
Форма1.Открыть();
Размер_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.Размер = 39
, "", "!!! ") + "Размер_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "Размер", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
ПолеПоиска1 = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
ПолеПоиска1.Размер = 39;
Форма1.Открыть();
Размер_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.Размер = 10
, "", "!!! ") + "Размер_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "Размер", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Ширина = 150;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = ПолеСписка1;
ГруппировкаПоляСписка1.Надпись = "Жители деревни Простоквашино";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка1.Значение = "Кот";
ЭлементПоляСписка1.Текст = "Матроскин";
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Пёс";
ЭлементПоляСписка2.Текст = "Шарик";
ЭлементПоляСписка3 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка3.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка3.Значение = "Птица";
ЭлементПоляСписка3.Текст = "Галчонок";
ПолеСписка1.Размер = 10;
Форма1.Открыть();
Размер_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.Размер = 80
, "", "!!! ") + "Размер_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "Размер", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 600;
Форма1.НачальнаяВысота = 200;
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Значение = "ПолеТекста1";
ПолеТекста1.Размер = 80;
Форма1.Открыть();
РазмерИзменен_Форма_событие.os
Перем ДФ, Кнопка5, Абзац1;
Процедура Свойство() Экспорт
Абзац1.Текст = "СмещениеЛево = " + Кнопка5.СмещениеЛево + "
|СмещениеВерх = " + Кнопка5.СмещениеВерх + "
|СмещениеШирина = " + Кнопка5.СмещениеШирина + "
|СмещениеВысота = " + Кнопка5.СмещениеВысота + "
|t = " + ТекущаяУниверсальнаяДатаВМиллисекундах();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Кнопка5, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Кнопка5, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Кнопка5, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Кнопка5, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
Сообщить(?(
Кнопка5.СмещениеВысота <> "0"
, "", "!!! ") + "РазмерИзменен_Форма_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
СмещениеВерх();
СмещениеШирина();
СмещениеВысота();
КонецПроцедуры
Процедура Кнопка5_Нажатие() Экспорт
СмещениеЛево();
СмещениеВерх();
СмещениеШирина();
СмещениеВысота();
КонецПроцедуры
Процедура Форма1_РазмерИзменен() Экспорт
// Сообщить("Форма1_РазмерИзменен " + ДФ.АргументыСобытия.ШиринаОкна + " х " + ДФ.АргументыСобытия.ВысотаОкна);
Кнопка5_Нажатие();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.РазмерИзменен = ДФ.Действие(ЭтотОбъект, "Форма1_РазмерИзменен");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Положение Объект";
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "СмещениеЛево";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "СмещениеЛево");
Кнопка2 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "СмещениеВерх";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "СмещениеВерх");
Кнопка3 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "СмещениеШирина";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "СмещениеШирина");
Кнопка4 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "СмещениеВысота";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "СмещениеВысота");
Кнопка5 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка5.Текст = "Объект";
Кнопка5.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Кнопка5.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка5_Нажатие");
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Форма1.Открыть();
РазмерКартинки_Стиль_свойство.os
Перем ДФ, Контент, Фон1;
Процедура Свойство() Экспорт
Сообщить(?(
Контент.Стиль.РазмерКартинки = "400px 400px"
, "", "!!! ") + "РазмерКартинки_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Контент.Стиль, "РазмерКартинки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Фиксировано;
Контент.Стиль.Фон = Фон1;
Контент.Стиль.РазмерКартинки = ДФ.Размер(400, 400);
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Контент.Стиль.Фон = Фон1;
Контент.Стиль.РазмерКартинки = ДФ.Размер(400, 400);
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент = Форма1.Контент;
Кнопка1 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "ФоновоеВложение = Фиксировано";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "ФоновоеВложение = Прокрутка";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка2.Стиль.ОтступСлева = 25;
Для А = 0 По 15 Цикл
Контент.ДобавитьДочерний(ДФ.Абзац()).Текст = "Алиса и сама не заметила, как очутилась на каминной полке.";
Контент.ДобавитьДочерний(ДФ.Перенос());
Контент.ДобавитьДочерний(ДФ.Перенос());
КонецЦикла;
Фон1 = ДФ.Фон();
Фон1.ЦветФона = ДФ.Цвет(243, 243, 243);
Фон1.ФоновоеИзображение = "img_flwr.gif";
Фон1.МозаикаКартинки = ДФ.МозаикаКартинки.НеПовторять;
Фон1.ПоложениеКартинки = ДФ.ПоложениеКартинки.ВерхПраво;
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Контент.Стиль.Фон = Фон1;
Контент.Стиль.РазмерКартинки = ДФ.Размер(400, 400);
Форма1.Открыть();
РазмерКартинки_Фон_свойство.os
Перем ДФ, Контент, Фон1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Фон1.РазмерКартинки = "ДфРазмер"
, "", "!!! ") + "РазмерКартинки_Фон_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Фиксировано;
Контент.Стиль.Фон = Фон1;
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Контент.Стиль.Фон = Фон1;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент = Форма1.Контент;
Кнопка1 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "ФоновоеВложение = Фиксировано";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "ФоновоеВложение = Прокрутка";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка2.Стиль.ОтступСлева = 25;
Для А = 0 По 15 Цикл
Контент.ДобавитьДочерний(ДФ.Абзац()).Текст = "Алиса и сама не заметила, как очутилась на каминной полке.";
Контент.ДобавитьДочерний(ДФ.Перенос());
Контент.ДобавитьДочерний(ДФ.Перенос());
КонецЦикла;
Фон1 = ДФ.Фон();
Фон1.ЦветФона = ДФ.Цвет(243, 243, 243);
Фон1.ФоновоеИзображение = "img_flwr.gif";
Фон1.МозаикаКартинки = ДФ.МозаикаКартинки.НеПовторять;
Фон1.ПоложениеКартинки = ДФ.ПоложениеКартинки.ВерхПраво;
Фон1.ОбластьКартинки = ДФ.ОбластьКартинки.Содержимое;
Фон1.ОбластьРисования = ДФ.ОбластьРисования.Содержимое;
Фон1.РазмерКартинки = ДФ.Размер(450, 450);
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Контент.Стиль.Фон = Фон1;
Форма1.Открыть();
РазмерШрифта_ОкноСообщений_свойство.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОкноСообщений1.РазмерШрифта = 20
, "", "!!! ") + "РазмерШрифта_ОкноСообщений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.РазмерШрифта = 20;
ОкноСообщений1.Показать();
Форма1.Открыть();
РазмерШрифта_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.РазмерШрифта = "30px"
, "", "!!! ") + "РазмерШрифта_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "РазмерШрифта", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шрифт1 = ДФ.Шрифт();
Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
Шрифт1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
Шрифт1.РазмерШрифта = 20;
Шрифт1.ВысотаСтроки = 50;
Шрифт1.СемействоШрифтов = "arial,serif";
Абзац1.Стиль.Шрифт = Шрифт1;
Абзац1.Стиль.РазмерШрифта = 30;
Форма1.Открыть();
РазмерШрифта_Уведомления_свойство.os
Перем ДФ, Уведомления1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Уведомления1.РазмерШрифта = 20
, "", "!!! ") + "РазмерШрифта_Уведомления_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
Уведомления1.РазмерШрифта = 20;
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Форма1.Открыть();
РазмерШрифта_Шрифт_свойство.os
Перем ДФ, Шрифт1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Шрифт1.РазмерШрифта = 20
, "", "!!! ") + "РазмерШрифта_Шрифт_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шрифт1 = ДФ.Шрифт();
Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
Шрифт1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
Шрифт1.РазмерШрифта = 20;
Шрифт1.ВысотаСтроки = 50;
Шрифт1.СемействоШрифтов = "arial,serif";
Абзац1.Стиль.Шрифт = Шрифт1;
Форма1.Открыть();
РазмещениеВТаблице_Стиль_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Сообщить(?(
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано
, "", "!!! ") + "РазмещениеВТаблице_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1.Стиль, "РазмещениеВТаблице", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Таблица1.Стиль.ГраницаСвернута = ДФ.ГраницаСвернута.Раздельно;
Таблица1.Стиль.Ширина = 500;
Строка1 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Ячейка1 = Строка1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "1000000000000000000000000000";
Ячейка2 = Строка1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "10000000";
Строка2 = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
Ячейка3 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Малыш";
Ячейка4 = Строка2.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "Карлсон";
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Форма1.Открыть();
Размытие_Тень_свойство.os
Перем ДФ, Тень1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Тень1.Размытие = 8
, "", "!!! ") + "Размытие_Тень_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Блок1";
Блок1.Стиль.Высота = 100;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Отступ = ДФ.Отступ(50, 50, 50, 50);
Тень1 = ДФ.Тень();
Тень1.Икс = 30;
Тень1.Игрек = 20;
Тень1.Размытие = 8;
Тень1.Величина = 10;
Тень1.Цвет = ДФ.Цвет.Серебристый;
Блок1.Стиль.Тень = Тень1;
Форма1.Открыть();
Размытие_ФильтрИзображений_свойство.os
Перем ДФ, ФильтрИзображений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ФильтрИзображений1.Размытие = 2
, "", "!!! ") + "Размытие_ФильтрИзображений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Изображение1 = ДФ.Изображение();
Форма1.ДобавитьДочерний(Изображение1);
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Стиль.Ширина = 200;
ФильтрИзображений1 = ДФ.ФильтрИзображений();
ФильтрИзображений1.Размытие = 2;
Изображение1.Стиль.Фильтр = ФильтрИзображений1;
Форма1.Открыть();
РазмытиеТени_Контекст2d_свойство.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контекст2d1.РазмытиеТени = 20
, "", "!!! ") + "РазмытиеТени_Контекст2d_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.РазмытиеТени = 20;
Контекст2d1.ЦветТени = ДФ.Цвет.Черный;
Контекст2d1.СтильЗаполнения = ДФ.Цвет.СветлаяМорскаяВолна;
Контекст2d1.ЗаполнитьПрямоугольник(20, 20, 100, 80);
Форма1.Открыть();
РасположениеСодержимого_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.РасположениеСодержимого = ДФ.РасположениеСодержимого.Вокруг
, "", "!!! ") + "РасположениеСодержимого_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "РасположениеСодержимого", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 400;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Стиль.Отображать = ДФ.Отображать.Гибкий;
Блок1.Стиль.РасположениеСодержимого = ДФ.РасположениеСодержимого.Вокруг;
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.ЦветФона = ДФ.Цвет.Коралловый;
Блок2.Стиль.Ширина = 70;
Блок2.Стиль.Высота = 70;
Блок3 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок3.Стиль.ЦветФона = ДФ.Цвет.СветлоСиний;
Блок3.Стиль.Ширина = 70;
Блок3.Стиль.Высота = 70;
Блок4 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок4.Стиль.ЦветФона = ДФ.Цвет.Хаки;
Блок4.Стиль.Ширина = 70;
Блок4.Стиль.Высота = 70;
Блок5 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок5.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Блок5.Стиль.Ширина = 70;
Блок5.Стиль.Высота = 70;
Форма1.Открыть();
Редактируемый_Абзац_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Редактируемый
, "", "!!! ") + "Редактируемый_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Абзац";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Артикль_свойство.os
Перем ДФ, Артикль1;
Процедура Свойство() Экспорт
Сообщить(?(
Артикль1.Редактируемый
, "", "!!! ") + "Редактируемый_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Артикль1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Текст = "Это Артикль";
Артикль1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Артикль1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Блок_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Редактируемый
, "", "!!! ") + "Редактируемый_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Это Блок";
Блок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Блок1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.Редактируемый
, "", "!!! ") + "Редактируемый_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборВремени1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.Редактируемый
, "", "!!! ") + "Редактируемый_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборДаты1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.Редактируемый
, "", "!!! ") + "Редактируемый_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборДатыВремени1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Редактируемый
, "", "!!! ") + "Редактируемый_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборМестнойДатыВремени1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.Редактируемый
, "", "!!! ") + "Редактируемый_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборМесяца1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.Редактируемый
, "", "!!! ") + "Редактируемый_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборНедели1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборФайла1.Редактируемый
, "", "!!! ") + "Редактируемый_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборФайла1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборЦвета1.Редактируемый
, "", "!!! ") + "Редактируемый_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборЦвета1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ВыборЦвета1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Группа_свойство.os
Перем ДФ, Группа1;
Процедура Свойство() Экспорт
Сообщить(?(
Группа1.Редактируемый
, "", "!!! ") + "Редактируемый_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Группа1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Текст = "Это Группа";
Группа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Группа1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ГруппаКолонок_свойство.os
Перем ДФ, ГруппаКолонок1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппаКолонок1.Редактируемый
, "", "!!! ") + "Редактируемый_ГруппаКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппаКолонок1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Форма1;
ГруппаКолонок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ГруппаКолонок1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ГруппировкаПоляСписка_свойство.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.Редактируемый
, "", "!!! ") + "Редактируемый_ГруппировкаПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппировкаПоляСписка1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ГруппировкаПоляСписка1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Диалог_свойство.os
Перем ДФ, Диалог1;
Процедура Свойство() Экспорт
Сообщить(?(
Диалог1.Редактируемый
, "", "!!! ") + "Редактируемый_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Текст = "Это Диалог";
Диалог1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Диалог1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
ДополнительныйБлок1.Редактируемый
, "", "!!! ") + "Редактируемый_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "Это ДополнительныйБлок";
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ДополнительныйБлок1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ЖирныйТекст1.Редактируемый
, "", "!!! ") + "Редактируемый_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЖирныйТекст1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Текст = "Это ЖирныйТекст";
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЖирныйТекст1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Заголовок1_свойство.os
Перем ДФ, Заголовок11;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок11.Редактируемый
, "", "!!! ") + "Редактируемый_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок11, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Текст = "Это Заголовок1";
Заголовок11.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок11.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Заголовок2_свойство.os
Перем ДФ, Заголовок21;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок21.Редактируемый
, "", "!!! ") + "Редактируемый_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок21, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Текст = "Это Заголовок2";
Заголовок21.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок21.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Заголовок3_свойство.os
Перем ДФ, Заголовок31;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок31.Редактируемый
, "", "!!! ") + "Редактируемый_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок31, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Текст = "Это Заголовок3";
Заголовок31.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок31.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Заголовок4_свойство.os
Перем ДФ, Заголовок41;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок41.Редактируемый
, "", "!!! ") + "Редактируемый_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок41, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Текст = "Это Заголовок4";
Заголовок41.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок41.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Заголовок5_свойство.os
Перем ДФ, Заголовок51;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок51.Редактируемый
, "", "!!! ") + "Редактируемый_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок51, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Текст = "Это Заголовок5";
Заголовок51.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок51.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Заголовок6_свойство.os
Перем ДФ, Заголовок61;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок61.Редактируемый
, "", "!!! ") + "Редактируемый_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок61, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Текст = "Это Заголовок6";
Заголовок61.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок61.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Заголовок_свойство.os
Перем ДФ, Заголовок1;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок1.Редактируемый
, "", "!!! ") + "Редактируемый_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Текст = "Это Заголовок";
Заголовок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Заголовок1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ЗаголовокГруппы_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Редактируемый
, "", "!!! ") + "Редактируемый_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Абзац";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура Свойство() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.Редактируемый
, "", "!!! ") + "Редактируемый_ЗаголовокРаскрываемогоБлока_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Текст = "Это ЗаголовокРаскрываемогоБлока";
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЗаголовокРаскрываемогоБлока1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.Редактируемый
, "", "!!! ") + "Редактируемый_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Изображение1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Индикатор_свойство.os
Перем ДФ, Индикатор1;
Процедура Свойство() Экспорт
Сообщить(?(
Индикатор1.Редактируемый
, "", "!!! ") + "Редактируемый_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Индикатор1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Индикатор1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Итоги_свойство.os
Перем ДФ, Итоги1;
Процедура Свойство() Экспорт
Сообщить(?(
Итоги1.Редактируемый
, "", "!!! ") + "Редактируемый_Итоги_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Итоги1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Текст = "Это Итоги";
Итоги1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Итоги1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Кнопка_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Сообщить(?(
Кнопка1.Редактируемый
, "", "!!! ") + "Редактируемый_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка";
Кнопка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Кнопка1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Код_свойство.os
Перем ДФ, Код1;
Процедура Свойство() Экспорт
Сообщить(?(
Код1.Редактируемый
, "", "!!! ") + "Редактируемый_Код_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Код1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Текст = "Это Код";
Код1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Код1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Колонка_свойство.os
Перем ДФ, Колонка1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонка1.Редактируемый
, "", "!!! ") + "Редактируемый_Колонка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонка1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = Форма1;
Колонка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Колонка1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Колонтитул_свойство.os
Перем ДФ, Колонтитул1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонтитул1.Редактируемый
, "", "!!! ") + "Редактируемый_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонтитул1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Текст = "Это Колонтитул";
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Колонтитул1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Контент_свойство.os
Перем ДФ, Контент1;
Процедура Свойство() Экспорт
Сообщить(?(
Контент1.Редактируемый
, "", "!!! ") + "Редактируемый_Контент_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Контент1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент1 = Форма1.Контент;
Контент1.Текст = "Это Контент";
Контент1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Контент1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
КурсивТекст1.Редактируемый
, "", "!!! ") + "Редактируемый_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(КурсивТекст1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Текст = "Это КурсивТекст";
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
КурсивТекст1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
МаркированныйТекст1.Редактируемый
, "", "!!! ") + "Редактируемый_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МаркированныйТекст1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Текст = "Это МаркированныйТекст";
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МаркированныйТекст1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_МедиаГруппа_свойство.os
Перем ДФ, МедиаГруппа1;
Процедура Свойство() Экспорт
Сообщить(?(
МедиаГруппа1.Редактируемый
, "", "!!! ") + "Редактируемый_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Текст = "Это МедиаГруппа";
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МедиаГруппа1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
МелкийТекст1.Редактируемый
, "", "!!! ") + "Редактируемый_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МелкийТекст1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Текст = "Это МелкийТекст";
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
МелкийТекст1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
НадстрочныйТекст1.Редактируемый
, "", "!!! ") + "Редактируемый_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НадстрочныйТекст1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Текст = "Это НадстрочныйТекст";
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НадстрочныйТекст1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
НаправленныйТекст1.Редактируемый
, "", "!!! ") + "Редактируемый_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НаправленныйТекст1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Текст = "Это НаправленныйТекст";
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НаправленныйТекст1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_НеупорядоченныйСписок_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.Редактируемый
, "", "!!! ") + "Редактируемый_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Текст = "Это НеупорядоченныйСписок";
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НеупорядоченныйСписок1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_НижнийКолонтитул_свойство.os
Перем ДФ, НижнийКолонтитул1;
Процедура Свойство() Экспорт
Сообщить(?(
НижнийКолонтитул1.Редактируемый
, "", "!!! ") + "Редактируемый_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Текст = "Это НижнийКолонтитул";
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
НижнийКолонтитул1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Область_свойство.os
Перем ДФ, Область1;
Процедура Свойство() Экспорт
Сообщить(?(
Область1.Редактируемый
, "", "!!! ") + "Редактируемый_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Область1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Область1 = ДФ.Область();
Область1.Родитель = Форма1;
Область1.Текст = "Это Область";
Область1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Область1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ОбластьТаблицы_свойство.os
Перем ДФ, ОбластьТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТаблицы1.Редактируемый
, "", "!!! ") + "Редактируемый_ОбластьТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТаблицы1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Текст = "Это ОбластьТаблицы";
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОбластьТаблицы1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.Редактируемый
, "", "!!! ") + "Редактируемый_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОбластьТекста1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ОписаниеМедиа_свойство.os
Перем ДФ, ОписаниеМедиа1;
Процедура Свойство() Экспорт
Сообщить(?(
ОписаниеМедиа1.Редактируемый
, "", "!!! ") + "Редактируемый_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Текст = "Это ОписаниеМедиа";
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ОписаниеМедиа1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Определение_свойство.os
Перем ДФ, Определение1;
Процедура Свойство() Экспорт
Сообщить(?(
Определение1.Редактируемый
, "", "!!! ") + "Редактируемый_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Определение1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Текст = "Это Определение";
Определение1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Определение1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Переключатель_свойство.os
Перем ДФ, Переключатель1;
Процедура Свойство() Экспорт
Сообщить(?(
Переключатель1.Редактируемый
, "", "!!! ") + "Редактируемый_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Переключатель1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Переключатель1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Перенос_свойство.os
Перем ДФ, Перенос1;
Процедура Свойство() Экспорт
Сообщить(?(
Перенос1.Редактируемый
, "", "!!! ") + "Редактируемый_Перенос_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Перенос1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Перенос1 = ДФ.Перенос();
Перенос1.Родитель = Форма1;
Перенос1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Перенос1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Подпись_свойство.os
Перем ДФ, Подпись1;
Процедура Свойство() Экспорт
Сообщить(?(
Подпись1.Редактируемый
, "", "!!! ") + "Редактируемый_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Подпись1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Это Подпись";
Подпись1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Подпись1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ПодстрочныйТекст1.Редактируемый
, "", "!!! ") + "Редактируемый_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодстрочныйТекст1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Текст = "Это ПодстрочныйТекст";
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПодстрочныйТекст1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ПодчеркнутыйТекст1.Редактируемый
, "", "!!! ") + "Редактируемый_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодчеркнутыйТекст1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Текст = "Это ПодчеркнутыйТекст";
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПодчеркнутыйТекст1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.Редактируемый
, "", "!!! ") + "Редактируемый_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеПароля1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.Редактируемый
, "", "!!! ") + "Редактируемый_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеПоиска1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.Редактируемый
, "", "!!! ") + "Редактируемый_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеСписка1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.Редактируемый
, "", "!!! ") + "Редактируемый_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ПолеЧисла1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.Редактируемый
, "", "!!! ") + "Редактируемый_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ползунок1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
РаскрываемыйБлок1.Редактируемый
, "", "!!! ") + "Редактируемый_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(РаскрываемыйБлок1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
РаскрываемыйБлок1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Результат_свойство.os
Перем ДФ, Результат1;
Процедура Свойство() Экспорт
Сообщить(?(
Результат1.Редактируемый
, "", "!!! ") + "Редактируемый_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Результат1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Текст = "Это Результат";
Результат1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Результат1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_СписокОпределений_свойство.os
Перем ДФ, СписокОпределений1;
Процедура Свойство() Экспорт
Сообщить(?(
СписокОпределений1.Редактируемый
, "", "!!! ") + "Редактируемый_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Текст = "Это СписокОпределений";
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
СписокОпределений1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ссылка1.Редактируемый
, "", "!!! ") + "Редактируемый_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Текст = "Это Ссылка";
Ссылка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ссылка1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
СтрокаТаблицы1.Редактируемый
, "", "!!! ") + "Редактируемый_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СтрокаТаблицы1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Текст = "Это СтрокаТаблицы";
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
СтрокаТаблицы1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Сообщить(?(
Таблица1.Редактируемый
, "", "!!! ") + "Редактируемый_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Текст = "Это Таблица";
Таблица1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Таблица1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Термин_свойство.os
Перем ДФ, Термин1;
Процедура Свойство() Экспорт
Сообщить(?(
Термин1.Редактируемый
, "", "!!! ") + "Редактируемый_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Термин1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Текст = "Это Термин";
Термин1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Термин1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
УдаленыйТекст1.Редактируемый
, "", "!!! ") + "Редактируемый_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УдаленыйТекст1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Текст = "Это УдаленыйТекст";
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
УдаленыйТекст1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
УпорядоченныйСписок1.Редактируемый
, "", "!!! ") + "Редактируемый_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Текст = "Это УпорядоченныйСписок";
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
УпорядоченныйСписок1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Свойство() Экспорт
Сообщить(?(
Флажок1.Редактируемый
, "", "!!! ") + "Редактируемый_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Флажок1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ФорматированныйТекст1.Редактируемый
, "", "!!! ") + "Редактируемый_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Текст = "Это ФорматированныйТекст";
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ФорматированныйТекст1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Холст_свойство.os
Перем ДФ, Холст1;
Процедура Свойство() Экспорт
Сообщить(?(
Холст1.Редактируемый
, "", "!!! ") + "Редактируемый_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Холст1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
Холст1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Холст1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ШапкаТаблицы_свойство.os
Перем ДФ, ШапкаТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
ШапкаТаблицы1.Редактируемый
, "", "!!! ") + "Редактируемый_ШапкаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ШапкаТаблицы1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Текст = "Это ШапкаТаблицы";
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ШапкаТаблицы1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Свойство() Экспорт
Сообщить(?(
Шкала1.Редактируемый
, "", "!!! ") + "Редактируемый_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Шкала1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Шкала1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шкала1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементПоляСписка1.Редактируемый
, "", "!!! ") + "Редактируемый_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Текст = "Это ЭлементПоляСписка";
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЭлементПоляСписка1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ЭлементСписка_свойство.os
Перем ДФ, ЭлементСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементСписка1.Редактируемый
, "", "!!! ") + "Редактируемый_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Текст = "Это ЭлементСписка";
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЭлементСписка1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ячейка1.Редактируемый
, "", "!!! ") + "Редактируемый_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ячейка1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Текст = "Это Ячейка";
Ячейка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Ячейка1.Редактируемый = Истина;
Форма1.Открыть();
Редактируемый_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЯчейкаЗаголовка1.Редактируемый
, "", "!!! ") + "Редактируемый_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка1, "Редактируемый", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Текст = "Это ЯчейкаЗаголовка";
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
ЯчейкаЗаголовка1.Редактируемый = Истина;
Форма1.Открыть();
Ретро_ФильтрИзображений_свойство.os
Перем ДФ, ФильтрИзображений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ФильтрИзображений1.Ретро = 50
, "", "!!! ") + "Ретро_ФильтрИзображений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Изображение1 = ДФ.Изображение();
Форма1.ДобавитьДочерний(Изображение1);
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Стиль.Ширина = 200;
ФильтрИзображений1 = ДФ.ФильтрИзображений();
ФильтрИзображений1.Ретро = 50;
Изображение1.Стиль.Фильтр = ФильтрИзображений1;
Форма1.Открыть();
РисоватьИзображение_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "РисоватьИзображение_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Источник = "maslenica10.jpg";
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Холст1 = ДФ.Холст();
Форма1.ДобавитьДочерний(Холст1);
Холст1.Ширина = 150;
Холст1.Высота = 110;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
// РисоватьИзображение(<Изображение>, <Икс>, <Игрек>)
// РисоватьИзображение(<Изображение>, <Икс>, <Игрек>, <Ширина>, <Высота>)
// РисоватьИзображение(<Изображение>, <Икс>, <Игрек>, <Ширина>, <Высота>, <ИксОбрезки>, <ИгрекОбрезки>, <ШиринаОбрезки>, <ВысотаОбрезки>)
// Контекст2d1.РисоватьИзображение(Изображение1, 10, 10);
// Контекст2d1.РисоватьИзображение(Изображение1, 0, 0, 50, 50);
Контекст2d1.РисоватьИзображение(Изображение1, 0, 0, 119, 80, 15, 15, 30, 30);
Форма1.Открыть();
РисоватьПрямоугольник_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "РисоватьПрямоугольник_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.РисоватьПрямоугольник(5, 5, 25, 15);
Контекст2d1.Масштабировать(1.5, 4);
Контекст2d1.РисоватьПрямоугольник(5, 5, 25, 15);
Форма1.Открыть();
РисоватьТекст_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "РисоватьТекст_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 300;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.Шрифт = ДФ.Шрифт(, , , 20, , "Georgia");
Контекст2d1.РисоватьТекст("Hello World!", 10, 50);
Контекст2d1.Шрифт = ДФ.Шрифт(, , , 30, , "Verdana");
ЛинейныйГрадиент1 = Контекст2d1.СоздатьЛинейныйГрадиент(0, 0, Холст1.Ширина, 0);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0, ДФ.Цвет.magenta);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0.5, ДФ.Цвет.Синий);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(1.0, ДФ.Цвет.Красный);
Контекст2d1.СтильОбводки = ЛинейныйГрадиент1;
Контекст2d1.РисоватьТекст("Big smile!", 10, 90);
Форма1.Открыть();
Родитель_Абзац_свойство.os
Перем ДФ, Абзац1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Родитель = Форма1
, "", "!!! ") + "Родитель_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Артикль_свойство.os
Перем ДФ, Артикль1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Артикль1.Родитель = Форма1
, "", "!!! ") + "Родитель_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Артикль1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Аудио_свойство.os
Перем ДФ, Аудио1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Аудио1.Родитель = Форма1
, "", "!!! ") + "Родитель_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
// Аудио1.Источник = "file:///C:/444/Pic/Kaoma_Lambada.mp3";
Аудио1.Источник = "Kaoma_Lambada.mp3";
Форма1.Открыть();
Родитель_Блок_свойство.os
Перем ДФ, Блок1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Родитель = Форма1
, "", "!!! ") + "Родитель_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.Родитель = Форма1
, "", "!!! ") + "Родитель_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
Форма1.Открыть();
Родитель_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.Родитель = Форма1
, "", "!!! ") + "Родитель_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
Форма1.Открыть();
Родитель_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.Родитель = Форма1
, "", "!!! ") + "Родитель_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
Форма1.Открыть();
Родитель_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Родитель = Форма1
, "", "!!! ") + "Родитель_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
Форма1.Открыть();
Родитель_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.Родитель = Форма1
, "", "!!! ") + "Родитель_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
Форма1.Открыть();
Родитель_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.Родитель = Форма1
, "", "!!! ") + "Родитель_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
Форма1.Открыть();
Родитель_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборФайла1.Родитель = Форма1
, "", "!!! ") + "Родитель_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
Форма1.Открыть();
Родитель_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборЦвета1.Родитель = Форма1
, "", "!!! ") + "Родитель_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборЦвета1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
Форма1.Открыть();
Родитель_Группа_свойство.os
Перем ДФ, Группа1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Группа1.Родитель = Форма1
, "", "!!! ") + "Родитель_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Группа1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_ГруппаКолонок_свойство.os
Перем ДФ, ГруппаКолонок1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппаКолонок1.Родитель = Форма1
, "", "!!! ") + "Родитель_ГруппаКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппаКолонок1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Форма1;
Форма1.Открыть();
Родитель_ГруппировкаПоляСписка_свойство.os
Перем ДФ, ГруппировкаПоляСписка1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.Родитель = Форма1
, "", "!!! ") + "Родитель_ГруппировкаПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппировкаПоляСписка1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
Форма1.Открыть();
Родитель_Диалог_свойство.os
Перем ДФ, Диалог1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Диалог1.Родитель = Форма1
, "", "!!! ") + "Родитель_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ДополнительныйБлок1.Родитель = Форма1
, "", "!!! ") + "Родитель_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ЖирныйТекст1.Родитель = Форма1
, "", "!!! ") + "Родитель_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЖирныйТекст1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Заголовок1_свойство.os
Перем ДФ, Заголовок11, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок11.Родитель = Форма1
, "", "!!! ") + "Родитель_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок11, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Заголовок2_свойство.os
Перем ДФ, Заголовок21, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок21.Родитель = Форма1
, "", "!!! ") + "Родитель_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок21, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Заголовок3_свойство.os
Перем ДФ, Заголовок31, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок31.Родитель = Форма1
, "", "!!! ") + "Родитель_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок31, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Заголовок4_свойство.os
Перем ДФ, Заголовок41, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок41.Родитель = Форма1
, "", "!!! ") + "Родитель_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок41, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Заголовок5_свойство.os
Перем ДФ, Заголовок51, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок51.Родитель = Форма1
, "", "!!! ") + "Родитель_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок51, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Заголовок6_свойство.os
Перем ДФ, Заголовок61, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок61.Родитель = Форма1
, "", "!!! ") + "Родитель_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок61, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Заголовок_свойство.os
Перем ДФ, Заголовок1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок1.Родитель = Форма1
, "", "!!! ") + "Родитель_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_ЗаголовокГруппы_свойство.os
Перем ДФ, ЗаголовокГруппы1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ЗаголовокГруппы1.Родитель = Форма1
, "", "!!! ") + "Родитель_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1
, "", "!!! ") + "Родитель_ЗаголовокРаскрываемогоБлока_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Изображение_свойство.os
Перем ДФ, Изображение1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.Родитель = Форма1
, "", "!!! ") + "Родитель_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Форма1.Открыть();
Родитель_Индикатор_свойство.os
Перем ДФ, Индикатор1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Индикатор1.Родитель = Форма1
, "", "!!! ") + "Родитель_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Индикатор1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Форма1.Открыть();
Родитель_Итоги_свойство.os
Перем ДФ, Итоги1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Итоги1.Родитель = Форма1
, "", "!!! ") + "Родитель_Итоги_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Итоги1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Карта_свойство.os
Перем ДФ, Карта1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Карта1.Родитель = Форма1
, "", "!!! ") + "Родитель_Карта_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Карта1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Карта1 = ДФ.Карта();
Карта1.Родитель = Форма1;
Карта1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Кнопка_свойство.os
Перем ДФ, Кнопка1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Кнопка1.Родитель = Форма1
, "", "!!! ") + "Родитель_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Код_свойство.os
Перем ДФ, Код1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Код1.Родитель = Форма1
, "", "!!! ") + "Родитель_Код_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Код1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Колонка_свойство.os
Перем ДФ, Колонка1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонка1.Родитель = Форма1
, "", "!!! ") + "Родитель_Колонка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонка1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = Форма1;
Форма1.Открыть();
Родитель_Колонтитул_свойство.os
Перем ДФ, Колонтитул1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонтитул1.Родитель = Форма1
, "", "!!! ") + "Родитель_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонтитул1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
КурсивТекст1.Родитель = Форма1
, "", "!!! ") + "Родитель_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(КурсивТекст1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Линия_свойство.os
Перем ДФ, Линия1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Линия1.Родитель = Форма1
, "", "!!! ") + "Родитель_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Линия1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Линия1 = ДФ.Линия();
Линия1.Родитель = Форма1;
Линия1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
МаркированныйТекст1.Родитель = Форма1
, "", "!!! ") + "Родитель_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МаркированныйТекст1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_МедиаГруппа_свойство.os
Перем ДФ, МедиаГруппа1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
МедиаГруппа1.Родитель = Форма1
, "", "!!! ") + "Родитель_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
МелкийТекст1.Родитель = Форма1
, "", "!!! ") + "Родитель_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МелкийТекст1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
НадстрочныйТекст1.Родитель = Форма1
, "", "!!! ") + "Родитель_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НадстрочныйТекст1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
НаправленныйТекст1.Родитель = Форма1
, "", "!!! ") + "Родитель_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НаправленныйТекст1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_НеупорядоченныйСписок_свойство.os
Перем ДФ, НеупорядоченныйСписок1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.Родитель = Форма1
, "", "!!! ") + "Родитель_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_НижнийКолонтитул_свойство.os
Перем ДФ, НижнийКолонтитул1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
НижнийКолонтитул1.Родитель = Форма1
, "", "!!! ") + "Родитель_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Область_свойство.os
Перем ДФ, Область1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Область1.Родитель = Форма1
, "", "!!! ") + "Родитель_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Область1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Область1 = ДФ.Область();
Область1.Родитель = Форма1;
Область1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_ОбластьТаблицы_свойство.os
Перем ДФ, ОбластьТаблицы1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТаблицы1.Родитель = Форма1
, "", "!!! ") + "Родитель_ОбластьТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТаблицы1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.Родитель = Форма1
, "", "!!! ") + "Родитель_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
Форма1.Открыть();
Родитель_ОписаниеМедиа_свойство.os
Перем ДФ, ОписаниеМедиа1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ОписаниеМедиа1.Родитель = Форма1
, "", "!!! ") + "Родитель_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Определение_свойство.os
Перем ДФ, Определение1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Определение1.Родитель = Форма1
, "", "!!! ") + "Родитель_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Определение1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Переключатель_свойство.os
Перем ДФ, Переключатель1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Переключатель1.Родитель = Форма1
, "", "!!! ") + "Родитель_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Переключатель1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Форма1.Открыть();
Родитель_Перенос_свойство.os
Перем ДФ, Перенос1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Перенос1.Родитель = Форма1
, "", "!!! ") + "Родитель_Перенос_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Перенос1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Перенос1 = ДФ.Перенос();
Перенос1.Родитель = Форма1;
Форма1.Открыть();
Родитель_Подпись_свойство.os
Перем ДФ, Подпись1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Подпись1.Родитель = Форма1
, "", "!!! ") + "Родитель_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Подпись1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ПодстрочныйТекст1.Родитель = Форма1
, "", "!!! ") + "Родитель_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодстрочныйТекст1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ПодчеркнутыйТекст1.Родитель = Форма1
, "", "!!! ") + "Родитель_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодчеркнутыйТекст1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.Родитель = Форма1
, "", "!!! ") + "Родитель_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
Форма1.Открыть();
Родитель_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.Родитель = Форма1
, "", "!!! ") + "Родитель_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
Форма1.Открыть();
Родитель_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.Родитель = Форма1
, "", "!!! ") + "Родитель_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
Форма1.Открыть();
Родитель_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.Родитель = Форма1
, "", "!!! ") + "Родитель_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
Форма1.Открыть();
Родитель_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.Родитель = Форма1
, "", "!!! ") + "Родитель_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
Форма1.Открыть();
Родитель_Ползунок_свойство.os
Перем ДФ, Ползунок1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.Родитель = Форма1
, "", "!!! ") + "Родитель_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Форма1.Открыть();
Родитель_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
РаскрываемыйБлок1.Родитель = Форма1
, "", "!!! ") + "Родитель_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(РаскрываемыйБлок1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
Форма1.Открыть();
Родитель_Результат_свойство.os
Перем ДФ, Результат1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Результат1.Родитель = Форма1
, "", "!!! ") + "Родитель_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Результат1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Скрипт_свойство.os
Перем ДФ, Скрипт1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Скрипт1.Родитель = Форма1
, "", "!!! ") + "Родитель_Скрипт_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Скрипт1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Скрипт1 = ДФ.Скрипт();
Скрипт1.Родитель = Форма1;
Скрипт1.Текст = "
|let str;
|str = ""Добавили JavaScript-код"";
|//alert(str);
|";
Форма1.Открыть();
Родитель_СписокОпределений_свойство.os
Перем ДФ, СписокОпределений1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
СписокОпределений1.Родитель = Форма1
, "", "!!! ") + "Родитель_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Ссылка_свойство.os
Перем ДФ, Ссылка1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Ссылка1.Родитель = Форма1
, "", "!!! ") + "Родитель_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаТаблицы1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
СтрокаТаблицы1.Родитель = Форма1
, "", "!!! ") + "Родитель_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СтрокаТаблицы1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Таблица_свойство.os
Перем ДФ, Таблица1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Таблица1.Родитель = Форма1
, "", "!!! ") + "Родитель_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Термин_свойство.os
Перем ДФ, Термин1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Термин1.Родитель = Форма1
, "", "!!! ") + "Родитель_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Термин1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
УдаленыйТекст1.Родитель = Форма1
, "", "!!! ") + "Родитель_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УдаленыйТекст1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
УпорядоченныйСписок1.Родитель = Форма1
, "", "!!! ") + "Родитель_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Флажок_свойство.os
Перем ДФ, Флажок1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Флажок1.Родитель = Форма1
, "", "!!! ") + "Родитель_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Форма1.Открыть();
Родитель_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ФорматированныйТекст1.Родитель = Форма1
, "", "!!! ") + "Родитель_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Фрейм_свойство.os
Перем ДФ, Фрейм1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Фрейм1.Родитель = Форма1
, "", "!!! ") + "Родитель_Фрейм_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Фрейм1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Фрейм1 = ДФ.Фрейм();
Фрейм1.Родитель = Форма1;
Форма1.Открыть();
Родитель_Холст_свойство.os
Перем ДФ, Холст1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Холст1.Родитель = Форма1
, "", "!!! ") + "Родитель_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Холст1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
Форма1.Открыть();
Родитель_ШапкаТаблицы_свойство.os
Перем ДФ, ШапкаТаблицы1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ШапкаТаблицы1.Родитель = Форма1
, "", "!!! ") + "Родитель_ШапкаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ШапкаТаблицы1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Шкала_свойство.os
Перем ДФ, Шкала1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Шкала1.Родитель = Форма1
, "", "!!! ") + "Родитель_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Шкала1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Форма1.Открыть();
Родитель_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементПоляСписка1.Родитель = Форма1
, "", "!!! ") + "Родитель_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_ЭлементСписка_свойство.os
Перем ДФ, ЭлементСписка1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементСписка1.Родитель = Форма1
, "", "!!! ") + "Родитель_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_Ячейка_свойство.os
Перем ДФ, Ячейка1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Ячейка1.Родитель = Форма1
, "", "!!! ") + "Родитель_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ячейка1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Текст = "Это Кнопка1";
Форма1.Открыть();
Родитель_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка1, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
ЯчейкаЗаголовка1.Родитель = Форма1
, "", "!!! ") + "Родитель_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка1, "Родитель", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Текст = "Это Кнопка1";
Форма1.Открыть();
СвойствоПерехода_Переход_свойство.os
Перем ДФ, Переход1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Переход1.СвойствоПерехода = ДФ.СвойствоПерехода.Все
, "", "!!! ") + "СвойствоПерехода_Переход_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Переход1 = ДФ.Переход();
Переход1.СвойствоПерехода = ДФ.СвойствоПерехода.Все;
Переход1.ВремяПерехода = 5;
Переход1.ФункцияПерехода = ДФ.ФункцияПерехода.Линейно;
Переход1.ЗадержкаПерехода = 4;
Переход2 = ДФ.Переход(ДФ.СвойствоПерехода.Все, 5, ДФ.ФункцияПерехода.Линейно, 4);
Форма1.Открыть();
СвойствоПерехода_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.СвойствоПерехода = "width, height"
, "", "!!! ") + "СвойствоПерехода_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "СвойствоПерехода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура МышьНадЭлементом() Экспорт
Блок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 200;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Блок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.Высота = 100;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.Высота = 100;
Блок1.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Красный);
Блок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Блок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Переход1 = ДФ.Переход();
Переход1.ВремяПерехода = 1500;
Переход1.ФункцияПерехода = ДФ.ФункцияПерехода.МедленноВконце;
Переход1.ЗадержкаПерехода = 200;
Блок1.Стиль.Переход = Переход1;
Блок1.Стиль.СвойствоПерехода = "Ширина, Высота";
Форма1.Открыть();
Связь_Подпись_свойство.os
Перем ДФ, Подпись1;
Перем Блок2, Блок3, Блок4;
Перем Результат1, Ползунок1, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
Подпись1.Связь = "tab_1"
, "", "!!! ") + "Связь_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Подпись1, "Связь", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура СоздатьТекстВкладки3()
Абзац4 = Блок4.ДобавитьДочерний(ДФ.Абзац());
Абзац4.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Абзац4.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шрифт1 = ДФ.Шрифт();
Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
Шрифт1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
Шрифт1.РазмерШрифта = 20;
Шрифт1.ВысотаСтроки = 50;
Шрифт1.СемействоШрифтов = "arial,serif";
Абзац4.Стиль.Шрифт = Шрифт1;
КонецПроцедуры
Процедура СоздатьПолзунокВкладки2()
Подпись5 = Блок3.ДобавитьДочерний(ДФ.Подпись());
Подпись5.Текст = "0";
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Блок3;
Ползунок1.Значение = 85;
Ползунок1.Ввод = ДФ.Действие(ЭтотОбъект, "Ползунок1_Ввод");
Подпись6 = Блок3.ДобавитьДочерний(ДФ.Подпись());
Подпись6.Текст = "100 + ";
ПолеЧисла1 = Блок3.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Значение = 20;
ПолеЧисла1.Ввод = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_Ввод");
Подпись7 = Блок3.ДобавитьДочерний(ДФ.Подпись());
Подпись7.Текст = " = ";
Результат1 = Блок3.ДобавитьДочерний(ДФ.Результат());
Результат1.Значение = Ползунок1.Значение + ПолеЧисла1.Значение;
КонецПроцедуры
Процедура Ползунок1_Ввод() Экспорт
Результат1.Значение = ДФ.АргументыСобытия.Значение + ПолеЧисла1.Значение;
КонецПроцедуры
Процедура ПолеЧисла1_Ввод() Экспорт
Результат1.Значение = ДФ.АргументыСобытия.Значение + Ползунок1.Значение;
КонецПроцедуры
Процедура СоздатьТаблицуВкладки1()
Таблица1 = Блок2.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Стиль1 = Таблица1.Стиль;
Стиль1.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Стиль1.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = Таблица1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Родитель = СтрокаШарик;
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Родитель = СтрокаГалчонок;
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Родитель = СтрокаИтого;
Ячейка7.Текст = "10";
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 800;
Форма1.НачальнаяВысота = 500;
Форма1.Контент.Стиль.ЦветФона = ДФ.Цвет.СветлоСерый;
ДФ.cssПуть = "styles.css";
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Класс = "tabs";
Переключатель1 = Блок1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель1.Имя = "inset";
Переключатель1.Идентификатор = "tab_1";
Переключатель1.Помечен = Истина;
Подпись1 = Блок1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Текст = "Вкладка № 1";
Подпись1.Связь = "tab_1";
Переключатель2 = Блок1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель2.Имя = "inset";
Переключатель2.Идентификатор = "tab_2";
Переключатель2.Помечен = Ложь;
Подпись2 = Блок1.ДобавитьДочерний(ДФ.Подпись());
Подпись2.Текст = "Вкладка № 2";
Подпись2.Связь = "tab_2";
Переключатель3 = Блок1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель3.Имя = "inset";
Переключатель3.Идентификатор = "tab_3";
Переключатель3.Помечен = Ложь;
Подпись3 = Блок1.ДобавитьДочерний(ДФ.Подпись());
Подпись3.Текст = "Вкладка № 3";
Подпись3.Связь = "tab_3";
Переключатель4 = Блок1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель4.Имя = "inset";
Переключатель4.Идентификатор = "tab_4";
Переключатель4.Помечен = Ложь;
Подпись4 = Блок1.ДобавитьДочерний(ДФ.Подпись());
Подпись4.Текст = "Вкладка № 4";
Подпись4.Связь = "tab_4";
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Идентификатор = "txt_1";
Блок3 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок3.Идентификатор = "txt_2";
Абзац3 = Блок3.ДобавитьДочерний(ДФ.Абзац());
Абзац3.Текст = "Вторая вкладка";
Блок4 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок4.Идентификатор = "txt_3";
Блок5 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок5.Идентификатор = "txt_4";
Абзац5 = Блок5.ДобавитьДочерний(ДФ.Абзац());
Абзац5.Текст = "Четвертая вкладка";
//===========================================
СоздатьТаблицуВкладки1();
СоздатьПолзунокВкладки2();
СоздатьТекстВкладки3();
Форма1.Открыть();
// // Содержимое файла стилей styles.css.
// .tabs { width: 100%; padding: 0px; margin: 0 auto; }
// .tabs>input { display: none; }
// .tabs>div {
// display: none;
// padding: 12px;
// border: 1px solid #C0C0C0;
// background: #FFFFFF;
// }
// .tabs>label {
// display: inline-block;
// padding: 7px;
// margin: 0 -5px -1px 0;
// text-align: center;
// color: #666666;
// border: 1px solid #C0C0C0;
// background: #E0E0E0;
// cursor: pointer;
// }
// .tabs>input:checked + label {
// color: #000000;
// border: 1px solid #C0C0C0;
// border-bottom: 1px solid #FFFFFF;
// background: #FFFFFF;
// }
// #tab_1:checked ~ #txt_1,
// #tab_2:checked ~ #txt_2,
// #tab_3:checked ~ #txt_3,
// #tab_4:checked ~ #txt_4 { display: block; }
Сдвиг_Стиль_свойство.os
Перем ДФ, Кадр01;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Кадр01.Сдвиг = "ДфПоворот"
, "", "!!! ") + "Сдвиг_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = "scale(3.5, 3.5)";
// Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Анимация1 = ДФ.СвойстваАнимации(Кадры1.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок1.Стиль.Анимация = Анимация1;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
СдвигИгрек_АргументыСобытия_свойство.os
Перем ДФ, Абзац1;
Процедура Абзац1_ПриПеремещенииМыши() Экспорт
Абзац1.Текст = "
|ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "
|ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "
|ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "
|ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "
|СдвигИкс = " + ДФ.АргументыСобытия.СдвигИкс + "
|СдвигИгрек = " + ДФ.АргументыСобытия.СдвигИгрек + "
|ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "
|ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "
|";
Сообщить(?(
ДФ.АргументыСобытия.СдвигИгрек <> Неопределено
, "", "!!! ") + "СдвигИгрек_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "";
Абзац1.Стиль.Высота = 200;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "Абзац1_ПриПеремещенииМыши");
Форма1.Открыть();
СдвигИгрек_Матрица_свойство.os
Перем ДФ, Матрица1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица1.СдвигИгрек = -2.0
, "", "!!! ") + "СдвигИгрек_Матрица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Матрица1 = ДФ.Матрица();
Матрица1.МасштабИкс = 1.4;
Матрица1.СдвигИгрек = -2.0;
Матрица1.СдвигИкс = 2.0;
Матрица1.МасштабИгрек = 1.8;
Матрица1.СмещениеИкс = -3.0;
Матрица1.СмещениеИгрек = 3.0;
Форма1.Открыть();
СдвигИкс_АргументыСобытия_свойство.os
Перем ДФ, Абзац1;
Процедура Абзац1_ПриПеремещенииМыши() Экспорт
Абзац1.Текст = "
|ИксЭкрана = " + ДФ.АргументыСобытия.ИксЭкрана + "
|ИгрекЭкрана = " + ДФ.АргументыСобытия.ИгрекЭкрана + "
|ИксСмещение = " + ДФ.АргументыСобытия.ИксСмещение + "
|ИгрекСмещение = " + ДФ.АргументыСобытия.ИгрекСмещение + "
|СдвигИкс = " + ДФ.АргументыСобытия.СдвигИкс + "
|СдвигИгрек = " + ДФ.АргументыСобытия.СдвигИгрек + "
|ИксФормы = " + ДФ.АргументыСобытия.ИксФормы + "
|ИгрекФормы = " + ДФ.АргументыСобытия.ИгрекФормы + "
|";
Сообщить(?(
ДФ.АргументыСобытия.СдвигИкс <> Неопределено
, "", "!!! ") + "СдвигИкс_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Заголовок = "Двигайте мышью";
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "";
Абзац1.Стиль.Высота = 200;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.ПриПеремещенииМыши = ДФ.Действие(ЭтотОбъект, "Абзац1_ПриПеремещенииМыши");
Форма1.Открыть();
СдвигИкс_Матрица_свойство.os
Перем ДФ, Матрица1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица1.СдвигИкс = 2.0
, "", "!!! ") + "СдвигИкс_Матрица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Матрица1 = ДФ.Матрица();
Матрица1.МасштабИкс = 1.4;
Матрица1.СдвигИгрек = -2.0;
Матрица1.СдвигИкс = 2.0;
Матрица1.МасштабИгрек = 1.8;
Матрица1.СмещениеИкс = -3.0;
Матрица1.СмещениеИгрек = 3.0;
Форма1.Открыть();
Сдвинуть_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "Сдвинуть_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 300;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Зеленый;
Контекст2d1.ЗаполнитьПрямоугольник(0, 0, 250, 100);
Контекст2d1.Сдвинуть(1, 0.5, -0.5, 1, 30, 10);
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Красный;
Контекст2d1.ЗаполнитьПрямоугольник(0, 0, 250, 100);
Контекст2d1.Сдвинуть(1, 0.5, -0.5, 1, 30, 10);
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Синий;
Контекст2d1.ЗаполнитьПрямоугольник(0, 0, 250, 100);
Форма1.Открыть();
СемействоШрифтов_ОкноСообщений_свойство.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОкноСообщений1.СемействоШрифтов = "PT Sans"
, "", "!!! ") + "СемействоШрифтов_ОкноСообщений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.СемействоШрифтов = "PT Sans";
ОкноСообщений1.Показать();
Форма1.Открыть();
СемействоШрифтов_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.СемействоШрифтов = "Impact, Charcoal, sans-serif"
, "", "!!! ") + "СемействоШрифтов_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "СемействоШрифтов", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Стиль.СемействоШрифтов (Style.FontFamily) Свойство";
Абзац1.Стиль.СемействоШрифтов = "Impact,Charcoal,sans-serif";
Форма1.Открыть();
СемействоШрифтов_Уведомления_свойство.os
Перем ДФ, Уведомления1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Уведомления1.СемействоШрифтов = "PT Sans"
, "", "!!! ") + "СемействоШрифтов_Уведомления_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
Уведомления1.СемействоШрифтов = "PT Sans";
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Форма1.Открыть();
СемействоШрифтов_Шрифт_свойство.os
Перем ДФ, Шрифт1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Шрифт1.СемействоШрифтов = "arial,serif"
, "", "!!! ") + "СемействоШрифтов_Шрифт_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шрифт1 = ДФ.Шрифт();
Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
Шрифт1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
Шрифт1.РазмерШрифта = 20;
Шрифт1.ВысотаСтроки = 50;
Шрифт1.СемействоШрифтов = "arial,serif";
Абзац1.Стиль.Шрифт = Шрифт1;
Форма1.Открыть();
Синус_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().Синус(1) = 0.841470984807896
, "", "!!! ") + "Синус_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().Синус(1);
Форма1.Открыть();
Скачать_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ссылка1.Скачать = "maslenica10.jpg"
, "", "!!! ") + "Скачать_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "Скачать", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ссылка1 = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка1.Адрес = "maslenica10.jpg";
Ссылка1.Текст = "Масленица";
Ссылка1.Скачать = "maslenica10.jpg";
Форма1.Открыть();
Скорость_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Аудио1.Скорость = 1.6
, "", "!!! ") + "Скорость_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "Скорость", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Скорость = 1.6;
Аудио1.Воспроизвести();
Форма1.Открыть();
Случайное_Математика_метод.os
Перем ДФ, Случайное, Форма1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Форма1.Контент.Текст = "" + Случайное
, "", "!!! ") + "Случайное_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Случайное = ДФ.Математика().Случайное();
Форма1.Контент.Текст = "" + Случайное;
Форма1.Открыть();
Смещение_Стиль_свойство.os
Перем АнимацияВращение, АнимацияМасштаб;
Перем ДФ, Кадр3;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Кадр3.Смещение = 0
, "", "!!! ") + "Смещение_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
АнимацияВращение.Запустить();
АнимацияМасштаб.Запустить();
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
АнимацияВращение.Пауза();
АнимацияМасштаб.Пауза();
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
АнимацияВращение.Завершить();
АнимацияМасштаб.Завершить();
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
АнимацияВращение.Отменить();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Запустить";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Пауза";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка3 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Завершить";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Отменить вращение";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок2.Стиль.Ширина = 45;
Блок2.Стиль.Высота = 45;
Блок2.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок2.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок2.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок2.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок2";
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.Зеленый;
Кадр3.Сдвиг = "scale(1)";
Кадр3.Смещение = 0;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Желтый;
Кадр4.Сдвиг = "scale(1.05)";
Кадр4.Смещение = 0.1;
Кадр5 = ДФ.Стиль();
Кадр5.ЦветФона = ДФ.Цвет.Желтый;
Кадр5.Сдвиг = "scale(1.4)";
Кадр5.Смещение = 0.7;
Кадр6 = ДФ.Стиль();
Кадр6.ЦветФона = ДФ.Цвет.Красный;
Кадр6.Сдвиг = "scale(1.5)";
Кадр6.Смещение = 1;
Кадры2 = ДФ.Кадры();
Кадры2.Добавить(Кадр3);
Кадры2.Добавить(Кадр4);
Кадры2.Добавить(Кадр5);
Кадры2.Добавить(Кадр6);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
1000);
АнимацияВращение = Блок1.Анимация(Кадры1, ПараметрыАнимации1);
АнимацияМасштаб = Блок2.Анимация(Кадры2, ПараметрыАнимации1);
Форма1.Открыть();
СмещениеВерх_Абзац_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Абзац1.Текст = "СмещениеВерх = " + Абзац1.СмещениеВерх;
Сообщить(?(
Абзац1.Текст = "СмещениеВерх = " + Абзац1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Абзац1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Положение Объект";
Абзац1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Артикль_свойство.os
Перем ДФ, Артикль1;
Процедура Свойство() Экспорт
Артикль1.Текст = "СмещениеВерх = " + Артикль1.СмещениеВерх;
Сообщить(?(
Артикль1.Текст = "СмещениеВерх = " + Артикль1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Артикль1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Артикль1 = Форма1.ДобавитьДочерний(ДФ.Артикль());
Артикль1.Текст = "Положение Объект";
Артикль1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Аудио_свойство.os
Перем ДФ, Аудио1, Блок1;
Процедура Свойство() Экспорт
Блок1.Текст = "СмещениеВерх = " + Аудио1.СмещениеВерх;
Сообщить(?(
Блок1.Текст = "СмещениеВерх = " + Аудио1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Аудио1 = Форма1.ДобавитьДочерний(ДФ.Аудио());
Аудио1.Контролы = Истина;
// Аудио1.Источник = "file:///C:/444/Pic/Kaoma_Lambada.mp3";
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 20;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Форма1.Открыть();
СмещениеВерх_Блок_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Блок1.Текст = "СмещениеВерх = " + Блок1.СмещениеВерх;
Сообщить(?(
Блок1.Текст = "СмещениеВерх = " + Блок1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Блок1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Текст = "Положение Объект";
Блок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборДаты1 = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборМестнойДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборМесяца1 = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборНедели1 = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборФайла1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборФайла1 = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборЦвета1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ВыборЦвета1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборЦвета1 = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Группа_свойство.os
Перем ДФ, Группа1;
Процедура Свойство() Экспорт
Группа1.Текст = "СмещениеВерх = " + Группа1.СмещениеВерх;
Сообщить(?(
Группа1.Текст = "СмещениеВерх = " + Группа1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Группа1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Группа1 = Форма1.ДобавитьДочерний(ДФ.Группа());
Группа1.Текст = "Положение Объект";
Группа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ГруппаКолонок_свойство.os
Перем ДФ, ГруппаКолонок1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппаКолонок1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_ГруппаКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ГруппаКолонок1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ГруппаКолонок1 = Форма1.ДобавитьДочерний(ДФ.ГруппаКолонок());
ГруппаКолонок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ГруппировкаПоляСписка_свойство.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_ГруппировкаПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ГруппировкаПоляСписка1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ГруппировкаПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ГруппировкаПоляСписка());
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Диалог_свойство.os
Перем ДФ, Диалог1;
Процедура Свойство() Экспорт
Диалог1.Текст = "СмещениеВерх = " + Диалог1.СмещениеВерх;
Сообщить(?(
Диалог1.Текст = "СмещениеВерх = " + Диалог1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Диалог1 = Форма1.ДобавитьДочерний(ДФ.Диалог());
Диалог1.Текст = "Положение Объект";
Диалог1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок1;
Процедура Свойство() Экспорт
ДополнительныйБлок1.Текст = "СмещениеВерх = " + ДополнительныйБлок1.СмещениеВерх;
Сообщить(?(
ДополнительныйБлок1.Текст = "СмещениеВерх = " + ДополнительныйБлок1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ДополнительныйБлок1 = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
ДополнительныйБлок1.Текст = "Положение Объект";
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст1;
Процедура Свойство() Экспорт
ЖирныйТекст1.Текст = "СмещениеВерх = " + ЖирныйТекст1.СмещениеВерх;
Сообщить(?(
ЖирныйТекст1.Текст = "СмещениеВерх = " + ЖирныйТекст1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ЖирныйТекст1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЖирныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
ЖирныйТекст1.Текст = "Положение Объект";
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Заголовок1_свойство.os
Перем ДФ, Заголовок11;
Процедура Свойство() Экспорт
Заголовок11.Текст = "СмещениеВерх = " + Заголовок11.СмещениеВерх;
Сообщить(?(
Заголовок11.Текст = "СмещениеВерх = " + Заголовок11.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Заголовок11, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок11 = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок11.Текст = "Положение Объект";
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Заголовок2_свойство.os
Перем ДФ, Заголовок21;
Процедура Свойство() Экспорт
Заголовок21.Текст = "СмещениеВерх = " + Заголовок21.СмещениеВерх;
Сообщить(?(
Заголовок21.Текст = "СмещениеВерх = " + Заголовок21.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Заголовок21, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок21 = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок21.Текст = "Положение Объект";
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Заголовок3_свойство.os
Перем ДФ, Заголовок31;
Процедура Свойство() Экспорт
Заголовок31.Текст = "СмещениеВерх = " + Заголовок31.СмещениеВерх;
Сообщить(?(
Заголовок31.Текст = "СмещениеВерх = " + Заголовок31.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Заголовок31, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок31 = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок31.Текст = "Положение Объект";
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Заголовок4_свойство.os
Перем ДФ, Заголовок41;
Процедура Свойство() Экспорт
Заголовок41.Текст = "СмещениеВерх = " + Заголовок41.СмещениеВерх;
Сообщить(?(
Заголовок41.Текст = "СмещениеВерх = " + Заголовок41.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Заголовок41, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок41 = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Заголовок41.Текст = "Положение Объект";
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Заголовок5_свойство.os
Перем ДФ, Заголовок51;
Процедура Свойство() Экспорт
Заголовок51.Текст = "СмещениеВерх = " + Заголовок51.СмещениеВерх;
Сообщить(?(
Заголовок51.Текст = "СмещениеВерх = " + Заголовок51.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Заголовок51, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок51 = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Заголовок51.Текст = "Положение Объект";
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Заголовок6_свойство.os
Перем ДФ, Заголовок61;
Процедура Свойство() Экспорт
Заголовок61.Текст = "СмещениеВерх = " + Заголовок61.СмещениеВерх;
Сообщить(?(
Заголовок61.Текст = "СмещениеВерх = " + Заголовок61.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Заголовок61, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок61 = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Заголовок61.Текст = "Положение Объект";
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Заголовок_свойство.os
Перем ДФ, Заголовок1;
Процедура Свойство() Экспорт
Заголовок1.Текст = "СмещениеВерх = " + Заголовок1.СмещениеВерх;
Сообщить(?(
Заголовок1.Текст = "СмещениеВерх = " + Заголовок1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Заголовок1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок1 = Форма1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Положение Объект";
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ЗаголовокГруппы_свойство.os
Перем ДФ, ЗаголовокГруппы1;
Процедура Свойство() Экспорт
ЗаголовокГруппы1.Текст = "СмещениеВерх = " + ЗаголовокГруппы1.СмещениеВерх;
Сообщить(?(
ЗаголовокГруппы1.Текст = "СмещениеВерх = " + ЗаголовокГруппы1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЗаголовокГруппы1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокГруппы());
ЗаголовокГруппы1.Текст = "Положение Объект";
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура Свойство() Экспорт
ЗаголовокРаскрываемогоБлока1.Текст = "СмещениеВерх = " + ЗаголовокРаскрываемогоБлока1.СмещениеВерх;
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.Текст = "СмещениеВерх = " + ЗаголовокРаскрываемогоБлока1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_ЗаголовокРаскрываемогоБлока_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЗаголовокРаскрываемогоБлока1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокРаскрываемогоБлока());
ЗаголовокРаскрываемогоБлока1.Текст = "Положение Объект";
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Индикатор_свойство.os
Перем ДФ, Индикатор1;
Процедура Свойство() Экспорт
Сообщить(?(
Индикатор1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Индикатор1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Индикатор1 = Форма1.ДобавитьДочерний(ДФ.Индикатор());
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Итоги_свойство.os
Перем ДФ, Итоги1;
Процедура Свойство() Экспорт
Итоги1.Текст = "СмещениеВерх = " + Итоги1.СмещениеВерх;
Сообщить(?(
Итоги1.Текст = "СмещениеВерх = " + Итоги1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Итоги_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Итоги1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Итоги1 = Форма1.ДобавитьДочерний(ДФ.Итоги());
Итоги1.Текст = "Положение Объект";
Итоги1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Карта_свойство.os
Перем ДФ, Карта1;
Процедура Свойство() Экспорт
Карта1.Текст = "СмещениеВерх = " + Карта1.СмещениеВерх;
Сообщить(?(
Карта1.Текст = "СмещениеВерх = " + Карта1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Карта_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Карта1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Карта1 = Форма1.ДобавитьДочерний(ДФ.Карта());
Карта1.Текст = "Положение Объект";
Карта1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Кнопка_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Кнопка1.Текст = "СмещениеВерх = " + Кнопка1.СмещениеВерх;
Сообщить(?(
Кнопка1.Текст = "СмещениеВерх = " + Кнопка1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Положение Объект";
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Код_свойство.os
Перем ДФ, Код1;
Процедура Свойство() Экспорт
Код1.Текст = "СмещениеВерх = " + Код1.СмещениеВерх;
Сообщить(?(
Код1.Текст = "СмещениеВерх = " + Код1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Код_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Код1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Код1 = Форма1.ДобавитьДочерний(ДФ.Код());
Код1.Текст = "Положение Объект";
Код1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Колонка_свойство.os
Перем ДФ, Колонка1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонка1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_Колонка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Колонка1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Колонка1 = Форма1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Колонтитул_свойство.os
Перем ДФ, Колонтитул1;
Процедура Свойство() Экспорт
Колонтитул1.Текст = "СмещениеВерх = " + Колонтитул1.СмещениеВерх;
Сообщить(?(
Колонтитул1.Текст = "СмещениеВерх = " + Колонтитул1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Колонтитул1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Колонтитул1 = Форма1.ДобавитьДочерний(ДФ.Колонтитул());
Колонтитул1.Текст = "Положение Объект";
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст1;
Процедура Свойство() Экспорт
КурсивТекст1.Текст = "СмещениеВерх = " + КурсивТекст1.СмещениеВерх;
Сообщить(?(
КурсивТекст1.Текст = "СмещениеВерх = " + КурсивТекст1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(КурсивТекст1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
КурсивТекст1 = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
КурсивТекст1.Текст = "Положение Объект";
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Линия_свойство.os
Перем ДФ, Линия1;
Процедура Свойство() Экспорт
Линия1.Текст = "СмещениеВерх = " + Линия1.СмещениеВерх;
Сообщить(?(
Линия1.Текст = "СмещениеВерх = " + Линия1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Линия1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Линия1 = Форма1.ДобавитьДочерний(ДФ.Линия());
Линия1.Текст = "Положение Объект";
Линия1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст1;
Процедура Свойство() Экспорт
МаркированныйТекст1.Текст = "СмещениеВерх = " + МаркированныйТекст1.СмещениеВерх;
Сообщить(?(
МаркированныйТекст1.Текст = "СмещениеВерх = " + МаркированныйТекст1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(МаркированныйТекст1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МаркированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
МаркированныйТекст1.Текст = "Положение Объект";
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_МедиаГруппа_свойство.os
Перем ДФ, МедиаГруппа1;
Процедура Свойство() Экспорт
МедиаГруппа1.Текст = "СмещениеВерх = " + МедиаГруппа1.СмещениеВерх;
Сообщить(?(
МедиаГруппа1.Текст = "СмещениеВерх = " + МедиаГруппа1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МедиаГруппа1 = Форма1.ДобавитьДочерний(ДФ.МедиаГруппа());
МедиаГруппа1.Текст = "Положение Объект";
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст1;
Процедура Свойство() Экспорт
МелкийТекст1.Текст = "СмещениеВерх = " + МелкийТекст1.СмещениеВерх;
Сообщить(?(
МелкийТекст1.Текст = "СмещениеВерх = " + МелкийТекст1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(МелкийТекст1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МелкийТекст1 = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
МелкийТекст1.Текст = "Положение Объект";
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст1;
Процедура Свойство() Экспорт
НадстрочныйТекст1.Текст = "СмещениеВерх = " + НадстрочныйТекст1.СмещениеВерх;
Сообщить(?(
НадстрочныйТекст1.Текст = "СмещениеВерх = " + НадстрочныйТекст1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(НадстрочныйТекст1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НадстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
НадстрочныйТекст1.Текст = "Положение Объект";
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст1;
Процедура Свойство() Экспорт
НаправленныйТекст1.Текст = "СмещениеВерх = " + НаправленныйТекст1.СмещениеВерх;
Сообщить(?(
НаправленныйТекст1.Текст = "СмещениеВерх = " + НаправленныйТекст1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(НаправленныйТекст1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НаправленныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
НаправленныйТекст1.Текст = "Положение Объект";
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_НеупорядоченныйСписок_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Свойство() Экспорт
НеупорядоченныйСписок1.Текст = "СмещениеВерх = " + НеупорядоченныйСписок1.СмещениеВерх;
Сообщить(?(
НеупорядоченныйСписок1.Текст = "СмещениеВерх = " + НеупорядоченныйСписок1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НеупорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
НеупорядоченныйСписок1.Текст = "Положение Объект";
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_НижнийКолонтитул_свойство.os
Перем ДФ, НижнийКолонтитул1;
Процедура Свойство() Экспорт
НижнийКолонтитул1.Текст = "СмещениеВерх = " + НижнийКолонтитул1.СмещениеВерх;
Сообщить(?(
НижнийКолонтитул1.Текст = "СмещениеВерх = " + НижнийКолонтитул1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НижнийКолонтитул1 = Форма1.ДобавитьДочерний(ДФ.НижнийКолонтитул());
НижнийКолонтитул1.Текст = "Положение Объект";
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Область_свойство.os
Перем ДФ, Область1;
Процедура Свойство() Экспорт
Область1.Текст = "СмещениеВерх = " + Область1.СмещениеВерх;
Сообщить(?(
Область1.Текст = "СмещениеВерх = " + Область1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Область1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Область1 = Форма1.ДобавитьДочерний(ДФ.Область());
Область1.Текст = "Положение Объект";
Область1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ОбластьТаблицы_свойство.os
Перем ДФ, ОбластьТаблицы1;
Процедура Свойство() Экспорт
ОбластьТаблицы1.Текст = "СмещениеВерх = " + ОбластьТаблицы1.СмещениеВерх;
Сообщить(?(
ОбластьТаблицы1.Текст = "СмещениеВерх = " + ОбластьТаблицы1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_ОбластьТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ОбластьТаблицы1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОбластьТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
ОбластьТаблицы1.Текст = "Положение Объект";
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ОписаниеМедиа_свойство.os
Перем ДФ, ОписаниеМедиа1;
Процедура Свойство() Экспорт
ОписаниеМедиа1.Текст = "СмещениеВерх = " + ОписаниеМедиа1.СмещениеВерх;
Сообщить(?(
ОписаниеМедиа1.Текст = "СмещениеВерх = " + ОписаниеМедиа1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОписаниеМедиа1 = Форма1.ДобавитьДочерний(ДФ.ОписаниеМедиа());
ОписаниеМедиа1.Текст = "Положение Объект";
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Определение_свойство.os
Перем ДФ, Определение1;
Процедура Свойство() Экспорт
Определение1.Текст = "СмещениеВерх = " + Определение1.СмещениеВерх;
Сообщить(?(
Определение1.Текст = "СмещениеВерх = " + Определение1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Определение1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Определение1 = Форма1.ДобавитьДочерний(ДФ.Определение());
Определение1.Текст = "Положение Объект";
Определение1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Переключатель_свойство.os
Перем ДФ, Переключатель1, Блок1;
Процедура Свойство() Экспорт
Блок1.Текст = "СмещениеВерх = " + Переключатель1.СмещениеВерх;
Сообщить(?(
Блок1.Текст = "СмещениеВерх = " + Переключатель1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Переключатель1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Переключатель1 = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 20;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Форма1.Открыть();
СмещениеВерх_Перенос_свойство.os
Перем ДФ, Перенос1;
Процедура Свойство() Экспорт
Сообщить(?(
Перенос1.СмещениеВерх = 0
, "", "!!! ") + "СмещениеВерх_Перенос_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Перенос1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Перенос1 = Форма1.ДобавитьДочерний(ДФ.Перенос());
Перенос1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Подпись_свойство.os
Перем ДФ, Подпись1;
Процедура Свойство() Экспорт
Подпись1.Текст = "СмещениеВерх = " + Подпись1.СмещениеВерх;
Сообщить(?(
Подпись1.Текст = "СмещениеВерх = " + Подпись1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Подпись1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Подпись1 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Текст = "Положение Объект";
Подпись1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Свойство() Экспорт
ПодстрочныйТекст1.Текст = "СмещениеВерх = " + ПодстрочныйТекст1.СмещениеВерх;
Сообщить(?(
ПодстрочныйТекст1.Текст = "СмещениеВерх = " + ПодстрочныйТекст1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ПодстрочныйТекст1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПодстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
ПодстрочныйТекст1.Текст = "Положение Объект";
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Свойство() Экспорт
ПодчеркнутыйТекст1.Текст = "СмещениеВерх = " + ПодчеркнутыйТекст1.СмещениеВерх;
Сообщить(?(
ПодчеркнутыйТекст1.Текст = "СмещениеВерх = " + ПодчеркнутыйТекст1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ПодчеркнутыйТекст1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПодчеркнутыйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
ПодчеркнутыйТекст1.Текст = "Положение Объект";
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеПароля1 = Форма1.ДобавитьДочерний(ДФ.ПолеПароля());
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеПоиска1 = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеСписка1 = Форма1.ДобавитьДочерний(ДФ.ПолеСписка());
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеТекста1 = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеЧисла1 = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ползунок1 = Форма1.ДобавитьДочерний(ДФ.Ползунок());
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
РаскрываемыйБлок1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(РаскрываемыйБлок1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Результат_свойство.os
Перем ДФ, Результат1;
Процедура Свойство() Экспорт
Результат1.Текст = "СмещениеВерх = " + Результат1.СмещениеВерх;
Сообщить(?(
Результат1.Текст = "СмещениеВерх = " + Результат1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Результат1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Результат1 = Форма1.ДобавитьДочерний(ДФ.Результат());
Результат1.Текст = "Положение Объект";
Результат1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_СписокОпределений_свойство.os
Перем ДФ, СписокОпределений1;
Процедура Свойство() Экспорт
СписокОпределений1.Текст = "СмещениеВерх = " + СписокОпределений1.СмещениеВерх;
Сообщить(?(
СписокОпределений1.Текст = "СмещениеВерх = " + СписокОпределений1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
СписокОпределений1 = Форма1.ДобавитьДочерний(ДФ.СписокОпределений());
СписокОпределений1.Текст = "Положение Объект";
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Свойство() Экспорт
Ссылка1.Текст = "СмещениеВерх = " + Ссылка1.СмещениеВерх;
Сообщить(?(
Ссылка1.Текст = "СмещениеВерх = " + Ссылка1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ссылка1 = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка1.Текст = "Положение Объект";
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаТаблицы1;
Процедура Свойство() Экспорт
СтрокаТаблицы1.Текст = "СмещениеВерх = " + СтрокаТаблицы1.СмещениеВерх;
Сообщить(?(
СтрокаТаблицы1.Текст = "СмещениеВерх = " + СтрокаТаблицы1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(СтрокаТаблицы1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
СтрокаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаТаблицы1.Текст = "Положение Объект";
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Таблица1.Текст = "СмещениеВерх = " + Таблица1.СмещениеВерх;
Сообщить(?(
Таблица1.Текст = "СмещениеВерх = " + Таблица1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Текст = "Положение Объект";
Таблица1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Термин_свойство.os
Перем ДФ, Термин1;
Процедура Свойство() Экспорт
Термин1.Текст = "СмещениеВерх = " + Термин1.СмещениеВерх;
Сообщить(?(
Термин1.Текст = "СмещениеВерх = " + Термин1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Термин1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Термин1 = Форма1.ДобавитьДочерний(ДФ.Термин());
Термин1.Текст = "Положение Объект";
Термин1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст1;
Процедура Свойство() Экспорт
УдаленыйТекст1.Текст = "СмещениеВерх = " + УдаленыйТекст1.СмещениеВерх;
Сообщить(?(
УдаленыйТекст1.Текст = "СмещениеВерх = " + УдаленыйТекст1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(УдаленыйТекст1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
УдаленыйТекст1 = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
УдаленыйТекст1.Текст = "Положение Объект";
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Свойство() Экспорт
УпорядоченныйСписок1.Текст = "СмещениеВерх = " + УпорядоченныйСписок1.СмещениеВерх;
Сообщить(?(
УпорядоченныйСписок1.Текст = "СмещениеВерх = " + УпорядоченныйСписок1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
УпорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.УпорядоченныйСписок());
УпорядоченныйСписок1.Текст = "Положение Объект";
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Свойство() Экспорт
Сообщить(?(
Флажок1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Флажок1 = Форма1.ДобавитьДочерний(ДФ.Флажок());
Флажок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст1;
Процедура Свойство() Экспорт
ФорматированныйТекст1.Текст = "СмещениеВерх = " + ФорматированныйТекст1.СмещениеВерх;
Сообщить(?(
ФорматированныйТекст1.Текст = "СмещениеВерх = " + ФорматированныйТекст1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ФорматированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
ФорматированныйТекст1.Текст = "Положение Объект";
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Фрейм_свойство.os
Перем ДФ, Фрейм1;
Процедура Свойство() Экспорт
Сообщить(?(
Фрейм1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_Фрейм_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Фрейм1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Фрейм1 = Форма1.ДобавитьДочерний(ДФ.Фрейм());
Фрейм1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Холст_свойство.os
Перем ДФ, Холст1;
Процедура Свойство() Экспорт
Сообщить(?(
Холст1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Холст1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ШапкаТаблицы_свойство.os
Перем ДФ, ШапкаТаблицы1;
Процедура Свойство() Экспорт
ШапкаТаблицы1.Текст = "СмещениеВерх = " + ШапкаТаблицы1.СмещениеВерх;
Сообщить(?(
ШапкаТаблицы1.Текст = "СмещениеВерх = " + ШапкаТаблицы1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_ШапкаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ШапкаТаблицы1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ШапкаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
ШапкаТаблицы1.Текст = "Положение Объект";
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Свойство() Экспорт
Сообщить(?(
Шкала1.СмещениеВерх > 0
, "", "!!! ") + "СмещениеВерх_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Шкала1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Шкала1 = Форма1.ДобавитьДочерний(ДФ.Шкала());
Шкала1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Свойство() Экспорт
ЭлементПоляСписка1.Текст = "СмещениеВерх = " + ЭлементПоляСписка1.СмещениеВерх;
Сообщить(?(
ЭлементПоляСписка1.Текст = "СмещениеВерх = " + ЭлементПоляСписка1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЭлементПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементПоляСписка());
ЭлементПоляСписка1.Текст = "Положение Объект";
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ЭлементСписка_свойство.os
Перем ДФ, ЭлементСписка1;
Процедура Свойство() Экспорт
ЭлементСписка1.Текст = "СмещениеВерх = " + ЭлементСписка1.СмещениеВерх;
Сообщить(?(
ЭлементСписка1.Текст = "СмещениеВерх = " + ЭлементСписка1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЭлементСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Положение Объект";
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Свойство() Экспорт
Ячейка1.Текст = "СмещениеВерх = " + Ячейка1.СмещениеВерх;
Сообщить(?(
Ячейка1.Текст = "СмещениеВерх = " + Ячейка1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(Ячейка1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ячейка1 = Форма1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Положение Объект";
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВерх_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура Свойство() Экспорт
ЯчейкаЗаголовка1.Текст = "СмещениеВерх = " + ЯчейкаЗаголовка1.СмещениеВерх;
Сообщить(?(
ЯчейкаЗаголовка1.Текст = "СмещениеВерх = " + ЯчейкаЗаголовка1.СмещениеВерх
, "", "!!! ") + "СмещениеВерх_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВерх() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка1, "СмещениеВерх", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВерх();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЯчейкаЗаголовка1 = Форма1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Положение Объект";
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Абзац_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Абзац1.Текст = "СмещениеВысота = " + Абзац1.СмещениеВысота;
Сообщить(?(
Абзац1.Текст = "СмещениеВысота = " + Абзац1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Абзац1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Положение Объект";
Абзац1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Артикль_свойство.os
Перем ДФ, Артикль1;
Процедура Свойство() Экспорт
Артикль1.Текст = "СмещениеВысота = " + Артикль1.СмещениеВысота;
Сообщить(?(
Артикль1.Текст = "СмещениеВысота = " + Артикль1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Артикль1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Артикль1 = Форма1.ДобавитьДочерний(ДФ.Артикль());
Артикль1.Текст = "Положение Объект";
Артикль1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Аудио_свойство.os
Перем ДФ, Аудио1, Блок1;
Процедура Свойство() Экспорт
Блок1.Текст = "СмещениеВысота = " + Аудио1.СмещениеВысота;
Сообщить(?(
Блок1.Текст = "СмещениеВысота = " + Аудио1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Аудио1 = Форма1.ДобавитьДочерний(ДФ.Аудио());
Аудио1.Контролы = Истина;
// Аудио1.Источник = "file:///C:/444/Pic/Kaoma_Lambada.mp3";
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 20;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Форма1.Открыть();
СмещениеВысота_Блок_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Блок1.Текст = "СмещениеВысота = " + Блок1.СмещениеВысота;
Сообщить(?(
Блок1.Текст = "СмещениеВысота = " + Блок1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Блок1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Текст = "Положение Объект";
Блок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборДаты1 = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборМестнойДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборМесяца1 = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборНедели1 = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборФайла1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборФайла1 = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборЦвета1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ВыборЦвета1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборЦвета1 = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Группа_свойство.os
Перем ДФ, Группа1;
Процедура Свойство() Экспорт
Группа1.Текст = "СмещениеВысота = " + Группа1.СмещениеВысота;
Сообщить(?(
Группа1.Текст = "СмещениеВысота = " + Группа1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Группа1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Группа1 = Форма1.ДобавитьДочерний(ДФ.Группа());
Группа1.Текст = "Положение Объект";
Группа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ГруппаКолонок_свойство.os
Перем ДФ, ГруппаКолонок1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппаКолонок1.СмещениеВысота = 0
, "", "!!! ") + "СмещениеВысота_ГруппаКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ГруппаКолонок1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ГруппаКолонок1 = Форма1.ДобавитьДочерний(ДФ.ГруппаКолонок());
ГруппаКолонок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ГруппировкаПоляСписка_свойство.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_ГруппировкаПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ГруппировкаПоляСписка1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ГруппировкаПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ГруппировкаПоляСписка());
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Диалог_свойство.os
Перем ДФ, Диалог1;
Процедура Свойство() Экспорт
Диалог1.Текст = "СмещениеВысота = " + Диалог1.СмещениеВысота;
Сообщить(?(
Диалог1.Текст = "СмещениеВысота = " + Диалог1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Диалог1 = Форма1.ДобавитьДочерний(ДФ.Диалог());
Диалог1.Текст = "Положение Объект";
Диалог1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок1;
Процедура Свойство() Экспорт
ДополнительныйБлок1.Текст = "СмещениеВысота = " + ДополнительныйБлок1.СмещениеВысота;
Сообщить(?(
ДополнительныйБлок1.Текст = "СмещениеВысота = " + ДополнительныйБлок1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ДополнительныйБлок1 = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
ДополнительныйБлок1.Текст = "Положение Объект";
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст1;
Процедура Свойство() Экспорт
ЖирныйТекст1.Текст = "СмещениеВысота = " + ЖирныйТекст1.СмещениеВысота;
Сообщить(?(
ЖирныйТекст1.Текст = "СмещениеВысота = " + ЖирныйТекст1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ЖирныйТекст1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЖирныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
ЖирныйТекст1.Текст = "Положение Объект";
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Заголовок1_свойство.os
Перем ДФ, Заголовок11;
Процедура Свойство() Экспорт
Заголовок11.Текст = "СмещениеВысота = " + Заголовок11.СмещениеВысота;
Сообщить(?(
Заголовок11.Текст = "СмещениеВысота = " + Заголовок11.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Заголовок11, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок11 = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок11.Текст = "Положение Объект";
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Заголовок2_свойство.os
Перем ДФ, Заголовок21;
Процедура Свойство() Экспорт
Заголовок21.Текст = "СмещениеВысота = " + Заголовок21.СмещениеВысота;
Сообщить(?(
Заголовок21.Текст = "СмещениеВысота = " + Заголовок21.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Заголовок21, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок21 = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок21.Текст = "Положение Объект";
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Заголовок3_свойство.os
Перем ДФ, Заголовок31;
Процедура Свойство() Экспорт
Заголовок31.Текст = "СмещениеВысота = " + Заголовок31.СмещениеВысота;
Сообщить(?(
Заголовок31.Текст = "СмещениеВысота = " + Заголовок31.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Заголовок31, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок31 = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок31.Текст = "Положение Объект";
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Заголовок4_свойство.os
Перем ДФ, Заголовок41;
Процедура Свойство() Экспорт
Заголовок41.Текст = "СмещениеВысота = " + Заголовок41.СмещениеВысота;
Сообщить(?(
Заголовок41.Текст = "СмещениеВысота = " + Заголовок41.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Заголовок41, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок41 = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Заголовок41.Текст = "Положение Объект";
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Заголовок5_свойство.os
Перем ДФ, Заголовок51;
Процедура Свойство() Экспорт
Заголовок51.Текст = "СмещениеВысота = " + Заголовок51.СмещениеВысота;
Сообщить(?(
Заголовок51.Текст = "СмещениеВысота = " + Заголовок51.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Заголовок51, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок51 = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Заголовок51.Текст = "Положение Объект";
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Заголовок6_свойство.os
Перем ДФ, Заголовок61;
Процедура Свойство() Экспорт
Заголовок61.Текст = "СмещениеВысота = " + Заголовок61.СмещениеВысота;
Сообщить(?(
Заголовок61.Текст = "СмещениеВысота = " + Заголовок61.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Заголовок61, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок61 = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Заголовок61.Текст = "Положение Объект";
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Заголовок_свойство.os
Перем ДФ, Заголовок1;
Процедура Свойство() Экспорт
Заголовок1.Текст = "СмещениеВысота = " + Заголовок1.СмещениеВысота;
Сообщить(?(
Заголовок1.Текст = "СмещениеВысота = " + Заголовок1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Заголовок1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок1 = Форма1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Положение Объект";
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ЗаголовокГруппы_свойство.os
Перем ДФ, ЗаголовокГруппы1;
Процедура Свойство() Экспорт
ЗаголовокГруппы1.Текст = "СмещениеВысота = " + ЗаголовокГруппы1.СмещениеВысота;
Сообщить(?(
ЗаголовокГруппы1.Текст = "СмещениеВысота = " + ЗаголовокГруппы1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЗаголовокГруппы1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокГруппы());
ЗаголовокГруппы1.Текст = "Положение Объект";
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура Свойство() Экспорт
ЗаголовокРаскрываемогоБлока1.Текст = "СмещениеВысота = " + ЗаголовокРаскрываемогоБлока1.СмещениеВысота;
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.Текст = "СмещениеВысота = " + ЗаголовокРаскрываемогоБлока1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_ЗаголовокРаскрываемогоБлока_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЗаголовокРаскрываемогоБлока1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокРаскрываемогоБлока());
ЗаголовокРаскрываемогоБлока1.Текст = "Положение Объект";
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.СмещениеВысота >= 0
, "", "!!! ") + "СмещениеВысота_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Индикатор_свойство.os
Перем ДФ, Индикатор1;
Процедура Свойство() Экспорт
Сообщить(?(
Индикатор1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Индикатор1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Индикатор1 = Форма1.ДобавитьДочерний(ДФ.Индикатор());
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Итоги_свойство.os
Перем ДФ, Итоги1;
Процедура Свойство() Экспорт
Итоги1.Текст = "СмещениеВысота = " + Итоги1.СмещениеВысота;
Сообщить(?(
Итоги1.Текст = "СмещениеВысота = " + Итоги1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Итоги_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Итоги1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Итоги1 = Форма1.ДобавитьДочерний(ДФ.Итоги());
Итоги1.Текст = "Положение Объект";
Итоги1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Карта_свойство.os
Перем ДФ, Карта1;
Процедура Свойство() Экспорт
Карта1.Текст = "СмещениеВысота = " + Карта1.СмещениеВысота;
Сообщить(?(
Карта1.Текст = "СмещениеВысота = " + Карта1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Карта_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Карта1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Карта1 = Форма1.ДобавитьДочерний(ДФ.Карта());
Карта1.Текст = "Положение Объект";
Карта1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Кнопка_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Кнопка1.Текст = "СмещениеВысота = " + Кнопка1.СмещениеВысота;
Сообщить(?(
Кнопка1.Текст = "СмещениеВысота = " + Кнопка1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Положение Объект";
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Код_свойство.os
Перем ДФ, Код1;
Процедура Свойство() Экспорт
Код1.Текст = "СмещениеВысота = " + Код1.СмещениеВысота;
Сообщить(?(
Код1.Текст = "СмещениеВысота = " + Код1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Код_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Код1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Код1 = Форма1.ДобавитьДочерний(ДФ.Код());
Код1.Текст = "Положение Объект";
Код1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Колонка_свойство.os
Перем ДФ, Колонка1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонка1.СмещениеВысота >= 0
, "", "!!! ") + "СмещениеВысота_Колонка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Колонка1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Колонка1 = Форма1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Колонтитул_свойство.os
Перем ДФ, Колонтитул1;
Процедура Свойство() Экспорт
Колонтитул1.Текст = "СмещениеВысота = " + Колонтитул1.СмещениеВысота;
Сообщить(?(
Колонтитул1.Текст = "СмещениеВысота = " + Колонтитул1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Колонтитул1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Колонтитул1 = Форма1.ДобавитьДочерний(ДФ.Колонтитул());
Колонтитул1.Текст = "Положение Объект";
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст1;
Процедура Свойство() Экспорт
КурсивТекст1.Текст = "СмещениеВысота = " + КурсивТекст1.СмещениеВысота;
Сообщить(?(
КурсивТекст1.Текст = "СмещениеВысота = " + КурсивТекст1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(КурсивТекст1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
КурсивТекст1 = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
КурсивТекст1.Текст = "Положение Объект";
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Линия_свойство.os
Перем ДФ, Линия1;
Процедура Свойство() Экспорт
Линия1.Текст = "СмещениеВысота = " + Линия1.СмещениеВысота;
Сообщить(?(
Линия1.Текст = "СмещениеВысота = " + Линия1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Линия1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Линия1 = Форма1.ДобавитьДочерний(ДФ.Линия());
Линия1.Текст = "Положение Объект";
Линия1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст1;
Процедура Свойство() Экспорт
МаркированныйТекст1.Текст = "СмещениеВысота = " + МаркированныйТекст1.СмещениеВысота;
Сообщить(?(
МаркированныйТекст1.Текст = "СмещениеВысота = " + МаркированныйТекст1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(МаркированныйТекст1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МаркированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
МаркированныйТекст1.Текст = "Положение Объект";
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_МедиаГруппа_свойство.os
Перем ДФ, МедиаГруппа1;
Процедура Свойство() Экспорт
МедиаГруппа1.Текст = "СмещениеВысота = " + МедиаГруппа1.СмещениеВысота;
Сообщить(?(
МедиаГруппа1.Текст = "СмещениеВысота = " + МедиаГруппа1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МедиаГруппа1 = Форма1.ДобавитьДочерний(ДФ.МедиаГруппа());
МедиаГруппа1.Текст = "Положение Объект";
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст1;
Процедура Свойство() Экспорт
МелкийТекст1.Текст = "СмещениеВысота = " + МелкийТекст1.СмещениеВысота;
Сообщить(?(
МелкийТекст1.Текст = "СмещениеВысота = " + МелкийТекст1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(МелкийТекст1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МелкийТекст1 = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
МелкийТекст1.Текст = "Положение Объект";
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст1;
Процедура Свойство() Экспорт
НадстрочныйТекст1.Текст = "СмещениеВысота = " + НадстрочныйТекст1.СмещениеВысота;
Сообщить(?(
НадстрочныйТекст1.Текст = "СмещениеВысота = " + НадстрочныйТекст1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(НадстрочныйТекст1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НадстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
НадстрочныйТекст1.Текст = "Положение Объект";
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст1;
Процедура Свойство() Экспорт
НаправленныйТекст1.Текст = "СмещениеВысота = " + НаправленныйТекст1.СмещениеВысота;
Сообщить(?(
НаправленныйТекст1.Текст = "СмещениеВысота = " + НаправленныйТекст1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(НаправленныйТекст1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НаправленныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
НаправленныйТекст1.Текст = "Положение Объект";
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_НеупорядоченныйСписок_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Свойство() Экспорт
НеупорядоченныйСписок1.Текст = "СмещениеВысота = " + НеупорядоченныйСписок1.СмещениеВысота;
Сообщить(?(
НеупорядоченныйСписок1.Текст = "СмещениеВысота = " + НеупорядоченныйСписок1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НеупорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
НеупорядоченныйСписок1.Текст = "Положение Объект";
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_НижнийКолонтитул_свойство.os
Перем ДФ, НижнийКолонтитул1;
Процедура Свойство() Экспорт
НижнийКолонтитул1.Текст = "СмещениеВысота = " + НижнийКолонтитул1.СмещениеВысота;
Сообщить(?(
НижнийКолонтитул1.Текст = "СмещениеВысота = " + НижнийКолонтитул1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НижнийКолонтитул1 = Форма1.ДобавитьДочерний(ДФ.НижнийКолонтитул());
НижнийКолонтитул1.Текст = "Положение Объект";
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Область_свойство.os
Перем ДФ, Область1;
Процедура Свойство() Экспорт
Область1.Текст = "СмещениеВысота = " + Область1.СмещениеВысота;
Сообщить(?(
Область1.Текст = "СмещениеВысота = " + Область1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Область1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Область1 = Форма1.ДобавитьДочерний(ДФ.Область());
Область1.Текст = "Положение Объект";
Область1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ОбластьТаблицы_свойство.os
Перем ДФ, ОбластьТаблицы1;
Процедура Свойство() Экспорт
ОбластьТаблицы1.Текст = "СмещениеВысота = " + ОбластьТаблицы1.СмещениеВысота;
Сообщить(?(
ОбластьТаблицы1.Текст = "СмещениеВысота = " + ОбластьТаблицы1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_ОбластьТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ОбластьТаблицы1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОбластьТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
ОбластьТаблицы1.Текст = "Положение Объект";
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ОписаниеМедиа_свойство.os
Перем ДФ, ОписаниеМедиа1;
Процедура Свойство() Экспорт
ОписаниеМедиа1.Текст = "СмещениеВысота = " + ОписаниеМедиа1.СмещениеВысота;
Сообщить(?(
ОписаниеМедиа1.Текст = "СмещениеВысота = " + ОписаниеМедиа1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОписаниеМедиа1 = Форма1.ДобавитьДочерний(ДФ.ОписаниеМедиа());
ОписаниеМедиа1.Текст = "Положение Объект";
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Определение_свойство.os
Перем ДФ, Определение1;
Процедура Свойство() Экспорт
Определение1.Текст = "СмещениеВысота = " + Определение1.СмещениеВысота;
Сообщить(?(
Определение1.Текст = "СмещениеВысота = " + Определение1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Определение1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Определение1 = Форма1.ДобавитьДочерний(ДФ.Определение());
Определение1.Текст = "Положение Объект";
Определение1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Переключатель_свойство.os
Перем ДФ, Переключатель1, Блок1;
Процедура Свойство() Экспорт
Блок1.Текст = "СмещениеВысота = " + Переключатель1.СмещениеВысота;
Сообщить(?(
Блок1.Текст = "СмещениеВысота = " + Переключатель1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Переключатель1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Переключатель1 = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 20;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Форма1.Открыть();
СмещениеВысота_Перенос_свойство.os
Перем ДФ, Перенос1;
Процедура Свойство() Экспорт
Сообщить(?(
Перенос1.СмещениеВысота = 0
, "", "!!! ") + "СмещениеВысота_Перенос_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Перенос1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Перенос1 = Форма1.ДобавитьДочерний(ДФ.Перенос());
Перенос1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Подпись_свойство.os
Перем ДФ, Подпись1;
Процедура Свойство() Экспорт
Подпись1.Текст = "СмещениеВысота = " + Подпись1.СмещениеВысота;
Сообщить(?(
Подпись1.Текст = "СмещениеВысота = " + Подпись1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Подпись1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Подпись1 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Текст = "Положение Объект";
Подпись1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Свойство() Экспорт
ПодстрочныйТекст1.Текст = "СмещениеВысота = " + ПодстрочныйТекст1.СмещениеВысота;
Сообщить(?(
ПодстрочныйТекст1.Текст = "СмещениеВысота = " + ПодстрочныйТекст1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ПодстрочныйТекст1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПодстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
ПодстрочныйТекст1.Текст = "Положение Объект";
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Свойство() Экспорт
ПодчеркнутыйТекст1.Текст = "СмещениеВысота = " + ПодчеркнутыйТекст1.СмещениеВысота;
Сообщить(?(
ПодчеркнутыйТекст1.Текст = "СмещениеВысота = " + ПодчеркнутыйТекст1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ПодчеркнутыйТекст1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПодчеркнутыйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
ПодчеркнутыйТекст1.Текст = "Положение Объект";
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеПароля1 = Форма1.ДобавитьДочерний(ДФ.ПолеПароля());
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеПоиска1 = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеСписка1 = Форма1.ДобавитьДочерний(ДФ.ПолеСписка());
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеТекста1 = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеЧисла1 = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ползунок1 = Форма1.ДобавитьДочерний(ДФ.Ползунок());
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
РаскрываемыйБлок1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(РаскрываемыйБлок1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Результат_свойство.os
Перем ДФ, Результат1;
Процедура Свойство() Экспорт
Результат1.Текст = "СмещениеВысота = " + Результат1.СмещениеВысота;
Сообщить(?(
Результат1.Текст = "СмещениеВысота = " + Результат1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Результат1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Результат1 = Форма1.ДобавитьДочерний(ДФ.Результат());
Результат1.Текст = "Положение Объект";
Результат1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_СписокОпределений_свойство.os
Перем ДФ, СписокОпределений1;
Процедура Свойство() Экспорт
СписокОпределений1.Текст = "СмещениеВысота = " + СписокОпределений1.СмещениеВысота;
Сообщить(?(
СписокОпределений1.Текст = "СмещениеВысота = " + СписокОпределений1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
СписокОпределений1 = Форма1.ДобавитьДочерний(ДФ.СписокОпределений());
СписокОпределений1.Текст = "Положение Объект";
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Свойство() Экспорт
Ссылка1.Текст = "СмещениеВысота = " + Ссылка1.СмещениеВысота;
Сообщить(?(
Ссылка1.Текст = "СмещениеВысота = " + Ссылка1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ссылка1 = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка1.Текст = "Положение Объект";
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаТаблицы1;
Процедура Свойство() Экспорт
СтрокаТаблицы1.Текст = "СмещениеВысота = " + СтрокаТаблицы1.СмещениеВысота;
Сообщить(?(
СтрокаТаблицы1.Текст = "СмещениеВысота = " + СтрокаТаблицы1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(СтрокаТаблицы1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
СтрокаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаТаблицы1.Текст = "Положение Объект";
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Таблица1.Текст = "СмещениеВысота = " + Таблица1.СмещениеВысота;
Сообщить(?(
Таблица1.Текст = "СмещениеВысота = " + Таблица1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Текст = "Положение Объект";
Таблица1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Термин_свойство.os
Перем ДФ, Термин1;
Процедура Свойство() Экспорт
Термин1.Текст = "СмещениеВысота = " + Термин1.СмещениеВысота;
Сообщить(?(
Термин1.Текст = "СмещениеВысота = " + Термин1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Термин1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Термин1 = Форма1.ДобавитьДочерний(ДФ.Термин());
Термин1.Текст = "Положение Объект";
Термин1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст1;
Процедура Свойство() Экспорт
УдаленыйТекст1.Текст = "СмещениеВысота = " + УдаленыйТекст1.СмещениеВысота;
Сообщить(?(
УдаленыйТекст1.Текст = "СмещениеВысота = " + УдаленыйТекст1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(УдаленыйТекст1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
УдаленыйТекст1 = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
УдаленыйТекст1.Текст = "Положение Объект";
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Свойство() Экспорт
УпорядоченныйСписок1.Текст = "СмещениеВысота = " + УпорядоченныйСписок1.СмещениеВысота;
Сообщить(?(
УпорядоченныйСписок1.Текст = "СмещениеВысота = " + УпорядоченныйСписок1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
УпорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.УпорядоченныйСписок());
УпорядоченныйСписок1.Текст = "Положение Объект";
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Свойство() Экспорт
Сообщить(?(
Флажок1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Флажок1 = Форма1.ДобавитьДочерний(ДФ.Флажок());
Флажок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст1;
Процедура Свойство() Экспорт
ФорматированныйТекст1.Текст = "СмещениеВысота = " + ФорматированныйТекст1.СмещениеВысота;
Сообщить(?(
ФорматированныйТекст1.Текст = "СмещениеВысота = " + ФорматированныйТекст1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ФорматированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
ФорматированныйТекст1.Текст = "Положение Объект";
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Фрейм_свойство.os
Перем ДФ, Фрейм1;
Процедура Свойство() Экспорт
Сообщить(?(
Фрейм1.СмещениеВысота >= 0
, "", "!!! ") + "СмещениеВысота_Фрейм_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Фрейм1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Фрейм1 = Форма1.ДобавитьДочерний(ДФ.Фрейм());
Фрейм1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Холст_свойство.os
Перем ДФ, Холст1;
Процедура Свойство() Экспорт
Сообщить(?(
Холст1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Холст1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ШапкаТаблицы_свойство.os
Перем ДФ, ШапкаТаблицы1;
Процедура Свойство() Экспорт
ШапкаТаблицы1.Текст = "СмещениеВысота = " + ШапкаТаблицы1.СмещениеВысота;
Сообщить(?(
ШапкаТаблицы1.Текст = "СмещениеВысота = " + ШапкаТаблицы1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_ШапкаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ШапкаТаблицы1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ШапкаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
ШапкаТаблицы1.Текст = "Положение Объект";
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Свойство() Экспорт
Сообщить(?(
Шкала1.СмещениеВысота > 0
, "", "!!! ") + "СмещениеВысота_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Шкала1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Шкала1 = Форма1.ДобавитьДочерний(ДФ.Шкала());
Шкала1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Свойство() Экспорт
ЭлементПоляСписка1.Текст = "СмещениеВысота = " + ЭлементПоляСписка1.СмещениеВысота;
Сообщить(?(
ЭлементПоляСписка1.Текст = "СмещениеВысота = " + ЭлементПоляСписка1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЭлементПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементПоляСписка());
ЭлементПоляСписка1.Текст = "Положение Объект";
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ЭлементСписка_свойство.os
Перем ДФ, ЭлементСписка1;
Процедура Свойство() Экспорт
ЭлементСписка1.Текст = "СмещениеВысота = " + ЭлементСписка1.СмещениеВысота;
Сообщить(?(
ЭлементСписка1.Текст = "СмещениеВысота = " + ЭлементСписка1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЭлементСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Положение Объект";
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Свойство() Экспорт
Ячейка1.Текст = "СмещениеВысота = " + Ячейка1.СмещениеВысота;
Сообщить(?(
Ячейка1.Текст = "СмещениеВысота = " + Ячейка1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(Ячейка1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ячейка1 = Форма1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Положение Объект";
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеВысота_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура Свойство() Экспорт
ЯчейкаЗаголовка1.Текст = "СмещениеВысота = " + ЯчейкаЗаголовка1.СмещениеВысота;
Сообщить(?(
ЯчейкаЗаголовка1.Текст = "СмещениеВысота = " + ЯчейкаЗаголовка1.СмещениеВысота
, "", "!!! ") + "СмещениеВысота_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеВысота() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка1, "СмещениеВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеВысота();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЯчейкаЗаголовка1 = Форма1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Положение Объект";
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеИгрек_Матрица_свойство.os
Перем ДФ, Матрица1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица1.СмещениеИгрек = 3.0
, "", "!!! ") + "СмещениеИгрек_Матрица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Матрица1 = ДФ.Матрица();
Матрица1.МасштабИкс = 1.4;
Матрица1.СдвигИгрек = -2.0;
Матрица1.СдвигИкс = 2.0;
Матрица1.МасштабИгрек = 1.8;
Матрица1.СмещениеИкс = -3.0;
Матрица1.СмещениеИгрек = 3.0;
Форма1.Открыть();
СмещениеИкс_Матрица_свойство.os
Перем ДФ, Матрица1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица1.СмещениеИкс = -3.0
, "", "!!! ") + "СмещениеИкс_Матрица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Матрица1 = ДФ.Матрица();
Матрица1.МасштабИкс = 1.4;
Матрица1.СдвигИгрек = -2.0;
Матрица1.СдвигИкс = 2.0;
Матрица1.МасштабИгрек = 1.8;
Матрица1.СмещениеИкс = -3.0;
Матрица1.СмещениеИгрек = 3.0;
Форма1.Открыть();
СмещениеКартинкиГраницы_КартинкаГраницы_свойство.os
Перем ДФ, КартинкаГраницы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
КартинкаГраницы1.СмещениеКартинкиГраницы = 10
, "", "!!! ") + "СмещениеКартинкиГраницы_КартинкаГраницы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Текст = "Здравствуй МИР!";
Блок1.Стиль.Границы = ДФ.Границы(15, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Заполнение = ДФ.Заполнение(10, 20, 20, 10);
КартинкаГраницы1 = ДФ.КартинкаГраницы();
// КартинкаГраницы1.ИсточникКартинкиГраницы = "file:///C:/444/~Деклар Форма/abc.png";
КартинкаГраницы1.ИсточникКартинкиГраницы = "border.png";
КартинкаГраницы1.НарезкаКартинкиГраницы = 30;
КартинкаГраницы1.ШиринаКартинкиГраницы = 10;
КартинкаГраницы1.СмещениеКартинкиГраницы = 10;
КартинкаГраницы1.МозаикаКартинкиГраницы = ДФ.МозаикаКартинкиГраницы.Закруглять;
Блок1.Стиль.КартинкаГраницы = КартинкаГраницы1;
Форма1.Открыть();
СмещениеКартинкиГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.СмещениеКартинкиГраницы = "0px"
, "", "!!! ") + "СмещениеКартинкиГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "СмещениеКартинкиГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.ЦветФона = ДФ.Цвет.СветлоСерый;
Блок1.Стиль.Границы = ДФ.Границы(30, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.ИсточникКартинкиГраницы = "border.png";
Блок1.Стиль.НарезкаКартинкиГраницы = 30;
Блок1.Стиль.ШиринаКартинкиГраницы = ДФ.Размер(10, 20);
Блок1.Стиль.СмещениеКартинкиГраницы = 0;
Блок1.Стиль.МозаикаКартинкиГраницы = ДФ.МозаикаКартинкиГраницы.Закруглять;
Форма1.Открыть();
СмещениеКонтура_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.СмещениеКонтура = "15px"
, "", "!!! ") + "СмещениеКонтура_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "СмещениеКонтура", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Отступ = ДФ.Отступ(30, 0, 0, 0, Истина);
Блок1.Текст = "Блок1";
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Стиль.Контур = ДФ.Контур(5, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Коралловый);
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 300;
Блок1.Стиль.СмещениеКонтура = 15;
Форма1.Открыть();
СмещениеЛево_Абзац_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Абзац1.Текст = "СмещениеЛево = " + Абзац1.СмещениеЛево;
Сообщить(?(
Абзац1.Текст = "СмещениеЛево = " + Абзац1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Абзац1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Положение Объект";
Абзац1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Артикль_свойство.os
Перем ДФ, Артикль1;
Процедура Свойство() Экспорт
Артикль1.Текст = "СмещениеЛево = " + Артикль1.СмещениеЛево;
Сообщить(?(
Артикль1.Текст = "СмещениеЛево = " + Артикль1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Артикль1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Артикль1 = Форма1.ДобавитьДочерний(ДФ.Артикль());
Артикль1.Текст = "Положение Объект";
Артикль1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Аудио_свойство.os
Перем ДФ, Аудио1, Блок1;
Процедура Свойство() Экспорт
Блок1.Текст = "СмещениеЛево = " + Аудио1.СмещениеЛево;
Сообщить(?(
Блок1.Текст = "СмещениеЛево = " + Аудио1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Аудио1 = Форма1.ДобавитьДочерний(ДФ.Аудио());
Аудио1.Контролы = Истина;
// Аудио1.Источник = "file:///C:/444/Pic/Kaoma_Lambada.mp3";
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 20;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Форма1.Открыть();
СмещениеЛево_Блок_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Блок1.Текст = "СмещениеЛево = " + Блок1.СмещениеЛево;
Сообщить(?(
Блок1.Текст = "СмещениеЛево = " + Блок1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Блок1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Текст = "Положение Объект";
Блок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборДаты1 = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборМестнойДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборМесяца1 = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборНедели1 = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборФайла1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборФайла1 = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборЦвета1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ВыборЦвета1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборЦвета1 = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Группа_свойство.os
Перем ДФ, Группа1;
Процедура Свойство() Экспорт
Группа1.Текст = "СмещениеЛево = " + Группа1.СмещениеЛево;
Сообщить(?(
Группа1.Текст = "СмещениеЛево = " + Группа1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Группа1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Группа1 = Форма1.ДобавитьДочерний(ДФ.Группа());
Группа1.Текст = "Положение Объект";
Группа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ГруппаКолонок_свойство.os
Перем ДФ, ГруппаКолонок1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппаКолонок1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ГруппаКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ГруппаКолонок1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ГруппаКолонок1 = Форма1.ДобавитьДочерний(ДФ.ГруппаКолонок());
ГруппаКолонок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ГруппировкаПоляСписка_свойство.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ГруппировкаПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ГруппировкаПоляСписка1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ГруппировкаПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ГруппировкаПоляСписка());
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Диалог_свойство.os
Перем ДФ, Диалог1;
Процедура Свойство() Экспорт
Диалог1.Текст = "СмещениеЛево = " + Диалог1.СмещениеЛево;
Сообщить(?(
Диалог1.Текст = "СмещениеЛево = " + Диалог1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Диалог1 = Форма1.ДобавитьДочерний(ДФ.Диалог());
Диалог1.Текст = "Положение Объект";
Диалог1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок1;
Процедура Свойство() Экспорт
ДополнительныйБлок1.Текст = "СмещениеЛево = " + ДополнительныйБлок1.СмещениеЛево;
Сообщить(?(
ДополнительныйБлок1.Текст = "СмещениеЛево = " + ДополнительныйБлок1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ДополнительныйБлок1 = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
ДополнительныйБлок1.Текст = "Положение Объект";
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст1;
Процедура Свойство() Экспорт
ЖирныйТекст1.Текст = "СмещениеЛево = " + ЖирныйТекст1.СмещениеЛево;
Сообщить(?(
ЖирныйТекст1.Текст = "СмещениеЛево = " + ЖирныйТекст1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ЖирныйТекст1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЖирныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
ЖирныйТекст1.Текст = "Положение Объект";
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Заголовок1_свойство.os
Перем ДФ, Заголовок11;
Процедура Свойство() Экспорт
Заголовок11.Текст = "СмещениеЛево = " + Заголовок11.СмещениеЛево;
Сообщить(?(
Заголовок11.Текст = "СмещениеЛево = " + Заголовок11.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Заголовок11, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок11 = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок11.Текст = "Положение Объект";
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Заголовок2_свойство.os
Перем ДФ, Заголовок21;
Процедура Свойство() Экспорт
Заголовок21.Текст = "СмещениеЛево = " + Заголовок21.СмещениеЛево;
Сообщить(?(
Заголовок21.Текст = "СмещениеЛево = " + Заголовок21.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Заголовок21, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок21 = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок21.Текст = "Положение Объект";
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Заголовок3_свойство.os
Перем ДФ, Заголовок31;
Процедура Свойство() Экспорт
Заголовок31.Текст = "СмещениеЛево = " + Заголовок31.СмещениеЛево;
Сообщить(?(
Заголовок31.Текст = "СмещениеЛево = " + Заголовок31.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Заголовок31, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок31 = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок31.Текст = "Положение Объект";
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Заголовок4_свойство.os
Перем ДФ, Заголовок41;
Процедура Свойство() Экспорт
Заголовок41.Текст = "СмещениеЛево = " + Заголовок41.СмещениеЛево;
Сообщить(?(
Заголовок41.Текст = "СмещениеЛево = " + Заголовок41.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Заголовок41, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок41 = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Заголовок41.Текст = "Положение Объект";
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Заголовок5_свойство.os
Перем ДФ, Заголовок51;
Процедура Свойство() Экспорт
Заголовок51.Текст = "СмещениеЛево = " + Заголовок51.СмещениеЛево;
Сообщить(?(
Заголовок51.Текст = "СмещениеЛево = " + Заголовок51.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Заголовок51, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок51 = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Заголовок51.Текст = "Положение Объект";
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Заголовок6_свойство.os
Перем ДФ, Заголовок61;
Процедура Свойство() Экспорт
Заголовок61.Текст = "СмещениеЛево = " + Заголовок61.СмещениеЛево;
Сообщить(?(
Заголовок61.Текст = "СмещениеЛево = " + Заголовок61.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Заголовок61, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок61 = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Заголовок61.Текст = "Положение Объект";
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Заголовок_свойство.os
Перем ДФ, Заголовок1;
Процедура Свойство() Экспорт
Заголовок1.Текст = "СмещениеЛево = " + Заголовок1.СмещениеЛево;
Сообщить(?(
Заголовок1.Текст = "СмещениеЛево = " + Заголовок1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Заголовок1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок1 = Форма1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Положение Объект";
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ЗаголовокГруппы_свойство.os
Перем ДФ, ЗаголовокГруппы1;
Процедура Свойство() Экспорт
ЗаголовокГруппы1.Текст = "СмещениеЛево = " + ЗаголовокГруппы1.СмещениеЛево;
Сообщить(?(
ЗаголовокГруппы1.Текст = "СмещениеЛево = " + ЗаголовокГруппы1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЗаголовокГруппы1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокГруппы());
ЗаголовокГруппы1.Текст = "Положение Объект";
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура Свойство() Экспорт
ЗаголовокРаскрываемогоБлока1.Текст = "СмещениеЛево = " + ЗаголовокРаскрываемогоБлока1.СмещениеЛево;
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.Текст = "СмещениеЛево = " + ЗаголовокРаскрываемогоБлока1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_ЗаголовокРаскрываемогоБлока_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЗаголовокРаскрываемогоБлока1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокРаскрываемогоБлока());
ЗаголовокРаскрываемогоБлока1.Текст = "Положение Объект";
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Индикатор_свойство.os
Перем ДФ, Индикатор1;
Процедура Свойство() Экспорт
Сообщить(?(
Индикатор1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Индикатор1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Индикатор1 = Форма1.ДобавитьДочерний(ДФ.Индикатор());
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Итоги_свойство.os
Перем ДФ, Итоги1;
Процедура Свойство() Экспорт
Итоги1.Текст = "СмещениеЛево = " + Итоги1.СмещениеЛево;
Сообщить(?(
Итоги1.Текст = "СмещениеЛево = " + Итоги1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Итоги_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Итоги1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Итоги1 = Форма1.ДобавитьДочерний(ДФ.Итоги());
Итоги1.Текст = "Положение Объект";
Итоги1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Карта_свойство.os
Перем ДФ, Карта1;
Процедура Свойство() Экспорт
Карта1.Текст = "СмещениеЛево = " + Карта1.СмещениеЛево;
Сообщить(?(
Карта1.Текст = "СмещениеЛево = " + Карта1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Карта_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Карта1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Карта1 = Форма1.ДобавитьДочерний(ДФ.Карта());
Карта1.Текст = "Положение Объект";
Карта1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Кнопка_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Кнопка1.Текст = "СмещениеЛево = " + Кнопка1.СмещениеЛево;
Сообщить(?(
Кнопка1.Текст = "СмещениеЛево = " + Кнопка1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Положение Объект";
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Код_свойство.os
Перем ДФ, Код1;
Процедура Свойство() Экспорт
Код1.Текст = "СмещениеЛево = " + Код1.СмещениеЛево;
Сообщить(?(
Код1.Текст = "СмещениеЛево = " + Код1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Код_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Код1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Код1 = Форма1.ДобавитьДочерний(ДФ.Код());
Код1.Текст = "Положение Объект";
Код1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Колонка_свойство.os
Перем ДФ, Колонка1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонка1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_Колонка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Колонка1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Колонка1 = Форма1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Колонтитул_свойство.os
Перем ДФ, Колонтитул1;
Процедура Свойство() Экспорт
Колонтитул1.Текст = "СмещениеЛево = " + Колонтитул1.СмещениеЛево;
Сообщить(?(
Колонтитул1.Текст = "СмещениеЛево = " + Колонтитул1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Колонтитул1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Колонтитул1 = Форма1.ДобавитьДочерний(ДФ.Колонтитул());
Колонтитул1.Текст = "Положение Объект";
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст1;
Процедура Свойство() Экспорт
КурсивТекст1.Текст = "СмещениеЛево = " + КурсивТекст1.СмещениеЛево;
Сообщить(?(
КурсивТекст1.Текст = "СмещениеЛево = " + КурсивТекст1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(КурсивТекст1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
КурсивТекст1 = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
КурсивТекст1.Текст = "Положение Объект";
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Линия_свойство.os
Перем ДФ, Линия1;
Процедура Свойство() Экспорт
Линия1.Текст = "СмещениеЛево = " + Линия1.СмещениеЛево;
Сообщить(?(
Линия1.Текст = "СмещениеЛево = " + Линия1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Линия1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Линия1 = Форма1.ДобавитьДочерний(ДФ.Линия());
Линия1.Текст = "Положение Объект";
Линия1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст1;
Процедура Свойство() Экспорт
МаркированныйТекст1.Текст = "СмещениеЛево = " + МаркированныйТекст1.СмещениеЛево;
Сообщить(?(
МаркированныйТекст1.Текст = "СмещениеЛево = " + МаркированныйТекст1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(МаркированныйТекст1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МаркированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
МаркированныйТекст1.Текст = "Положение Объект";
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_МедиаГруппа_свойство.os
Перем ДФ, МедиаГруппа1;
Процедура Свойство() Экспорт
МедиаГруппа1.Текст = "СмещениеЛево = " + МедиаГруппа1.СмещениеЛево;
Сообщить(?(
МедиаГруппа1.Текст = "СмещениеЛево = " + МедиаГруппа1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МедиаГруппа1 = Форма1.ДобавитьДочерний(ДФ.МедиаГруппа());
МедиаГруппа1.Текст = "Положение Объект";
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст1;
Процедура Свойство() Экспорт
МелкийТекст1.Текст = "СмещениеЛево = " + МелкийТекст1.СмещениеЛево;
Сообщить(?(
МелкийТекст1.Текст = "СмещениеЛево = " + МелкийТекст1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(МелкийТекст1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МелкийТекст1 = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
МелкийТекст1.Текст = "Положение Объект";
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст1;
Процедура Свойство() Экспорт
НадстрочныйТекст1.Текст = "СмещениеЛево = " + НадстрочныйТекст1.СмещениеЛево;
Сообщить(?(
НадстрочныйТекст1.Текст = "СмещениеЛево = " + НадстрочныйТекст1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(НадстрочныйТекст1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НадстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
НадстрочныйТекст1.Текст = "Положение Объект";
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст1;
Процедура Свойство() Экспорт
НаправленныйТекст1.Текст = "СмещениеЛево = " + НаправленныйТекст1.СмещениеЛево;
Сообщить(?(
НаправленныйТекст1.Текст = "СмещениеЛево = " + НаправленныйТекст1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(НаправленныйТекст1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НаправленныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
НаправленныйТекст1.Текст = "Положение Объект";
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_НеупорядоченныйСписок_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Свойство() Экспорт
НеупорядоченныйСписок1.Текст = "СмещениеЛево = " + НеупорядоченныйСписок1.СмещениеЛево;
Сообщить(?(
НеупорядоченныйСписок1.Текст = "СмещениеЛево = " + НеупорядоченныйСписок1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НеупорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
НеупорядоченныйСписок1.Текст = "Положение Объект";
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_НижнийКолонтитул_свойство.os
Перем ДФ, НижнийКолонтитул1;
Процедура Свойство() Экспорт
НижнийКолонтитул1.Текст = "СмещениеЛево = " + НижнийКолонтитул1.СмещениеЛево;
Сообщить(?(
НижнийКолонтитул1.Текст = "СмещениеЛево = " + НижнийКолонтитул1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НижнийКолонтитул1 = Форма1.ДобавитьДочерний(ДФ.НижнийКолонтитул());
НижнийКолонтитул1.Текст = "Положение Объект";
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Область_свойство.os
Перем ДФ, Область1;
Процедура Свойство() Экспорт
Область1.Текст = "СмещениеЛево = " + Область1.СмещениеЛево;
Сообщить(?(
Область1.Текст = "СмещениеЛево = " + Область1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Область1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Область1 = Форма1.ДобавитьДочерний(ДФ.Область());
Область1.Текст = "Положение Объект";
Область1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ОбластьТаблицы_свойство.os
Перем ДФ, ОбластьТаблицы1;
Процедура Свойство() Экспорт
ОбластьТаблицы1.Текст = "СмещениеЛево = " + ОбластьТаблицы1.СмещениеЛево;
Сообщить(?(
ОбластьТаблицы1.Текст = "СмещениеЛево = " + ОбластьТаблицы1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_ОбластьТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ОбластьТаблицы1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОбластьТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
ОбластьТаблицы1.Текст = "Положение Объект";
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ОписаниеМедиа_свойство.os
Перем ДФ, ОписаниеМедиа1;
Процедура Свойство() Экспорт
ОписаниеМедиа1.Текст = "СмещениеЛево = " + ОписаниеМедиа1.СмещениеЛево;
Сообщить(?(
ОписаниеМедиа1.Текст = "СмещениеЛево = " + ОписаниеМедиа1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОписаниеМедиа1 = Форма1.ДобавитьДочерний(ДФ.ОписаниеМедиа());
ОписаниеМедиа1.Текст = "Положение Объект";
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Определение_свойство.os
Перем ДФ, Определение1;
Процедура Свойство() Экспорт
Определение1.Текст = "СмещениеЛево = " + Определение1.СмещениеЛево;
Сообщить(?(
Определение1.Текст = "СмещениеЛево = " + Определение1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Определение1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Определение1 = Форма1.ДобавитьДочерний(ДФ.Определение());
Определение1.Текст = "Положение Объект";
Определение1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Переключатель_свойство.os
Перем ДФ, Переключатель1, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Переключатель1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Переключатель1 = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 20;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Форма1.Открыть();
СмещениеЛево_Перенос_свойство.os
Перем ДФ, Перенос1;
Процедура Свойство() Экспорт
Сообщить(?(
Перенос1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_Перенос_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Перенос1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Перенос1 = Форма1.ДобавитьДочерний(ДФ.Перенос());
Перенос1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Подпись_свойство.os
Перем ДФ, Подпись1;
Процедура Свойство() Экспорт
Подпись1.Текст = "СмещениеЛево = " + Подпись1.СмещениеЛево;
Сообщить(?(
Подпись1.Текст = "СмещениеЛево = " + Подпись1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Подпись1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Подпись1 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Текст = "Положение Объект";
Подпись1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Свойство() Экспорт
ПодстрочныйТекст1.Текст = "СмещениеЛево = " + ПодстрочныйТекст1.СмещениеЛево;
Сообщить(?(
ПодстрочныйТекст1.Текст = "СмещениеЛево = " + ПодстрочныйТекст1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ПодстрочныйТекст1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПодстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
ПодстрочныйТекст1.Текст = "Положение Объект";
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Свойство() Экспорт
ПодчеркнутыйТекст1.Текст = "СмещениеЛево = " + ПодчеркнутыйТекст1.СмещениеЛево;
Сообщить(?(
ПодчеркнутыйТекст1.Текст = "СмещениеЛево = " + ПодчеркнутыйТекст1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ПодчеркнутыйТекст1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПодчеркнутыйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
ПодчеркнутыйТекст1.Текст = "Положение Объект";
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеПароля1 = Форма1.ДобавитьДочерний(ДФ.ПолеПароля());
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеПоиска1 = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеСписка1 = Форма1.ДобавитьДочерний(ДФ.ПолеСписка());
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеТекста1 = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеЧисла1 = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ползунок1 = Форма1.ДобавитьДочерний(ДФ.Ползунок());
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
РаскрываемыйБлок1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(РаскрываемыйБлок1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Результат_свойство.os
Перем ДФ, Результат1;
Процедура Свойство() Экспорт
Результат1.Текст = "СмещениеЛево = " + Результат1.СмещениеЛево;
Сообщить(?(
Результат1.Текст = "СмещениеЛево = " + Результат1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Результат1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Результат1 = Форма1.ДобавитьДочерний(ДФ.Результат());
Результат1.Текст = "Положение Объект";
Результат1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_СписокОпределений_свойство.os
Перем ДФ, СписокОпределений1;
Процедура Свойство() Экспорт
СписокОпределений1.Текст = "СмещениеЛево = " + СписокОпределений1.СмещениеЛево;
Сообщить(?(
СписокОпределений1.Текст = "СмещениеЛево = " + СписокОпределений1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
СписокОпределений1 = Форма1.ДобавитьДочерний(ДФ.СписокОпределений());
СписокОпределений1.Текст = "Положение Объект";
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Свойство() Экспорт
Ссылка1.Текст = "СмещениеЛево = " + Ссылка1.СмещениеЛево;
Сообщить(?(
Ссылка1.Текст = "СмещениеЛево = " + Ссылка1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ссылка1 = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка1.Текст = "Положение Объект";
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаТаблицы1;
Процедура Свойство() Экспорт
СтрокаТаблицы1.Текст = "СмещениеЛево = " + СтрокаТаблицы1.СмещениеЛево;
Сообщить(?(
СтрокаТаблицы1.Текст = "СмещениеЛево = " + СтрокаТаблицы1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(СтрокаТаблицы1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
СтрокаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаТаблицы1.Текст = "Положение Объект";
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Таблица1.Текст = "СмещениеЛево = " + Таблица1.СмещениеЛево;
Сообщить(?(
Таблица1.Текст = "СмещениеЛево = " + Таблица1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Текст = "Положение Объект";
Таблица1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Термин_свойство.os
Перем ДФ, Термин1;
Процедура Свойство() Экспорт
Термин1.Текст = "СмещениеЛево = " + Термин1.СмещениеЛево;
Сообщить(?(
Термин1.Текст = "СмещениеЛево = " + Термин1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Термин1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Термин1 = Форма1.ДобавитьДочерний(ДФ.Термин());
Термин1.Текст = "Положение Объект";
Термин1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст1;
Процедура Свойство() Экспорт
УдаленыйТекст1.Текст = "СмещениеЛево = " + УдаленыйТекст1.СмещениеЛево;
Сообщить(?(
УдаленыйТекст1.Текст = "СмещениеЛево = " + УдаленыйТекст1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(УдаленыйТекст1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
УдаленыйТекст1 = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
УдаленыйТекст1.Текст = "Положение Объект";
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Свойство() Экспорт
УпорядоченныйСписок1.Текст = "СмещениеЛево = " + УпорядоченныйСписок1.СмещениеЛево;
Сообщить(?(
УпорядоченныйСписок1.Текст = "СмещениеЛево = " + УпорядоченныйСписок1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
УпорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.УпорядоченныйСписок());
УпорядоченныйСписок1.Текст = "Положение Объект";
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Свойство() Экспорт
Сообщить(?(
Флажок1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Флажок1 = Форма1.ДобавитьДочерний(ДФ.Флажок());
Флажок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст1;
Процедура Свойство() Экспорт
ФорматированныйТекст1.Текст = "СмещениеЛево = " + ФорматированныйТекст1.СмещениеЛево;
Сообщить(?(
ФорматированныйТекст1.Текст = "СмещениеЛево = " + ФорматированныйТекст1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ФорматированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
ФорматированныйТекст1.Текст = "Положение Объект";
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Фрейм_свойство.os
Перем ДФ, Фрейм1;
Процедура Свойство() Экспорт
Сообщить(?(
Фрейм1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_Фрейм_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Фрейм1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Фрейм1 = Форма1.ДобавитьДочерний(ДФ.Фрейм());
Фрейм1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Холст_свойство.os
Перем ДФ, Холст1;
Процедура Свойство() Экспорт
Сообщить(?(
Холст1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Холст1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ШапкаТаблицы_свойство.os
Перем ДФ, ШапкаТаблицы1;
Процедура Свойство() Экспорт
ШапкаТаблицы1.Текст = "СмещениеЛево = " + ШапкаТаблицы1.СмещениеЛево;
Сообщить(?(
ШапкаТаблицы1.Текст = "СмещениеЛево = " + ШапкаТаблицы1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_ШапкаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ШапкаТаблицы1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ШапкаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
ШапкаТаблицы1.Текст = "Положение Объект";
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Свойство() Экспорт
Сообщить(?(
Шкала1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Шкала1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Шкала1 = Форма1.ДобавитьДочерний(ДФ.Шкала());
Шкала1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Свойство() Экспорт
ЭлементПоляСписка1.Текст = "СмещениеЛево = " + ЭлементПоляСписка1.СмещениеЛево;
Сообщить(?(
ЭлементПоляСписка1.Текст = "СмещениеЛево = " + ЭлементПоляСписка1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЭлементПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементПоляСписка());
ЭлементПоляСписка1.Текст = "Положение Объект";
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ЭлементСписка_свойство.os
Перем ДФ, ЭлементСписка1;
Процедура Свойство() Экспорт
ЭлементСписка1.Текст = "СмещениеЛево = " + ЭлементСписка1.СмещениеЛево;
Сообщить(?(
ЭлементСписка1.Текст = "СмещениеЛево = " + ЭлементСписка1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЭлементСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Положение Объект";
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Свойство() Экспорт
Ячейка1.Текст = "СмещениеЛево = " + Ячейка1.СмещениеЛево;
Сообщить(?(
Ячейка1.Текст = "СмещениеЛево = " + Ячейка1.СмещениеЛево
, "", "!!! ") + "СмещениеЛево_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(Ячейка1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ячейка1 = Форма1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Положение Объект";
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеЛево_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЯчейкаЗаголовка1.СмещениеЛево >= 0
, "", "!!! ") + "СмещениеЛево_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеЛево() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка1, "СмещениеЛево", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеЛево();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЯчейкаЗаголовка1 = Форма1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Положение Объект";
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеТениИгрек_Контекст2d_свойство.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контекст2d1.СмещениеТениИгрек = 20
, "", "!!! ") + "СмещениеТениИгрек_Контекст2d_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.РазмытиеТени = 20;
Контекст2d1.СмещениеТениИгрек = 20;
Контекст2d1.ЦветТени = ДФ.Цвет.Черный;
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Красный;
Контекст2d1.ЗаполнитьПрямоугольник(20, 20, 100, 80);
Форма1.Открыть();
СмещениеТениИкс_Контекст2d_свойство.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контекст2d1.СмещениеТениИкс = 90
, "", "!!! ") + "СмещениеТениИкс_Контекст2d_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.РазмытиеТени = 20;
Контекст2d1.СмещениеТениИкс = 90;
Контекст2d1.ЦветТени = ДФ.Цвет.Черный;
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Красный;
Контекст2d1.ЗаполнитьПрямоугольник(20, 20, 100, 80);
Форма1.Открыть();
СмещениеШирина_Абзац_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Абзац1.Текст = "СмещениеШирина = " + Абзац1.СмещениеШирина;
Сообщить(?(
Абзац1.Текст = "СмещениеШирина = " + Абзац1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Абзац1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Положение Объект";
Абзац1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Артикль_свойство.os
Перем ДФ, Артикль1;
Процедура Свойство() Экспорт
Артикль1.Текст = "СмещениеШирина = " + Артикль1.СмещениеШирина;
Сообщить(?(
Артикль1.Текст = "СмещениеШирина = " + Артикль1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Артикль1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Артикль1 = Форма1.ДобавитьДочерний(ДФ.Артикль());
Артикль1.Текст = "Положение Объект";
Артикль1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Аудио_свойство.os
Перем ДФ, Аудио1, Блок1;
Процедура Свойство() Экспорт
Блок1.Текст = "СмещениеШирина = " + Аудио1.СмещениеШирина;
Сообщить(?(
Блок1.Текст = "СмещениеШирина = " + Аудио1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Аудио1 = Форма1.ДобавитьДочерний(ДФ.Аудио());
Аудио1.Контролы = Истина;
// Аудио1.Источник = "file:///C:/444/Pic/Kaoma_Lambada.mp3";
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 20;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Форма1.Открыть();
СмещениеШирина_Блок_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Блок1.Текст = "СмещениеШирина = " + Блок1.СмещениеШирина;
Сообщить(?(
Блок1.Текст = "СмещениеШирина = " + Блок1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Блок1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Текст = "Положение Объект";
Блок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборДаты1 = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборМестнойДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборМесяца1 = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборНедели1 = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборФайла1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборФайла1 = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборЦвета1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ВыборЦвета1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборЦвета1 = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Группа_свойство.os
Перем ДФ, Группа1;
Процедура Свойство() Экспорт
Группа1.Текст = "СмещениеШирина = " + Группа1.СмещениеШирина;
Сообщить(?(
Группа1.Текст = "СмещениеШирина = " + Группа1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Группа1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Группа1 = Форма1.ДобавитьДочерний(ДФ.Группа());
Группа1.Текст = "Положение Объект";
Группа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ГруппаКолонок_свойство.os
Перем ДФ, ГруппаКолонок1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппаКолонок1.СмещениеШирина >= 0
, "", "!!! ") + "СмещениеШирина_ГруппаКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ГруппаКолонок1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ГруппаКолонок1 = Форма1.ДобавитьДочерний(ДФ.ГруппаКолонок());
ГруппаКолонок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ГруппировкаПоляСписка_свойство.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_ГруппировкаПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ГруппировкаПоляСписка1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ГруппировкаПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ГруппировкаПоляСписка());
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Диалог_свойство.os
Перем ДФ, Диалог1;
Процедура Свойство() Экспорт
Диалог1.Текст = "СмещениеШирина = " + Диалог1.СмещениеШирина;
Сообщить(?(
Диалог1.Текст = "СмещениеШирина = " + Диалог1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Диалог1 = Форма1.ДобавитьДочерний(ДФ.Диалог());
Диалог1.Текст = "Положение Объект";
Диалог1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок1;
Процедура Свойство() Экспорт
ДополнительныйБлок1.Текст = "СмещениеШирина = " + ДополнительныйБлок1.СмещениеШирина;
Сообщить(?(
ДополнительныйБлок1.Текст = "СмещениеШирина = " + ДополнительныйБлок1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ДополнительныйБлок1 = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
ДополнительныйБлок1.Текст = "Положение Объект";
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст1;
Процедура Свойство() Экспорт
ЖирныйТекст1.Текст = "СмещениеШирина = " + ЖирныйТекст1.СмещениеШирина;
Сообщить(?(
ЖирныйТекст1.Текст = "СмещениеШирина = " + ЖирныйТекст1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ЖирныйТекст1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЖирныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
ЖирныйТекст1.Текст = "Положение Объект";
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Заголовок1_свойство.os
Перем ДФ, Заголовок11;
Процедура Свойство() Экспорт
Заголовок11.Текст = "СмещениеШирина = " + Заголовок11.СмещениеШирина;
Сообщить(?(
Заголовок11.Текст = "СмещениеШирина = " + Заголовок11.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Заголовок11, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок11 = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок11.Текст = "Положение Объект";
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Заголовок2_свойство.os
Перем ДФ, Заголовок21;
Процедура Свойство() Экспорт
Заголовок21.Текст = "СмещениеШирина = " + Заголовок21.СмещениеШирина;
Сообщить(?(
Заголовок21.Текст = "СмещениеШирина = " + Заголовок21.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Заголовок21, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок21 = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок21.Текст = "Положение Объект";
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Заголовок3_свойство.os
Перем ДФ, Заголовок31;
Процедура Свойство() Экспорт
Заголовок31.Текст = "СмещениеШирина = " + Заголовок31.СмещениеШирина;
Сообщить(?(
Заголовок31.Текст = "СмещениеШирина = " + Заголовок31.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Заголовок31, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок31 = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок31.Текст = "Положение Объект";
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Заголовок4_свойство.os
Перем ДФ, Заголовок41;
Процедура Свойство() Экспорт
Заголовок41.Текст = "СмещениеШирина = " + Заголовок41.СмещениеШирина;
Сообщить(?(
Заголовок41.Текст = "СмещениеШирина = " + Заголовок41.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Заголовок41, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок41 = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Заголовок41.Текст = "Положение Объект";
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Заголовок5_свойство.os
Перем ДФ, Заголовок51;
Процедура Свойство() Экспорт
Заголовок51.Текст = "СмещениеШирина = " + Заголовок51.СмещениеШирина;
Сообщить(?(
Заголовок51.Текст = "СмещениеШирина = " + Заголовок51.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Заголовок51, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок51 = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Заголовок51.Текст = "Положение Объект";
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Заголовок6_свойство.os
Перем ДФ, Заголовок61;
Процедура Свойство() Экспорт
Заголовок61.Текст = "СмещениеШирина = " + Заголовок61.СмещениеШирина;
Сообщить(?(
Заголовок61.Текст = "СмещениеШирина = " + Заголовок61.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Заголовок61, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок61 = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Заголовок61.Текст = "Положение Объект";
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Заголовок_свойство.os
Перем ДФ, Заголовок1;
Процедура Свойство() Экспорт
Заголовок1.Текст = "СмещениеШирина = " + Заголовок1.СмещениеШирина;
Сообщить(?(
Заголовок1.Текст = "СмещениеШирина = " + Заголовок1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Заголовок1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок1 = Форма1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Положение Объект";
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ЗаголовокГруппы_свойство.os
Перем ДФ, ЗаголовокГруппы1;
Процедура Свойство() Экспорт
ЗаголовокГруппы1.Текст = "СмещениеШирина = " + ЗаголовокГруппы1.СмещениеШирина;
Сообщить(?(
ЗаголовокГруппы1.Текст = "СмещениеШирина = " + ЗаголовокГруппы1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЗаголовокГруппы1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокГруппы());
ЗаголовокГруппы1.Текст = "Положение Объект";
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура Свойство() Экспорт
ЗаголовокРаскрываемогоБлока1.Текст = "СмещениеШирина = " + ЗаголовокРаскрываемогоБлока1.СмещениеШирина;
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.Текст = "СмещениеШирина = " + ЗаголовокРаскрываемогоБлока1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_ЗаголовокРаскрываемогоБлока_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЗаголовокРаскрываемогоБлока1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокРаскрываемогоБлока());
ЗаголовокРаскрываемогоБлока1.Текст = "Положение Объект";
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.СмещениеШирина >= 0
, "", "!!! ") + "СмещениеШирина_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Изображение1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Индикатор_свойство.os
Перем ДФ, Индикатор1;
Процедура Свойство() Экспорт
Сообщить(?(
Индикатор1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Индикатор1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Индикатор1 = Форма1.ДобавитьДочерний(ДФ.Индикатор());
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Итоги_свойство.os
Перем ДФ, Итоги1;
Процедура Свойство() Экспорт
Итоги1.Текст = "СмещениеШирина = " + Итоги1.СмещениеШирина;
Сообщить(?(
Итоги1.Текст = "СмещениеШирина = " + Итоги1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Итоги_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Итоги1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Итоги1 = Форма1.ДобавитьДочерний(ДФ.Итоги());
Итоги1.Текст = "Положение Объект";
Итоги1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Карта_свойство.os
Перем ДФ, Карта1;
Процедура Свойство() Экспорт
Карта1.Текст = "СмещениеШирина = " + Карта1.СмещениеШирина;
Сообщить(?(
Карта1.Текст = "СмещениеШирина = " + Карта1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Карта_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Карта1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Карта1 = Форма1.ДобавитьДочерний(ДФ.Карта());
Карта1.Текст = "Положение Объект";
Карта1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Кнопка_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Кнопка1.Текст = "СмещениеШирина = " + Кнопка1.СмещениеШирина;
Сообщить(?(
Кнопка1.Текст = "СмещениеШирина = " + Кнопка1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Положение Объект";
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Код_свойство.os
Перем ДФ, Код1;
Процедура Свойство() Экспорт
Код1.Текст = "СмещениеШирина = " + Код1.СмещениеШирина;
Сообщить(?(
Код1.Текст = "СмещениеШирина = " + Код1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Код_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Код1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Код1 = Форма1.ДобавитьДочерний(ДФ.Код());
Код1.Текст = "Положение Объект";
Код1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Колонка_свойство.os
Перем ДФ, Колонка1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонка1.СмещениеШирина >= 0
, "", "!!! ") + "СмещениеШирина_Колонка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Колонка1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Колонка1 = Форма1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Колонтитул_свойство.os
Перем ДФ, Колонтитул1;
Процедура Свойство() Экспорт
Колонтитул1.Текст = "СмещениеШирина = " + Колонтитул1.СмещениеШирина;
Сообщить(?(
Колонтитул1.Текст = "СмещениеШирина = " + Колонтитул1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Колонтитул1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Колонтитул1 = Форма1.ДобавитьДочерний(ДФ.Колонтитул());
Колонтитул1.Текст = "Положение Объект";
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст1;
Процедура Свойство() Экспорт
КурсивТекст1.Текст = "СмещениеШирина = " + КурсивТекст1.СмещениеШирина;
Сообщить(?(
КурсивТекст1.Текст = "СмещениеШирина = " + КурсивТекст1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(КурсивТекст1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
КурсивТекст1 = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
КурсивТекст1.Текст = "Положение Объект";
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Линия_свойство.os
Перем ДФ, Линия1;
Процедура Свойство() Экспорт
Линия1.Текст = "СмещениеШирина = " + Линия1.СмещениеШирина;
Сообщить(?(
Линия1.Текст = "СмещениеШирина = " + Линия1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Линия1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Линия1 = Форма1.ДобавитьДочерний(ДФ.Линия());
Линия1.Текст = "Положение Объект";
Линия1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст1;
Процедура Свойство() Экспорт
МаркированныйТекст1.Текст = "СмещениеШирина = " + МаркированныйТекст1.СмещениеШирина;
Сообщить(?(
МаркированныйТекст1.Текст = "СмещениеШирина = " + МаркированныйТекст1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(МаркированныйТекст1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МаркированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
МаркированныйТекст1.Текст = "Положение Объект";
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_МедиаГруппа_свойство.os
Перем ДФ, МедиаГруппа1;
Процедура Свойство() Экспорт
МедиаГруппа1.Текст = "СмещениеШирина = " + МедиаГруппа1.СмещениеШирина;
Сообщить(?(
МедиаГруппа1.Текст = "СмещениеШирина = " + МедиаГруппа1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МедиаГруппа1 = Форма1.ДобавитьДочерний(ДФ.МедиаГруппа());
МедиаГруппа1.Текст = "Положение Объект";
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст1;
Процедура Свойство() Экспорт
МелкийТекст1.Текст = "СмещениеШирина = " + МелкийТекст1.СмещениеШирина;
Сообщить(?(
МелкийТекст1.Текст = "СмещениеШирина = " + МелкийТекст1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(МелкийТекст1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МелкийТекст1 = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
МелкийТекст1.Текст = "Положение Объект";
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст1;
Процедура Свойство() Экспорт
НадстрочныйТекст1.Текст = "СмещениеШирина = " + НадстрочныйТекст1.СмещениеШирина;
Сообщить(?(
НадстрочныйТекст1.Текст = "СмещениеШирина = " + НадстрочныйТекст1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(НадстрочныйТекст1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НадстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
НадстрочныйТекст1.Текст = "Положение Объект";
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст1;
Процедура Свойство() Экспорт
НаправленныйТекст1.Текст = "СмещениеШирина = " + НаправленныйТекст1.СмещениеШирина;
Сообщить(?(
НаправленныйТекст1.Текст = "СмещениеШирина = " + НаправленныйТекст1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(НаправленныйТекст1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НаправленныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
НаправленныйТекст1.Текст = "Положение Объект";
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_НеупорядоченныйСписок_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Свойство() Экспорт
НеупорядоченныйСписок1.Текст = "СмещениеШирина = " + НеупорядоченныйСписок1.СмещениеШирина;
Сообщить(?(
НеупорядоченныйСписок1.Текст = "СмещениеШирина = " + НеупорядоченныйСписок1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НеупорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
НеупорядоченныйСписок1.Текст = "Положение Объект";
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_НижнийКолонтитул_свойство.os
Перем ДФ, НижнийКолонтитул1;
Процедура Свойство() Экспорт
НижнийКолонтитул1.Текст = "СмещениеШирина = " + НижнийКолонтитул1.СмещениеШирина;
Сообщить(?(
НижнийКолонтитул1.Текст = "СмещениеШирина = " + НижнийКолонтитул1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НижнийКолонтитул1 = Форма1.ДобавитьДочерний(ДФ.НижнийКолонтитул());
НижнийКолонтитул1.Текст = "Положение Объект";
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Область_свойство.os
Перем ДФ, Область1;
Процедура Свойство() Экспорт
Область1.Текст = "СмещениеШирина = " + Область1.СмещениеШирина;
Сообщить(?(
Область1.Текст = "СмещениеШирина = " + Область1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Область1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Область1 = Форма1.ДобавитьДочерний(ДФ.Область());
Область1.Текст = "Положение Объект";
Область1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ОбластьТаблицы_свойство.os
Перем ДФ, ОбластьТаблицы1;
Процедура Свойство() Экспорт
ОбластьТаблицы1.Текст = "СмещениеШирина = " + ОбластьТаблицы1.СмещениеШирина;
Сообщить(?(
ОбластьТаблицы1.Текст = "СмещениеШирина = " + ОбластьТаблицы1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_ОбластьТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ОбластьТаблицы1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОбластьТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
ОбластьТаблицы1.Текст = "Положение Объект";
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ОписаниеМедиа_свойство.os
Перем ДФ, ОписаниеМедиа1;
Процедура Свойство() Экспорт
ОписаниеМедиа1.Текст = "СмещениеШирина = " + ОписаниеМедиа1.СмещениеШирина;
Сообщить(?(
ОписаниеМедиа1.Текст = "СмещениеШирина = " + ОписаниеМедиа1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОписаниеМедиа1 = Форма1.ДобавитьДочерний(ДФ.ОписаниеМедиа());
ОписаниеМедиа1.Текст = "Положение Объект";
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Определение_свойство.os
Перем ДФ, Определение1;
Процедура Свойство() Экспорт
Определение1.Текст = "СмещениеШирина = " + Определение1.СмещениеШирина;
Сообщить(?(
Определение1.Текст = "СмещениеШирина = " + Определение1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Определение1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Определение1 = Форма1.ДобавитьДочерний(ДФ.Определение());
Определение1.Текст = "Положение Объект";
Определение1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Переключатель_свойство.os
Перем ДФ, Переключатель1, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Переключатель1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Переключатель1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Переключатель1 = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 20;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Форма1.Открыть();
СмещениеШирина_Перенос_свойство.os
Перем ДФ, Перенос1;
Процедура Свойство() Экспорт
Сообщить(?(
Перенос1.СмещениеШирина >= 0
, "", "!!! ") + "СмещениеШирина_Перенос_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Перенос1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Перенос1 = Форма1.ДобавитьДочерний(ДФ.Перенос());
Перенос1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Подпись_свойство.os
Перем ДФ, Подпись1;
Процедура Свойство() Экспорт
Подпись1.Текст = "СмещениеШирина = " + Подпись1.СмещениеШирина;
Сообщить(?(
Подпись1.Текст = "СмещениеШирина = " + Подпись1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Подпись1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Подпись1 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Текст = "Положение Объект";
Подпись1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Свойство() Экспорт
ПодстрочныйТекст1.Текст = "СмещениеШирина = " + ПодстрочныйТекст1.СмещениеШирина;
Сообщить(?(
ПодстрочныйТекст1.Текст = "СмещениеШирина = " + ПодстрочныйТекст1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ПодстрочныйТекст1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПодстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
ПодстрочныйТекст1.Текст = "Положение Объект";
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Свойство() Экспорт
ПодчеркнутыйТекст1.Текст = "СмещениеШирина = " + ПодчеркнутыйТекст1.СмещениеШирина;
Сообщить(?(
ПодчеркнутыйТекст1.Текст = "СмещениеШирина = " + ПодчеркнутыйТекст1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ПодчеркнутыйТекст1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПодчеркнутыйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
ПодчеркнутыйТекст1.Текст = "Положение Объект";
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеПароля1 = Форма1.ДобавитьДочерний(ДФ.ПолеПароля());
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеПоиска1 = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеСписка1 = Форма1.ДобавитьДочерний(ДФ.ПолеСписка());
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеТекста1 = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеЧисла1 = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ползунок1 = Форма1.ДобавитьДочерний(ДФ.Ползунок());
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
РаскрываемыйБлок1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(РаскрываемыйБлок1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Результат_свойство.os
Перем ДФ, Результат1;
Процедура Свойство() Экспорт
Результат1.Текст = "СмещениеШирина = " + Результат1.СмещениеШирина;
Сообщить(?(
Результат1.Текст = "СмещениеШирина = " + Результат1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Результат1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Результат1 = Форма1.ДобавитьДочерний(ДФ.Результат());
Результат1.Текст = "Положение Объект";
Результат1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_СписокОпределений_свойство.os
Перем ДФ, СписокОпределений1;
Процедура Свойство() Экспорт
СписокОпределений1.Текст = "СмещениеШирина = " + СписокОпределений1.СмещениеШирина;
Сообщить(?(
СписокОпределений1.Текст = "СмещениеШирина = " + СписокОпределений1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
СписокОпределений1 = Форма1.ДобавитьДочерний(ДФ.СписокОпределений());
СписокОпределений1.Текст = "Положение Объект";
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Свойство() Экспорт
Ссылка1.Текст = "СмещениеШирина = " + Ссылка1.СмещениеШирина;
Сообщить(?(
Ссылка1.Текст = "СмещениеШирина = " + Ссылка1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ссылка1 = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка1.Текст = "Положение Объект";
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаТаблицы1;
Процедура Свойство() Экспорт
СтрокаТаблицы1.Текст = "СмещениеШирина = " + СтрокаТаблицы1.СмещениеШирина;
Сообщить(?(
СтрокаТаблицы1.Текст = "СмещениеШирина = " + СтрокаТаблицы1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(СтрокаТаблицы1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
СтрокаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаТаблицы1.Текст = "Положение Объект";
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Таблица1.Текст = "СмещениеШирина = " + Таблица1.СмещениеШирина;
Сообщить(?(
Таблица1.Текст = "СмещениеШирина = " + Таблица1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Текст = "Положение Объект";
Таблица1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Термин_свойство.os
Перем ДФ, Термин1;
Процедура Свойство() Экспорт
Термин1.Текст = "СмещениеШирина = " + Термин1.СмещениеШирина;
Сообщить(?(
Термин1.Текст = "СмещениеШирина = " + Термин1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Термин1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Термин1 = Форма1.ДобавитьДочерний(ДФ.Термин());
Термин1.Текст = "Положение Объект";
Термин1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст1;
Процедура Свойство() Экспорт
УдаленыйТекст1.Текст = "СмещениеШирина = " + УдаленыйТекст1.СмещениеШирина;
Сообщить(?(
УдаленыйТекст1.Текст = "СмещениеШирина = " + УдаленыйТекст1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(УдаленыйТекст1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
УдаленыйТекст1 = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
УдаленыйТекст1.Текст = "Положение Объект";
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Свойство() Экспорт
УпорядоченныйСписок1.Текст = "СмещениеШирина = " + УпорядоченныйСписок1.СмещениеШирина;
Сообщить(?(
УпорядоченныйСписок1.Текст = "СмещениеШирина = " + УпорядоченныйСписок1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
УпорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.УпорядоченныйСписок());
УпорядоченныйСписок1.Текст = "Положение Объект";
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Свойство() Экспорт
Сообщить(?(
Флажок1.СмещениеШирина >= 0
, "", "!!! ") + "СмещениеШирина_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Флажок1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Флажок1 = Форма1.ДобавитьДочерний(ДФ.Флажок());
Флажок1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст1;
Процедура Свойство() Экспорт
ФорматированныйТекст1.Текст = "СмещениеШирина = " + ФорматированныйТекст1.СмещениеШирина;
Сообщить(?(
ФорматированныйТекст1.Текст = "СмещениеШирина = " + ФорматированныйТекст1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ФорматированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
ФорматированныйТекст1.Текст = "Положение Объект";
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Фрейм_свойство.os
Перем ДФ, Фрейм1;
Процедура Свойство() Экспорт
Сообщить(?(
Фрейм1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_Фрейм_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Фрейм1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Фрейм1 = Форма1.ДобавитьДочерний(ДФ.Фрейм());
Фрейм1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Холст_свойство.os
Перем ДФ, Холст1;
Процедура Свойство() Экспорт
Сообщить(?(
Холст1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Холст1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ШапкаТаблицы_свойство.os
Перем ДФ, ШапкаТаблицы1;
Процедура Свойство() Экспорт
ШапкаТаблицы1.Текст = "СмещениеШирина = " + ШапкаТаблицы1.СмещениеШирина;
Сообщить(?(
ШапкаТаблицы1.Текст = "СмещениеШирина = " + ШапкаТаблицы1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_ШапкаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ШапкаТаблицы1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ШапкаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
ШапкаТаблицы1.Текст = "Положение Объект";
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Свойство() Экспорт
Сообщить(?(
Шкала1.СмещениеШирина >= 10
, "", "!!! ") + "СмещениеШирина_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Шкала1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Шкала1 = Форма1.ДобавитьДочерний(ДФ.Шкала());
Шкала1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Свойство() Экспорт
ЭлементПоляСписка1.Текст = "СмещениеШирина = " + ЭлементПоляСписка1.СмещениеШирина;
Сообщить(?(
ЭлементПоляСписка1.Текст = "СмещениеШирина = " + ЭлементПоляСписка1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЭлементПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементПоляСписка());
ЭлементПоляСписка1.Текст = "Положение Объект";
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ЭлементСписка_свойство.os
Перем ДФ, ЭлементСписка1;
Процедура Свойство() Экспорт
ЭлементСписка1.Текст = "СмещениеШирина = " + ЭлементСписка1.СмещениеШирина;
Сообщить(?(
ЭлементСписка1.Текст = "СмещениеШирина = " + ЭлементСписка1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЭлементСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Положение Объект";
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Свойство() Экспорт
Ячейка1.Текст = "СмещениеШирина = " + Ячейка1.СмещениеШирина;
Сообщить(?(
Ячейка1.Текст = "СмещениеШирина = " + Ячейка1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(Ячейка1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ячейка1 = Форма1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Положение Объект";
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СмещениеШирина_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура Свойство() Экспорт
ЯчейкаЗаголовка1.Текст = "СмещениеШирина = " + ЯчейкаЗаголовка1.СмещениеШирина;
Сообщить(?(
ЯчейкаЗаголовка1.Текст = "СмещениеШирина = " + ЯчейкаЗаголовка1.СмещениеШирина
, "", "!!! ") + "СмещениеШирина_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СмещениеШирина() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка1, "СмещениеШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
СмещениеШирина();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЯчейкаЗаголовка1 = Форма1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Положение Объект";
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Форма1.Открыть();
СнятьФокус_Абзац_метод.os
Перем ДФ, Абзац1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Абзац1.СнятьФокус();
КонецПроцедуры
Процедура Абзац1_ФокусПолучен() Экспорт
// Сообщить("Абзац1_ФокусПолучен");
КонецПроцедуры
Процедура Абзац1_ФокусПотерян() Экспорт
// Сообщить("Абзац1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Абзац_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Абзац1";
Абзац1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Абзац1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Абзац1_ФокусПолучен");
Абзац1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Абзац1_ФокусПотерян");
Абзац1.Редактируемый = Истина;
Абзац2 = ДФ.Абзац();
Абзац2.Родитель = Форма1;
Абзац2.Текст = "Это Абзац2";
Абзац2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Абзац2.Редактируемый = Истина;
Абзац1.Фокус();
Форма1.Открыть();
СнятьФокус_Артикль_метод.os
Перем ДФ, Артикль1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Артикль1.СнятьФокус();
КонецПроцедуры
Процедура Артикль1_ФокусПолучен() Экспорт
// Сообщить("Артикль1_ФокусПолучен");
КонецПроцедуры
Процедура Артикль1_ФокусПотерян() Экспорт
// Сообщить("Артикль1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Артикль_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Текст = "Это Артикль1";
Артикль1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Артикль1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Артикль1_ФокусПолучен");
Артикль1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Артикль1_ФокусПотерян");
Артикль1.Редактируемый = Истина;
Артикль2 = ДФ.Артикль();
Артикль2.Родитель = Форма1;
Артикль2.Текст = "Это Артикль2";
Артикль2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Артикль2.Редактируемый = Истина;
Артикль1.Фокус();
Форма1.Открыть();
СнятьФокус_Аудио_метод.os
Перем ДФ, Аудио1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Аудио1.СнятьФокус();
КонецПроцедуры
Процедура Аудио1_ФокусПолучен() Экспорт
// Сообщить("Аудио1_ФокусПолучен");
КонецПроцедуры
Процедура Аудио1_ФокусПотерян() Экспорт
// Сообщить("Аудио1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Аудио_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
// Аудио1.Источник = "file:///C:/444/Pic/Kaoma_Lambada.mp3";
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Аудио1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Аудио1_ФокусПолучен");
Аудио1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Аудио1_ФокусПотерян");
Аудио2 = ДФ.Аудио();
Аудио2.Родитель = Форма1;
Аудио2.Контролы = Истина;
// Аудио2.Источник = "file:///C:/444/Pic/Kaoma_Lambada.mp3";
Аудио2.Источник = "Kaoma_Lambada.mp3";
Аудио2.Стиль.ЦветФона = ДФ.Цвет.Бирюзовый;
Аудио1.Фокус();
Форма1.Открыть();
СнятьФокус_Блок_метод.os
Перем ДФ, Блок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Блок1.СнятьФокус();
КонецПроцедуры
Процедура Блок1_ФокусПолучен() Экспорт
// Сообщить("Блок1_ФокусПолучен");
КонецПроцедуры
Процедура Блок1_ФокусПотерян() Экспорт
// Сообщить("Блок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Блок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Это Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Блок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Блок1_ФокусПолучен");
Блок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Блок1_ФокусПотерян");
Блок1.Редактируемый = Истина;
Блок2 = ДФ.Блок();
Блок2.Родитель = Форма1;
Блок2.Текст = "Это Блок2";
Блок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Блок2.Редактируемый = Истина;
Блок1.Фокус();
Форма1.Открыть();
СнятьФокус_ВыборВремени_метод.os
Перем ДФ, ВыборВремени1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ВыборВремени1.СнятьФокус();
КонецПроцедуры
Процедура ВыборВремени1_ФокусПолучен() Экспорт
// Сообщить("ВыборВремени1_ФокусПолучен");
КонецПроцедуры
Процедура ВыборВремени1_ФокусПотерян() Экспорт
// Сообщить("ВыборВремени1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ВыборВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборВремени1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборВремени1_ФокусПолучен");
ВыборВремени1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборВремени1_ФокусПотерян");
ВыборВремени1.Редактируемый = Истина;
ВыборВремени2 = ДФ.ВыборВремени();
ВыборВремени2.Родитель = Форма1;
ВыборВремени2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборВремени2.Редактируемый = Истина;
ВыборВремени1.Фокус();
Форма1.Открыть();
СнятьФокус_ВыборДаты_метод.os
Перем ДФ, ВыборДаты1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ВыборДаты1.СнятьФокус();
КонецПроцедуры
Процедура ВыборДаты1_ФокусПолучен() Экспорт
// Сообщить("ВыборДаты1_ФокусПолучен");
КонецПроцедуры
Процедура ВыборДаты1_ФокусПотерян() Экспорт
// Сообщить("ВыборДаты1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ВыборДаты_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборДаты1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_ФокусПолучен");
ВыборДаты1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_ФокусПотерян");
ВыборДаты1.Редактируемый = Истина;
ВыборДаты2 = ДФ.ВыборДаты();
ВыборДаты2.Родитель = Форма1;
ВыборДаты2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборДаты2.Редактируемый = Истина;
ВыборДаты1.Фокус();
Форма1.Открыть();
СнятьФокус_ВыборДатыВремени_метод.os
Перем ДФ, ВыборДатыВремени1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ВыборДатыВремени1.СнятьФокус();
КонецПроцедуры
Процедура ВыборДатыВремени1_ФокусПолучен() Экспорт
// Сообщить("ВыборДатыВремени1_ФокусПолучен");
КонецПроцедуры
Процедура ВыборДатыВремени1_ФокусПотерян() Экспорт
// Сообщить("ВыборДатыВремени1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ВыборДатыВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборДатыВремени1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_ФокусПолучен");
ВыборДатыВремени1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_ФокусПотерян");
ВыборДатыВремени1.Редактируемый = Истина;
ВыборДатыВремени2 = ДФ.ВыборДатыВремени();
ВыборДатыВремени2.Родитель = Форма1;
ВыборДатыВремени2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборДатыВремени2.Редактируемый = Истина;
ВыборДатыВремени1.Фокус();
Форма1.Открыть();
СнятьФокус_ВыборМестнойДатыВремени_метод.os
Перем ДФ, ВыборМестнойДатыВремени1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ВыборМестнойДатыВремени1.СнятьФокус();
КонецПроцедуры
Процедура ВыборМестнойДатыВремени1_ФокусПолучен() Экспорт
// Сообщить("ВыборМестнойДатыВремени1_ФокусПолучен");
КонецПроцедуры
Процедура ВыборМестнойДатыВремени1_ФокусПотерян() Экспорт
// Сообщить("ВыборМестнойДатыВремени1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ВыборМестнойДатыВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборМестнойДатыВремени1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборМестнойДатыВремени1_ФокусПолучен");
ВыборМестнойДатыВремени1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборМестнойДатыВремени1_ФокусПотерян");
ВыборМестнойДатыВремени1.Редактируемый = Истина;
ВыборМестнойДатыВремени2 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени2.Родитель = Форма1;
ВыборМестнойДатыВремени2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборМестнойДатыВремени2.Редактируемый = Истина;
ВыборМестнойДатыВремени1.Фокус();
Форма1.Открыть();
СнятьФокус_ВыборМесяца_метод.os
Перем ДФ, ВыборМесяца1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ВыборМесяца1.СнятьФокус();
КонецПроцедуры
Процедура ВыборМесяца1_ФокусПолучен() Экспорт
// Сообщить("ВыборМесяца1_ФокусПолучен");
КонецПроцедуры
Процедура ВыборМесяца1_ФокусПотерян() Экспорт
// Сообщить("ВыборМесяца1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ВыборМесяца_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборМесяца1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_ФокусПолучен");
ВыборМесяца1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_ФокусПотерян");
ВыборМесяца1.Редактируемый = Истина;
ВыборМесяца2 = ДФ.ВыборМесяца();
ВыборМесяца2.Родитель = Форма1;
ВыборМесяца2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборМесяца2.Редактируемый = Истина;
ВыборМесяца1.Фокус();
Форма1.Открыть();
СнятьФокус_ВыборНедели_метод.os
Перем ДФ, ВыборНедели1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ВыборНедели1.СнятьФокус();
КонецПроцедуры
Процедура ВыборНедели1_ФокусПолучен() Экспорт
// Сообщить("ВыборНедели1_ФокусПолучен");
КонецПроцедуры
Процедура ВыборНедели1_ФокусПотерян() Экспорт
// Сообщить("ВыборНедели1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ВыборНедели_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборНедели1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_ФокусПолучен");
ВыборНедели1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_ФокусПотерян");
ВыборНедели1.Редактируемый = Истина;
ВыборНедели2 = ДФ.ВыборНедели();
ВыборНедели2.Родитель = Форма1;
ВыборНедели2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборНедели2.Редактируемый = Истина;
ВыборНедели1.Фокус();
Форма1.Открыть();
СнятьФокус_ВыборФайла_метод.os
Перем ДФ, ВыборФайла1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ВыборФайла1.СнятьФокус();
КонецПроцедуры
Процедура ВыборФайла1_ФокусПолучен() Экспорт
// Сообщить("ВыборФайла1_ФокусПолучен");
КонецПроцедуры
Процедура ВыборФайла1_ФокусПотерян() Экспорт
// Сообщить("ВыборФайла1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ВыборФайла_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборФайла1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборФайла1_ФокусПолучен");
ВыборФайла1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборФайла1_ФокусПотерян");
ВыборФайла1.Редактируемый = Истина;
ВыборФайла2 = ДФ.ВыборФайла();
ВыборФайла2.Родитель = Форма1;
ВыборФайла2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборФайла2.Редактируемый = Истина;
ВыборФайла1.Фокус();
Форма1.Открыть();
СнятьФокус_ВыборЦвета_метод.os
Перем ДФ, ВыборЦвета1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ВыборЦвета1.СнятьФокус();
КонецПроцедуры
Процедура ВыборЦвета1_ФокусПолучен() Экспорт
// Сообщить("ВыборЦвета1_ФокусПолучен");
КонецПроцедуры
Процедура ВыборЦвета1_ФокусПотерян() Экспорт
// Сообщить("ВыборЦвета1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ВыборЦвета_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборЦвета1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборЦвета1_ФокусПолучен");
ВыборЦвета1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборЦвета1_ФокусПотерян");
ВыборЦвета1.Редактируемый = Истина;
ВыборЦвета2 = ДФ.ВыборЦвета();
ВыборЦвета2.Родитель = Форма1;
ВыборЦвета2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборЦвета2.Редактируемый = Истина;
ВыборЦвета1.Фокус();
Форма1.Открыть();
СнятьФокус_Группа_метод.os
Перем ДФ, Группа1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Группа1.СнятьФокус();
КонецПроцедуры
Процедура Группа1_ФокусПолучен() Экспорт
// Сообщить("Группа1_ФокусПолучен");
КонецПроцедуры
Процедура Группа1_ФокусПотерян() Экспорт
// Сообщить("Группа1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Группа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Текст = "Это Группа1";
Группа1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Группа1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Группа1_ФокусПолучен");
Группа1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Группа1_ФокусПотерян");
Группа1.Редактируемый = Истина;
Группа2 = ДФ.Группа();
Группа2.Родитель = Форма1;
Группа2.Текст = "Это Группа2";
Группа2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Группа2.Редактируемый = Истина;
Группа1.Фокус();
Форма1.Открыть();
СнятьФокус_ГруппаКолонок_метод.os
Перем ДФ, ГруппаКолонок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ГруппаКолонок1.СнятьФокус();
КонецПроцедуры
Процедура ГруппаКолонок1_ФокусПолучен() Экспорт
// Сообщить("ГруппаКолонок1_ФокусПолучен");
КонецПроцедуры
Процедура ГруппаКолонок1_ФокусПотерян() Экспорт
// Сообщить("ГруппаКолонок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ГруппаКолонок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Форма1;
ГруппаКолонок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ГруппаКолонок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ГруппаКолонок1_ФокусПолучен");
ГруппаКолонок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ГруппаКолонок1_ФокусПотерян");
ГруппаКолонок1.Редактируемый = Истина;
ГруппаКолонок2 = ДФ.ГруппаКолонок();
ГруппаКолонок2.Родитель = Форма1;
ГруппаКолонок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ГруппаКолонок2.Редактируемый = Истина;
ГруппаКолонок1.Фокус();
Форма1.Открыть();
СнятьФокус_ГруппировкаПоляСписка_метод.os
Перем ДФ, ГруппировкаПоляСписка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ГруппировкаПоляСписка1.СнятьФокус();
КонецПроцедуры
Процедура ГруппировкаПоляСписка1_ФокусПолучен() Экспорт
// Сообщить("ГруппировкаПоляСписка1_ФокусПолучен");
КонецПроцедуры
Процедура ГруппировкаПоляСписка1_ФокусПотерян() Экспорт
// Сообщить("ГруппировкаПоляСписка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ГруппировкаПоляСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ГруппировкаПоляСписка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ГруппировкаПоляСписка1_ФокусПолучен");
ГруппировкаПоляСписка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ГруппировкаПоляСписка1_ФокусПотерян");
ГруппировкаПоляСписка1.Редактируемый = Истина;
ГруппировкаПоляСписка2 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка2.Родитель = Форма1;
ГруппировкаПоляСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ГруппировкаПоляСписка2.Редактируемый = Истина;
ГруппировкаПоляСписка1.Фокус();
Форма1.Открыть();
СнятьФокус_Диалог_метод.os
Перем ДФ, Диалог1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Диалог1.СнятьФокус();
КонецПроцедуры
Процедура Диалог1_ФокусПолучен() Экспорт
// Сообщить("Диалог1_ФокусПолучен");
КонецПроцедуры
Процедура Диалог1_ФокусПотерян() Экспорт
// Сообщить("Диалог1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Диалог_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Текст = "Это Диалог1";
Диалог1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Диалог1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Диалог1_ФокусПолучен");
Диалог1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Диалог1_ФокусПотерян");
Диалог1.Редактируемый = Истина;
Диалог2 = ДФ.Диалог();
Диалог2.Родитель = Форма1;
Диалог2.Текст = "Это Диалог2";
Диалог2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Диалог2.Редактируемый = Истина;
Диалог1.Показать();
// Диалог2.Показать();
Диалог1.Фокус();
Форма1.Открыть();
СнятьФокус_ДополнительныйБлок_метод.os
Перем ДФ, ДополнительныйБлок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ДополнительныйБлок1.СнятьФокус();
КонецПроцедуры
Процедура ДополнительныйБлок1_ФокусПолучен() Экспорт
// Сообщить("ДополнительныйБлок1_ФокусПолучен");
КонецПроцедуры
Процедура ДополнительныйБлок1_ФокусПотерян() Экспорт
// Сообщить("ДополнительныйБлок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ДополнительныйБлок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "Это ДополнительныйБлок1";
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ДополнительныйБлок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ДополнительныйБлок1_ФокусПолучен");
ДополнительныйБлок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ДополнительныйБлок1_ФокусПотерян");
ДополнительныйБлок1.Редактируемый = Истина;
ДополнительныйБлок2 = ДФ.ДополнительныйБлок();
ДополнительныйБлок2.Родитель = Форма1;
ДополнительныйБлок2.Текст = "Это ДополнительныйБлок2";
ДополнительныйБлок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ДополнительныйБлок2.Редактируемый = Истина;
ДополнительныйБлок1.Фокус();
Форма1.Открыть();
СнятьФокус_ЖирныйТекст_метод.os
Перем ДФ, ЖирныйТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ЖирныйТекст1.СнятьФокус();
КонецПроцедуры
Процедура ЖирныйТекст1_ФокусПолучен() Экспорт
// Сообщить("ЖирныйТекст1_ФокусПолучен");
КонецПроцедуры
Процедура ЖирныйТекст1_ФокусПотерян() Экспорт
// Сообщить("ЖирныйТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ЖирныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Текст = "Это ЖирныйТекст1";
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЖирныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЖирныйТекст1_ФокусПолучен");
ЖирныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЖирныйТекст1_ФокусПотерян");
ЖирныйТекст1.Редактируемый = Истина;
ЖирныйТекст2 = ДФ.ЖирныйТекст();
ЖирныйТекст2.Родитель = Форма1;
ЖирныйТекст2.Текст = "Это ЖирныйТекст2";
ЖирныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЖирныйТекст2.Редактируемый = Истина;
ЖирныйТекст1.Фокус();
Форма1.Открыть();
СнятьФокус_Заголовок1_метод.os
Перем ДФ, Заголовок11, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Заголовок11.СнятьФокус();
КонецПроцедуры
Процедура Заголовок11_ФокусПолучен() Экспорт
// Сообщить("Заголовок11_ФокусПолучен");
КонецПроцедуры
Процедура Заголовок11_ФокусПотерян() Экспорт
// Сообщить("Заголовок11_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Заголовок1_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Текст = "Это Заголовок11";
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок11.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок11_ФокусПолучен");
Заголовок11.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок11_ФокусПотерян");
Заголовок11.Редактируемый = Истина;
Заголовок12 = ДФ.Заголовок1();
Заголовок12.Родитель = Форма1;
Заголовок12.Текст = "Это Заголовок12";
Заголовок12.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок12.Редактируемый = Истина;
Заголовок11.Фокус();
Форма1.Открыть();
СнятьФокус_Заголовок2_метод.os
Перем ДФ, Заголовок21, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Заголовок21.СнятьФокус();
КонецПроцедуры
Процедура Заголовок21_ФокусПолучен() Экспорт
// Сообщить("Заголовок21_ФокусПолучен");
КонецПроцедуры
Процедура Заголовок21_ФокусПотерян() Экспорт
// Сообщить("Заголовок21_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Заголовок2_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Текст = "Это Заголовок21";
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок21.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок21_ФокусПолучен");
Заголовок21.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок21_ФокусПотерян");
Заголовок21.Редактируемый = Истина;
Заголовок22 = ДФ.Заголовок2();
Заголовок22.Родитель = Форма1;
Заголовок22.Текст = "Это Заголовок22";
Заголовок22.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок22.Редактируемый = Истина;
Заголовок21.Фокус();
Форма1.Открыть();
СнятьФокус_Заголовок3_метод.os
Перем ДФ, Заголовок31, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Заголовок31.СнятьФокус();
КонецПроцедуры
Процедура Заголовок31_ФокусПолучен() Экспорт
// Сообщить("Заголовок31_ФокусПолучен");
КонецПроцедуры
Процедура Заголовок31_ФокусПотерян() Экспорт
// Сообщить("Заголовок31_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Заголовок3_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Текст = "Это Заголовок31";
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок31.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок31_ФокусПолучен");
Заголовок31.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок31_ФокусПотерян");
Заголовок31.Редактируемый = Истина;
Заголовок32 = ДФ.Заголовок3();
Заголовок32.Родитель = Форма1;
Заголовок32.Текст = "Это Заголовок32";
Заголовок32.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок32.Редактируемый = Истина;
Заголовок31.Фокус();
Форма1.Открыть();
СнятьФокус_Заголовок4_метод.os
Перем ДФ, Заголовок41, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Заголовок41.СнятьФокус();
КонецПроцедуры
Процедура Заголовок41_ФокусПолучен() Экспорт
// Сообщить("Заголовок41_ФокусПолучен");
КонецПроцедуры
Процедура Заголовок41_ФокусПотерян() Экспорт
// Сообщить("Заголовок41_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Заголовок4_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Текст = "Это Заголовок41";
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок41.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок41_ФокусПолучен");
Заголовок41.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок41_ФокусПотерян");
Заголовок41.Редактируемый = Истина;
Заголовок42 = ДФ.Заголовок4();
Заголовок42.Родитель = Форма1;
Заголовок42.Текст = "Это Заголовок42";
Заголовок42.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок42.Редактируемый = Истина;
Заголовок41.Фокус();
Форма1.Открыть();
СнятьФокус_Заголовок5_метод.os
Перем ДФ, Заголовок51, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Заголовок51.СнятьФокус();
КонецПроцедуры
Процедура Заголовок51_ФокусПолучен() Экспорт
// Сообщить("Заголовок51_ФокусПолучен");
КонецПроцедуры
Процедура Заголовок51_ФокусПотерян() Экспорт
// Сообщить("Заголовок51_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Заголовок5_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Текст = "Это Заголовок51";
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок51.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок51_ФокусПолучен");
Заголовок51.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок51_ФокусПотерян");
Заголовок51.Редактируемый = Истина;
Заголовок52 = ДФ.Заголовок5();
Заголовок52.Родитель = Форма1;
Заголовок52.Текст = "Это Заголовок52";
Заголовок52.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок52.Редактируемый = Истина;
Заголовок51.Фокус();
Форма1.Открыть();
СнятьФокус_Заголовок6_метод.os
Перем ДФ, Заголовок61, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Заголовок61.СнятьФокус();
КонецПроцедуры
Процедура Заголовок61_ФокусПолучен() Экспорт
// Сообщить("Заголовок61_ФокусПолучен");
КонецПроцедуры
Процедура Заголовок61_ФокусПотерян() Экспорт
// Сообщить("Заголовок61_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Заголовок6_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Текст = "Это Заголовок61";
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок61.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок61_ФокусПолучен");
Заголовок61.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок61_ФокусПотерян");
Заголовок61.Редактируемый = Истина;
Заголовок62 = ДФ.Заголовок6();
Заголовок62.Родитель = Форма1;
Заголовок62.Текст = "Это Заголовок62";
Заголовок62.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок62.Редактируемый = Истина;
Заголовок61.Фокус();
Форма1.Открыть();
СнятьФокус_Заголовок_метод.os
Перем ДФ, Заголовок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Заголовок1.СнятьФокус();
КонецПроцедуры
Процедура Заголовок1_ФокусПолучен() Экспорт
// Сообщить("Заголовок1_ФокусПолучен");
КонецПроцедуры
Процедура Заголовок1_ФокусПотерян() Экспорт
// Сообщить("Заголовок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Заголовок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Текст = "Это Заголовок1";
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок1_ФокусПолучен");
Заголовок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок1_ФокусПотерян");
Заголовок1.Редактируемый = Истина;
Заголовок2 = ДФ.Заголовок();
Заголовок2.Родитель = Форма1;
Заголовок2.Текст = "Это Заголовок2";
Заголовок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок2.Редактируемый = Истина;
Заголовок1.Фокус();
Форма1.Открыть();
СнятьФокус_ЗаголовокГруппы_метод.os
Перем ДФ, ЗаголовокГруппы1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ЗаголовокГруппы1.СнятьФокус();
КонецПроцедуры
Процедура ЗаголовокГруппы1_ФокусПолучен() Экспорт
// Сообщить("ЗаголовокГруппы1_ФокусПолучен");
КонецПроцедуры
Процедура ЗаголовокГруппы1_ФокусПотерян() Экспорт
// Сообщить("ЗаголовокГруппы1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ЗаголовокГруппы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Текст = "Это ЗаголовокГруппы1";
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЗаголовокГруппы1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЗаголовокГруппы1_ФокусПолучен");
ЗаголовокГруппы1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЗаголовокГруппы1_ФокусПотерян");
ЗаголовокГруппы1.Редактируемый = Истина;
ЗаголовокГруппы2 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы2.Родитель = Форма1;
ЗаголовокГруппы2.Текст = "Это ЗаголовокГруппы2";
ЗаголовокГруппы2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЗаголовокГруппы2.Редактируемый = Истина;
ЗаголовокГруппы1.Фокус();
Форма1.Открыть();
СнятьФокус_ЗаголовокРаскрываемогоБлока_метод.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ЗаголовокРаскрываемогоБлока1.СнятьФокус();
КонецПроцедуры
Процедура ЗаголовокРаскрываемогоБлока1_ФокусПолучен() Экспорт
// Сообщить("ЗаголовокРаскрываемогоБлока1_ФокусПолучен");
КонецПроцедуры
Процедура ЗаголовокРаскрываемогоБлока1_ФокусПотерян() Экспорт
// Сообщить("ЗаголовокРаскрываемогоБлока1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ЗаголовокРаскрываемогоБлока_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Текст = "Это ЗаголовокРаскрываемогоБлока1";
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЗаголовокРаскрываемогоБлока1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЗаголовокРаскрываемогоБлока1_ФокусПолучен");
ЗаголовокРаскрываемогоБлока1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЗаголовокРаскрываемогоБлока1_ФокусПотерян");
ЗаголовокРаскрываемогоБлока1.Редактируемый = Истина;
ЗаголовокРаскрываемогоБлока2 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока2.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока2.Текст = "Это ЗаголовокРаскрываемогоБлока2";
ЗаголовокРаскрываемогоБлока2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЗаголовокРаскрываемогоБлока2.Редактируемый = Истина;
ЗаголовокРаскрываемогоБлока1.Фокус();
Форма1.Открыть();
СнятьФокус_Изображение_метод.os
Перем ДФ, Изображение1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Изображение1.СнятьФокус();
КонецПроцедуры
Процедура Изображение1_ФокусПолучен() Экспорт
// Сообщить("Изображение1_ФокусПолучен");
КонецПроцедуры
Процедура Изображение1_ФокусПотерян() Экспорт
// Сообщить("Изображение1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Изображение_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Изображение1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Изображение1_ФокусПолучен");
Изображение1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Изображение1_ФокусПотерян");
Изображение1.Редактируемый = Истина;
Изображение2 = ДФ.Изображение();
Изображение2.Родитель = Форма1;
Изображение2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Изображение2.Редактируемый = Истина;
Изображение1.Фокус();
Форма1.Открыть();
СнятьФокус_Индикатор_метод.os
Перем ДФ, Индикатор1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Индикатор1.СнятьФокус();
КонецПроцедуры
Процедура Индикатор1_ФокусПолучен() Экспорт
// Сообщить("Индикатор1_ФокусПолучен");
КонецПроцедуры
Процедура Индикатор1_ФокусПотерян() Экспорт
// Сообщить("Индикатор1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Индикатор_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Индикатор1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Индикатор1_ФокусПолучен");
Индикатор1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Индикатор1_ФокусПотерян");
Индикатор1.Редактируемый = Истина;
Индикатор2 = ДФ.Индикатор();
Индикатор2.Родитель = Форма1;
Индикатор2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Индикатор2.Редактируемый = Истина;
Индикатор1.Фокус();
Форма1.Открыть();
СнятьФокус_Итоги_метод.os
Перем ДФ, Итоги1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Итоги1.СнятьФокус();
КонецПроцедуры
Процедура Итоги1_ФокусПолучен() Экспорт
// Сообщить("Итоги1_ФокусПолучен");
КонецПроцедуры
Процедура Итоги1_ФокусПотерян() Экспорт
// Сообщить("Итоги1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Итоги_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Текст = "Это Итоги1";
Итоги1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Итоги1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Итоги1_ФокусПолучен");
Итоги1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Итоги1_ФокусПотерян");
Итоги1.Редактируемый = Истина;
Итоги2 = ДФ.Итоги();
Итоги2.Родитель = Форма1;
Итоги2.Текст = "Это Итоги2";
Итоги2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Итоги2.Редактируемый = Истина;
Итоги1.Фокус();
Форма1.Открыть();
СнятьФокус_Кнопка_метод.os
Перем ДФ, Кнопка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Кнопка1.СнятьФокус();
КонецПроцедуры
Процедура Кнопка1_ФокусПолучен() Экспорт
// Сообщить("Кнопка1_ФокусПолучен");
КонецПроцедуры
Процедура Кнопка1_ФокусПотерян() Экспорт
// Сообщить("Кнопка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Кнопка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Кнопка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Кнопка1_ФокусПолучен");
Кнопка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Кнопка1_ФокусПотерян");
Кнопка1.Редактируемый = Истина;
Кнопка2 = ДФ.Кнопка();
Кнопка2.Родитель = Форма1;
Кнопка2.Текст = "Это Кнопка2";
Кнопка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Кнопка2.Редактируемый = Истина;
Кнопка1.Фокус();
Форма1.Открыть();
СнятьФокус_Код_метод.os
Перем ДФ, Код1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Код1.СнятьФокус();
КонецПроцедуры
Процедура Код1_ФокусПолучен() Экспорт
// Сообщить("Код1_ФокусПолучен");
КонецПроцедуры
Процедура Код1_ФокусПотерян() Экспорт
// Сообщить("Код1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Код_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Текст = "Это Код1";
Код1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Код1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Код1_ФокусПолучен");
Код1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Код1_ФокусПотерян");
Код1.Редактируемый = Истина;
Код2 = ДФ.Код();
Код2.Родитель = Форма1;
Код2.Текст = "Это Код2";
Код2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Код2.Редактируемый = Истина;
Код1.Фокус();
Форма1.Открыть();
СнятьФокус_Колонка_метод.os
Перем ДФ, Колонка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Колонка1.СнятьФокус();
КонецПроцедуры
Процедура Колонка1_ФокусПолучен() Экспорт
// Сообщить("Колонка1_ФокусПолучен");
КонецПроцедуры
Процедура Колонка1_ФокусПотерян() Экспорт
// Сообщить("Колонка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Колонка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = Форма1;
Колонка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Колонка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Колонка1_ФокусПолучен");
Колонка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Колонка1_ФокусПотерян");
Колонка1.Редактируемый = Истина;
Колонка2 = ДФ.Колонка();
Колонка2.Родитель = Форма1;
Колонка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Колонка2.Редактируемый = Истина;
Колонка1.Фокус();
Форма1.Открыть();
СнятьФокус_Колонтитул_метод.os
Перем ДФ, Колонтитул1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Колонтитул1.СнятьФокус();
КонецПроцедуры
Процедура Колонтитул1_ФокусПолучен() Экспорт
// Сообщить("Колонтитул1_ФокусПолучен");
КонецПроцедуры
Процедура Колонтитул1_ФокусПотерян() Экспорт
// Сообщить("Колонтитул1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Колонтитул_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Текст = "Это Колонтитул1";
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Колонтитул1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Колонтитул1_ФокусПолучен");
Колонтитул1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Колонтитул1_ФокусПотерян");
Колонтитул1.Редактируемый = Истина;
Колонтитул2 = ДФ.Колонтитул();
Колонтитул2.Родитель = Форма1;
Колонтитул2.Текст = "Это Колонтитул2";
Колонтитул2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Колонтитул2.Редактируемый = Истина;
Колонтитул1.Фокус();
Форма1.Открыть();
СнятьФокус_КурсивТекст_метод.os
Перем ДФ, КурсивТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
КурсивТекст1.СнятьФокус();
КонецПроцедуры
Процедура КурсивТекст1_ФокусПолучен() Экспорт
// Сообщить("КурсивТекст1_ФокусПолучен");
КонецПроцедуры
Процедура КурсивТекст1_ФокусПотерян() Экспорт
// Сообщить("КурсивТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_КурсивТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Текст = "Это КурсивТекст1";
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
КурсивТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "КурсивТекст1_ФокусПолучен");
КурсивТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "КурсивТекст1_ФокусПотерян");
КурсивТекст1.Редактируемый = Истина;
КурсивТекст2 = ДФ.КурсивТекст();
КурсивТекст2.Родитель = Форма1;
КурсивТекст2.Текст = "Это КурсивТекст2";
КурсивТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
КурсивТекст2.Редактируемый = Истина;
КурсивТекст1.Фокус();
Форма1.Открыть();
СнятьФокус_МаркированныйТекст_метод.os
Перем ДФ, МаркированныйТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
МаркированныйТекст1.СнятьФокус();
КонецПроцедуры
Процедура МаркированныйТекст1_ФокусПолучен() Экспорт
// Сообщить("МаркированныйТекст1_ФокусПолучен");
КонецПроцедуры
Процедура МаркированныйТекст1_ФокусПотерян() Экспорт
// Сообщить("МаркированныйТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_МаркированныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Текст = "Это МаркированныйТекст1";
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
МаркированныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "МаркированныйТекст1_ФокусПолучен");
МаркированныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "МаркированныйТекст1_ФокусПотерян");
МаркированныйТекст1.Редактируемый = Истина;
МаркированныйТекст2 = ДФ.МаркированныйТекст();
МаркированныйТекст2.Родитель = Форма1;
МаркированныйТекст2.Текст = "Это МаркированныйТекст2";
МаркированныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
МаркированныйТекст2.Редактируемый = Истина;
МаркированныйТекст1.Фокус();
Форма1.Открыть();
СнятьФокус_МедиаГруппа_метод.os
Перем ДФ, МедиаГруппа1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
МедиаГруппа1.СнятьФокус();
КонецПроцедуры
Процедура МедиаГруппа1_ФокусПолучен() Экспорт
// Сообщить("МедиаГруппа1_ФокусПолучен");
КонецПроцедуры
Процедура МедиаГруппа1_ФокусПотерян() Экспорт
// Сообщить("МедиаГруппа1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_МедиаГруппа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Текст = "Это МедиаГруппа1";
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.Красный;
МедиаГруппа1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "МедиаГруппа1_ФокусПолучен");
МедиаГруппа1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "МедиаГруппа1_ФокусПотерян");
МедиаГруппа1.Редактируемый = Истина;
МедиаГруппа2 = ДФ.МедиаГруппа();
МедиаГруппа2.Родитель = Форма1;
МедиаГруппа2.Текст = "Это МедиаГруппа2";
МедиаГруппа2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
МедиаГруппа2.Редактируемый = Истина;
МедиаГруппа1.Фокус();
Форма1.Открыть();
СнятьФокус_МелкийТекст_метод.os
Перем ДФ, МелкийТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
МелкийТекст1.СнятьФокус();
КонецПроцедуры
Процедура МелкийТекст1_ФокусПолучен() Экспорт
// Сообщить("МелкийТекст1_ФокусПолучен");
КонецПроцедуры
Процедура МелкийТекст1_ФокусПотерян() Экспорт
// Сообщить("МелкийТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_МелкийТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Текст = "Это МелкийТекст1";
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
МелкийТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "МелкийТекст1_ФокусПолучен");
МелкийТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "МелкийТекст1_ФокусПотерян");
МелкийТекст1.Редактируемый = Истина;
МелкийТекст2 = ДФ.МелкийТекст();
МелкийТекст2.Родитель = Форма1;
МелкийТекст2.Текст = "Это МелкийТекст2";
МелкийТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
МелкийТекст2.Редактируемый = Истина;
МелкийТекст1.Фокус();
Форма1.Открыть();
СнятьФокус_НадстрочныйТекст_метод.os
Перем ДФ, НадстрочныйТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
НадстрочныйТекст1.СнятьФокус();
КонецПроцедуры
Процедура НадстрочныйТекст1_ФокусПолучен() Экспорт
// Сообщить("НадстрочныйТекст1_ФокусПолучен");
КонецПроцедуры
Процедура НадстрочныйТекст1_ФокусПотерян() Экспорт
// Сообщить("НадстрочныйТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_НадстрочныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Текст = "Это НадстрочныйТекст1";
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НадстрочныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "НадстрочныйТекст1_ФокусПолучен");
НадстрочныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "НадстрочныйТекст1_ФокусПотерян");
НадстрочныйТекст1.Редактируемый = Истина;
НадстрочныйТекст2 = ДФ.НадстрочныйТекст();
НадстрочныйТекст2.Родитель = Форма1;
НадстрочныйТекст2.Текст = "Это НадстрочныйТекст2";
НадстрочныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
НадстрочныйТекст2.Редактируемый = Истина;
НадстрочныйТекст1.Фокус();
Форма1.Открыть();
СнятьФокус_НаправленныйТекст_метод.os
Перем ДФ, НаправленныйТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
НаправленныйТекст1.СнятьФокус();
КонецПроцедуры
Процедура НаправленныйТекст1_ФокусПолучен() Экспорт
// Сообщить("НаправленныйТекст1_ФокусПолучен");
КонецПроцедуры
Процедура НаправленныйТекст1_ФокусПотерян() Экспорт
// Сообщить("НаправленныйТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_НаправленныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Текст = "Это НаправленныйТекст1";
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НаправленныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "НаправленныйТекст1_ФокусПолучен");
НаправленныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "НаправленныйТекст1_ФокусПотерян");
НаправленныйТекст1.Редактируемый = Истина;
НаправленныйТекст2 = ДФ.НаправленныйТекст();
НаправленныйТекст2.Родитель = Форма1;
НаправленныйТекст2.Текст = "Это НаправленныйТекст2";
НаправленныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
НаправленныйТекст2.Редактируемый = Истина;
НаправленныйТекст1.Фокус();
Форма1.Открыть();
СнятьФокус_НеупорядоченныйСписок_метод.os
Перем ДФ, НеупорядоченныйСписок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
НеупорядоченныйСписок1.СнятьФокус();
КонецПроцедуры
Процедура НеупорядоченныйСписок1_ФокусПолучен() Экспорт
// Сообщить("НеупорядоченныйСписок1_ФокусПолучен");
КонецПроцедуры
Процедура НеупорядоченныйСписок1_ФокусПотерян() Экспорт
// Сообщить("НеупорядоченныйСписок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_НеупорядоченныйСписок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Текст = "Это НеупорядоченныйСписок1";
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НеупорядоченныйСписок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "НеупорядоченныйСписок1_ФокусПолучен");
НеупорядоченныйСписок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "НеупорядоченныйСписок1_ФокусПотерян");
НеупорядоченныйСписок1.Редактируемый = Истина;
НеупорядоченныйСписок2 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок2.Родитель = Форма1;
НеупорядоченныйСписок2.Текст = "Это НеупорядоченныйСписок2";
НеупорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
НеупорядоченныйСписок2.Редактируемый = Истина;
НеупорядоченныйСписок1.Фокус();
Форма1.Открыть();
СнятьФокус_НижнийКолонтитул_метод.os
Перем ДФ, НижнийКолонтитул1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
НижнийКолонтитул1.СнятьФокус();
КонецПроцедуры
Процедура НижнийКолонтитул1_ФокусПолучен() Экспорт
// Сообщить("НижнийКолонтитул1_ФокусПолучен");
КонецПроцедуры
Процедура НижнийКолонтитул1_ФокусПотерян() Экспорт
// Сообщить("НижнийКолонтитул1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_НижнийКолонтитул_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Текст = "Это НижнийКолонтитул1";
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НижнийКолонтитул1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "НижнийКолонтитул1_ФокусПолучен");
НижнийКолонтитул1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "НижнийКолонтитул1_ФокусПотерян");
НижнийКолонтитул1.Редактируемый = Истина;
НижнийКолонтитул2 = ДФ.НижнийКолонтитул();
НижнийКолонтитул2.Родитель = Форма1;
НижнийКолонтитул2.Текст = "Это НижнийКолонтитул2";
НижнийКолонтитул2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
НижнийКолонтитул2.Редактируемый = Истина;
НижнийКолонтитул1.Фокус();
Форма1.Открыть();
СнятьФокус_ОбластьТаблицы_метод.os
Перем ДФ, ОбластьТаблицы1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ОбластьТаблицы1.СнятьФокус();
КонецПроцедуры
Процедура ОбластьТаблицы1_ФокусПолучен() Экспорт
// Сообщить("ОбластьТаблицы1_ФокусПолучен");
КонецПроцедуры
Процедура ОбластьТаблицы1_ФокусПотерян() Экспорт
// Сообщить("ОбластьТаблицы1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ОбластьТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Текст = "Это ОбластьТаблицы1";
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОбластьТаблицы1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ОбластьТаблицы1_ФокусПолучен");
ОбластьТаблицы1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ОбластьТаблицы1_ФокусПотерян");
ОбластьТаблицы1.Редактируемый = Истина;
ОбластьТаблицы2 = ДФ.ОбластьТаблицы();
ОбластьТаблицы2.Родитель = Форма1;
ОбластьТаблицы2.Текст = "Это ОбластьТаблицы2";
ОбластьТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ОбластьТаблицы2.Редактируемый = Истина;
ОбластьТаблицы1.Фокус();
Форма1.Открыть();
СнятьФокус_ОбластьТекста_метод.os
Перем ДФ, ОбластьТекста1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ОбластьТекста1.СнятьФокус();
КонецПроцедуры
Процедура ОбластьТекста1_ФокусПолучен() Экспорт
// Сообщить("ОбластьТекста1_ФокусПолучен");
КонецПроцедуры
Процедура ОбластьТекста1_ФокусПотерян() Экспорт
// Сообщить("ОбластьТекста1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ОбластьТекста_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОбластьТекста1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_ФокусПолучен");
ОбластьТекста1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_ФокусПотерян");
ОбластьТекста1.Редактируемый = Истина;
ОбластьТекста2 = ДФ.ОбластьТекста();
ОбластьТекста2.Родитель = Форма1;
ОбластьТекста2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ОбластьТекста2.Редактируемый = Истина;
ОбластьТекста1.Фокус();
Форма1.Открыть();
СнятьФокус_ОписаниеМедиа_метод.os
Перем ДФ, ОписаниеМедиа1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ОписаниеМедиа1.СнятьФокус();
КонецПроцедуры
Процедура ОписаниеМедиа1_ФокусПолучен() Экспорт
// Сообщить("ОписаниеМедиа1_ФокусПолучен");
КонецПроцедуры
Процедура ОписаниеМедиа1_ФокусПотерян() Экспорт
// Сообщить("ОписаниеМедиа1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ОписаниеМедиа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Текст = "Это ОписаниеМедиа1";
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОписаниеМедиа1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ОписаниеМедиа1_ФокусПолучен");
ОписаниеМедиа1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ОписаниеМедиа1_ФокусПотерян");
ОписаниеМедиа1.Редактируемый = Истина;
ОписаниеМедиа2 = ДФ.ОписаниеМедиа();
ОписаниеМедиа2.Родитель = Форма1;
ОписаниеМедиа2.Текст = "Это ОписаниеМедиа2";
ОписаниеМедиа2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ОписаниеМедиа2.Редактируемый = Истина;
ОписаниеМедиа1.Фокус();
Форма1.Открыть();
СнятьФокус_Определение_метод.os
Перем ДФ, Определение1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Определение1.СнятьФокус();
КонецПроцедуры
Процедура Определение1_ФокусПолучен() Экспорт
// Сообщить("Определение1_ФокусПолучен");
КонецПроцедуры
Процедура Определение1_ФокусПотерян() Экспорт
// Сообщить("Определение1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Определение_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Текст = "Это Определение1";
Определение1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Определение1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Определение1_ФокусПолучен");
Определение1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Определение1_ФокусПотерян");
Определение1.Редактируемый = Истина;
Определение2 = ДФ.Определение();
Определение2.Родитель = Форма1;
Определение2.Текст = "Это Определение2";
Определение2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Определение2.Редактируемый = Истина;
Определение1.Фокус();
Форма1.Открыть();
СнятьФокус_Переключатель_метод.os
Перем ДФ, Переключатель1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Переключатель1.СнятьФокус();
КонецПроцедуры
Процедура Переключатель1_ФокусПолучен() Экспорт
// Сообщить("Переключатель1_ФокусПолучен");
КонецПроцедуры
Процедура Переключатель1_ФокусПотерян() Экспорт
// Сообщить("Переключатель1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Переключатель_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Переключатель1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Переключатель1_ФокусПолучен");
Переключатель1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Переключатель1_ФокусПотерян");
Переключатель1.Редактируемый = Истина;
Переключатель2 = ДФ.Переключатель();
Переключатель2.Родитель = Форма1;
Переключатель2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Переключатель2.Редактируемый = Истина;
Переключатель1.Фокус();
Форма1.Открыть();
СнятьФокус_Перенос_метод.os
Перем ДФ, Перенос1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Перенос1.СнятьФокус();
КонецПроцедуры
Процедура Перенос1_ФокусПолучен() Экспорт
// Сообщить("Перенос1_ФокусПолучен");
КонецПроцедуры
Процедура Перенос1_ФокусПотерян() Экспорт
// Сообщить("Перенос1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Перенос_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Перенос1 = ДФ.Перенос();
Перенос1.Родитель = Форма1;
Перенос1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Перенос1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Перенос1_ФокусПолучен");
Перенос1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Перенос1_ФокусПотерян");
Перенос1.Редактируемый = Истина;
Перенос2 = ДФ.Перенос();
Перенос2.Родитель = Форма1;
Перенос2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Перенос2.Редактируемый = Истина;
Перенос1.Фокус();
Форма1.Открыть();
СнятьФокус_Подпись_метод.os
Перем ДФ, Подпись1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Подпись1.СнятьФокус();
КонецПроцедуры
Процедура Подпись1_ФокусПолучен() Экспорт
// Сообщить("Подпись1_ФокусПолучен");
КонецПроцедуры
Процедура Подпись1_ФокусПотерян() Экспорт
// Сообщить("Подпись1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Подпись_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Это Подпись1";
Подпись1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Подпись1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Подпись1_ФокусПолучен");
Подпись1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Подпись1_ФокусПотерян");
Подпись1.Редактируемый = Истина;
Подпись2 = ДФ.Подпись();
Подпись2.Родитель = Форма1;
Подпись2.Текст = "Это Подпись2";
Подпись2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Подпись2.Редактируемый = Истина;
Подпись1.Фокус();
Форма1.Открыть();
СнятьФокус_ПодстрочныйТекст_метод.os
Перем ДФ, ПодстрочныйТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ПодстрочныйТекст1.СнятьФокус();
КонецПроцедуры
Процедура ПодстрочныйТекст1_ФокусПолучен() Экспорт
// Сообщить("ПодстрочныйТекст1_ФокусПолучен");
КонецПроцедуры
Процедура ПодстрочныйТекст1_ФокусПотерян() Экспорт
// Сообщить("ПодстрочныйТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ПодстрочныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Текст = "Это ПодстрочныйТекст1";
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПодстрочныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПодстрочныйТекст1_ФокусПолучен");
ПодстрочныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПодстрочныйТекст1_ФокусПотерян");
ПодстрочныйТекст1.Редактируемый = Истина;
ПодстрочныйТекст2 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст2.Родитель = Форма1;
ПодстрочныйТекст2.Текст = "Это ПодстрочныйТекст2";
ПодстрочныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПодстрочныйТекст2.Редактируемый = Истина;
ПодстрочныйТекст1.Фокус();
Форма1.Открыть();
СнятьФокус_ПодчеркнутыйТекст_метод.os
Перем ДФ, ПодчеркнутыйТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ПодчеркнутыйТекст1.СнятьФокус();
КонецПроцедуры
Процедура ПодчеркнутыйТекст1_ФокусПолучен() Экспорт
// Сообщить("ПодчеркнутыйТекст1_ФокусПолучен");
КонецПроцедуры
Процедура ПодчеркнутыйТекст1_ФокусПотерян() Экспорт
// Сообщить("ПодчеркнутыйТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ПодчеркнутыйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Текст = "Это ПодчеркнутыйТекст1";
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПодчеркнутыйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПодчеркнутыйТекст1_ФокусПолучен");
ПодчеркнутыйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПодчеркнутыйТекст1_ФокусПотерян");
ПодчеркнутыйТекст1.Редактируемый = Истина;
ПодчеркнутыйТекст2 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст2.Родитель = Форма1;
ПодчеркнутыйТекст2.Текст = "Это ПодчеркнутыйТекст2";
ПодчеркнутыйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПодчеркнутыйТекст2.Редактируемый = Истина;
ПодчеркнутыйТекст1.Фокус();
Форма1.Открыть();
СнятьФокус_ПолеПароля_метод.os
Перем ДФ, ПолеПароля1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ПолеПароля1.СнятьФокус();
КонецПроцедуры
Процедура ПолеПароля1_ФокусПолучен() Экспорт
// Сообщить("ПолеПароля1_ФокусПолучен");
КонецПроцедуры
Процедура ПолеПароля1_ФокусПотерян() Экспорт
// Сообщить("ПолеПароля1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ПолеПароля_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеПароля1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_ФокусПолучен");
ПолеПароля1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_ФокусПотерян");
ПолеПароля1.Редактируемый = Истина;
ПолеПароля2 = ДФ.ПолеПароля();
ПолеПароля2.Родитель = Форма1;
ПолеПароля2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеПароля2.Редактируемый = Истина;
ПолеПароля1.Фокус();
Форма1.Открыть();
СнятьФокус_ПолеПоиска_метод.os
Перем ДФ, ПолеПоиска1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ПолеПоиска1.СнятьФокус();
КонецПроцедуры
Процедура ПолеПоиска1_ФокусПолучен() Экспорт
// Сообщить("ПолеПоиска1_ФокусПолучен");
КонецПроцедуры
Процедура ПолеПоиска1_ФокусПотерян() Экспорт
// Сообщить("ПолеПоиска1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ПолеПоиска_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеПоиска1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_ФокусПолучен");
ПолеПоиска1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_ФокусПотерян");
ПолеПоиска1.Редактируемый = Истина;
ПолеПоиска2 = ДФ.ПолеПоиска();
ПолеПоиска2.Родитель = Форма1;
ПолеПоиска2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеПоиска2.Редактируемый = Истина;
ПолеПоиска1.Фокус();
Форма1.Открыть();
СнятьФокус_ПолеСписка_метод.os
Перем ДФ, ПолеСписка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ПолеСписка1.СнятьФокус();
КонецПроцедуры
Процедура ПолеСписка1_ФокусПолучен() Экспорт
// Сообщить("ПолеСписка1_ФокусПолучен");
КонецПроцедуры
Процедура ПолеСписка1_ФокусПотерян() Экспорт
// Сообщить("ПолеСписка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ПолеСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеСписка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеСписка1_ФокусПолучен");
ПолеСписка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеСписка1_ФокусПотерян");
ПолеСписка1.Редактируемый = Истина;
ПолеСписка2 = ДФ.ПолеСписка();
ПолеСписка2.Родитель = Форма1;
ПолеСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеСписка2.Редактируемый = Истина;
ПолеСписка1.Фокус();
Форма1.Открыть();
СнятьФокус_ПолеТекста_метод.os
Перем ДФ, ПолеТекста1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ПолеТекста1.СнятьФокус();
КонецПроцедуры
Процедура ПолеТекста1_ФокусПолучен() Экспорт
// Сообщить("ПолеТекста1_ФокусПолучен");
КонецПроцедуры
Процедура ПолеТекста1_ФокусПотерян() Экспорт
// Сообщить("ПолеТекста1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ПолеТекста_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеТекста1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_ФокусПолучен");
ПолеТекста1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_ФокусПотерян");
ПолеТекста2 = ДФ.ПолеТекста();
ПолеТекста2.Родитель = Форма1;
ПолеТекста2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеТекста1.Фокус();
Форма1.Открыть();
СнятьФокус_ПолеЧисла_метод.os
Перем ДФ, ПолеЧисла1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ПолеЧисла1.СнятьФокус();
КонецПроцедуры
Процедура ПолеЧисла1_ФокусПолучен() Экспорт
// Сообщить("ПолеЧисла1_ФокусПолучен");
КонецПроцедуры
Процедура ПолеЧисла1_ФокусПотерян() Экспорт
// Сообщить("ПолеЧисла1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ПолеЧисла_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеЧисла1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_ФокусПолучен");
ПолеЧисла1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_ФокусПотерян");
ПолеЧисла1.Редактируемый = Истина;
ПолеЧисла2 = ДФ.ПолеЧисла();
ПолеЧисла2.Родитель = Форма1;
ПолеЧисла2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеЧисла2.Редактируемый = Истина;
ПолеЧисла1.Фокус();
Форма1.Открыть();
СнятьФокус_Ползунок_метод.os
Перем ДФ, Ползунок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Ползунок1.СнятьФокус();
КонецПроцедуры
Процедура Ползунок1_ФокусПолучен() Экспорт
// Сообщить("Ползунок1_ФокусПолучен");
КонецПроцедуры
Процедура Ползунок1_ФокусПотерян() Экспорт
// Сообщить("Ползунок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Ползунок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ползунок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Ползунок1_ФокусПолучен");
Ползунок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Ползунок1_ФокусПотерян");
Ползунок1.Редактируемый = Истина;
Ползунок2 = ДФ.Ползунок();
Ползунок2.Родитель = Форма1;
Ползунок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Ползунок2.Редактируемый = Истина;
Ползунок1.Фокус();
Форма1.Открыть();
СнятьФокус_РаскрываемыйБлок_метод.os
Перем ДФ, РаскрываемыйБлок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
РаскрываемыйБлок1.СнятьФокус();
КонецПроцедуры
Процедура РаскрываемыйБлок1_ФокусПолучен() Экспорт
// Сообщить("РаскрываемыйБлок1_ФокусПолучен");
КонецПроцедуры
Процедура РаскрываемыйБлок1_ФокусПотерян() Экспорт
// Сообщить("РаскрываемыйБлок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_РаскрываемыйБлок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
РаскрываемыйБлок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "РаскрываемыйБлок1_ФокусПолучен");
РаскрываемыйБлок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "РаскрываемыйБлок1_ФокусПотерян");
РаскрываемыйБлок1.Редактируемый = Истина;
РаскрываемыйБлок2 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок2.Родитель = Форма1;
РаскрываемыйБлок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
РаскрываемыйБлок2.Редактируемый = Истина;
РаскрываемыйБлок1.Фокус();
Форма1.Открыть();
СнятьФокус_Результат_метод.os
Перем ДФ, Результат1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Результат1.СнятьФокус();
КонецПроцедуры
Процедура Результат1_ФокусПолучен() Экспорт
// Сообщить("Результат1_ФокусПолучен");
КонецПроцедуры
Процедура Результат1_ФокусПотерян() Экспорт
// Сообщить("Результат1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Результат_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Текст = "Это Результат1";
Результат1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Результат1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Результат1_ФокусПолучен");
Результат1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Результат1_ФокусПотерян");
Результат1.Редактируемый = Истина;
Результат2 = ДФ.Результат();
Результат2.Родитель = Форма1;
Результат2.Текст = "Это Результат2";
Результат2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Результат2.Редактируемый = Истина;
Результат1.Фокус();
Форма1.Открыть();
СнятьФокус_СписокОпределений_метод.os
Перем ДФ, СписокОпределений1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
СписокОпределений1.СнятьФокус();
КонецПроцедуры
Процедура СписокОпределений1_ФокусПолучен() Экспорт
// Сообщить("СписокОпределений1_ФокусПолучен");
КонецПроцедуры
Процедура СписокОпределений1_ФокусПотерян() Экспорт
// Сообщить("СписокОпределений1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_СписокОпределений_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Текст = "Это СписокОпределений1";
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.Красный;
СписокОпределений1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "СписокОпределений1_ФокусПолучен");
СписокОпределений1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "СписокОпределений1_ФокусПотерян");
СписокОпределений1.Редактируемый = Истина;
СписокОпределений2 = ДФ.СписокОпределений();
СписокОпределений2.Родитель = Форма1;
СписокОпределений2.Текст = "Это СписокОпределений2";
СписокОпределений2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
СписокОпределений2.Редактируемый = Истина;
СписокОпределений1.Фокус();
Форма1.Открыть();
СнятьФокус_Ссылка_метод.os
Перем ДФ, Ссылка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Ссылка1.СнятьФокус();
КонецПроцедуры
Процедура Ссылка1_ФокусПолучен() Экспорт
// Сообщить("Ссылка1_ФокусПолучен");
КонецПроцедуры
Процедура Ссылка1_ФокусПотерян() Экспорт
// Сообщить("Ссылка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Ссылка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Текст = "Это Ссылка1";
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ссылка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Ссылка1_ФокусПолучен");
Ссылка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Ссылка1_ФокусПотерян");
Ссылка1.Редактируемый = Истина;
Ссылка2 = ДФ.Ссылка();
Ссылка2.Родитель = Форма1;
Ссылка2.Текст = "Это Ссылка2";
Ссылка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Ссылка2.Редактируемый = Истина;
Ссылка1.Фокус();
Форма1.Открыть();
СнятьФокус_СтрокаТаблицы_метод.os
Перем ДФ, СтрокаТаблицы1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
СтрокаТаблицы1.СнятьФокус();
КонецПроцедуры
Процедура СтрокаТаблицы1_ФокусПолучен() Экспорт
// Сообщить("СтрокаТаблицы1_ФокусПолучен");
КонецПроцедуры
Процедура СтрокаТаблицы1_ФокусПотерян() Экспорт
// Сообщить("СтрокаТаблицы1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_СтрокаТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Текст = "Это СтрокаТаблицы1";
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Красный;
СтрокаТаблицы1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "СтрокаТаблицы1_ФокусПолучен");
СтрокаТаблицы1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "СтрокаТаблицы1_ФокусПотерян");
СтрокаТаблицы1.Редактируемый = Истина;
СтрокаТаблицы2 = ДФ.СтрокаТаблицы();
СтрокаТаблицы2.Родитель = Форма1;
СтрокаТаблицы2.Текст = "Это СтрокаТаблицы2";
СтрокаТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
СтрокаТаблицы2.Редактируемый = Истина;
СтрокаТаблицы1.Фокус();
Форма1.Открыть();
СнятьФокус_Таблица_метод.os
Перем ДФ, Таблица1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Таблица1.СнятьФокус();
КонецПроцедуры
Процедура Таблица1_ФокусПолучен() Экспорт
// Сообщить("Таблица1_ФокусПолучен");
КонецПроцедуры
Процедура Таблица1_ФокусПотерян() Экспорт
// Сообщить("Таблица1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Таблица_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Текст = "Это Таблица1";
Таблица1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Таблица1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Таблица1_ФокусПолучен");
Таблица1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Таблица1_ФокусПотерян");
Таблица1.Редактируемый = Истина;
Таблица2 = ДФ.Таблица();
Таблица2.Родитель = Форма1;
Таблица2.Текст = "Это Таблица2";
Таблица2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Таблица2.Редактируемый = Истина;
Таблица1.Фокус();
Форма1.Открыть();
СнятьФокус_Термин_метод.os
Перем ДФ, Термин1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Термин1.СнятьФокус();
КонецПроцедуры
Процедура Термин1_ФокусПолучен() Экспорт
// Сообщить("Термин1_ФокусПолучен");
КонецПроцедуры
Процедура Термин1_ФокусПотерян() Экспорт
// Сообщить("Термин1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Термин_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Текст = "Это Термин1";
Термин1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Термин1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Термин1_ФокусПолучен");
Термин1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Термин1_ФокусПотерян");
Термин1.Редактируемый = Истина;
Термин2 = ДФ.Термин();
Термин2.Родитель = Форма1;
Термин2.Текст = "Это Термин2";
Термин2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Термин2.Редактируемый = Истина;
Термин1.Фокус();
Форма1.Открыть();
СнятьФокус_УдаленыйТекст_метод.os
Перем ДФ, УдаленыйТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
УдаленыйТекст1.СнятьФокус();
КонецПроцедуры
Процедура УдаленыйТекст1_ФокусПолучен() Экспорт
// Сообщить("УдаленыйТекст1_ФокусПолучен");
КонецПроцедуры
Процедура УдаленыйТекст1_ФокусПотерян() Экспорт
// Сообщить("УдаленыйТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_УдаленыйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Текст = "Это УдаленыйТекст1";
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
УдаленыйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "УдаленыйТекст1_ФокусПолучен");
УдаленыйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "УдаленыйТекст1_ФокусПотерян");
УдаленыйТекст1.Редактируемый = Истина;
УдаленыйТекст2 = ДФ.УдаленыйТекст();
УдаленыйТекст2.Родитель = Форма1;
УдаленыйТекст2.Текст = "Это УдаленыйТекст2";
УдаленыйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
УдаленыйТекст2.Редактируемый = Истина;
УдаленыйТекст1.Фокус();
Форма1.Открыть();
СнятьФокус_УпорядоченныйСписок_метод.os
Перем ДФ, УпорядоченныйСписок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
УпорядоченныйСписок1.СнятьФокус();
КонецПроцедуры
Процедура УпорядоченныйСписок1_ФокусПолучен() Экспорт
// Сообщить("УпорядоченныйСписок1_ФокусПолучен");
КонецПроцедуры
Процедура УпорядоченныйСписок1_ФокусПотерян() Экспорт
// Сообщить("УпорядоченныйСписок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_УпорядоченныйСписок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Текст = "Это УпорядоченныйСписок1";
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
УпорядоченныйСписок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "УпорядоченныйСписок1_ФокусПолучен");
УпорядоченныйСписок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "УпорядоченныйСписок1_ФокусПотерян");
УпорядоченныйСписок1.Редактируемый = Истина;
УпорядоченныйСписок2 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок2.Родитель = Форма1;
УпорядоченныйСписок2.Текст = "Это УпорядоченныйСписок2";
УпорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
УпорядоченныйСписок2.Редактируемый = Истина;
УпорядоченныйСписок1.Фокус();
Форма1.Открыть();
СнятьФокус_Флажок_метод.os
Перем ДФ, Флажок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Флажок1.СнятьФокус();
КонецПроцедуры
Процедура Флажок1_ФокусПолучен() Экспорт
// Сообщить("Флажок1_ФокусПолучен");
КонецПроцедуры
Процедура Флажок1_ФокусПотерян() Экспорт
// Сообщить("Флажок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Флажок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Флажок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Флажок1_ФокусПолучен");
Флажок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Флажок1_ФокусПотерян");
Флажок1.Редактируемый = Истина;
Флажок2 = ДФ.Флажок();
Флажок2.Родитель = Форма1;
Флажок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Флажок2.Редактируемый = Истина;
Флажок1.Фокус();
Форма1.Открыть();
СнятьФокус_ФорматированныйТекст_метод.os
Перем ДФ, ФорматированныйТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ФорматированныйТекст1.СнятьФокус();
КонецПроцедуры
Процедура ФорматированныйТекст1_ФокусПолучен() Экспорт
// Сообщить("ФорматированныйТекст1_ФокусПолучен");
КонецПроцедуры
Процедура ФорматированныйТекст1_ФокусПотерян() Экспорт
// Сообщить("ФорматированныйТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ФорматированныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Текст = "Это ФорматированныйТекст1";
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ФорматированныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ФорматированныйТекст1_ФокусПолучен");
ФорматированныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ФорматированныйТекст1_ФокусПотерян");
ФорматированныйТекст1.Редактируемый = Истина;
ФорматированныйТекст2 = ДФ.ФорматированныйТекст();
ФорматированныйТекст2.Родитель = Форма1;
ФорматированныйТекст2.Текст = "Это ФорматированныйТекст2";
ФорматированныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ФорматированныйТекст2.Редактируемый = Истина;
ФорматированныйТекст1.Фокус();
Форма1.Открыть();
СнятьФокус_Холст_метод.os
Перем ДФ, Холст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Холст1.СнятьФокус();
КонецПроцедуры
Процедура Холст1_ФокусПолучен() Экспорт
// Сообщить("Холст1_ФокусПолучен");
КонецПроцедуры
Процедура Холст1_ФокусПотерян() Экспорт
// Сообщить("Холст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Холст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
Холст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Холст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Холст1_ФокусПолучен");
Холст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Холст1_ФокусПотерян");
Холст1.Редактируемый = Истина;
Холст2 = ДФ.Холст();
Холст2.Родитель = Форма1;
Холст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Холст2.Редактируемый = Истина;
Холст1.Фокус();
Форма1.Открыть();
СнятьФокус_ШапкаТаблицы_метод.os
Перем ДФ, ШапкаТаблицы1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ШапкаТаблицы1.СнятьФокус();
КонецПроцедуры
Процедура ШапкаТаблицы1_ФокусПолучен() Экспорт
// Сообщить("ШапкаТаблицы1_ФокусПолучен");
КонецПроцедуры
Процедура ШапкаТаблицы1_ФокусПотерян() Экспорт
// Сообщить("ШапкаТаблицы1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ШапкаТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Текст = "Это ШапкаТаблицы1";
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ШапкаТаблицы1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ШапкаТаблицы1_ФокусПолучен");
ШапкаТаблицы1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ШапкаТаблицы1_ФокусПотерян");
ШапкаТаблицы1.Редактируемый = Истина;
ШапкаТаблицы2 = ДФ.ШапкаТаблицы();
ШапкаТаблицы2.Родитель = Форма1;
ШапкаТаблицы2.Текст = "Это ШапкаТаблицы2";
ШапкаТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ШапкаТаблицы2.Редактируемый = Истина;
ШапкаТаблицы1.Фокус();
Форма1.Открыть();
СнятьФокус_ЭлементПоляСписка_метод.os
Перем ДФ, ЭлементПоляСписка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ЭлементПоляСписка1.СнятьФокус();
КонецПроцедуры
Процедура ЭлементПоляСписка1_ФокусПолучен() Экспорт
// Сообщить("ЭлементПоляСписка1_ФокусПолучен");
КонецПроцедуры
Процедура ЭлементПоляСписка1_ФокусПотерян() Экспорт
// Сообщить("ЭлементПоляСписка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ЭлементПоляСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Текст = "Это ЭлементПоляСписка1";
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЭлементПоляСписка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЭлементПоляСписка1_ФокусПолучен");
ЭлементПоляСписка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЭлементПоляСписка1_ФокусПотерян");
ЭлементПоляСписка1.Редактируемый = Истина;
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = Форма1;
ЭлементПоляСписка2.Текст = "Это ЭлементПоляСписка2";
ЭлементПоляСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЭлементПоляСписка2.Редактируемый = Истина;
ЭлементПоляСписка1.Фокус();
Форма1.Открыть();
СнятьФокус_ЭлементСписка_метод.os
Перем ДФ, ЭлементСписка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ЭлементСписка1.СнятьФокус();
КонецПроцедуры
Процедура ЭлементСписка1_ФокусПолучен() Экспорт
// Сообщить("ЭлементСписка1_ФокусПолучен");
КонецПроцедуры
Процедура ЭлементСписка1_ФокусПотерян() Экспорт
// Сообщить("ЭлементСписка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ЭлементСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Текст = "Это ЭлементСписка1";
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЭлементСписка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЭлементСписка1_ФокусПолучен");
ЭлементСписка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЭлементСписка1_ФокусПотерян");
ЭлементСписка1.Редактируемый = Истина;
ЭлементСписка2 = ДФ.ЭлементСписка();
ЭлементСписка2.Родитель = Форма1;
ЭлементСписка2.Текст = "Это ЭлементСписка2";
ЭлементСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЭлементСписка2.Редактируемый = Истина;
ЭлементСписка1.Фокус();
Форма1.Открыть();
СнятьФокус_Ячейка_метод.os
Перем ДФ, Ячейка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Ячейка1.СнятьФокус();
КонецПроцедуры
Процедура Ячейка1_ФокусПолучен() Экспорт
// Сообщить("Ячейка1_ФокусПолучен");
КонецПроцедуры
Процедура Ячейка1_ФокусПотерян() Экспорт
// Сообщить("Ячейка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_Ячейка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Текст = "Это Ячейка1";
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ячейка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Ячейка1_ФокусПолучен");
Ячейка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Ячейка1_ФокусПотерян");
Ячейка1.Редактируемый = Истина;
Ячейка2 = ДФ.Ячейка();
Ячейка2.Родитель = Форма1;
Ячейка2.Текст = "Это Ячейка2";
Ячейка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Ячейка2.Редактируемый = Истина;
Ячейка1.Фокус();
Форма1.Открыть();
СнятьФокус_ЯчейкаЗаголовка_метод.os
Перем ДФ, ЯчейкаЗаголовка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ЯчейкаЗаголовка1.СнятьФокус();
КонецПроцедуры
Процедура ЯчейкаЗаголовка1_ФокусПолучен() Экспорт
// Сообщить("ЯчейкаЗаголовка1_ФокусПолучен");
КонецПроцедуры
Процедура ЯчейкаЗаголовка1_ФокусПотерян() Экспорт
// Сообщить("ЯчейкаЗаголовка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "СнятьФокус_ЯчейкаЗаголовка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Текст = "Это ЯчейкаЗаголовка1";
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЯчейкаЗаголовка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЯчейкаЗаголовка1_ФокусПолучен");
ЯчейкаЗаголовка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЯчейкаЗаголовка1_ФокусПотерян");
ЯчейкаЗаголовка1.Редактируемый = Истина;
ЯчейкаЗаголовка2 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка2.Родитель = Форма1;
ЯчейкаЗаголовка2.Текст = "Это ЯчейкаЗаголовка2";
ЯчейкаЗаголовка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЯчейкаЗаголовка2.Редактируемый = Истина;
ЯчейкаЗаголовка1.Фокус();
Форма1.Открыть();
СоздатьДанныеРисунка_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "СоздатьДанныеРисунка_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 650;
Холст1.Высота = 550;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
ДанныеРисунка1 = Контекст2d1.СоздатьДанныеРисунка(600, 500);
ДанныеРисунка2 = Контекст2d1.СоздатьДанныеРисунка(ДанныеРисунка1);
ДанныеРисунка2.Цвет = ДФ.Цвет.Синий;
Контекст2d1.ПоместитьДанныеРисунка(ДанныеРисунка2, 10, 10);
Форма1.Открыть();
СоздатьЛинейныйГрадиент_Контекст2d_метод.os
Перем ДФ, Холст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Холст1.Контекст2d = "ДфКонтекст2d"
, "", "!!! ") + "СоздатьЛинейныйГрадиент_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ЛинейныйГрадиент1 = Холст1.Контекст2d.СоздатьЛинейныйГрадиент(0, 0, 170, 0);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0, ДФ.Цвет.Черный);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0.3, ДФ.Цвет.Малиновый);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0.5, ДФ.Цвет.Синий);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0.6, ДФ.Цвет.Зеленый);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0.8, ДФ.Цвет.Желтый);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(1, ДФ.Цвет.Красный);
Холст1.Контекст2d.СтильЗаполнения = ЛинейныйГрадиент1;
Холст1.Контекст2d.ЗаполнитьПрямоугольник(20, 20, 150, 100);
Форма1.Открыть();
СоздатьРадиальныйГрадиент_Контекст2d_метод.os
Перем ДФ, Холст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Холст1.Контекст2d = "ДфКонтекст2d"
, "", "!!! ") + "СоздатьРадиальныйГрадиент_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
РадиальныйГрадиент1 = Холст1.Контекст2d.СоздатьРадиальныйГрадиент(75, 50, 5, 90, 60, 100);
РадиальныйГрадиент1.ДобавитьОстановкуГрадиента(0, ДФ.Цвет.Красный);
РадиальныйГрадиент1.ДобавитьОстановкуГрадиента(1, ДФ.Цвет.Белый);
Холст1.Контекст2d.СтильЗаполнения = РадиальныйГрадиент1;
Холст1.Контекст2d.ЗаполнитьПрямоугольник(10, 10, 150, 100);
Форма1.Открыть();
СообщениеФорме_ДекларативныеФормы_метод.os
Перем ДФ, Кнопка1;
Процедура ЦветФона() Экспорт
Сообщить(?(
Кнопка1.Стиль.ЦветФона = "rgb(175, 238, 238)"
, "", "!!! ") + "СообщениеФорме_ДекларативныеФормы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
Кнопка1_Нажатие();
ДФ.ПолучитьСвойство(Кнопка1.Стиль, "ЦветФона", ДФ.Действие(ЭтотОбъект, "ЦветФона"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
ДФ.СообщениеФорме("mapKeyEl.get('" + Кнопка1.КлючЭлемента + "').style['backgroundColor'] = 'rgb(175, 238, 238)'");
// Функциями из main.js получим объект Кнопка1 по его ключу и изменим нужный нам атрибут.
//mapKeyEl.get('" + Кнопка1.КлючЭлемента + "') - это получение объекта
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Форма1.Открыть();
Состояние_СвойстваАнимации_свойство.os
Перем ДФ, Анимация1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Анимация1.Состояние = ДФ.Состояние.Запущена
, "", "!!! ") + "Состояние_СвойстваАнимации_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Анимация1 = ДФ.СвойстваАнимации();
Анимация1.ИмяАнимации = Кадры1.Имя;
Анимация1.ДлительностьАнимации = 3000;
Анимация1.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце;
Анимация1.ЗадержкаАнимации = 600;
Анимация1.КоличествоПовторов = -1;
Анимация1.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать;
Анимация1.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад;
Анимация1.Состояние = ДФ.Состояние.Запущена;
Блок1.Стиль.Анимация = Анимация1;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
Состояние_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Состояние = ДФ.Состояние.Запущена
, "", "!!! ") + "Состояние_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Состояние", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Блок1.Стиль.ИмяАнимации = Кадры1.Имя;
Блок1.Стиль.ДлительностьАнимации = 3000;
Блок1.Стиль.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце;
Блок1.Стиль.ЗадержкаАнимации = 600;
Блок1.Стиль.КоличествоПовторов = -1;
Блок1.Стиль.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать;
Блок1.Стиль.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад;
Блок1.Стиль.Состояние = ДФ.Состояние.Запущена;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
Сохранить_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контекст2d1.СтильЗаполнения = "rgb(255, 0, 0)"
, "", "!!! ") + "Сохранить_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Зеленый;
Контекст2d1.ЗаполнитьПрямоугольник(10, 10, 50, 50);
Контекст2d1.Сохранить();
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Красный;
Контекст2d1.ЗаполнитьПрямоугольник(100, 10, 50, 50);
Контекст2d1.Восстановить();
Контекст2d1.ЗаполнитьПрямоугольник(200, 10, 50, 50);
Форма1.Открыть();
Степень_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().Степень(2, 3) = 8
, "", "!!! ") + "Степень_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().Степень(2, 3);
Форма1.Открыть();
Стиль_Абзац_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Стиль.Ширина = 400;
Абзац1.Стиль.Высота = 150;
Абзац1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Абзац1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Артикль_свойство.os
Перем ДФ, Артикль1;
Процедура Свойство() Экспорт
Сообщить(?(
Артикль1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Артикль1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Артикль1 = Форма1.ДобавитьДочерний(ДФ.Артикль());
Артикль1.Стиль.Ширина = 400;
Артикль1.Стиль.Высота = 150;
Артикль1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Артикль1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Аудио1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Аудио1 = Форма1.ДобавитьДочерний(ДФ.Аудио());
Аудио1.Стиль.Ширина = 400;
Аудио1.Стиль.Высота = 150;
Аудио1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Аудио1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Блок_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 400;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ВыборВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборВремени());
ВыборВремени1.Стиль.Ширина = 400;
ВыборВремени1.Стиль.Высота = 150;
ВыборВремени1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ВыборДаты1 = Форма1.ДобавитьДочерний(ДФ.ВыборДаты());
ВыборДаты1.Стиль.Ширина = 400;
ВыборДаты1.Стиль.Высота = 150;
ВыборДаты1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ВыборДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборДатыВремени());
ВыборДатыВремени1.Стиль.Ширина = 400;
ВыборДатыВремени1.Стиль.Высота = 150;
ВыборДатыВремени1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ВыборМестнойДатыВремени1 = Форма1.ДобавитьДочерний(ДФ.ВыборМестнойДатыВремени());
ВыборМестнойДатыВремени1.Стиль.Ширина = 400;
ВыборМестнойДатыВремени1.Стиль.Высота = 150;
ВыборМестнойДатыВремени1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ВыборМесяца1 = Форма1.ДобавитьДочерний(ДФ.ВыборМесяца());
ВыборМесяца1.Стиль.Ширина = 400;
ВыборМесяца1.Стиль.Высота = 150;
ВыборМесяца1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ВыборНедели1 = Форма1.ДобавитьДочерний(ДФ.ВыборНедели());
ВыборНедели1.Стиль.Ширина = 400;
ВыборНедели1.Стиль.Высота = 150;
ВыборНедели1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборФайла1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборФайла1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ВыборФайла1 = Форма1.ДобавитьДочерний(ДФ.ВыборФайла());
ВыборФайла1.Стиль.Ширина = 400;
ВыборФайла1.Стиль.Высота = 150;
ВыборФайла1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборЦвета1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборЦвета1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ВыборЦвета1 = Форма1.ДобавитьДочерний(ДФ.ВыборЦвета());
ВыборЦвета1.Стиль.Ширина = 400;
ВыборЦвета1.Стиль.Высота = 150;
ВыборЦвета1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Группа_свойство.os
Перем ДФ, Группа1;
Процедура Свойство() Экспорт
Сообщить(?(
Группа1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Группа1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Группа1 = Форма1.ДобавитьДочерний(ДФ.Группа());
Группа1.Стиль.Ширина = 400;
Группа1.Стиль.Высота = 150;
Группа1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Группа1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ГруппаКолонок_свойство.os
Перем ДФ, ГруппаКолонок1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппаКолонок1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ГруппаКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппаКолонок1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ГруппаКолонок1 = Форма1.ДобавитьДочерний(ДФ.ГруппаКолонок());
ГруппаКолонок1.Стиль.Ширина = 400;
ГруппаКолонок1.Стиль.Высота = 150;
ГруппаКолонок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ГруппаКолонок1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ГруппировкаПоляСписка_свойство.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ГруппировкаПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ГруппировкаПоляСписка1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ГруппировкаПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ГруппировкаПоляСписка());
ГруппировкаПоляСписка1.Стиль.Ширина = 400;
ГруппировкаПоляСписка1.Стиль.Высота = 150;
ГруппировкаПоляСписка1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Диалог_свойство.os
Перем ДФ, Диалог1;
Процедура Свойство() Экспорт
Сообщить(?(
Диалог1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Диалог1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Диалог1 = Форма1.ДобавитьДочерний(ДФ.Диалог());
Диалог1.Стиль.Ширина = 400;
Диалог1.Стиль.Высота = 150;
Диалог1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Диалог1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
ДополнительныйБлок1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ДополнительныйБлок1 = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
ДополнительныйБлок1.Стиль.Ширина = 400;
ДополнительныйБлок1.Стиль.Высота = 150;
ДополнительныйБлок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ЖирныйТекст1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЖирныйТекст1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ЖирныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
ЖирныйТекст1.Стиль.Ширина = 400;
ЖирныйТекст1.Стиль.Высота = 150;
ЖирныйТекст1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Заголовок1_свойство.os
Перем ДФ, Заголовок11;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок11.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок11.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Заголовок11 = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Заголовок11.Стиль.Ширина = 400;
Заголовок11.Стиль.Высота = 150;
Заголовок11.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Заголовок2_свойство.os
Перем ДФ, Заголовок21;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок21.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок21.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Заголовок21 = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Заголовок21.Стиль.Ширина = 400;
Заголовок21.Стиль.Высота = 150;
Заголовок21.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Заголовок3_свойство.os
Перем ДФ, Заголовок31;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок31.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок31.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Заголовок31 = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Заголовок31.Стиль.Ширина = 400;
Заголовок31.Стиль.Высота = 150;
Заголовок31.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Заголовок4_свойство.os
Перем ДФ, Заголовок41;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок41.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок41.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Заголовок41 = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Заголовок41.Стиль.Ширина = 400;
Заголовок41.Стиль.Высота = 150;
Заголовок41.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Заголовок5_свойство.os
Перем ДФ, Заголовок51;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок51.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок51.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Заголовок51 = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Заголовок51.Стиль.Ширина = 400;
Заголовок51.Стиль.Высота = 150;
Заголовок51.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Заголовок6_свойство.os
Перем ДФ, Заголовок61;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок61.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок61.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Заголовок61 = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Заголовок61.Стиль.Ширина = 400;
Заголовок61.Стиль.Высота = 150;
Заголовок61.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Заголовок_свойство.os
Перем ДФ, Заголовок1;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Заголовок1 = Форма1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Стиль.Ширина = 400;
Заголовок1.Стиль.Высота = 150;
Заголовок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ЗаголовокГруппы_свойство.os
Перем ДФ, ЗаголовокГруппы1;
Процедура Свойство() Экспорт
Сообщить(?(
ЗаголовокГруппы1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокГруппы1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ЗаголовокГруппы1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокГруппы());
ЗаголовокГруппы1.Стиль.Ширина = 400;
ЗаголовокГруппы1.Стиль.Высота = 150;
ЗаголовокГруппы1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура Свойство() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ЗаголовокРаскрываемогоБлока_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ЗаголовокРаскрываемогоБлока1 = Форма1.ДобавитьДочерний(ДФ.ЗаголовокРаскрываемогоБлока());
ЗаголовокРаскрываемогоБлока1.Стиль.Ширина = 400;
ЗаголовокРаскрываемогоБлока1.Стиль.Высота = 150;
ЗаголовокРаскрываемогоБлока1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Стиль.Ширина = 400;
Изображение1.Стиль.Высота = 150;
Изображение1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Изображение1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Индикатор_свойство.os
Перем ДФ, Индикатор1;
Процедура Свойство() Экспорт
Сообщить(?(
Индикатор1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Индикатор1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Индикатор1 = Форма1.ДобавитьДочерний(ДФ.Индикатор());
Индикатор1.Стиль.Ширина = 400;
Индикатор1.Стиль.Высота = 150;
Индикатор1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Итоги_свойство.os
Перем ДФ, Итоги1;
Процедура Свойство() Экспорт
Сообщить(?(
Итоги1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Итоги_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Итоги1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Итоги1 = Форма1.ДобавитьДочерний(ДФ.Итоги());
Итоги1.Стиль.Ширина = 400;
Итоги1.Стиль.Высота = 150;
Итоги1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Итоги1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Карта_свойство.os
Перем ДФ, Карта1;
Процедура Свойство() Экспорт
Сообщить(?(
Карта1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Карта_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Карта1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Карта1 = Форма1.ДобавитьДочерний(ДФ.Карта());
Карта1.Стиль.Ширина = 400;
Карта1.Стиль.Высота = 150;
Карта1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Карта1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Кнопка_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Сообщить(?(
Кнопка1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Стиль.Ширина = 400;
Кнопка1.Стиль.Высота = 150;
Кнопка1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Код_свойство.os
Перем ДФ, Код1;
Процедура Свойство() Экспорт
Сообщить(?(
Код1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Код_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Код1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Код1 = Форма1.ДобавитьДочерний(ДФ.Код());
Код1.Стиль.Ширина = 400;
Код1.Стиль.Высота = 150;
Код1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Код1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Колонка_свойство.os
Перем ДФ, Колонка1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонка1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Колонка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонка1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Колонка1 = Форма1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 400;
Колонка1.Стиль.Высота = 150;
Колонка1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Колонка1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Колонтитул_свойство.os
Перем ДФ, Колонтитул1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонтитул1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонтитул1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Колонтитул1 = Форма1.ДобавитьДочерний(ДФ.Колонтитул());
Колонтитул1.Стиль.Ширина = 400;
Колонтитул1.Стиль.Высота = 150;
Колонтитул1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Контент_свойство.os
Перем ДФ, Контент1;
Процедура Свойство() Экспорт
Сообщить(?(
Контент1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Контент_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Контент1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Контент1 = Форма1.Контент;
Контент1.Стиль.Ширина = 400;
Контент1.Стиль.Высота = 150;
Контент1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контент1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
КурсивТекст1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(КурсивТекст1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
КурсивТекст1 = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
КурсивТекст1.Стиль.Ширина = 400;
КурсивТекст1.Стиль.Высота = 150;
КурсивТекст1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Линия_свойство.os
Перем ДФ, Линия1;
Процедура Свойство() Экспорт
Сообщить(?(
Линия1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Линия1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Линия1 = Форма1.ДобавитьДочерний(ДФ.Линия());
Линия1.Стиль.Ширина = 400;
Линия1.Стиль.Высота = 150;
Линия1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Линия1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
МаркированныйТекст1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МаркированныйТекст1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
МаркированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
МаркированныйТекст1.Стиль.Ширина = 400;
МаркированныйТекст1.Стиль.Высота = 150;
МаркированныйТекст1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_МедиаГруппа_свойство.os
Перем ДФ, МедиаГруппа1;
Процедура Свойство() Экспорт
Сообщить(?(
МедиаГруппа1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
МедиаГруппа1 = Форма1.ДобавитьДочерний(ДФ.МедиаГруппа());
МедиаГруппа1.Стиль.Ширина = 400;
МедиаГруппа1.Стиль.Высота = 150;
МедиаГруппа1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
МелкийТекст1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МелкийТекст1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
МелкийТекст1 = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
МелкийТекст1.Стиль.Ширина = 400;
МелкийТекст1.Стиль.Высота = 150;
МелкийТекст1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
НадстрочныйТекст1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НадстрочныйТекст1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
НадстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
НадстрочныйТекст1.Стиль.Ширина = 400;
НадстрочныйТекст1.Стиль.Высота = 150;
НадстрочныйТекст1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
НаправленныйТекст1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НаправленныйТекст1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
НаправленныйТекст1 = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
НаправленныйТекст1.Стиль.Ширина = 400;
НаправленныйТекст1.Стиль.Высота = 150;
НаправленныйТекст1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_НеупорядоченныйСписок_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
НеупорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
НеупорядоченныйСписок1.Стиль.Ширина = 400;
НеупорядоченныйСписок1.Стиль.Высота = 150;
НеупорядоченныйСписок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_НижнийКолонтитул_свойство.os
Перем ДФ, НижнийКолонтитул1;
Процедура Свойство() Экспорт
Сообщить(?(
НижнийКолонтитул1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
НижнийКолонтитул1 = Форма1.ДобавитьДочерний(ДФ.НижнийКолонтитул());
НижнийКолонтитул1.Стиль.Ширина = 400;
НижнийКолонтитул1.Стиль.Высота = 150;
НижнийКолонтитул1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Область_свойство.os
Перем ДФ, Область1;
Процедура Свойство() Экспорт
Сообщить(?(
Область1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Область1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Область1 = Форма1.ДобавитьДочерний(ДФ.Область());
Область1.Стиль.Ширина = 400;
Область1.Стиль.Высота = 150;
Область1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Область1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ОбластьТаблицы_свойство.os
Перем ДФ, ОбластьТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТаблицы1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ОбластьТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТаблицы1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ОбластьТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
ОбластьТаблицы1.Стиль.Ширина = 400;
ОбластьТаблицы1.Стиль.Высота = 150;
ОбластьТаблицы1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Стиль.Ширина = 400;
ОбластьТекста1.Стиль.Высота = 150;
ОбластьТекста1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ОписаниеМедиа_свойство.os
Перем ДФ, ОписаниеМедиа1;
Процедура Свойство() Экспорт
Сообщить(?(
ОписаниеМедиа1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ОписаниеМедиа1 = Форма1.ДобавитьДочерний(ДФ.ОписаниеМедиа());
ОписаниеМедиа1.Стиль.Ширина = 400;
ОписаниеМедиа1.Стиль.Высота = 150;
ОписаниеМедиа1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Определение_свойство.os
Перем ДФ, Определение1;
Процедура Свойство() Экспорт
Сообщить(?(
Определение1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Определение1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Определение1 = Форма1.ДобавитьДочерний(ДФ.Определение());
Определение1.Стиль.Ширина = 400;
Определение1.Стиль.Высота = 150;
Определение1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Определение1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Переключатель_свойство.os
Перем ДФ, Переключатель1;
Процедура Свойство() Экспорт
Сообщить(?(
Переключатель1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Переключатель1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Переключатель1 = Форма1.ДобавитьДочерний(ДФ.Переключатель());
Переключатель1.Стиль.Ширина = 400;
Переключатель1.Стиль.Высота = 150;
Переключатель1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Перенос_свойство.os
Перем ДФ, Перенос1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Перенос1.Стиль.Высота = 200
, "", "!!! ") + "Стиль_Перенос_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Перенос1 = Форма1.ДобавитьДочерний(ДФ.Перенос());
Перенос1.Стиль.Высота = 200;
Перенос1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Форма1.Открыть();
Стиль_Подпись_свойство.os
Перем ДФ, Подпись1;
Процедура Свойство() Экспорт
Сообщить(?(
Подпись1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Подпись1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Подпись1 = Форма1.ДобавитьДочерний(ДФ.Подпись());
Подпись1.Стиль.Ширина = 400;
Подпись1.Стиль.Высота = 150;
Подпись1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Подпись1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ПодстрочныйТекст1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодстрочныйТекст1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ПодстрочныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
ПодстрочныйТекст1.Стиль.Ширина = 400;
ПодстрочныйТекст1.Стиль.Высота = 150;
ПодстрочныйТекст1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ПодчеркнутыйТекст1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодчеркнутыйТекст1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ПодчеркнутыйТекст1 = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
ПодчеркнутыйТекст1.Стиль.Ширина = 400;
ПодчеркнутыйТекст1.Стиль.Высота = 150;
ПодчеркнутыйТекст1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ПолеПароля1 = Форма1.ДобавитьДочерний(ДФ.ПолеПароля());
ПолеПароля1.Стиль.Ширина = 400;
ПолеПароля1.Стиль.Высота = 150;
ПолеПароля1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ПолеПоиска1 = Форма1.ДобавитьДочерний(ДФ.ПолеПоиска());
ПолеПоиска1.Стиль.Ширина = 400;
ПолеПоиска1.Стиль.Высота = 150;
ПолеПоиска1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеСписка1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ПолеСписка1 = Форма1.ДобавитьДочерний(ДФ.ПолеСписка());
ПолеСписка1.Стиль.Ширина = 400;
ПолеСписка1.Стиль.Высота = 150;
ПолеСписка1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ПолеТекста1 = Форма1.ДобавитьДочерний(ДФ.ПолеТекста());
ПолеТекста1.Стиль.Ширина = 400;
ПолеТекста1.Стиль.Высота = 150;
ПолеТекста1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ПолеЧисла1 = Форма1.ДобавитьДочерний(ДФ.ПолеЧисла());
ПолеЧисла1.Стиль.Ширина = 400;
ПолеЧисла1.Стиль.Высота = 150;
ПолеЧисла1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Ползунок1 = Форма1.ДобавитьДочерний(ДФ.Ползунок());
Ползунок1.Стиль.Ширина = 400;
Ползунок1.Стиль.Высота = 150;
Ползунок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
РаскрываемыйБлок1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(РаскрываемыйБлок1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
РаскрываемыйБлок1.Стиль.Ширина = 400;
РаскрываемыйБлок1.Стиль.Высота = 150;
РаскрываемыйБлок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Результат_свойство.os
Перем ДФ, Результат1;
Процедура Свойство() Экспорт
Сообщить(?(
Результат1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Результат1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Результат1 = Форма1.ДобавитьДочерний(ДФ.Результат());
Результат1.Стиль.Ширина = 400;
Результат1.Стиль.Высота = 150;
Результат1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Результат1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_СписокОпределений_свойство.os
Перем ДФ, СписокОпределений1;
Процедура Свойство() Экспорт
Сообщить(?(
СписокОпределений1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
СписокОпределений1 = Форма1.ДобавитьДочерний(ДФ.СписокОпределений());
СписокОпределений1.Стиль.Ширина = 400;
СписокОпределений1.Стиль.Высота = 150;
СписокОпределений1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ссылка1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ссылка1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Ссылка1 = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Ссылка1.Стиль.Ширина = 400;
Ссылка1.Стиль.Высота = 150;
Ссылка1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
СтрокаТаблицы1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СтрокаТаблицы1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
СтрокаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаТаблицы1.Стиль.Ширина = 400;
СтрокаТаблицы1.Стиль.Высота = 150;
СтрокаТаблицы1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Сообщить(?(
Таблица1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Таблица1 = Форма1.ДобавитьДочерний(ДФ.Таблица());
Таблица1.Стиль.Ширина = 400;
Таблица1.Стиль.Высота = 150;
Таблица1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Таблица1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Термин_свойство.os
Перем ДФ, Термин1;
Процедура Свойство() Экспорт
Сообщить(?(
Термин1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Термин1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Термин1 = Форма1.ДобавитьДочерний(ДФ.Термин());
Термин1.Стиль.Ширина = 400;
Термин1.Стиль.Высота = 150;
Термин1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Термин1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
УдаленыйТекст1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УдаленыйТекст1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
УдаленыйТекст1 = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
УдаленыйТекст1.Стиль.Ширина = 400;
УдаленыйТекст1.Стиль.Высота = 150;
УдаленыйТекст1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
УпорядоченныйСписок1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
УпорядоченныйСписок1 = Форма1.ДобавитьДочерний(ДФ.УпорядоченныйСписок());
УпорядоченныйСписок1.Стиль.Ширина = 400;
УпорядоченныйСписок1.Стиль.Высота = 150;
УпорядоченныйСписок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Свойство() Экспорт
Сообщить(?(
Флажок1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Флажок1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Флажок1 = Форма1.ДобавитьДочерний(ДФ.Флажок());
Флажок1.Стиль.Ширина = 400;
Флажок1.Стиль.Высота = 150;
Флажок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Флажок1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ФорматированныйТекст1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ФорматированныйТекст1 = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
ФорматированныйТекст1.Стиль.Ширина = 400;
ФорматированныйТекст1.Стиль.Высота = 150;
ФорматированныйТекст1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Фрейм_свойство.os
Перем ДФ, Фрейм1;
Процедура Свойство() Экспорт
Сообщить(?(
Фрейм1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Фрейм_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Фрейм1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Фрейм1 = Форма1.ДобавитьДочерний(ДФ.Фрейм());
Фрейм1.Стиль.Ширина = 400;
Фрейм1.Стиль.Высота = 150;
Фрейм1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Фрейм1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Холст_свойство.os
Перем ДФ, Холст1;
Процедура Свойство() Экспорт
Сообщить(?(
Холст1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Холст1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Ширина = 400;
Холст1.Стиль.Высота = 150;
Холст1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Холст1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ШапкаТаблицы_свойство.os
Перем ДФ, ШапкаТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
ШапкаТаблицы1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ШапкаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ШапкаТаблицы1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ШапкаТаблицы1 = Форма1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
ШапкаТаблицы1.Стиль.Ширина = 400;
ШапкаТаблицы1.Стиль.Высота = 150;
ШапкаТаблицы1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Свойство() Экспорт
Сообщить(?(
Шкала1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Шкала1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Шкала1 = Форма1.ДобавитьДочерний(ДФ.Шкала());
Шкала1.Стиль.Ширина = 400;
Шкала1.Стиль.Высота = 150;
Шкала1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Шкала1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементПоляСписка1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ЭлементПоляСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементПоляСписка());
ЭлементПоляСписка1.Стиль.Ширина = 400;
ЭлементПоляСписка1.Стиль.Высота = 150;
ЭлементПоляСписка1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ЭлементСписка_свойство.os
Перем ДФ, ЭлементСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементСписка1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ЭлементСписка1 = Форма1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Стиль.Ширина = 400;
ЭлементСписка1.Стиль.Высота = 150;
ЭлементСписка1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ячейка1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ячейка1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Ячейка1 = Форма1.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Стиль.Ширина = 400;
Ячейка1.Стиль.Высота = 150;
Ячейка1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Стиль_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЯчейкаЗаголовка1.Стиль.Высота = "150px"
, "", "!!! ") + "Стиль_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка1.Стиль, "Высота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
ЯчейкаЗаголовка1 = Форма1.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Стиль.Ширина = 400;
ЯчейкаЗаголовка1.Стиль.Высота = 150;
ЯчейкаЗаголовка1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
СтильВерхнейГраницы_ВерхняяГраница_свойство.os
Перем ДФ, ВерхняяГраница1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВерхняяГраница1.СтильВерхнейГраницы = ДФ.СтильГраницы.Двойная
, "", "!!! ") + "СтильВерхнейГраницы_ВерхняяГраница_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВерхняяГраница1 = ДФ.ВерхняяГраница();
ВерхняяГраница1.СтильВерхнейГраницы = ДФ.СтильГраницы.Двойная;
Форма1.Открыть();
СтильВерхнейГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.СтильВерхнейГраницы = ДФ.СтильГраницы.Сплошная
, "", "!!! ") + "СтильВерхнейГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "СтильВерхнейГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.НебесноГолубой ;
Блок1.Стиль.СтильВерхнейГраницы = ДФ.СтильГраницы.Сплошная;
Форма1.Открыть();
СтильВерхнейГраницы_СтильГраниц_свойство.os
Перем ДФ, СтильГраниц1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СтильГраниц1.СтильВерхнейГраницы = ДФ.СтильГраницы.Сплошная
, "", "!!! ") + "СтильВерхнейГраницы_СтильГраниц_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
СтильГраниц1 = ДФ.СтильГраниц();
СтильГраниц1.СтильВерхнейГраницы = ДФ.СтильГраницы.Сплошная;
СтильГраниц1.СтильПравойГраницы = ДФ.СтильГраницы.Ребристая;
СтильГраниц1.СтильНижнейГраницы = ДФ.СтильГраницы.ТочкаПробел;
СтильГраниц1.СтильЛевойГраницы = ДФ.СтильГраницы.ЧертаПробел;
Блок1.Стиль.СтильГраниц = СтильГраниц1;
Форма1.Открыть();
СтильГраниц_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.СтильГраниц = "solid ridge dotted dashed"
, "", "!!! ") + "СтильГраниц_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "СтильГраниц", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Блок1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Ребристая, ДФ.СтильГраницы.ТочкаПробел, ДФ.СтильГраницы.ЧертаПробел);
Форма1.Открыть();
СтильГраницы_Границы_свойство.os
Перем ДФ, Границы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Границы1.СтильГраницы = ДФ.СтильГраницы.Двойная
, "", "!!! ") + "СтильГраницы_Границы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Блок1.Текст = "Блок1";
Границы1 = ДФ.Границы();
Границы1.ШиринаГраницы = ДФ.ШиринаГраницы.Толстая;
Границы1.СтильГраницы = ДФ.СтильГраницы.Двойная;
Границы1.ЦветГраницы = ДФ.Цвет.Аквамариновый;
Блок1.Стиль.Границы = Границы1;
Форма1.Открыть();
СтильЗаполнения_Контекст2d_свойство.os
Перем ДФ, Холст1, ЛинейныйГрадиент1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Холст1.Контекст2d.СтильЗаполнения = ЛинейныйГрадиент1
, "", "!!! ") + "СтильЗаполнения_Контекст2d_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
ЛинейныйГрадиент1 = Холст1.Контекст2d.СоздатьЛинейныйГрадиент(0, 0, 170, 0);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0, ДФ.Цвет.Черный);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0.3, ДФ.Цвет.Малиновый);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0.5, ДФ.Цвет.Синий);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0.6, ДФ.Цвет.Зеленый);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(0.8, ДФ.Цвет.Желтый);
ЛинейныйГрадиент1.ДобавитьОстановкуГрадиента(1, ДФ.Цвет.Красный);
Холст1.Контекст2d.СтильЗаполнения = ЛинейныйГрадиент1;
Холст1.Контекст2d.ЗаполнитьПрямоугольник(20, 20, 150, 100);
Форма1.Открыть();
СтильКонтура_Контур_свойство.os
Перем ДФ, Контур1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контур1.СтильКонтура = ДФ.СтильГраницы.Двойная
, "", "!!! ") + "СтильКонтура_Контур_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Текст = "Здравствуй МИР!";
Блок1.Стиль.Границы = ДФ.Границы(15, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Заполнение = ДФ.Заполнение(10, 20, 20, 10);
Контур1 = ДФ.Контур();
Контур1.ШиринаКонтура = 5;
Контур1.СтильКонтура = ДФ.СтильГраницы.Двойная;
Контур1.ЦветКонтура = ДФ.Цвет.Серый;
Блок1.Стиль.Контур = Контур1;
Форма1.Открыть();
СтильКонтура_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.СтильКонтура = ДФ.СтильКонтура.ТочкаПробел
, "", "!!! ") + "СтильКонтура_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "СтильКонтура", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.НебесноГолубой ;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Стиль.СтильКонтура = ДФ.СтильКонтура.ТочкаПробел;
Форма1.Открыть();
СтильКонцовЛинии_Контекст2d_свойство.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контекст2d1.СтильКонцовЛинии = ДФ.СтильКонцовЛинии.Квадрат
, "", "!!! ") + "СтильКонцовЛинии_Контекст2d_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.НачатьПуть();
Контекст2d1.ШиринаЛинии = 10;
Контекст2d1.СтильКонцовЛинии = ДФ.СтильКонцовЛинии.Торец;
Контекст2d1.ПерейтиКТочке(20, 20);
Контекст2d1.Линия(200, 20);
Контекст2d1.Начертить();
Контекст2d1.НачатьПуть();
Контекст2d1.ШиринаЛинии = 10;
Контекст2d1.СтильКонцовЛинии = ДФ.СтильКонцовЛинии.Круг;
Контекст2d1.ПерейтиКТочке(20, 40);
Контекст2d1.Линия(200, 40);
Контекст2d1.Начертить();
Контекст2d1.НачатьПуть();
Контекст2d1.ШиринаЛинии = 10;
Контекст2d1.СтильКонцовЛинии = ДФ.СтильКонцовЛинии.Квадрат;
Контекст2d1.ПерейтиКТочке(20, 60);
Контекст2d1.Линия(200, 60);
Контекст2d1.Начертить();
Форма1.Открыть();
СтильЛевойГраницы_ЛеваяГраница_свойство.os
Перем ДФ, ЛеваяГраница1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЛеваяГраница1.СтильЛевойГраницы = ДФ.СтильГраницы.ТочкаПробел
, "", "!!! ") + "СтильЛевойГраницы_ЛеваяГраница_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Здравствуй МИР!";
ЛеваяГраница1 = ДФ.ЛеваяГраница();
ЛеваяГраница1.ШиринаЛевойГраницы = 4;
ЛеваяГраница1.СтильЛевойГраницы = ДФ.СтильГраницы.ТочкаПробел;
ЛеваяГраница1.ЦветЛевойГраницы = ДФ.Цвет.Красный;
ЛеваяГраница1 = ЛеваяГраница1;
Блок1.Стиль.ЛеваяГраница = ЛеваяГраница1;
Блок1.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Форма1.Открыть();
СтильЛевойГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.СтильЛевойГраницы = ДФ.СтильГраницы.Сплошная
, "", "!!! ") + "СтильЛевойГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "СтильЛевойГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.НебесноГолубой ;
Блок1.Стиль.СтильЛевойГраницы = ДФ.СтильГраницы.Сплошная;
Форма1.Открыть();
СтильЛевойГраницы_СтильГраниц_свойство.os
Перем ДФ, СтильГраниц1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СтильГраниц1.СтильЛевойГраницы = ДФ.СтильГраницы.ЧертаПробел
, "", "!!! ") + "СтильЛевойГраницы_СтильГраниц_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
СтильГраниц1 = ДФ.СтильГраниц();
СтильГраниц1.СтильВерхнейГраницы = ДФ.СтильГраницы.Сплошная;
СтильГраниц1.СтильПравойГраницы = ДФ.СтильГраницы.Ребристая;
СтильГраниц1.СтильНижнейГраницы = ДФ.СтильГраницы.ТочкаПробел;
СтильГраниц1.СтильЛевойГраницы = ДФ.СтильГраницы.ЧертаПробел;
Блок1.Стиль.СтильГраниц = СтильГраниц1;
Форма1.Открыть();
СтильНижнейГраницы_НижняяГраница_свойство.os
Перем ДФ, НижняяГраница1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НижняяГраница1.СтильНижнейГраницы = ДФ.СтильГраницы.ТочкаПробел
, "", "!!! ") + "СтильНижнейГраницы_НижняяГраница_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Здравствуй МИР!";
НижняяГраница1 = ДФ.НижняяГраница();
НижняяГраница1.ШиринаНижнейГраницы = 4;
НижняяГраница1.СтильНижнейГраницы = ДФ.СтильГраницы.ТочкаПробел;
НижняяГраница1.ЦветНижнейГраницы = ДФ.Цвет.Красный;
Блок1.Стиль.НижняяГраница = НижняяГраница1;
Блок1.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Форма1.Открыть();
СтильНижнейГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.СтильНижнейГраницы = ДФ.СтильГраницы.Сплошная
, "", "!!! ") + "СтильНижнейГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "СтильНижнейГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.НебесноГолубой ;
Блок1.Стиль.СтильНижнейГраницы = ДФ.СтильГраницы.Сплошная;
Форма1.Открыть();
СтильНижнейГраницы_СтильГраниц_свойство.os
Перем ДФ, СтильГраниц1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СтильГраниц1.СтильНижнейГраницы = ДФ.СтильГраницы.ТочкаПробел
, "", "!!! ") + "СтильНижнейГраницы_СтильГраниц_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
СтильГраниц1 = ДФ.СтильГраниц();
СтильГраниц1.СтильВерхнейГраницы = ДФ.СтильГраницы.Сплошная;
СтильГраниц1.СтильПравойГраницы = ДФ.СтильГраницы.Ребристая;
СтильГраниц1.СтильНижнейГраницы = ДФ.СтильГраницы.ТочкаПробел;
СтильГраниц1.СтильЛевойГраницы = ДФ.СтильГраницы.ЧертаПробел;
Блок1.Стиль.СтильГраниц = СтильГраниц1;
Форма1.Открыть();
СтильОбводки_Контекст2d_свойство.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контекст2d1.СтильОбводки = ДФ.Цвет.Красный
, "", "!!! ") + "СтильОбводки_Контекст2d_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.СтильОбводки = ДФ.Цвет.Красный;
Контекст2d1.РисоватьПрямоугольник(20, 20, 150, 100);
Форма1.Открыть();
СтильПравойГраницы_ПраваяГраница_свойство.os
Перем ДФ, ПраваяГраница1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПраваяГраница1.СтильПравойГраницы = ДФ.СтильГраницы.ТочкаПробел
, "", "!!! ") + "СтильПравойГраницы_ПраваяГраница_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Здравствуй МИР!";
ПраваяГраница1 = ДФ.ПраваяГраница();
ПраваяГраница1.ШиринаПравойГраницы = 4;
ПраваяГраница1.СтильПравойГраницы = ДФ.СтильГраницы.ТочкаПробел;
ПраваяГраница1.ЦветПравойГраницы = ДФ.Цвет.Красный;
Блок1.Стиль.ПраваяГраница = ПраваяГраница1;
Блок1.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Форма1.Открыть();
СтильПравойГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.СтильПравойГраницы = ДФ.СтильГраницы.Сплошная
, "", "!!! ") + "СтильПравойГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "СтильПравойГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.НебесноГолубой ;
Блок1.Стиль.СтильПравойГраницы = ДФ.СтильГраницы.Сплошная;
Форма1.Открыть();
СтильПравойГраницы_СтильГраниц_свойство.os
Перем ДФ, СтильГраниц1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СтильГраниц1.СтильПравойГраницы = ДФ.СтильГраницы.Ребристая
, "", "!!! ") + "СтильПравойГраницы_СтильГраниц_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
СтильГраниц1 = ДФ.СтильГраниц();
СтильГраниц1.СтильВерхнейГраницы = ДФ.СтильГраницы.Сплошная;
СтильГраниц1.СтильПравойГраницы = ДФ.СтильГраницы.Ребристая;
СтильГраниц1.СтильНижнейГраницы = ДФ.СтильГраницы.ТочкаПробел;
СтильГраниц1.СтильЛевойГраницы = ДФ.СтильГраницы.ЧертаПробел;
Блок1.Стиль.СтильГраниц = СтильГраниц1;
Форма1.Открыть();
СтильРазделителяКолонок_РазделительКолонок_свойство.os
Перем ДФ, РазделительКолонок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
РазделительКолонок1.СтильРазделителяКолонок = ДФ.СтильГраницы.Двойная
, "", "!!! ") + "СтильРазделителяКолонок_РазделительКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РазделительКолонок1 = ДФ.РазделительКолонок();
РазделительКолонок1.ШиринаРазделителяКолонок = ДФ.ШиринаГраницы.Средняя;
РазделительКолонок1.СтильРазделителяКолонок = ДФ.СтильГраницы.Двойная;
РазделительКолонок1.ЦветРазделителяКолонок = ДФ.Цвет.Синий;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("БелаяДымка");
Абзац1.Текст = "И тут появилась Черная Королева.
|«Ого! Как выросла! – подумала Алиса. – Когда я нашла ее в золе, она была не больше моего пальца. А теперь я ей по плечо».
|– У нас такой чудесный воздух, что все тянутся вверх не по дням, а по часам, – сказала Роза, будто подслушала мысли Алисы.
|– Пойду навстречу ей, – сказала Алиса, как бы извиняясь перед цветами.
|С ними было, конечно, весело поболтать, но беседа с Королевой наверняка намного интересней.
|– Если хочешь встретиться, – посоветовала Роза, – иди не к ней, а от нее.
|Такой явной глупости Алиса и слушать не стала. И, конечно же, пошла прямиком к Королеве. Но, к ее изумлению, Королева мгновенно исчезла из виду.
|А дорожка снова привела Алису к дому. Раздосадованная, Алиса отпрянула от дома и оглянулась. Королева маячила вдалеке позади нее.
|Алиса заколебалась: уж не права ли была Роза и не следует ли двинуться в противоположную от Королевы сторону? Так она и сделала.
|И все вышло чудесно! Буквально через минуту она столкнулась нос к носу с Королевой. И что удивительно, холм, до которого она так
|долго не могла дойти, возвышался прямо перед ней.
|– Ты откуда взялась? – строго спросила Королева. – Куда идешь? Гляди в глаза! Говори почтительно! Не маши руками, не верти головой и не дрыгай ногами!
|Алиса как можно вежливее объяснила, что немного заблудилась, а теперь разобралась, что к чему и что куда, и идет себе своей дорогой.";
Абзац1.Стиль.РазделительКолонок = РазделительКолонок1;
Абзац1.Стиль.КоличествоКолонок = 3;
Форма1.Открыть();
СтильРазделителяКолонок_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.СтильРазделителяКолонок = ДФ.СтильГраницы.Сплошная
, "", "!!! ") + "СтильРазделителяКолонок_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "СтильРазделителяКолонок", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РазделительКолонок1 = ДФ.РазделительКолонок(ДФ.ШиринаГраницы.Средняя, ДФ.СтильГраницы.Двойная, ДФ.Цвет.Синий);
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("БелаяДымка");
Абзац1.Текст = "И тут появилась Черная Королева.
|«Ого! Как выросла! – подумала Алиса. – Когда я нашла ее в золе, она была не больше моего пальца. А теперь я ей по плечо».
|– У нас такой чудесный воздух, что все тянутся вверх не по дням, а по часам, – сказала Роза, будто подслушала мысли Алисы.
|– Пойду навстречу ей, – сказала Алиса, как бы извиняясь перед цветами.
|С ними было, конечно, весело поболтать, но беседа с Королевой наверняка намного интересней.
|– Если хочешь встретиться, – посоветовала Роза, – иди не к ней, а от нее.
|Такой явной глупости Алиса и слушать не стала. И, конечно же, пошла прямиком к Королеве. Но, к ее изумлению, Королева мгновенно исчезла из виду.
|А дорожка снова привела Алису к дому. Раздосадованная, Алиса отпрянула от дома и оглянулась. Королева маячила вдалеке позади нее.
|Алиса заколебалась: уж не права ли была Роза и не следует ли двинуться в противоположную от Королевы сторону? Так она и сделала.
|И все вышло чудесно! Буквально через минуту она столкнулась нос к носу с Королевой. И что удивительно, холм, до которого она так
|долго не могла дойти, возвышался прямо перед ней.
|– Ты откуда взялась? – строго спросила Королева. – Куда идешь? Гляди в глаза! Говори почтительно! Не маши руками, не верти головой и не дрыгай ногами!
|Алиса как можно вежливее объяснила, что немного заблудилась, а теперь разобралась, что к чему и что куда, и идет себе своей дорогой.";
Абзац1.Стиль.РазделительКолонок = РазделительКолонок1;
Абзац1.Стиль.КоличествоКолонок = 3;
Абзац1.Стиль.СтильРазделителяКолонок = ДФ.СтильГраницы.Сплошная;
Форма1.Открыть();
СтильСдвига_Стиль_свойство.os
Перем ДФ, Блок2;
Процедура Свойство() Экспорт
Сообщить(?(
Блок2.Стиль.СтильСдвига = ДФ.СтильСдвига.Трехмерный
, "", "!!! ") + "СтильСдвига_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок2.Стиль, "СтильСдвига", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 500;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 200;
Блок1.Стиль.Высота = 200;
Блок1.Стиль.Отступ = ДФ.Отступ(100, 100, 100, 100);
Блок1.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Текст = "Блок1";
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Заполнение = ДФ.Заполнение(50, 50, 50, 50);
Блок2.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Блок2.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок2.Стиль.ЦветФона = ДФ.Цвет.Коралловый;
Блок2.Стиль.Сдвиг = ДФ.ПоворотИгрек(50);
Блок2.Текст = "Привет Блок2";
Блок2.Стиль.СтильСдвига = ДФ.СтильСдвига.Трехмерный;
Блок3 = Блок2.ДобавитьДочерний(ДФ.Блок());
Блок3.Стиль.Заполнение = ДФ.Заполнение(40, 40, 40, 40);
Блок3.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Блок3.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок3.Стиль.ЦветФона = ДФ.Цвет.СветлоСиний;
Блок3.Стиль.Сдвиг = ДФ.ПоворотИгрек(70);
Блок3.Текст = "Блок3";
Форма1.Открыть();
СтильСписка_Стиль_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.Стиль.СтильСписка = "inside url(""icon.png"") disc"
, "", "!!! ") + "СтильСписка_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1.Стиль, "СтильСписка", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 400;
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
РаскрываемыйБлок1.ДобавитьДочерний(ЗаголовокРаскрываемогоБлока1);
ЗаголовокРаскрываемогоБлока1.Текст = "Жители деревни Простоквашино";
НеупорядоченныйСписок1 = РаскрываемыйБлок1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
ЭлементСписка1 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Кот Матроскин";
ЭлементСписка2 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка2.Текст = "Пёс Шарик";
ЭлементСписка3 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка3.Текст = "Птица Галчонок";
НеупорядоченныйСписок1.Стиль.СтильСписка = ДФ.СтильСписка(ДФ.ТипСтиляСписка.ЗакрашенныйКруг, ДФ.ПозицияСтиляСписка.Внутри, "icon.png");
Форма1.Открыть();
СтильУглаПересечения_Контекст2d_свойство.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контекст2d1.СтильУглаПересечения = ДФ.СтильУглаПересечения.Круг
, "", "!!! ") + "СтильУглаПересечения_Контекст2d_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.НачатьПуть();
Контекст2d1.ШиринаЛинии = 10;
Контекст2d1.СтильУглаПересечения = ДФ.СтильУглаПересечения.Круг;
Контекст2d1.ПерейтиКТочке(20, 20);
Контекст2d1.Линия(100, 50);
Контекст2d1.Линия(20, 100);
Контекст2d1.Начертить();
Форма1.Открыть();
СтильШрифта_ОкноСообщений_свойство.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОкноСообщений1.СтильШрифта = ДФ.СтильШрифта.Курсив
, "", "!!! ") + "СтильШрифта_ОкноСообщений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.СтильШрифта = ДФ.СтильШрифта.Курсив;
ОкноСообщений1.Показать();
Форма1.Открыть();
СтильШрифта_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.СтильШрифта = ДФ.СтильШрифта.Нормальный
, "", "!!! ") + "СтильШрифта_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "СтильШрифта", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шрифт1 = ДФ.Шрифт();
Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
Шрифт1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
Шрифт1.РазмерШрифта = 20;
Шрифт1.ВысотаСтроки = 50;
Шрифт1.СемействоШрифтов = "arial,serif";
Абзац1.Стиль.Шрифт = Шрифт1;
Абзац1.Стиль.СтильШрифта = ДФ.СтильШрифта.Нормальный;
Форма1.Открыть();
СтильШрифта_Уведомления_свойство.os
Перем ДФ, Уведомления1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Уведомления1.СтильШрифта = ДФ.СтильШрифта.Курсив
, "", "!!! ") + "СтильШрифта_Уведомления_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
Уведомления1.СтильШрифта = ДФ.СтильШрифта.Курсив;
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Форма1.Открыть();
СтильШрифта_Шрифт_свойство.os
Перем ДФ, Шрифт1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив
, "", "!!! ") + "СтильШрифта_Шрифт_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шрифт1 = ДФ.Шрифт();
Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
Шрифт1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
Шрифт1.РазмерШрифта = 20;
Шрифт1.ВысотаСтроки = 50;
Шрифт1.СемействоШрифтов = "arial,serif";
Абзац1.Стиль.Шрифт = Шрифт1;
Форма1.Открыть();
СтрокаФункций_ДекларативныеФормы_свойство.os
Перем ДФ, СтрокаФункций;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СтрокаФункций <> ""
, "", "!!! ") + "СтрокаФункций_ДекларативныеФормы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Параметр = ДФ.АргументыСобытия.Параметр;
Сообщить("Параметр[""Поле1""] = " + Параметр["Поле1"] + " " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
// Сообщить("ДФ.СтрокаФункций = " + ДФ.СтрокаФункций);
СтрокаФункций = ДФ.СтрокаФункций;
Форма1.Открыть();
Строки_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.Строки = 10
, "", "!!! ") + "Строки_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "Строки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Текст = "– Забавный стишок! – промолвила Алиса.
|– В нем что-то есть.
|– Честно говоря, кто этот ЧТО-ТО, Алиса объяснить не смогла бы, но ей стыдно было в этом признаться даже самой себе. И она пробормотала:
|– Если собраться с мыслями, то, я думаю, здесь кто-то кого-то чем-то и зачем-то свержил, то есть отсвечил. Но что это я! – спохватилась она.
|– Тут еще столько надо успеть. Обежать все комнаты. Заглянуть в сад!";
ОбластьТекста1.ПереносТекста = ДФ.ПереносТекста.Переносить;
ОбластьТекста1.Строки = 10;
Форма1.Открыть();
Строки_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "Строки", ДФ.Действие(ЭтотОбъект, "Строки"));
КонецПроцедуры
Процедура Строки() Экспорт
Строки = Таблица1.Строки;
// Для А = 0 По Строки.ВГраница() Цикл
// Эл = Строки.Получить(А);
// Сообщить("Эл = " + Эл + " ключ - " + Эл.КлючЭлемента);
// КонецЦикла;
Сообщить(?(
Строки.Количество() = 5
, "", "!!! ") + "Строки_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
Форма1.Открыть();
Сценарий_Действие_свойство.os
Перем ДФ, Действие;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Действие.Сценарий = ЭтотОбъект
, "", "!!! ") + "Сценарий_Действие_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Структура1 = Новый Структура("Поле1","ЧтоТоТам");
Структура1.Вставить("Число25", 25);
Структура1.Вставить("Число48", 48);
Действие = ДФ.Действие(ЭтотОбъект, "");
Действие.ИмяМетода = "Форма1_Загружена";
Действие.Параметр = Структура1;
Форма1.Загружена = Действие;
Форма1.Открыть();
Тангенс_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().Тангенс(1) = 1.5574077246549
, "", "!!! ") + "Тангенс_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().Тангенс(1);
Форма1.Открыть();
Текст_Абзац_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Текст = "Это Абзац1"
, "", "!!! ") + "Текст_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Абзац1";
Форма1.Открыть();
Текст_Артикль_свойство.os
Перем ДФ, Артикль1;
Процедура Свойство() Экспорт
Сообщить(?(
Артикль1.Текст = "Это Артикль1"
, "", "!!! ") + "Текст_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Артикль1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Текст = "Это Артикль1";
Форма1.Открыть();
Текст_Блок_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Текст = "Это Блок1"
, "", "!!! ") + "Текст_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Это Блок1";
Форма1.Открыть();
Текст_Группа_свойство.os
Перем ДФ, Группа1;
Процедура Свойство() Экспорт
Сообщить(?(
Группа1.Текст = "Это Группа1"
, "", "!!! ") + "Текст_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Группа1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Текст = "Это Группа1";
Форма1.Открыть();
Текст_Диалог_свойство.os
Перем ДФ, Диалог1;
Процедура Свойство() Экспорт
Сообщить(?(
Диалог1.Текст = "Это Диалог1"
, "", "!!! ") + "Текст_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Диалог1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Текст = "Это Диалог1";
Диалог1.Показать();
Форма1.Открыть();
Текст_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок1;
Процедура Свойство() Экспорт
Сообщить(?(
ДополнительныйБлок1.Текст = "Это ДополнительныйБлок1"
, "", "!!! ") + "Текст_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ДополнительныйБлок1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "Это ДополнительныйБлок1";
Форма1.Открыть();
Текст_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ЖирныйТекст1.Текст = "Это ЖирныйТекст1"
, "", "!!! ") + "Текст_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЖирныйТекст1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Текст = "Это ЖирныйТекст1";
Форма1.Открыть();
Текст_Заголовок1_свойство.os
Перем ДФ, Заголовок11;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок11.Текст = "Это Заголовок11"
, "", "!!! ") + "Текст_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок11, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Текст = "Это Заголовок11";
Форма1.Открыть();
Текст_Заголовок2_свойство.os
Перем ДФ, Заголовок21;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок21.Текст = "Это Заголовок21"
, "", "!!! ") + "Текст_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок21, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Текст = "Это Заголовок21";
Форма1.Открыть();
Текст_Заголовок3_свойство.os
Перем ДФ, Заголовок31;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок31.Текст = "Это Заголовок31"
, "", "!!! ") + "Текст_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок31, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Текст = "Это Заголовок31";
Форма1.Открыть();
Текст_Заголовок4_свойство.os
Перем ДФ, Заголовок41;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок41.Текст = "Это Заголовок41"
, "", "!!! ") + "Текст_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок41, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Текст = "Это Заголовок41";
Форма1.Открыть();
Текст_Заголовок5_свойство.os
Перем ДФ, Заголовок51;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок51.Текст = "Это Заголовок51"
, "", "!!! ") + "Текст_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок51, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Текст = "Это Заголовок51";
Форма1.Открыть();
Текст_Заголовок6_свойство.os
Перем ДФ, Заголовок61;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок61.Текст = "Это Заголовок61"
, "", "!!! ") + "Текст_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок61, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Текст = "Это Заголовок61";
Форма1.Открыть();
Текст_Заголовок_свойство.os
Перем ДФ, Заголовок1;
Процедура Свойство() Экспорт
Сообщить(?(
Заголовок1.Текст = "Это Заголовок1"
, "", "!!! ") + "Текст_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Заголовок1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Текст = "Это Заголовок1";
Форма1.Открыть();
Текст_ЗаголовокГруппы_свойство.os
Перем ДФ, ЗаголовокГруппы1;
Процедура Свойство() Экспорт
Сообщить(?(
ЗаголовокГруппы1.Текст = "Это ЗаголовокГруппы1"
, "", "!!! ") + "Текст_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокГруппы1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Текст = "Это ЗаголовокГруппы1";
Форма1.Открыть();
Текст_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура Свойство() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.Текст = "Это ЗаголовокРаскрываемогоБлока1"
, "", "!!! ") + "Текст_ЗаголовокРаскрываемогоБлока_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЗаголовокРаскрываемогоБлока1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Текст = "Это ЗаголовокРаскрываемогоБлока1";
Форма1.Открыть();
Текст_Итоги_свойство.os
Перем ДФ, Итоги1;
Процедура Свойство() Экспорт
Сообщить(?(
Итоги1.Текст = "Это Итоги1"
, "", "!!! ") + "Текст_Итоги_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Итоги1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Текст = "Это Итоги1";
Форма1.Открыть();
Текст_Карта_свойство.os
Перем ДФ, Карта1;
Процедура Свойство() Экспорт
Сообщить(?(
Карта1.Текст = "Это Карта1"
, "", "!!! ") + "Текст_Карта_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Карта1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Карта1 = ДФ.Карта();
Карта1.Родитель = Форма1;
Карта1.Текст = "Это Карта1";
Форма1.Открыть();
Текст_Кнопка_свойство.os
Перем ДФ, Кнопка1;
Процедура Свойство() Экспорт
Сообщить(?(
Кнопка1.Текст = "Это Кнопка1"
, "", "!!! ") + "Текст_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Кнопка1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Форма1.Открыть();
Текст_Код_свойство.os
Перем ДФ, Код1;
Процедура Свойство() Экспорт
Сообщить(?(
Код1.Текст = "Это Код1"
, "", "!!! ") + "Текст_Код_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Код1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Текст = "Это Код1";
Форма1.Открыть();
Текст_Колонтитул_свойство.os
Перем ДФ, Колонтитул1;
Процедура Свойство() Экспорт
Сообщить(?(
Колонтитул1.Текст = "Это Колонтитул1"
, "", "!!! ") + "Текст_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Колонтитул1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Текст = "Это Колонтитул1";
Форма1.Открыть();
Текст_Контент_свойство.os
Перем ДФ, Контент1;
Процедура Свойство() Экспорт
Сообщить(?(
Контент1.Текст = "Это Контент1"
, "", "!!! ") + "Текст_Контент_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Контент1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент1 = Форма1.Контент;
Контент1.Текст = "Это Контент1";
Форма1.Открыть();
Текст_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
КурсивТекст1.Текст = "Это КурсивТекст1"
, "", "!!! ") + "Текст_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(КурсивТекст1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Текст = "Это КурсивТекст1";
Форма1.Открыть();
Текст_Линия_свойство.os
Перем ДФ, Линия1;
Процедура Свойство() Экспорт
Сообщить(?(
Линия1.Текст = "Это Линия1"
, "", "!!! ") + "Текст_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Линия1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Линия1 = ДФ.Линия();
Линия1.Родитель = Форма1;
Линия1.Текст = "Это Линия1";
Форма1.Открыть();
Текст_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
МаркированныйТекст1.Текст = "Это МаркированныйТекст1"
, "", "!!! ") + "Текст_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МаркированныйТекст1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Текст = "Это МаркированныйТекст1";
Форма1.Открыть();
Текст_МедиаГруппа_свойство.os
Перем ДФ, МедиаГруппа1;
Процедура Свойство() Экспорт
Сообщить(?(
МедиаГруппа1.Текст = "Это МедиаГруппа1"
, "", "!!! ") + "Текст_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МедиаГруппа1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Текст = "Это МедиаГруппа1";
Форма1.Открыть();
Текст_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
МелкийТекст1.Текст = "Это МелкийТекст1"
, "", "!!! ") + "Текст_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(МелкийТекст1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Текст = "Это МелкийТекст1";
Форма1.Открыть();
Текст_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
НадстрочныйТекст1.Текст = "Это НадстрочныйТекст1"
, "", "!!! ") + "Текст_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НадстрочныйТекст1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Текст = "Это НадстрочныйТекст1";
Форма1.Открыть();
Текст_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
НаправленныйТекст1.Текст = "Это НаправленныйТекст1"
, "", "!!! ") + "Текст_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НаправленныйТекст1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Текст = "Это НаправленныйТекст1";
Форма1.Открыть();
Текст_НеупорядоченныйСписок_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.Текст = "Это НеупорядоченныйСписок1"
, "", "!!! ") + "Текст_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Текст = "Это НеупорядоченныйСписок1";
Форма1.Открыть();
Текст_НижнийКолонтитул_свойство.os
Перем ДФ, НижнийКолонтитул1;
Процедура Свойство() Экспорт
Сообщить(?(
НижнийКолонтитул1.Текст = "Это НижнийКолонтитул1"
, "", "!!! ") + "Текст_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НижнийКолонтитул1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Текст = "Это НижнийКолонтитул1";
Форма1.Открыть();
Текст_Область_свойство.os
Перем ДФ, Область1;
Процедура Свойство() Экспорт
Сообщить(?(
Область1.Текст = "Это Область1"
, "", "!!! ") + "Текст_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Область1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Область1 = ДФ.Область();
Область1.Родитель = Форма1;
Область1.Текст = "Это Область1";
Форма1.Открыть();
Текст_ОбластьТаблицы_свойство.os
Перем ДФ, ОбластьТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТаблицы1.Текст = "Это ОбластьТаблицы1"
, "", "!!! ") + "Текст_ОбластьТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТаблицы1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Текст = "Это ОбластьТаблицы1";
Форма1.Открыть();
Текст_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.Текст = "Это ОбластьТекста"
, "", "!!! ") + "Текст_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ОбластьТекста1 = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
ОбластьТекста1.Текст = "Это ОбластьТекста";
Форма1.Открыть();
Текст_ОкноСообщений_свойство.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОкноСообщений1.Текст = "В декабре, в декабре
Все деревья в серебре.
Нашу речку, словно в сказке,
За ночь вымостил мороз,
Обновил коньки, салазки,
Елку из лесу привез.
"
, "", "!!! ") + "Текст_ОкноСообщений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.Показать();
Форма1.Открыть();
Текст_ОписаниеМедиа_свойство.os
Перем ДФ, ОписаниеМедиа1;
Процедура Свойство() Экспорт
Сообщить(?(
ОписаниеМедиа1.Текст = "Это ОписаниеМедиа1"
, "", "!!! ") + "Текст_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОписаниеМедиа1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Текст = "Это ОписаниеМедиа1";
Форма1.Открыть();
Текст_Определение_свойство.os
Перем ДФ, Определение1;
Процедура Свойство() Экспорт
Сообщить(?(
Определение1.Текст = "Это Определение1"
, "", "!!! ") + "Текст_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Определение1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Текст = "Это Определение1";
Форма1.Открыть();
Текст_Подпись_свойство.os
Перем ДФ, Подпись1;
Процедура Свойство() Экспорт
Сообщить(?(
Подпись1.Текст = "Это Подпись1"
, "", "!!! ") + "Текст_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Подпись1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Это Подпись1";
Форма1.Открыть();
Текст_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ПодстрочныйТекст1.Текст = "Это ПодстрочныйТекст1"
, "", "!!! ") + "Текст_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодстрочныйТекст1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Текст = "Это ПодстрочныйТекст1";
Форма1.Открыть();
Текст_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ПодчеркнутыйТекст1.Текст = "Это ПодчеркнутыйТекст1"
, "", "!!! ") + "Текст_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПодчеркнутыйТекст1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Текст = "Это ПодчеркнутыйТекст1";
Форма1.Открыть();
Текст_Результат_свойство.os
Перем ДФ, Результат1;
Процедура Свойство() Экспорт
Сообщить(?(
Результат1.Текст = "Это Результат1"
, "", "!!! ") + "Текст_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Результат1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Текст = "Это Результат1";
Форма1.Открыть();
Текст_Скрипт_свойство.os
Перем ДФ, Скрипт1;
Процедура Текст() Экспорт
Сообщить(?(
Скрипт1.Текст = "let str;str = ""Добавили JavaScript-код"";"
, "", "!!! ") + "Текст_Скрипт_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Скрипт1, "Текст", ДФ.Действие(ЭтотОбъект, "Текст"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Скрипт1 = Форма1.Контент.ДобавитьДочерний(ДФ.Скрипт());
Скрипт1.Текст = "
|let str;
|str = ""Добавили JavaScript-код"";
|";
Форма1.Открыть();
Текст_СписокОпределений_свойство.os
Перем ДФ, СписокОпределений1;
Процедура Свойство() Экспорт
Сообщить(?(
СписокОпределений1.Текст = "Это СписокОпределений1"
, "", "!!! ") + "Текст_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СписокОпределений1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Текст = "Это СписокОпределений1";
Форма1.Открыть();
Текст_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ссылка1.Текст = "Это Ссылка1"
, "", "!!! ") + "Текст_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ссылка1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Текст = "Это Ссылка1";
Форма1.Открыть();
Текст_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
СтрокаТаблицы1.Текст = "Это СтрокаТаблицы1"
, "", "!!! ") + "Текст_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СтрокаТаблицы1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Текст = "Это СтрокаТаблицы1";
Форма1.Открыть();
Текст_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
Сообщить(?(
Таблица1.Текст = "Это Таблица1"
, "", "!!! ") + "Текст_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Текст = "Это Таблица1";
Форма1.Открыть();
Текст_Термин_свойство.os
Перем ДФ, Термин1;
Процедура Свойство() Экспорт
Сообщить(?(
Термин1.Текст = "Это Термин1"
, "", "!!! ") + "Текст_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Термин1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Текст = "Это Термин1";
Форма1.Открыть();
Текст_Уведомления_свойство.os
Перем ДФ, Уведомления1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Уведомления1.Текст = "В декабре, в декабре
Все деревья в серебре.
Нашу речку, словно в сказке,
За ночь вымостил мороз,
Обновил коньки, салазки,
Елку из лесу привез.
"
, "", "!!! ") + "Текст_Уведомления_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Форма1.Открыть();
Текст_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
УдаленыйТекст1.Текст = "Это УдаленыйТекст1"
, "", "!!! ") + "Текст_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УдаленыйТекст1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Текст = "Это УдаленыйТекст1";
Форма1.Открыть();
Текст_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
УпорядоченныйСписок1.Текст = "Это УпорядоченныйСписок1"
, "", "!!! ") + "Текст_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Текст = "Это УпорядоченныйСписок1";
Форма1.Открыть();
Текст_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст1;
Процедура Свойство() Экспорт
Сообщить(?(
ФорматированныйТекст1.Текст = "Это ФорматированныйТекст1"
, "", "!!! ") + "Текст_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ФорматированныйТекст1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Текст = "Это ФорматированныйТекст1";
Форма1.Открыть();
Текст_ШапкаТаблицы_свойство.os
Перем ДФ, ШапкаТаблицы1;
Процедура Свойство() Экспорт
Сообщить(?(
ШапкаТаблицы1.Текст = "Это ШапкаТаблицы1"
, "", "!!! ") + "Текст_ШапкаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ШапкаТаблицы1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Текст = "Это ШапкаТаблицы1";
Форма1.Открыть();
Текст_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементПоляСписка1.Текст = "Это ЭлементПоляСписка1"
, "", "!!! ") + "Текст_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементПоляСписка1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Текст = "Это ЭлементПоляСписка1";
Форма1.Открыть();
Текст_ЭлементСписка_свойство.os
Перем ДФ, ЭлементСписка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЭлементСписка1.Текст = "Это ЭлементСписка1"
, "", "!!! ") + "Текст_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЭлементСписка1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Текст = "Это ЭлементСписка1";
Форма1.Открыть();
Текст_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Свойство() Экспорт
Сообщить(?(
Ячейка1.Текст = "Это Ячейка1"
, "", "!!! ") + "Текст_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ячейка1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Текст = "Это Ячейка1";
Форма1.Открыть();
Текст_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура Свойство() Экспорт
Сообщить(?(
ЯчейкаЗаголовка1.Текст = "Это ЯчейкаЗаголовка1"
, "", "!!! ") + "Текст_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ЯчейкаЗаголовка1, "Текст", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Текст = "Это ЯчейкаЗаголовка1";
Форма1.Открыть();
ТекущаяПозиция_Аудио_свойство.os
Перем ДФ, Аудио1;
Процедура Свойство() Экспорт
Сообщить(?(
Аудио1.ТекущаяПозиция = 25
, "", "!!! ") + "ТекущаяПозиция_Аудио_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Аудио1, "ТекущаяПозиция", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.ТекущаяПозиция = 25;
Форма1.Открыть();
Тень_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Тень = "rgb(192, 192, 192) 30px 30px 10px 10px"
, "", "!!! ") + "Тень_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Тень", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Блок1";
Блок1.Стиль.Высота = 100;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Отступ = ДФ.Отступ(50, 50, 50, 50);
Блок1.Стиль.Тень = ДФ.Тень(30, 30, 10, 10, ДФ.Цвет.Серебристый);
Форма1.Открыть();
Тень_ФильтрИзображений_свойство.os
Перем ДФ, ФильтрИзображений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + ФильтрИзображений1.Тень = "ДфТень"
, "", "!!! ") + "Тень_ФильтрИзображений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Изображение1 = ДФ.Изображение();
Форма1.ДобавитьДочерний(Изображение1);
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Стиль.Ширина = 200;
ФильтрИзображений1 = ДФ.ФильтрИзображений();
ФильтрИзображений1.Тень = ДФ.Тень(30, 30, 10, 20, ДФ.Цвет.Серебристый);
Изображение1.Стиль.Фильтр = ФильтрИзображений1;
Форма1.Открыть();
ТеньТекста_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ТеньТекста = "rgb(255, 192, 203) 2px 2px 0px"
, "", "!!! ") + "ТеньТекста_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ТеньТекста", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Стиль.ТеньТекста (Style.TextShadow) Свойство";
Шрифт1 = ДФ.Шрифт();
Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
Шрифт1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
Шрифт1.РазмерШрифта = 20;
Шрифт1.ВысотаСтроки = 50;
Шрифт1.СемействоШрифтов = "arial,serif";
Абзац1.Стиль.Шрифт = Шрифт1;Абзац1.Стиль.ТеньТекста = ДФ.Тень(3, 3, 0, , ДФ.Цвет.Белый);
Абзац1.Стиль.ТеньТекста = ДФ.Тень(2, 2, 0, , ДФ.Цвет.Розовый);
Форма1.Открыть();
ТипМаркера_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
УпорядоченныйСписок1.ТипМаркера = ДФ.ТипМаркера.РимскиеЗаглавные
, "", "!!! ") + "ТипМаркера_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(УпорядоченныйСписок1, "ТипМаркера", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 450;
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Начало = 10;
ЭлементСписка1 = УпорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Кот Матроскин";
ЭлементСписка2 = УпорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка2.Текст = "Пёс Шарик";
ЭлементСписка3 = УпорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка3.Текст = "Птица Галчонок";
УпорядоченныйСписок1.ТипМаркера = ДФ.ТипМаркера.РимскиеЗаглавные;
Форма1.Открыть();
ТипСтиляСписка_Стиль_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Свойство() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.Стиль.ТипСтиляСписка = ДФ.ТипСтиляСписка.Квадрат
, "", "!!! ") + "ТипСтиляСписка_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НеупорядоченныйСписок1.Стиль, "ТипСтиляСписка", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
РаскрываемыйБлок1.ДобавитьДочерний(ЗаголовокРаскрываемогоБлока1);
ЗаголовокРаскрываемогоБлока1.Текст = "Жители деревни Простоквашино";
НеупорядоченныйСписок1 = РаскрываемыйБлок1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
ЭлементСписка1 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Кот Матроскин";
ЭлементСписка2 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка2.Текст = "Пёс Шарик";
ЭлементСписка3 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка3.Текст = "Птица Галчонок";
РаскрываемыйБлок1.Открыт = Истина;
НеупорядоченныйСписок1.Стиль.ПозицияСтиляСписка = ДФ.ПозицияСтиляСписка.Внутри;
НеупорядоченныйСписок1.Стиль.ТипСтиляСписка = ДФ.ТипСтиляСписка.Квадрат;
Форма1.Открыть();
ТипСтиляСписка_СтильСписка_свойство.os
Перем ДФ, СтильСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СтильСписка1.ТипСтиляСписка = ДФ.ТипСтиляСписка.ЗакрашенныйКруг
, "", "!!! ") + "ТипСтиляСписка_СтильСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 400;
СтильСписка1 = ДФ.СтильСписка();
СтильСписка1.ТипСтиляСписка = ДФ.ТипСтиляСписка.ЗакрашенныйКруг;
СтильСписка1.ПозицияСтиляСписка = ДФ.ПозицияСтиляСписка.Внутри;
СтильСписка1.КартинкаСтиляСписка = "icon.png";
РаскрываемыйБлок1 = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
РаскрываемыйБлок1.ДобавитьДочерний(ЗаголовокРаскрываемогоБлока1);
ЗаголовокРаскрываемогоБлока1.Текст = "Жители деревни Простоквашино";
НеупорядоченныйСписок1 = РаскрываемыйБлок1.ДобавитьДочерний(ДФ.НеупорядоченныйСписок());
ЭлементСписка1 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка1.Текст = "Кот Матроскин";
ЭлементСписка2 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка2.Текст = "Пёс Шарик";
ЭлементСписка3 = НеупорядоченныйСписок1.ДобавитьДочерний(ДФ.ЭлементСписка());
ЭлементСписка3.Текст = "Птица Галчонок";
НеупорядоченныйСписок1.Стиль.СтильСписка = СтильСписка1;
Форма1.Открыть();
ТолькоЧтение_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.ТолькоЧтение
, "", "!!! ") + "ТолькоЧтение_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "ТолькоЧтение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.ТолькоЧтение = Истина;
Форма1.Открыть();
ТолькоЧтение_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.ТолькоЧтение
, "", "!!! ") + "ТолькоЧтение_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "ТолькоЧтение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.ТолькоЧтение = Истина;
Форма1.Открыть();
ТолькоЧтение_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.ТолькоЧтение
, "", "!!! ") + "ТолькоЧтение_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "ТолькоЧтение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.ТолькоЧтение = Истина;
Форма1.Открыть();
ТолькоЧтение_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.ТолькоЧтение
, "", "!!! ") + "ТолькоЧтение_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "ТолькоЧтение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.ТолькоЧтение = Истина;
Форма1.Открыть();
ТолькоЧтение_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.ТолькоЧтение
, "", "!!! ") + "ТолькоЧтение_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "ТолькоЧтение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.ТолькоЧтение = Истина;
Форма1.Открыть();
ТолькоЧтение_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.ТолькоЧтение
, "", "!!! ") + "ТолькоЧтение_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "ТолькоЧтение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.ТолькоЧтение = Истина;
Форма1.Открыть();
ТолькоЧтение_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ОбластьТекста1.ТолькоЧтение
, "", "!!! ") + "ТолькоЧтение_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ОбластьТекста1, "ТолькоЧтение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.ТолькоЧтение = Истина;
Форма1.Открыть();
ТолькоЧтение_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПароля1.ТолькоЧтение
, "", "!!! ") + "ТолькоЧтение_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПароля1, "ТолькоЧтение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.ТолькоЧтение = Истина;
Форма1.Открыть();
ТолькоЧтение_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеПоиска1.ТолькоЧтение
, "", "!!! ") + "ТолькоЧтение_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеПоиска1, "ТолькоЧтение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.ТолькоЧтение = Истина;
Форма1.Открыть();
ТолькоЧтение_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.ТолькоЧтение
, "", "!!! ") + "ТолькоЧтение_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1, "ТолькоЧтение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.ТолькоЧтение = Истина;
Форма1.Открыть();
ТолькоЧтение_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.ТолькоЧтение
, "", "!!! ") + "ТолькоЧтение_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "ТолькоЧтение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.ТолькоЧтение = Истина;
Форма1.Открыть();
ТочкаСдвига_Стиль_свойство.os
Перем ДФ, Блок3;
Процедура Свойство() Экспорт
Сообщить(?(
Блок3.Стиль.ТочкаСдвига = "0px 0px 0px"
, "", "!!! ") + "ТочкаСдвига_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок3.Стиль, "ТочкаСдвига", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 500;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 200;
Блок1.Стиль.Высота = 200;
Блок1.Стиль.Отступ = ДФ.Отступ(20, , , , Истина);
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Текст = "Блок1";
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Блок2.Стиль.Ширина = 150;
Блок2.Стиль.Высота = 150;
Блок2.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Серый);
Блок2.Стиль.ЦветФона = ДФ.Цвет.СветлоСерый;
Блок2.Стиль.Непрозрачность = 50;
Блок2.Текст = "Блок2 исходный";
Блок3 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок3.Стиль.Ширина = 150;
Блок3.Стиль.Высота = 150;
Блок3.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок3.Стиль.ЦветФона = ДФ.Цвет.Коралловый;
Блок3.Стиль.Сдвиг = ДФ.Поворот(45);
Блок3.Текст = "Блок3";
Блок3.Стиль.Непрозрачность = 70;
Блок3.Стиль.ТочкаСдвига = ДФ.ТочкаСдвига(0, 0);
Форма1.Открыть();
Увеличение_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Увеличение = 0
, "", "!!! ") + "Увеличение_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Увеличение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент1 = Форма1.Контент;
Контент1.Стиль.Ширина = 350;
Контент1.Стиль.Высота = 100;
Контент1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет(195, 195, 195));
Контент1.Стиль.Отображать = ДФ.Отображать.Гибкий;
Стиль1 = ДФ.Стиль();
Стиль1.Увеличение = 0;
Стиль1.Уменьшение = 0;
Стиль1.БазоваяДлина = 40;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль= Стиль1;
Блок1.Текст= "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.СветлоКоралловый;
Блок2 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль= Стиль1;
Блок2.Текст= "Блок2";
Блок2.Стиль.ЦветФона = ДФ.Цвет.НебесноГолубойСветлый;
Блок2.Стиль.БазоваяДлина = 200;
Форма1.Открыть();
Угол_НаклонИгрек_свойство.os
Перем ДФ, НаклонИгрек1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НаклонИгрек1.Угол = 15
, "", "!!! ") + "Угол_НаклонИгрек_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 450;
НаклонИгрек1 = ДФ.НаклонИгрек();
НаклонИгрек1.Угол = 15;
НаклонИгрек2 = ДФ.НаклонИгрек(23);
Форма1.Открыть();
Угол_НаклонИкс_свойство.os
Перем ДФ, НаклонИкс1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НаклонИкс1.Угол = 15
, "", "!!! ") + "Угол_НаклонИкс_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 450;
НаклонИкс1 = ДФ.НаклонИкс();
НаклонИкс1.Угол = 15;
НаклонИкс2 = ДФ.НаклонИкс(23);
Форма1.Открыть();
Угол_Поворот3Д_свойство.os
Перем ДФ, Поворот3Д1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Поворот3Д1.Угол = 30
, "", "!!! ") + "Угол_Поворот3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Поворот3Д1 = ДФ.Поворот3Д();
Поворот3Д1.Икс = 10;
Поворот3Д1.Игрек = 20;
Поворот3Д1.Зет = 30;
Поворот3Д1.Угол = 30;
Поворот3Д2 = ДФ.Поворот3Д(16, 18, 32, 30);
Форма1.Открыть();
Угол_Поворот_свойство.os
Перем ДФ, Поворот1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Поворот1.Угол = 3
, "", "!!! ") + "Угол_Поворот_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Поворот1 = ДФ.Поворот();
Поворот1.Угол = 3;
Поворот2 = ДФ.Поворот(4);
Форма1.Открыть();
Угол_ПоворотЗет_свойство.os
Перем ДФ, ПоворотЗет1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПоворотЗет1.Угол = 30
, "", "!!! ") + "Угол_ПоворотЗет_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПоворотЗет1 = ДФ.ПоворотЗет();
ПоворотЗет1.Угол = 30;
ПоворотЗет2 = ДФ.ПоворотЗет(16);
Форма1.Открыть();
Угол_ПоворотИгрек_свойство.os
Перем ДФ, ПоворотИгрек1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПоворотИгрек1.Угол = 30
, "", "!!! ") + "Угол_ПоворотИгрек_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПоворотИгрек1 = ДФ.ПоворотИгрек();
ПоворотИгрек1.Угол = 30;
ПоворотИгрек2 = ДФ.ПоворотИгрек(16);
Форма1.Открыть();
Угол_ПоворотИкс_свойство.os
Перем ДФ, ПоворотИкс1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПоворотИкс1.Угол = 30
, "", "!!! ") + "Угол_ПоворотИкс_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ПоворотИкс1 = ДФ.ПоворотИкс();
ПоворотИкс1.Угол = 30;
ПоворотИкс2 = ДФ.ПоворотИкс(16);
Форма1.Открыть();
УголИгрек_Наклон_свойство.os
Перем ДФ, Наклон1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Наклон1.УголИгрек = 15
, "", "!!! ") + "УголИгрек_Наклон_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 450;
Наклон1 = ДФ.Наклон();
Наклон1.УголИкс = 10;
Наклон1.УголИгрек = 15;
Наклон2 = ДФ.Наклон(23, 34);
Форма1.Открыть();
УголИкс_Наклон_свойство.os
Перем ДФ, Наклон1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Наклон1.УголИкс = 10
, "", "!!! ") + "УголИкс_Наклон_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 450;
Наклон1 = ДФ.Наклон();
Наклон1.УголИкс = 10;
Наклон1.УголИгрек = 15;
Наклон2 = ДФ.Наклон(23, 34);
Форма1.Открыть();
Удалить_Абзац_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Абзац_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.Высота = 20;
Абзац1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац1.Удалить();
Форма1.Открыть();
Удалить_Артикль_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Артикль_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Стиль.Высота = 20;
Артикль1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Артикль1.Удалить();
Форма1.Открыть();
Удалить_Аудио_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Аудио_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Стиль.Высота = 20;
Аудио1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Аудио1.Удалить();
Форма1.Открыть();
Удалить_Блок_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Блок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Блок1.Удалить();
Форма1.Открыть();
Удалить_ВыборВремени_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ВыборВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Стиль.Высота = 20;
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборВремени1.Удалить();
Форма1.Открыть();
Удалить_ВыборДаты_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ВыборДаты_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Стиль.Высота = 20;
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборДаты1.Удалить();
Форма1.Открыть();
Удалить_ВыборДатыВремени_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ВыборДатыВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Стиль.Высота = 20;
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборДатыВремени1.Удалить();
Форма1.Открыть();
Удалить_ВыборМестнойДатыВремени_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ВыборМестнойДатыВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Стиль.Высота = 20;
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборМестнойДатыВремени1.Удалить();
Форма1.Открыть();
Удалить_ВыборМесяца_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ВыборМесяца_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Стиль.Высота = 20;
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборМесяца1.Удалить();
Форма1.Открыть();
Удалить_ВыборНедели_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ВыборНедели_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Стиль.Высота = 20;
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборНедели1.Удалить();
Форма1.Открыть();
Удалить_ВыборФайла_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ВыборФайла_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.Стиль.Высота = 20;
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборФайла1.Удалить();
Форма1.Открыть();
Удалить_ВыборЦвета_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ВыборЦвета_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.Стиль.Высота = 20;
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборЦвета1.Удалить();
Форма1.Открыть();
Удалить_Группа_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Группа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Стиль.Высота = 20;
Группа1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Группа1.Удалить();
Форма1.Открыть();
Удалить_ГруппаКолонок_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ГруппаКолонок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Форма1;
ГруппаКолонок1.Стиль.Высота = 20;
ГруппаКолонок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ГруппаКолонок1.Удалить();
Форма1.Открыть();
Удалить_ГруппировкаПоляСписка_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ГруппировкаПоляСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.Стиль.Высота = 20;
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ГруппировкаПоляСписка1.Удалить();
Форма1.Открыть();
Удалить_Диалог_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Диалог_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Стиль.Высота = 20;
Диалог1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Диалог1.Удалить();
Форма1.Открыть();
Удалить_ДополнительныйБлок_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ДополнительныйБлок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Стиль.Высота = 20;
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ДополнительныйБлок1.Удалить();
Форма1.Открыть();
Удалить_ЖирныйТекст_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ЖирныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Стиль.Высота = 20;
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЖирныйТекст1.Удалить();
Форма1.Открыть();
Удалить_Заголовок1_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Заголовок1_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Стиль.Высота = 20;
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок11.Удалить();
Форма1.Открыть();
Удалить_Заголовок2_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Заголовок2_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Стиль.Высота = 20;
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок21.Удалить();
Форма1.Открыть();
Удалить_Заголовок3_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Заголовок3_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Стиль.Высота = 20;
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок31.Удалить();
Форма1.Открыть();
Удалить_Заголовок4_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Заголовок4_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Стиль.Высота = 20;
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок41.Удалить();
Форма1.Открыть();
Удалить_Заголовок5_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Заголовок5_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Стиль.Высота = 20;
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок51.Удалить();
Форма1.Открыть();
Удалить_Заголовок6_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Заголовок6_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Стиль.Высота = 20;
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок61.Удалить();
Форма1.Открыть();
Удалить_Заголовок_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Заголовок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Стиль.Высота = 20;
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок1.Удалить();
Форма1.Открыть();
Удалить_ЗаголовокГруппы_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ЗаголовокГруппы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Стиль.Высота = 20;
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЗаголовокГруппы1.Удалить();
Форма1.Открыть();
Удалить_ЗаголовокРаскрываемогоБлока_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ЗаголовокРаскрываемогоБлока_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Стиль.Высота = 20;
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЗаголовокРаскрываемогоБлока1.Удалить();
Форма1.Открыть();
Удалить_Изображение_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Изображение_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.Стиль.Высота = 20;
Изображение1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Изображение1.Удалить();
Форма1.Открыть();
Удалить_Индикатор_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Индикатор_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.Стиль.Высота = 20;
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Индикатор1.Удалить();
Форма1.Открыть();
Удалить_Итоги_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Итоги_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Стиль.Высота = 20;
Итоги1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Итоги1.Удалить();
Форма1.Открыть();
Удалить_Карта_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Карта_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Карта1 = ДФ.Карта();
Карта1.Родитель = Форма1;
Карта1.Стиль.Высота = 20;
Карта1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Карта1.Удалить();
Форма1.Открыть();
Удалить_Кнопка_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Кнопка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Стиль.Высота = 20;
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Кнопка1.Удалить();
Форма1.Открыть();
Удалить_Код_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Код_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Стиль.Высота = 20;
Код1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Код1.Удалить();
Форма1.Открыть();
Удалить_Колонка_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Колонка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = Форма1;
Колонка1.Стиль.Высота = 20;
Колонка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Колонка1.Удалить();
Форма1.Открыть();
Удалить_Колонтитул_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Колонтитул_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Стиль.Высота = 20;
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Колонтитул1.Удалить();
Форма1.Открыть();
Удалить_КурсивТекст_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_КурсивТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Стиль.Высота = 20;
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
КурсивТекст1.Удалить();
Форма1.Открыть();
Удалить_Линия_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Линия_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Линия1 = ДФ.Линия();
Линия1.Родитель = Форма1;
Линия1.Стиль.Высота = 20;
Линия1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Линия1.Удалить();
Форма1.Открыть();
Удалить_Лоток_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Лоток_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Лоток1 = ДФ.Лоток();
Лоток1.Удалить();
Форма1.Открыть();
Удалить_МаркированныйТекст_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_МаркированныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Стиль.Высота = 20;
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
МаркированныйТекст1.Удалить();
Форма1.Открыть();
Удалить_МедиаГруппа_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_МедиаГруппа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Стиль.Высота = 20;
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
МедиаГруппа1.Удалить();
Форма1.Открыть();
Удалить_МелкийТекст_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_МелкийТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Стиль.Высота = 20;
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
МелкийТекст1.Удалить();
Форма1.Открыть();
Удалить_Меню_метод.os
Перем ДФ, Сохранить;
Процедура Сохранить_Нажатие() Экспорт
Сообщить(?(
Сохранить.Нажатие.ИмяМетода = "Сохранить_Нажатие"
, "", "!!! ") + "Удалить_Меню_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Нажми меню Сохранить";
ГлавноеМеню = ДФ.Меню(ДФ.ТипМеню.Главное);
ПодменюМенюФайл = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюФайл = ДФ.ЭлементМеню("Файл", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюФайл);
Открыть = ДФ.ЭлементМеню("Открыть", ДФ.ТипЭлементаМеню.Стандартный);
Сохранить = ДФ.ЭлементМеню("Сохранить");
Сохранить.Нажатие = ДФ.Действие(ЭтотОбъект, "Сохранить_Нажатие");
Разделитель1 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Настройки = ДФ.ЭлементМеню("Настройки");
Разделитель2 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Выход = ДФ.ЭлементМеню("Выход");
ПодменюМенюФайл.Добавить(Открыть);
ПодменюМенюФайл.Добавить(Сохранить);
ПодменюМенюФайл.Добавить(Разделитель1);
ПодменюМенюФайл.Добавить(Настройки);
ПодменюМенюФайл.Добавить(Разделитель2);
ПодменюМенюФайл.Добавить(Выход);
ПодменюМенюПравка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюПравка = ДФ.ЭлементМеню("Правка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюПравка);
Отмена = ДФ.ЭлементМеню("Отмена");
Повтор = ДФ.ЭлементМеню("Повтор");
ПодменюМенюПравка.Добавить(Отмена);
ПодменюМенюПравка.Добавить(Повтор);
ПодменюМенюСправка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюСправка = ДФ.ЭлементМеню("Справка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюСправка);
ОПрограмме = ДФ.ЭлементМеню("О программе");
ПодменюМенюСправка.Добавить(ОПрограмме);
ГлавноеМеню.Добавить(МенюФайл);
ГлавноеМеню.Добавить(МенюПравка);
ГлавноеМеню.Добавить(МенюСправка);
ГлавноеМеню.Удалить(МенюПравка);
Форма1.Меню = ГлавноеМеню;
Форма1.Открыть();
Удалить_НадстрочныйТекст_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_НадстрочныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Стиль.Высота = 20;
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
НадстрочныйТекст1.Удалить();
Форма1.Открыть();
Удалить_НаправленныйТекст_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_НаправленныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Стиль.Высота = 20;
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
НаправленныйТекст1.Удалить();
Форма1.Открыть();
Удалить_НеупорядоченныйСписок_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_НеупорядоченныйСписок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Стиль.Высота = 20;
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
НеупорядоченныйСписок1.Удалить();
Форма1.Открыть();
Удалить_НижнийКолонтитул_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_НижнийКолонтитул_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Стиль.Высота = 20;
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
НижнийКолонтитул1.Удалить();
Форма1.Открыть();
Удалить_Область_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Область_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Область1 = ДФ.Область();
Область1.Родитель = Форма1;
Область1.Стиль.Высота = 20;
Область1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Область1.Удалить();
Форма1.Открыть();
Удалить_ОбластьТаблицы_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ОбластьТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Стиль.Высота = 20;
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ОбластьТаблицы1.Удалить();
Форма1.Открыть();
Удалить_ОбластьТекста_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ОбластьТекста_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Стиль.Высота = 20;
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ОбластьТекста1.Удалить();
Форма1.Открыть();
Удалить_ОписаниеМедиа_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ОписаниеМедиа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Стиль.Высота = 20;
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ОписаниеМедиа1.Удалить();
Форма1.Открыть();
Удалить_Определение_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Определение_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Стиль.Высота = 20;
Определение1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Определение1.Удалить();
Форма1.Открыть();
Удалить_Переключатель_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Переключатель_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Стиль.Высота = 20;
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Переключатель1.Удалить();
Форма1.Открыть();
Удалить_Перенос_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Перенос_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Перенос1 = ДФ.Перенос();
Перенос1.Родитель = Форма1;
Перенос1.Стиль.Высота = 20;
Перенос1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Перенос1.Удалить();
Форма1.Открыть();
Удалить_Подпись_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Подпись_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Стиль.Высота = 20;
Подпись1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Подпись1.Удалить();
Форма1.Открыть();
Удалить_ПодстрочныйТекст_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ПодстрочныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Стиль.Высота = 20;
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПодстрочныйТекст1.Удалить();
Форма1.Открыть();
Удалить_ПодчеркнутыйТекст_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ПодчеркнутыйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Стиль.Высота = 20;
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПодчеркнутыйТекст1.Удалить();
Форма1.Открыть();
Удалить_ПолеПароля_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ПолеПароля_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Стиль.Высота = 20;
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПолеПароля1.Удалить();
Форма1.Открыть();
Удалить_ПолеПоиска_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ПолеПоиска_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Стиль.Высота = 20;
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПолеПоиска1.Удалить();
Форма1.Открыть();
Удалить_ПолеСписка_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ПолеСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Высота = 20;
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПолеСписка1.Удалить();
Форма1.Открыть();
Удалить_ПолеТекста_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ПолеТекста_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Стиль.Высота = 20;
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПолеТекста1.Удалить();
Форма1.Открыть();
Удалить_ПолеЧисла_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ПолеЧисла_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Стиль.Высота = 20;
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПолеЧисла1.Удалить();
Форма1.Открыть();
Удалить_Ползунок_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Ползунок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Стиль.Высота = 20;
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Ползунок1.Удалить();
Форма1.Открыть();
Удалить_РаскрываемыйБлок_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_РаскрываемыйБлок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.Стиль.Высота = 20;
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
РаскрываемыйБлок1.Удалить();
Форма1.Открыть();
Удалить_Результат_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Результат_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Стиль.Высота = 20;
Результат1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Результат1.Удалить();
Форма1.Открыть();
Удалить_СписокОпределений_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_СписокОпределений_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Стиль.Высота = 20;
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
СписокОпределений1.Удалить();
Форма1.Открыть();
Удалить_Ссылка_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Ссылка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Стиль.Высота = 20;
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Ссылка1.Удалить();
Форма1.Открыть();
Удалить_СтрокаТаблицы_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_СтрокаТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Стиль.Высота = 20;
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
СтрокаТаблицы1.Удалить();
Форма1.Открыть();
Удалить_Таблица_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Таблица_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Стиль.Высота = 20;
Таблица1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Таблица1.Удалить();
Форма1.Открыть();
Удалить_Термин_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Термин_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Стиль.Высота = 20;
Термин1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Термин1.Удалить();
Форма1.Открыть();
Удалить_УдаленыйТекст_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_УдаленыйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Стиль.Высота = 20;
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
УдаленыйТекст1.Удалить();
Форма1.Открыть();
Удалить_УпорядоченныйСписок_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_УпорядоченныйСписок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Стиль.Высота = 20;
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
УпорядоченныйСписок1.Удалить();
Форма1.Открыть();
Удалить_Флажок_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Флажок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Стиль.Высота = 20;
Флажок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Флажок1.Удалить();
Форма1.Открыть();
Удалить_ФорматированныйТекст_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ФорматированныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Стиль.Высота = 20;
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ФорматированныйТекст1.Удалить();
Форма1.Открыть();
Удалить_Фрейм_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Фрейм_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Фрейм1 = ДФ.Фрейм();
Фрейм1.Родитель = Форма1;
Фрейм1.Стиль.Высота = 20;
Фрейм1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Фрейм1.Удалить();
Форма1.Открыть();
Удалить_Холст_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Холст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
Холст1.Стиль.Высота = 20;
Холст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Холст1.Удалить();
Форма1.Открыть();
Удалить_ШапкаТаблицы_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ШапкаТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Стиль.Высота = 20;
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ШапкаТаблицы1.Удалить();
Форма1.Открыть();
Удалить_Шкала_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Шкала_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Шкала1.Стиль.Высота = 20;
Шкала1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Шкала1.Удалить();
Форма1.Открыть();
Удалить_ЭлементПоляСписка_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ЭлементПоляСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Стиль.Высота = 20;
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЭлементПоляСписка1.Удалить();
Форма1.Открыть();
Удалить_ЭлементСписка_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ЭлементСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Стиль.Высота = 20;
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЭлементСписка1.Удалить();
Форма1.Открыть();
Удалить_Ячейка_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_Ячейка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Стиль.Высота = 20;
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Ячейка1.Удалить();
Форма1.Открыть();
Удалить_ЯчейкаЗаголовка_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Форма1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить(" - " + эл.КлючЭлемента + " " + эл);
// КонецЦикла;
// Сообщить("" + Форма1.Элементы.Количество());
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "Удалить_ЯчейкаЗаголовка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Стиль.Высота = 20;
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЯчейкаЗаголовка1.Удалить();
Форма1.Открыть();
УдалитьДочерний_Абзац_метод.os
Перем ДФ, Абзац1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Абзац1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Абзац_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац2 = ДФ.Абзац();
Абзац2.Родитель = Абзац1;
Абзац2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Абзац1.УдалитьДочерний(Абзац2);
Форма1.Открыть();
УдалитьДочерний_Артикль_метод.os
Перем ДФ, Артикль1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Артикль1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Артикль_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Артикль2 = ДФ.Артикль();
Артикль2.Родитель = Артикль1;
Артикль2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Артикль1.УдалитьДочерний(Артикль2);
Форма1.Открыть();
УдалитьДочерний_Блок_метод.os
Перем ДФ, Блок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Блок1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Блок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Блок1.УдалитьДочерний(Блок2);
Форма1.Открыть();
УдалитьДочерний_Группа_метод.os
Перем ДФ, Группа1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Группа1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Группа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Группа2 = ДФ.Группа();
Группа2.Родитель = Группа1;
Группа2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Группа1.УдалитьДочерний(Группа2);
Форма1.Открыть();
УдалитьДочерний_ГруппаКолонок_метод.os
Перем ДФ, ГруппаКолонок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ГруппаКолонок1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_ГруппаКолонок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Форма1;
ГруппаКолонок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ГруппаКолонок2 = ДФ.ГруппаКолонок();
ГруппаКолонок2.Родитель = ГруппаКолонок1;
ГруппаКолонок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
ГруппаКолонок1.УдалитьДочерний(ГруппаКолонок2);
Форма1.Открыть();
УдалитьДочерний_ГруппировкаПоляСписка_метод.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_ГруппировкаПоляСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ГруппировкаПоляСписка2 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ГруппировкаПоляСписка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
ГруппировкаПоляСписка1.УдалитьДочерний(ГруппировкаПоляСписка2);
Форма1.Открыть();
УдалитьДочерний_Диалог_метод.os
Перем ДФ, Диалог1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Диалог1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Диалог_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Диалог2 = ДФ.Диалог();
Диалог2.Родитель = Диалог1;
Диалог2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Диалог1.УдалитьДочерний(Диалог2);
Форма1.Открыть();
УдалитьДочерний_ДополнительныйБлок_метод.os
Перем ДФ, ДополнительныйБлок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДополнительныйБлок1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_ДополнительныйБлок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ДополнительныйБлок2 = ДФ.ДополнительныйБлок();
ДополнительныйБлок2.Родитель = ДополнительныйБлок1;
ДополнительныйБлок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
ДополнительныйБлок1.УдалитьДочерний(ДополнительныйБлок2);
Форма1.Открыть();
УдалитьДочерний_ЖирныйТекст_метод.os
Перем ДФ, ЖирныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЖирныйТекст1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_ЖирныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЖирныйТекст2 = ДФ.ЖирныйТекст();
ЖирныйТекст2.Родитель = ЖирныйТекст1;
ЖирныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЖирныйТекст1.УдалитьДочерний(ЖирныйТекст2);
Форма1.Открыть();
УдалитьДочерний_Заголовок1_метод.os
Перем ДФ, Заголовок11;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок11.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Заголовок1_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок12 = ДФ.Заголовок1();
Заголовок12.Родитель = Заголовок11;
Заголовок12.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок11.УдалитьДочерний(Заголовок12);
Форма1.Открыть();
УдалитьДочерний_Заголовок2_метод.os
Перем ДФ, Заголовок21;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок21.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Заголовок2_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок22 = ДФ.Заголовок2();
Заголовок22.Родитель = Заголовок21;
Заголовок22.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок21.УдалитьДочерний(Заголовок22);
Форма1.Открыть();
УдалитьДочерний_Заголовок3_метод.os
Перем ДФ, Заголовок31;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок31.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Заголовок3_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок32 = ДФ.Заголовок3();
Заголовок32.Родитель = Заголовок31;
Заголовок32.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок31.УдалитьДочерний(Заголовок32);
Форма1.Открыть();
УдалитьДочерний_Заголовок4_метод.os
Перем ДФ, Заголовок41;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок41.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Заголовок4_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок42 = ДФ.Заголовок4();
Заголовок42.Родитель = Заголовок41;
Заголовок42.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок41.УдалитьДочерний(Заголовок42);
Форма1.Открыть();
УдалитьДочерний_Заголовок5_метод.os
Перем ДФ, Заголовок51;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок51.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Заголовок5_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок52 = ДФ.Заголовок5();
Заголовок52.Родитель = Заголовок51;
Заголовок52.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок51.УдалитьДочерний(Заголовок52);
Форма1.Открыть();
УдалитьДочерний_Заголовок6_метод.os
Перем ДФ, Заголовок61;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок61.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Заголовок6_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок62 = ДФ.Заголовок6();
Заголовок62.Родитель = Заголовок61;
Заголовок62.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок61.УдалитьДочерний(Заголовок62);
Форма1.Открыть();
УдалитьДочерний_Заголовок_метод.os
Перем ДФ, Заголовок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Заголовок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок2 = ДФ.Заголовок();
Заголовок2.Родитель = Заголовок1;
Заголовок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок1.УдалитьДочерний(Заголовок2);
Форма1.Открыть();
УдалитьДочерний_ЗаголовокГруппы_метод.os
Перем ДФ, ЗаголовокГруппы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЗаголовокГруппы1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_ЗаголовокГруппы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЗаголовокГруппы2 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы2.Родитель = ЗаголовокГруппы1;
ЗаголовокГруппы2.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЗаголовокГруппы1.УдалитьДочерний(ЗаголовокГруппы2);
Форма1.Открыть();
УдалитьДочерний_ЗаголовокРаскрываемогоБлока_метод.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_ЗаголовокРаскрываемогоБлока_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЗаголовокРаскрываемогоБлока2 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока2.Родитель = ЗаголовокРаскрываемогоБлока1;
ЗаголовокРаскрываемогоБлока2.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЗаголовокРаскрываемогоБлока1.УдалитьДочерний(ЗаголовокРаскрываемогоБлока2);
Форма1.Открыть();
УдалитьДочерний_Итоги_метод.os
Перем ДФ, Итоги1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Итоги1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Итоги_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Итоги2 = ДФ.Итоги();
Итоги2.Родитель = Итоги1;
Итоги2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Итоги1.УдалитьДочерний(Итоги2);
Форма1.Открыть();
УдалитьДочерний_Карта_метод.os
Перем ДФ, Карта1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Карта1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Карта_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Карта1 = ДФ.Карта();
Карта1.Родитель = Форма1;
Карта1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Карта2 = ДФ.Карта();
Карта2.Родитель = Карта1;
Карта2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Карта1.УдалитьДочерний(Карта2);
Форма1.Открыть();
УдалитьДочерний_Кнопка_метод.os
Перем ДФ, Кнопка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Кнопка1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Кнопка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Кнопка2 = ДФ.Кнопка();
Кнопка2.Родитель = Кнопка1;
Кнопка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Кнопка1.УдалитьДочерний(Кнопка2);
Форма1.Открыть();
УдалитьДочерний_Код_метод.os
Перем ДФ, Код1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Код1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Код_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Код2 = ДФ.Код();
Код2.Родитель = Код1;
Код2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Код1.УдалитьДочерний(Код2);
Форма1.Открыть();
УдалитьДочерний_Колонка_метод.os
Перем ДФ, Колонка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Колонка1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Колонка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = Форма1;
Колонка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Колонка2 = ДФ.Колонка();
Колонка2.Родитель = Колонка1;
Колонка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Колонка1.УдалитьДочерний(Колонка2);
Форма1.Открыть();
УдалитьДочерний_Колонтитул_метод.os
Перем ДФ, Колонтитул1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Колонтитул1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Колонтитул_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Колонтитул2 = ДФ.Колонтитул();
Колонтитул2.Родитель = Колонтитул1;
Колонтитул2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Колонтитул1.УдалитьДочерний(Колонтитул2);
Форма1.Открыть();
УдалитьДочерний_Контент_метод.os
Перем ДФ, Контент1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контент1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Контент_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Контент1 = Форма1.Контент;
Контент1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац2 = ДФ.Абзац();
Абзац2.Родитель = Контент1;
Абзац2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Контент1.УдалитьДочерний(Абзац2);
Форма1.Открыть();
УдалитьДочерний_КурсивТекст_метод.os
Перем ДФ, КурсивТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
КурсивТекст1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_КурсивТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
КурсивТекст2 = ДФ.КурсивТекст();
КурсивТекст2.Родитель = КурсивТекст1;
КурсивТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
КурсивТекст1.УдалитьДочерний(КурсивТекст2);
Форма1.Открыть();
УдалитьДочерний_МаркированныйТекст_метод.os
Перем ДФ, МаркированныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МаркированныйТекст1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_МаркированныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
МаркированныйТекст2 = ДФ.МаркированныйТекст();
МаркированныйТекст2.Родитель = МаркированныйТекст1;
МаркированныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
МаркированныйТекст1.УдалитьДочерний(МаркированныйТекст2);
Форма1.Открыть();
УдалитьДочерний_МедиаГруппа_метод.os
Перем ДФ, МедиаГруппа1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МедиаГруппа1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_МедиаГруппа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
МедиаГруппа2 = ДФ.МедиаГруппа();
МедиаГруппа2.Родитель = МедиаГруппа1;
МедиаГруппа2.Стиль.ЦветФона = ДФ.Цвет.Красный;
МедиаГруппа1.УдалитьДочерний(МедиаГруппа2);
Форма1.Открыть();
УдалитьДочерний_МелкийТекст_метод.os
Перем ДФ, МелкийТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МелкийТекст1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_МелкийТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
МелкийТекст2 = ДФ.МелкийТекст();
МелкийТекст2.Родитель = МелкийТекст1;
МелкийТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
МелкийТекст1.УдалитьДочерний(МелкийТекст2);
Форма1.Открыть();
УдалитьДочерний_НадстрочныйТекст_метод.os
Перем ДФ, НадстрочныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НадстрочныйТекст1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_НадстрочныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
НадстрочныйТекст2 = ДФ.НадстрочныйТекст();
НадстрочныйТекст2.Родитель = НадстрочныйТекст1;
НадстрочныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
НадстрочныйТекст1.УдалитьДочерний(НадстрочныйТекст2);
Форма1.Открыть();
УдалитьДочерний_НаправленныйТекст_метод.os
Перем ДФ, НаправленныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НаправленныйТекст1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_НаправленныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
НаправленныйТекст2 = ДФ.НаправленныйТекст();
НаправленныйТекст2.Родитель = НаправленныйТекст1;
НаправленныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
НаправленныйТекст1.УдалитьДочерний(НаправленныйТекст2);
Форма1.Открыть();
УдалитьДочерний_НеупорядоченныйСписок_метод.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_НеупорядоченныйСписок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
НеупорядоченныйСписок2 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок2.Родитель = НеупорядоченныйСписок1;
НеупорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
НеупорядоченныйСписок1.УдалитьДочерний(НеупорядоченныйСписок2);
Форма1.Открыть();
УдалитьДочерний_НижнийКолонтитул_метод.os
Перем ДФ, НижнийКолонтитул1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НижнийКолонтитул1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_НижнийКолонтитул_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
НижнийКолонтитул2 = ДФ.НижнийКолонтитул();
НижнийКолонтитул2.Родитель = НижнийКолонтитул1;
НижнийКолонтитул2.Стиль.ЦветФона = ДФ.Цвет.Красный;
НижнийКолонтитул1.УдалитьДочерний(НижнийКолонтитул2);
Форма1.Открыть();
УдалитьДочерний_Область_метод.os
Перем ДФ, Область1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Область1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Область_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Область1 = ДФ.Область();
Область1.Родитель = Форма1;
Область1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Область2 = ДФ.Область();
Область2.Родитель = Область1;
Область2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Область1.УдалитьДочерний(Область2);
Форма1.Открыть();
УдалитьДочерний_ОбластьТаблицы_метод.os
Перем ДФ, ОбластьТаблицы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОбластьТаблицы1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_ОбластьТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ОбластьТаблицы2 = ДФ.ОбластьТаблицы();
ОбластьТаблицы2.Родитель = ОбластьТаблицы1;
ОбластьТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОбластьТаблицы1.УдалитьДочерний(ОбластьТаблицы2);
Форма1.Открыть();
УдалитьДочерний_ОбластьТекста_метод.os
Перем ДФ, ОбластьТекста1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОбластьТекста1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_ОбластьТекста_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ОбластьТекста2 = ДФ.ОбластьТекста();
ОбластьТекста2.Родитель = ОбластьТекста1;
ОбластьТекста2.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОбластьТекста1.УдалитьДочерний(ОбластьТекста2);
Форма1.Открыть();
УдалитьДочерний_ОписаниеМедиа_метод.os
Перем ДФ, ОписаниеМедиа1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОписаниеМедиа1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_ОписаниеМедиа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ОписаниеМедиа2 = ДФ.ОписаниеМедиа();
ОписаниеМедиа2.Родитель = ОписаниеМедиа1;
ОписаниеМедиа2.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОписаниеМедиа1.УдалитьДочерний(ОписаниеМедиа2);
Форма1.Открыть();
УдалитьДочерний_Определение_метод.os
Перем ДФ, Определение1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Определение1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Определение_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Определение2 = ДФ.Определение();
Определение2.Родитель = Определение1;
Определение2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Определение1.УдалитьДочерний(Определение2);
Форма1.Открыть();
УдалитьДочерний_Перенос_метод.os
Перем ДФ, Перенос1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Перенос1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Перенос_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Перенос1 = ДФ.Перенос();
Перенос1.Родитель = Форма1;
Перенос1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Перенос2 = ДФ.Перенос();
Перенос2.Родитель = Перенос1;
Перенос2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Перенос1.УдалитьДочерний(Перенос2);
Форма1.Открыть();
УдалитьДочерний_ПодстрочныйТекст_метод.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПодстрочныйТекст1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_ПодстрочныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПодстрочныйТекст2 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст2.Родитель = ПодстрочныйТекст1;
ПодстрочныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПодстрочныйТекст1.УдалитьДочерний(ПодстрочныйТекст2);
Форма1.Открыть();
УдалитьДочерний_ПодчеркнутыйТекст_метод.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПодчеркнутыйТекст1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_ПодчеркнутыйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПодчеркнутыйТекст2 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст2.Родитель = ПодчеркнутыйТекст1;
ПодчеркнутыйТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПодчеркнутыйТекст1.УдалитьДочерний(ПодчеркнутыйТекст2);
Форма1.Открыть();
УдалитьДочерний_ПолеСписка_метод.os
Перем ДФ, ПолеСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеСписка1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_ПолеСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПолеСписка2 = ДФ.ПолеСписка();
ПолеСписка2.Родитель = ПолеСписка1;
ПолеСписка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеСписка1.УдалитьДочерний(ПолеСписка2);
Форма1.Открыть();
УдалитьДочерний_РаскрываемыйБлок_метод.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
РаскрываемыйБлок1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_РаскрываемыйБлок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
РаскрываемыйБлок2 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок2.Родитель = РаскрываемыйБлок1;
РаскрываемыйБлок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
РаскрываемыйБлок1.УдалитьДочерний(РаскрываемыйБлок2);
Форма1.Открыть();
УдалитьДочерний_Результат_метод.os
Перем ДФ, Результат1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Результат1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Результат_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Результат2 = ДФ.Результат();
Результат2.Родитель = Результат1;
Результат2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Результат1.УдалитьДочерний(Результат2);
Форма1.Открыть();
УдалитьДочерний_СписокОпределений_метод.os
Перем ДФ, СписокОпределений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СписокОпределений1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_СписокОпределений_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
СписокОпределений2 = ДФ.СписокОпределений();
СписокОпределений2.Родитель = СписокОпределений1;
СписокОпределений2.Стиль.ЦветФона = ДФ.Цвет.Красный;
СписокОпределений1.УдалитьДочерний(СписокОпределений2);
Форма1.Открыть();
УдалитьДочерний_Ссылка_метод.os
Перем ДФ, Ссылка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Ссылка1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Ссылка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Ссылка2 = ДФ.Ссылка();
Ссылка2.Родитель = Ссылка1;
Ссылка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ссылка1.УдалитьДочерний(Ссылка2);
Форма1.Открыть();
УдалитьДочерний_СтрокаТаблицы_метод.os
Перем ДФ, СтрокаТаблицы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СтрокаТаблицы1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_СтрокаТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
СтрокаТаблицы2 = ДФ.СтрокаТаблицы();
СтрокаТаблицы2.Родитель = СтрокаТаблицы1;
СтрокаТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Красный;
СтрокаТаблицы1.УдалитьДочерний(СтрокаТаблицы2);
Форма1.Открыть();
УдалитьДочерний_Таблица_метод.os
Перем ДФ, Таблица1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Таблица1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Таблица_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Таблица2 = ДФ.Таблица();
Таблица2.Родитель = Таблица1;
Таблица2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Таблица1.УдалитьДочерний(Таблица2);
Форма1.Открыть();
УдалитьДочерний_Термин_метод.os
Перем ДФ, Термин1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Термин1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Термин_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Термин2 = ДФ.Термин();
Термин2.Родитель = Термин1;
Термин2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Термин1.УдалитьДочерний(Термин2);
Форма1.Открыть();
УдалитьДочерний_УдаленыйТекст_метод.os
Перем ДФ, УдаленыйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
УдаленыйТекст1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_УдаленыйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
УдаленыйТекст2 = ДФ.УдаленыйТекст();
УдаленыйТекст2.Родитель = УдаленыйТекст1;
УдаленыйТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
УдаленыйТекст1.УдалитьДочерний(УдаленыйТекст2);
Форма1.Открыть();
УдалитьДочерний_УпорядоченныйСписок_метод.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
УпорядоченныйСписок1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_УпорядоченныйСписок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
УпорядоченныйСписок2 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок2.Родитель = УпорядоченныйСписок1;
УпорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
УпорядоченныйСписок1.УдалитьДочерний(УпорядоченныйСписок2);
Форма1.Открыть();
УдалитьДочерний_Форма_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Форма1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Форма_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Абзац2 = ДФ.Абзац();
Абзац2.Родитель = Форма1;
Абзац2.Текст = "Абзац2";
Абзац2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.УдалитьДочерний(Абзац2);
Форма1.Открыть();
УдалитьДочерний_Фрейм_метод.os
Перем ДФ, Фрейм1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Фрейм1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Фрейм_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Фрейм1 = ДФ.Фрейм();
Фрейм1.Родитель = Форма1;
Фрейм1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Фрейм2 = ДФ.Фрейм();
Фрейм2.Родитель = Фрейм1;
Фрейм2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Фрейм1.УдалитьДочерний(Фрейм2);
Форма1.Открыть();
УдалитьДочерний_ШапкаТаблицы_метод.os
Перем ДФ, ШапкаТаблицы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ШапкаТаблицы1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_ШапкаТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ШапкаТаблицы2 = ДФ.ШапкаТаблицы();
ШапкаТаблицы2.Родитель = ШапкаТаблицы1;
ШапкаТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Красный;
ШапкаТаблицы1.УдалитьДочерний(ШапкаТаблицы2);
Форма1.Открыть();
УдалитьДочерний_Шкала_метод.os
Перем ДФ, Шкала1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Шкала1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Шкала_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Шкала1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Шкала2 = ДФ.Шкала();
Шкала2.Родитель = Шкала1;
Шкала2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Шкала1.УдалитьДочерний(Шкала2);
Форма1.Открыть();
УдалитьДочерний_ЭлементПоляСписка_метод.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЭлементПоляСписка1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_ЭлементПоляСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ЭлементПоляСписка1;
ЭлементПоляСписка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЭлементПоляСписка1.УдалитьДочерний(ЭлементПоляСписка2);
Форма1.Открыть();
УдалитьДочерний_ЭлементСписка_метод.os
Перем ДФ, ЭлементСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЭлементСписка1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_ЭлементСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЭлементСписка2 = ДФ.ЭлементСписка();
ЭлементСписка2.Родитель = ЭлементСписка1;
ЭлементСписка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЭлементСписка1.УдалитьДочерний(ЭлементСписка2);
Форма1.Открыть();
УдалитьДочерний_Ячейка_метод.os
Перем ДФ, Ячейка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Ячейка1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_Ячейка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Ячейка2 = ДФ.Ячейка();
Ячейка2.Родитель = Ячейка1;
Ячейка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ячейка1.УдалитьДочерний(Ячейка2);
Форма1.Открыть();
УдалитьДочерний_ЯчейкаЗаголовка_метод.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЯчейкаЗаголовка1.Элементы.Количество() = 0
, "", "!!! ") + "УдалитьДочерний_ЯчейкаЗаголовка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЯчейкаЗаголовка2 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка2.Родитель = ЯчейкаЗаголовка1;
ЯчейкаЗаголовка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЯчейкаЗаголовка1.УдалитьДочерний(ЯчейкаЗаголовка2);
Форма1.Открыть();
УдалитьЗаголовок_Таблица_метод.os
Перем ДФ, Таблица1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Таблица1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить("" + ТипЗнч(эл) + " - " + эл.КлючЭлемента);
// КонецЦикла;
Сообщить(?(
Таблица1.Элементы.Количество() = 4
, "", "!!! ") + "УдалитьЗаголовок_Таблица_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
Таблица1.УдалитьЗаголовок();
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
Форма1.Открыть();
УдалитьИзСписка_ПолеСписка_метод.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
// ЭлементыСписка = ПолеСписка1.ЭлементыСписка;
// Для А = 0 По ЭлементыСписка.ВГраница() Цикл
// Эл = ЭлементыСписка.Получить(А);
// Сообщить("Эл = " + Эл + " ключ - " + Эл.КлючЭлемента);
// КонецЦикла;
Сообщить(?(
ПолеСписка1.ЭлементыСписка.Количество() = 2
, "", "!!! ") + "УдалитьИзСписка_ПолеСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "ЭлементыСписка", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Ширина = 150;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = ПолеСписка1;
ГруппировкаПоляСписка1.Надпись = "Жители деревни Простоквашино";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка1.Значение = "Кот";
ЭлементПоляСписка1.Текст = "Матроскин";
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Пёс";
ЭлементПоляСписка2.Текст = "Шарик";
ЭлементПоляСписка3 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка3.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка3.Значение = "Птица";
ЭлементПоляСписка3.Текст = "Галчонок";
ПолеСписка1.УдалитьИзСписка(2);
Форма1.Открыть();
УдалитьИтоги_Таблица_метод.os
Перем ДФ, Таблица1;
Процедура Форма1_Загружена() Экспорт
// Элементы = Таблица1.Элементы;
// Для Каждого эл Из Элементы Цикл
// Сообщить("" + ТипЗнч(эл) + " - " + эл.КлючЭлемента);
// КонецЦикла;
Сообщить(?(
Таблица1.Элементы.Количество() = 4
, "", "!!! ") + "УдалитьИтоги_Таблица_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
Таблица1.УдалитьИтоги();
Форма1.Открыть();
УдалитьПоИндексу_Меню_метод.os
Перем ДФ, Сохранить;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Сохранить = "ДфЭлементМеню"
, "", "!!! ") + "УдалитьПоИндексу_Меню_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
ГлавноеМеню = ДФ.Меню(ДФ.ТипМеню.Главное);
ПодменюМенюФайл = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюФайл = ДФ.ЭлементМеню("Файл", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюФайл);
Открыть = ДФ.ЭлементМеню("Открыть", ДФ.ТипЭлементаМеню.Стандартный);
Сохранить = ДФ.ЭлементМеню("Сохранить");
Разделитель1 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Настройки = ДФ.ЭлементМеню("Настройки");
Разделитель2 = ДФ.ЭлементМеню(, ДФ.ТипЭлементаМеню.Разделитель);
Выход = ДФ.ЭлементМеню("Выход");
ПодменюМенюФайл.Добавить(Открыть);
ПодменюМенюФайл.Добавить(Сохранить);
ПодменюМенюФайл.Добавить(Разделитель1);
ПодменюМенюФайл.Добавить(Настройки);
ПодменюМенюФайл.Добавить(Разделитель2);
ПодменюМенюФайл.Добавить(Выход);
ПодменюМенюФайл.УдалитьПоИндексу(1);
ПодменюМенюПравка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюПравка = ДФ.ЭлементМеню("Правка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюПравка);
Отмена = ДФ.ЭлементМеню("Отмена");
Повтор = ДФ.ЭлементМеню("Повтор");
ПодменюМенюПравка.Добавить(Отмена);
ПодменюМенюПравка.Добавить(Повтор);
ПодменюМенюСправка = ДФ.Меню(ДФ.ТипМеню.Отсутствие);
МенюСправка = ДФ.ЭлементМеню("Справка", ДФ.ТипЭлементаМеню.Стандартный, ПодменюМенюСправка);
ОПрограмме = ДФ.ЭлементМеню("О программе");
ПодменюМенюСправка.Добавить(ОПрограмме);
ГлавноеМеню.Добавить(МенюФайл);
ГлавноеМеню.Добавить(МенюПравка);
ГлавноеМеню.Добавить(МенюСправка);
ГлавноеМеню.УдалитьПоИндексу(1);
Форма1.Меню = ГлавноеМеню;
Форма1.Открыть();
УдалитьСтроку_Таблица_метод.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
// Строки = Таблица1.Строки;
// Для А = 0 По Строки.ВГраница() Цикл
// Эл = Строки.Получить(А);
// Сообщить("Эл = " + Эл + " ключ - " + Эл.КлючЭлемента);
// КонецЦикла;
Сообщить(?(
Таблица1.Строки.Количество() = 4
, "", "!!! ") + "УдалитьСтроку_Таблица_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "Строки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 350;
Форма1.НачальнаяВысота = 250;
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
Таблица1.УдалитьСтроку(2);
Форма1.Открыть();
УдалитьШапку_Таблица_метод.os
Перем ДФ, Таблица1;
Процедура Свойство() Экспорт
// Строки = Таблица1.Строки;
// Для А = 0 По Строки.ВГраница() Цикл
// Эл = Строки.Получить(А);
// Сообщить("Эл = " + Эл + " ключ - " + Эл.КлючЭлемента);
// КонецЦикла;
Сообщить(?(
Таблица1.Строки.Количество() = 4
, "", "!!! ") + "УдалитьШапку_Таблица_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Таблица1, "Строки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
// Таблица1.УдалитьШапку();
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
Таблица1.УдалитьШапку();
Форма1.Открыть();
УдалитьЯчейку_СтрокаТаблицы_метод.os
Перем ДФ, НоваяСтрока;
Процедура Свойство() Экспорт
// Сообщить("" + НоваяСтрока.Ячейки.Количество());
// Ячейки = НоваяСтрока.Ячейки;
// Для А = 0 По Ячейки.ВГраница() Цикл
// Эл = Ячейки.Получить(А);
// Сообщить("Эл = " + Эл + " ключ - " + Эл.КлючЭлемента);
// КонецЦикла;
Сообщить(?(
НоваяСтрока.Ячейки.Количество() = 1
, "", "!!! ") + "УдалитьЯчейку_СтрокаТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(НоваяСтрока, "Ячейки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
НоваяСтрока = Таблица1.ВставитьСтроку(2);
НоваяЯчейка1 = НоваяСтрока.ВставитьЯчейку(0);
НоваяЯчейка1.Текст = "НоваяЯчейка1";
НоваяЯчейка2 = НоваяСтрока.ВставитьЯчейку(0);
НоваяЯчейка2.Текст = "НоваяЯчейка2";
НоваяСтрока.УдалитьЯчейку(0);
Форма1.Открыть();
Уменьшение_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Уменьшение = 0
, "", "!!! ") + "Уменьшение_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Уменьшение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент1 = Форма1.Контент;
Контент1.Стиль.Ширина = 350;
Контент1.Стиль.Высота = 100;
Контент1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет(195, 195, 195));
Контент1.Стиль.Отображать = ДФ.Отображать.Гибкий;
Стиль1 = ДФ.Стиль();
Стиль1.Увеличение = 0;
Стиль1.Уменьшение = 0;
Стиль1.БазоваяДлина = 40;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль= Стиль1;
Блок1.Текст= "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.СветлоКоралловый;
Блок2 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль= Стиль1;
Блок2.Текст= "Блок2";
Блок2.Стиль.ЦветФона = ДФ.Цвет.НебесноГолубойСветлый;
Блок2.Стиль.БазоваяДлина = 200;
Форма1.Открыть();
УстановитьСдвиг_Контекст2d_метод.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1 = "ДфКонтекст2d"
, "", "!!! ") + "УстановитьСдвиг_Контекст2d_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.СтильЗаполнения = ДФ.Цвет.Красный;
Контекст2d1.ЗаполнитьПрямоугольник(0, 0, 250, 100);
Контекст2d1.УстановитьСдвиг(1, 0.5, -0.5, 1, 30, 10);
Контекст2d1.СтильЗаполнения = ДФ.Цвет.РозовоКоричневый;
Контекст2d1.ЗаполнитьПрямоугольник(0, 0, 250, 100);
Контекст2d1.УстановитьСдвиг(1.7, 0.2, -0.2, 1, 30, 10);
Контекст2d1.СтильЗаполнения = ДФ.Цвет.СветлаяМорскаяВолна;
Контекст2d1.ЗаполнитьПрямоугольник(0, 0, 250, 100);
Форма1.Открыть();
Файлы_АргументыСобытия_свойство.os
Перем ДФ, ВыборФайла1;
Процедура ВыборФайла1_ПриИзменении() Экспорт
// Сообщить("ДФ.АргументыСобытия.Файлы = " + ДФ.АргументыСобытия.Файлы);
// Сообщить("ВыборФайла1.Файлы = " + ВыборФайла1.Файлы);
// Для А = 0 По ДФ.АргументыСобытия.Файлы.ВГраница() Цикл
// Сообщить("" + ДФ.АргументыСобытия.Файлы.Получить(А));
// КонецЦикла;
Сообщить(?(
ДФ.АргументыСобытия.Файлы.Количество() > 0
, "", "!!! ") + "Файлы_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Контент.Текст = "Выберите файлы";
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "ВыборФайла1_ПриИзменении");
ВыборФайла1.МножественныйВыбор = Истина;
Форма1.Открыть();
Файлы_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура ВыборФайла1_ПриИзменении() Экспорт
Файлы = ДФ.АргументыСобытия.Файлы;
// Для А = 0 По Файлы.ВГраница() Цикл
// Сообщить("Файл " + А + " = " + Файлы.Получить(А));
// КонецЦикла;
// Сообщить("====");
// Для А = 0 По ВыборФайла1.Файлы.ВГраница() Цикл
// Сообщить("ВыборФайла1.Файлы " + А + " = " + ВыборФайла1.Файлы.Получить(А));
// КонецЦикла;
Сообщить(?(
"" + Файлы = "Массив"
, "", "!!! ") + "Файлы_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.ПриИзменении = ДФ.Действие(ЭтотОбъект, "ВыборФайла1_ПриИзменении");
ВыборФайла1.МножественныйВыбор = Истина;
Форма1.Открыть();
Фильтр_Стиль_свойство.os
Перем ДФ, Изображение2;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение2.Стиль.Фильтр = "blur(2px) brightness(200%) contrast(200%) drop-shadow(rgb(192, 192, 192) 30px 30px 10px) grayscale(70%) hue-rotate(30deg) invert(30%) opacity(30%) saturate(8) sepia(50%)"
, "", "!!! ") + "Фильтр_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение2.Стиль, "Фильтр", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Изображение1 = ДФ.Изображение();
Форма1.ДобавитьДочерний(Изображение1);
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Стиль.Ширина = 200;
ФильтрИзображений1 = ДФ.ФильтрИзображений();
ФильтрИзображений1.Размытие = 2;
ФильтрИзображений1.Яркость = 200;
ФильтрИзображений1.Контраст = 200;
ФильтрИзображений1.Тень = ДФ.Тень(30, 30, 10, 20, ДФ.Цвет.Серебристый);
ФильтрИзображений1.ОттенкиСерого = 70;
ФильтрИзображений1.ПоворотОттенка = 30;
ФильтрИзображений1.Инверсия = 30;
ФильтрИзображений1.Непрозрачность = 30;
ФильтрИзображений1.Насыщенность = 8;
ФильтрИзображений1.Ретро = 50;
Изображение1.Стиль.Фильтр = ФильтрИзображений1;
Изображение2 = ДФ.Изображение();
Форма1.ДобавитьДочерний(Изображение2);
Изображение2.Источник = "img_flwr.gif";
Изображение2.Стиль.Фильтр = ДФ.ФильтрИзображений(2, 200, 200, ДФ.Тень(30, 30, 10, 20, ДФ.Цвет.Серебристый), 70, 30, 30, 30, 8, 50);
Форма1.Открыть();
Фокус_Абзац_метод.os
Перем ДФ, Абзац1, ФокусПолучен;
Процедура Абзац1_ФокусПолучен() Экспорт
// Сообщить("Абзац1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Абзац_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Абзац1_ФокусПотерян() Экспорт
// Сообщить("Абзац1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Абзац1";
Абзац1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Абзац1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Абзац1_ФокусПолучен");
Абзац1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Абзац1_ФокусПотерян");
Абзац1.Редактируемый = Истина;
Абзац2 = ДФ.Абзац();
Абзац2.Родитель = Форма1;
Абзац2.Текст = "Это Абзац2";
Абзац2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Абзац2.Редактируемый = Истина;
Абзац1.Фокус();
Форма1.Открыть();
Фокус_Артикль_метод.os
Перем ДФ, Артикль1, ФокусПолучен;
Процедура Артикль1_ФокусПолучен() Экспорт
// Сообщить("Артикль1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Артикль_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Артикль1_ФокусПотерян() Экспорт
// Сообщить("Артикль1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Текст = "Это Артикль1";
Артикль1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Артикль1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Артикль1_ФокусПолучен");
Артикль1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Артикль1_ФокусПотерян");
Артикль1.Редактируемый = Истина;
Артикль2 = ДФ.Артикль();
Артикль2.Родитель = Форма1;
Артикль2.Текст = "Это Артикль2";
Артикль2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Артикль2.Редактируемый = Истина;
Артикль1.Фокус();
Форма1.Открыть();
Фокус_Аудио_метод.os
Перем ДФ, Аудио1, ФокусПолучен;
Процедура Аудио1_ФокусПолучен() Экспорт
// Сообщить("Аудио1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Аудио_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Аудио1_ФокусПотерян() Экспорт
// Сообщить("Аудио1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
// Аудио1.Источник = "file:///C:/444/Pic/Kaoma_Lambada.mp3";
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Аудио1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Аудио1_ФокусПолучен");
Аудио1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Аудио1_ФокусПотерян");
Аудио2 = ДФ.Аудио();
Аудио2.Родитель = Форма1;
Аудио2.Контролы = Истина;
// Аудио2.Источник = "file:///C:/444/Pic/Kaoma_Lambada.mp3";
Аудио2.Источник = "Kaoma_Lambada.mp3";
Аудио2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Аудио1.Фокус();
Форма1.Открыть();
Фокус_Блок_метод.os
Перем ДФ, Блок1, ФокусПолучен;
Процедура Блок1_ФокусПолучен() Экспорт
// Сообщить("Блок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Блок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Блок1_ФокусПотерян() Экспорт
// Сообщить("Блок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Это Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Блок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Блок1_ФокусПолучен");
Блок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Блок1_ФокусПотерян");
Блок1.Редактируемый = Истина;
Блок2 = ДФ.Блок();
Блок2.Родитель = Форма1;
Блок2.Текст = "Это Блок2";
Блок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Блок2.Редактируемый = Истина;
Блок1.Фокус();
Форма1.Открыть();
Фокус_ВыборВремени_метод.os
Перем ДФ, ВыборВремени1, ФокусПолучен;
Процедура ВыборВремени1_ФокусПолучен() Экспорт
// Сообщить("ВыборВремени1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ВыборВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборВремени1_ФокусПотерян() Экспорт
// Сообщить("ВыборВремени1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборВремени1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборВремени1_ФокусПолучен");
ВыборВремени1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборВремени1_ФокусПотерян");
ВыборВремени1.Редактируемый = Истина;
ВыборВремени2 = ДФ.ВыборВремени();
ВыборВремени2.Родитель = Форма1;
ВыборВремени2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборВремени2.Редактируемый = Истина;
ВыборВремени1.Фокус();
Форма1.Открыть();
Фокус_ВыборДаты_метод.os
Перем ДФ, ВыборДаты1, ФокусПолучен;
Процедура ВыборДаты1_ФокусПолучен() Экспорт
// Сообщить("ВыборДаты1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ВыборДаты_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборДаты1_ФокусПотерян() Экспорт
// Сообщить("ВыборДаты1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборДаты1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_ФокусПолучен");
ВыборДаты1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_ФокусПотерян");
ВыборДаты1.Редактируемый = Истина;
ВыборДаты2 = ДФ.ВыборДаты();
ВыборДаты2.Родитель = Форма1;
ВыборДаты2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборДаты2.Редактируемый = Истина;
ВыборДаты1.Фокус();
Форма1.Открыть();
Фокус_ВыборДатыВремени_метод.os
Перем ДФ, ВыборДатыВремени1, ФокусПолучен;
Процедура ВыборДатыВремени1_ФокусПолучен() Экспорт
// Сообщить("ВыборДатыВремени1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ВыборДатыВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборДатыВремени1_ФокусПотерян() Экспорт
// Сообщить("ВыборДатыВремени1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборДатыВремени1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_ФокусПолучен");
ВыборДатыВремени1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_ФокусПотерян");
ВыборДатыВремени1.Редактируемый = Истина;
ВыборДатыВремени2 = ДФ.ВыборДатыВремени();
ВыборДатыВремени2.Родитель = Форма1;
ВыборДатыВремени2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборДатыВремени2.Редактируемый = Истина;
ВыборДатыВремени1.Фокус();
Форма1.Открыть();
Фокус_ВыборМестнойДатыВремени_метод.os
Перем ДФ, ВыборМестнойДатыВремени1, ФокусПолучен;
Процедура ВыборМестнойДатыВремени1_ФокусПолучен() Экспорт
// Сообщить("ВыборМестнойДатыВремени1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ВыборМестнойДатыВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборМестнойДатыВремени1_ФокусПотерян() Экспорт
// Сообщить("ВыборМестнойДатыВремени1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборМестнойДатыВремени1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборМестнойДатыВремени1_ФокусПолучен");
ВыборМестнойДатыВремени1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборМестнойДатыВремени1_ФокусПотерян");
ВыборМестнойДатыВремени1.Редактируемый = Истина;
ВыборМестнойДатыВремени2 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени2.Родитель = Форма1;
ВыборМестнойДатыВремени2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборМестнойДатыВремени2.Редактируемый = Истина;
ВыборМестнойДатыВремени1.Фокус();
Форма1.Открыть();
Фокус_ВыборМесяца_метод.os
Перем ДФ, ВыборМесяца1, ФокусПолучен;
Процедура ВыборМесяца1_ФокусПолучен() Экспорт
// Сообщить("ВыборМесяца1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ВыборМесяца_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборМесяца1_ФокусПотерян() Экспорт
// Сообщить("ВыборМесяца1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборМесяца1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_ФокусПолучен");
ВыборМесяца1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_ФокусПотерян");
ВыборМесяца1.Редактируемый = Истина;
ВыборМесяца2 = ДФ.ВыборМесяца();
ВыборМесяца2.Родитель = Форма1;
ВыборМесяца2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборМесяца2.Редактируемый = Истина;
ВыборМесяца1.Фокус();
Форма1.Открыть();
Фокус_ВыборНедели_метод.os
Перем ДФ, ВыборНедели1, ФокусПолучен;
Процедура ВыборНедели1_ФокусПолучен() Экспорт
// Сообщить("ВыборНедели1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ВыборНедели_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборНедели1_ФокусПотерян() Экспорт
// Сообщить("ВыборНедели1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборНедели1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_ФокусПолучен");
ВыборНедели1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_ФокусПотерян");
ВыборНедели1.Редактируемый = Истина;
ВыборНедели2 = ДФ.ВыборНедели();
ВыборНедели2.Родитель = Форма1;
ВыборНедели2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборНедели2.Редактируемый = Истина;
ВыборНедели1.Фокус();
Форма1.Открыть();
Фокус_ВыборФайла_метод.os
Перем ДФ, ВыборФайла1, ФокусПолучен;
Процедура ВыборФайла1_ФокусПолучен() Экспорт
// Сообщить("ВыборФайла1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ВыборФайла_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборФайла1_ФокусПотерян() Экспорт
// Сообщить("ВыборФайла1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборФайла1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборФайла1_ФокусПолучен");
ВыборФайла1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборФайла1_ФокусПотерян");
ВыборФайла1.Редактируемый = Истина;
ВыборФайла2 = ДФ.ВыборФайла();
ВыборФайла2.Родитель = Форма1;
ВыборФайла2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборФайла2.Редактируемый = Истина;
ВыборФайла1.Фокус();
Форма1.Открыть();
Фокус_ВыборЦвета_метод.os
Перем ДФ, ВыборЦвета1, ФокусПолучен;
Процедура ВыборЦвета1_ФокусПолучен() Экспорт
// Сообщить("ВыборЦвета1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ВыборЦвета_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборЦвета1_ФокусПотерян() Экспорт
// Сообщить("ВыборЦвета1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборЦвета1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборЦвета1_ФокусПолучен");
ВыборЦвета1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборЦвета1_ФокусПотерян");
ВыборЦвета1.Редактируемый = Истина;
ВыборЦвета2 = ДФ.ВыборЦвета();
ВыборЦвета2.Родитель = Форма1;
ВыборЦвета2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборЦвета2.Редактируемый = Истина;
ВыборЦвета1.Фокус();
Форма1.Открыть();
Фокус_Группа_метод.os
Перем ДФ, Группа1, ФокусПолучен;
Процедура Группа1_ФокусПолучен() Экспорт
// Сообщить("Группа1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Группа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Группа1_ФокусПотерян() Экспорт
// Сообщить("Группа1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Текст = "Это Группа1";
Группа1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Группа1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Группа1_ФокусПолучен");
Группа1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Группа1_ФокусПотерян");
Группа1.Редактируемый = Истина;
Группа2 = ДФ.Группа();
Группа2.Родитель = Форма1;
Группа2.Текст = "Это Группа2";
Группа2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Группа2.Редактируемый = Истина;
Группа1.Фокус();
Форма1.Открыть();
Фокус_ГруппаКолонок_метод.os
Перем ДФ, ГруппаКолонок1, ФокусПолучен;
Процедура ГруппаКолонок1_ФокусПолучен() Экспорт
// Сообщить("ГруппаКолонок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ГруппаКолонок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ГруппаКолонок1_ФокусПотерян() Экспорт
// Сообщить("ГруппаКолонок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Форма1;
ГруппаКолонок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ГруппаКолонок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ГруппаКолонок1_ФокусПолучен");
ГруппаКолонок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ГруппаКолонок1_ФокусПотерян");
ГруппаКолонок1.Редактируемый = Истина;
ГруппаКолонок2 = ДФ.ГруппаКолонок();
ГруппаКолонок2.Родитель = Форма1;
ГруппаКолонок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ГруппаКолонок2.Редактируемый = Истина;
ГруппаКолонок1.Фокус();
Форма1.Открыть();
Фокус_ГруппировкаПоляСписка_метод.os
Перем ДФ, ГруппировкаПоляСписка1, ФокусПолучен;
Процедура ГруппировкаПоляСписка1_ФокусПолучен() Экспорт
// Сообщить("ГруппировкаПоляСписка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ГруппировкаПоляСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ГруппировкаПоляСписка1_ФокусПотерян() Экспорт
// Сообщить("ГруппировкаПоляСписка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ГруппировкаПоляСписка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ГруппировкаПоляСписка1_ФокусПолучен");
ГруппировкаПоляСписка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ГруппировкаПоляСписка1_ФокусПотерян");
ГруппировкаПоляСписка1.Редактируемый = Истина;
ГруппировкаПоляСписка2 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка2.Родитель = Форма1;
ГруппировкаПоляСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ГруппировкаПоляСписка2.Редактируемый = Истина;
ГруппировкаПоляСписка1.Фокус();
Форма1.Открыть();
Фокус_Диалог_метод.os
Перем ДФ, Диалог1, ФокусПолучен;
Процедура Диалог1_ФокусПолучен() Экспорт
// Сообщить("Диалог1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Диалог_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Диалог1_ФокусПотерян() Экспорт
// Сообщить("Диалог1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Текст = "Это Диалог1";
Диалог1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Диалог1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Диалог1_ФокусПолучен");
Диалог1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Диалог1_ФокусПотерян");
Диалог1.Редактируемый = Истина;
Диалог2 = ДФ.Диалог();
Диалог2.Родитель = Форма1;
Диалог2.Текст = "Это Диалог2";
Диалог2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Диалог2.Редактируемый = Истина;
Диалог1.Показать();
Диалог2.Показать();
Форма1.Открыть();
Фокус_ДополнительныйБлок_метод.os
Перем ДФ, ДополнительныйБлок1, ФокусПолучен;
Процедура ДополнительныйБлок1_ФокусПолучен() Экспорт
// Сообщить("ДополнительныйБлок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ДополнительныйБлок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ДополнительныйБлок1_ФокусПотерян() Экспорт
// Сообщить("ДополнительныйБлок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "Это ДополнительныйБлок1";
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ДополнительныйБлок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ДополнительныйБлок1_ФокусПолучен");
ДополнительныйБлок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ДополнительныйБлок1_ФокусПотерян");
ДополнительныйБлок1.Редактируемый = Истина;
ДополнительныйБлок2 = ДФ.ДополнительныйБлок();
ДополнительныйБлок2.Родитель = Форма1;
ДополнительныйБлок2.Текст = "Это ДополнительныйБлок2";
ДополнительныйБлок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ДополнительныйБлок2.Редактируемый = Истина;
ДополнительныйБлок1.Фокус();
Форма1.Открыть();
Фокус_ЖирныйТекст_метод.os
Перем ДФ, ЖирныйТекст1, ФокусПолучен;
Процедура ЖирныйТекст1_ФокусПолучен() Экспорт
// Сообщить("ЖирныйТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ЖирныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ЖирныйТекст1_ФокусПотерян() Экспорт
// Сообщить("ЖирныйТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Текст = "Это ЖирныйТекст1";
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЖирныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЖирныйТекст1_ФокусПолучен");
ЖирныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЖирныйТекст1_ФокусПотерян");
ЖирныйТекст1.Редактируемый = Истина;
ЖирныйТекст2 = ДФ.ЖирныйТекст();
ЖирныйТекст2.Родитель = Форма1;
ЖирныйТекст2.Текст = "Это ЖирныйТекст2";
ЖирныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЖирныйТекст2.Редактируемый = Истина;
ЖирныйТекст1.Фокус();
Форма1.Открыть();
Фокус_Заголовок1_метод.os
Перем ДФ, Заголовок11, ФокусПолучен;
Процедура Заголовок11_ФокусПолучен() Экспорт
// Сообщить("Заголовок11_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Заголовок1_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Заголовок11_ФокусПотерян() Экспорт
// Сообщить("Заголовок11_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Текст = "Это Заголовок11";
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок11.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок11_ФокусПолучен");
Заголовок11.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок11_ФокусПотерян");
Заголовок11.Редактируемый = Истина;
Заголовок12 = ДФ.Заголовок1();
Заголовок12.Родитель = Форма1;
Заголовок12.Текст = "Это Заголовок12";
Заголовок12.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок12.Редактируемый = Истина;
Заголовок11.Фокус();
Форма1.Открыть();
Фокус_Заголовок2_метод.os
Перем ДФ, Заголовок21, ФокусПолучен;
Процедура Заголовок21_ФокусПолучен() Экспорт
// Сообщить("Заголовок21_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Заголовок2_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Заголовок21_ФокусПотерян() Экспорт
// Сообщить("Заголовок21_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Текст = "Это Заголовок21";
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок21.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок21_ФокусПолучен");
Заголовок21.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок21_ФокусПотерян");
Заголовок21.Редактируемый = Истина;
Заголовок22 = ДФ.Заголовок2();
Заголовок22.Родитель = Форма1;
Заголовок22.Текст = "Это Заголовок22";
Заголовок22.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок22.Редактируемый = Истина;
Заголовок21.Фокус();
Форма1.Открыть();
Фокус_Заголовок3_метод.os
Перем ДФ, Заголовок31, ФокусПолучен;
Процедура Заголовок31_ФокусПолучен() Экспорт
// Сообщить("Заголовок31_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Заголовок3_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Заголовок31_ФокусПотерян() Экспорт
// Сообщить("Заголовок31_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Текст = "Это Заголовок31";
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок31.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок31_ФокусПолучен");
Заголовок31.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок31_ФокусПотерян");
Заголовок31.Редактируемый = Истина;
Заголовок32 = ДФ.Заголовок3();
Заголовок32.Родитель = Форма1;
Заголовок32.Текст = "Это Заголовок32";
Заголовок32.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок32.Редактируемый = Истина;
Заголовок31.Фокус();
Форма1.Открыть();
Фокус_Заголовок4_метод.os
Перем ДФ, Заголовок41, ФокусПолучен;
Процедура Заголовок41_ФокусПолучен() Экспорт
// Сообщить("Заголовок41_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Заголовок4_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Заголовок41_ФокусПотерян() Экспорт
// Сообщить("Заголовок41_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Текст = "Это Заголовок41";
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок41.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок41_ФокусПолучен");
Заголовок41.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок41_ФокусПотерян");
Заголовок41.Редактируемый = Истина;
Заголовок42 = ДФ.Заголовок4();
Заголовок42.Родитель = Форма1;
Заголовок42.Текст = "Это Заголовок42";
Заголовок42.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок42.Редактируемый = Истина;
Заголовок41.Фокус();
Форма1.Открыть();
Фокус_Заголовок5_метод.os
Перем ДФ, Заголовок51, ФокусПолучен;
Процедура Заголовок51_ФокусПолучен() Экспорт
// Сообщить("Заголовок51_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Заголовок5_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Заголовок51_ФокусПотерян() Экспорт
// Сообщить("Заголовок51_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Текст = "Это Заголовок51";
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок51.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок51_ФокусПолучен");
Заголовок51.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок51_ФокусПотерян");
Заголовок51.Редактируемый = Истина;
Заголовок52 = ДФ.Заголовок5();
Заголовок52.Родитель = Форма1;
Заголовок52.Текст = "Это Заголовок52";
Заголовок52.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок52.Редактируемый = Истина;
Заголовок51.Фокус();
Форма1.Открыть();
Фокус_Заголовок6_метод.os
Перем ДФ, Заголовок61, ФокусПолучен;
Процедура Заголовок61_ФокусПолучен() Экспорт
// Сообщить("Заголовок61_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Заголовок6_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Заголовок61_ФокусПотерян() Экспорт
// Сообщить("Заголовок61_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Текст = "Это Заголовок61";
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок61.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок61_ФокусПолучен");
Заголовок61.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок61_ФокусПотерян");
Заголовок61.Редактируемый = Истина;
Заголовок62 = ДФ.Заголовок6();
Заголовок62.Родитель = Форма1;
Заголовок62.Текст = "Это Заголовок62";
Заголовок62.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок62.Редактируемый = Истина;
Заголовок61.Фокус();
Форма1.Открыть();
Фокус_Заголовок_метод.os
Перем ДФ, Заголовок1, ФокусПолучен;
Процедура Заголовок1_ФокусПолучен() Экспорт
// Сообщить("Заголовок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Заголовок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Заголовок1_ФокусПотерян() Экспорт
// Сообщить("Заголовок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Текст = "Это Заголовок1";
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок1_ФокусПолучен");
Заголовок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок1_ФокусПотерян");
Заголовок1.Редактируемый = Истина;
Заголовок2 = ДФ.Заголовок();
Заголовок2.Родитель = Форма1;
Заголовок2.Текст = "Это Заголовок2";
Заголовок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок2.Редактируемый = Истина;
Заголовок1.Фокус();
Форма1.Открыть();
Фокус_ЗаголовокГруппы_метод.os
Перем ДФ, ЗаголовокГруппы1, ФокусПолучен;
Процедура ЗаголовокГруппы1_ФокусПолучен() Экспорт
// Сообщить("ЗаголовокГруппы1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ЗаголовокГруппы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ЗаголовокГруппы1_ФокусПотерян() Экспорт
// Сообщить("ЗаголовокГруппы1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Текст = "Это ЗаголовокГруппы1";
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЗаголовокГруппы1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЗаголовокГруппы1_ФокусПолучен");
ЗаголовокГруппы1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЗаголовокГруппы1_ФокусПотерян");
ЗаголовокГруппы1.Редактируемый = Истина;
ЗаголовокГруппы2 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы2.Родитель = Форма1;
ЗаголовокГруппы2.Текст = "Это ЗаголовокГруппы2";
ЗаголовокГруппы2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЗаголовокГруппы2.Редактируемый = Истина;
ЗаголовокГруппы1.Фокус();
Форма1.Открыть();
Фокус_ЗаголовокРаскрываемогоБлока_метод.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1, ФокусПолучен;
Процедура ЗаголовокРаскрываемогоБлока1_ФокусПолучен() Экспорт
// Сообщить("ЗаголовокРаскрываемогоБлока1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ЗаголовокРаскрываемогоБлока_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ЗаголовокРаскрываемогоБлока1_ФокусПотерян() Экспорт
// Сообщить("ЗаголовокРаскрываемогоБлока1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Текст = "Это ЗаголовокРаскрываемогоБлока1";
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЗаголовокРаскрываемогоБлока1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЗаголовокРаскрываемогоБлока1_ФокусПолучен");
ЗаголовокРаскрываемогоБлока1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЗаголовокРаскрываемогоБлока1_ФокусПотерян");
ЗаголовокРаскрываемогоБлока1.Редактируемый = Истина;
ЗаголовокРаскрываемогоБлока2 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока2.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока2.Текст = "Это ЗаголовокРаскрываемогоБлока2";
ЗаголовокРаскрываемогоБлока2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЗаголовокРаскрываемогоБлока2.Редактируемый = Истина;
ЗаголовокРаскрываемогоБлока1.Фокус();
Форма1.Открыть();
Фокус_Изображение_метод.os
Перем ДФ, Изображение1, ФокусПолучен;
Процедура Изображение1_ФокусПолучен() Экспорт
// Сообщить("Изображение1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Изображение_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Изображение1_ФокусПотерян() Экспорт
// Сообщить("Изображение1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Изображение1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Изображение1_ФокусПолучен");
Изображение1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Изображение1_ФокусПотерян");
Изображение1.Редактируемый = Истина;
Изображение2 = ДФ.Изображение();
Изображение2.Родитель = Форма1;
Изображение2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Изображение2.Редактируемый = Истина;
Изображение1.Фокус();
Форма1.Открыть();
Фокус_Индикатор_метод.os
Перем ДФ, Индикатор1, ФокусПолучен;
Процедура Индикатор1_ФокусПолучен() Экспорт
// Сообщить("Индикатор1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Индикатор_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Индикатор1_ФокусПотерян() Экспорт
// Сообщить("Индикатор1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Индикатор1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Индикатор1_ФокусПолучен");
Индикатор1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Индикатор1_ФокусПотерян");
Индикатор1.Редактируемый = Истина;
Индикатор2 = ДФ.Индикатор();
Индикатор2.Родитель = Форма1;
Индикатор2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Индикатор2.Редактируемый = Истина;
Индикатор1.Фокус();
Форма1.Открыть();
Фокус_Итоги_метод.os
Перем ДФ, Итоги1, ФокусПолучен;
Процедура Итоги1_ФокусПолучен() Экспорт
// Сообщить("Итоги1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Итоги_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Итоги1_ФокусПотерян() Экспорт
// Сообщить("Итоги1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Текст = "Это Итоги1";
Итоги1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Итоги1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Итоги1_ФокусПолучен");
Итоги1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Итоги1_ФокусПотерян");
Итоги1.Редактируемый = Истина;
Итоги2 = ДФ.Итоги();
Итоги2.Родитель = Форма1;
Итоги2.Текст = "Это Итоги2";
Итоги2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Итоги2.Редактируемый = Истина;
Итоги1.Фокус();
Форма1.Открыть();
Фокус_Кнопка_метод.os
Перем ДФ, Кнопка1, ФокусПолучен;
Процедура Кнопка1_ФокусПолучен() Экспорт
// Сообщить("Кнопка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Кнопка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_ФокусПотерян() Экспорт
// Сообщить("Кнопка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Кнопка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Кнопка1_ФокусПолучен");
Кнопка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Кнопка1_ФокусПотерян");
Кнопка1.Редактируемый = Истина;
Кнопка2 = ДФ.Кнопка();
Кнопка2.Родитель = Форма1;
Кнопка2.Текст = "Это Кнопка2";
Кнопка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Кнопка2.Редактируемый = Истина;
Кнопка1.Фокус();
Форма1.Открыть();
Фокус_Код_метод.os
Перем ДФ, Код1, ФокусПолучен;
Процедура Код1_ФокусПолучен() Экспорт
// Сообщить("Код1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Код_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Код1_ФокусПотерян() Экспорт
// Сообщить("Код1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Текст = "Это Код1";
Код1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Код1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Код1_ФокусПолучен");
Код1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Код1_ФокусПотерян");
Код1.Редактируемый = Истина;
Код2 = ДФ.Код();
Код2.Родитель = Форма1;
Код2.Текст = "Это Код2";
Код2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Код2.Редактируемый = Истина;
Код1.Фокус();
Форма1.Открыть();
Фокус_Колонка_метод.os
Перем ДФ, Колонка1, ФокусПолучен;
Процедура Колонка1_ФокусПолучен() Экспорт
// Сообщить("Колонка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Колонка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Колонка1_ФокусПотерян() Экспорт
// Сообщить("Колонка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = Форма1;
Колонка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Колонка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Колонка1_ФокусПолучен");
Колонка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Колонка1_ФокусПотерян");
Колонка1.Редактируемый = Истина;
Колонка2 = ДФ.Колонка();
Колонка2.Родитель = Форма1;
Колонка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Колонка2.Редактируемый = Истина;
Колонка1.Фокус();
Форма1.Открыть();
Фокус_Колонтитул_метод.os
Перем ДФ, Колонтитул1, ФокусПолучен;
Процедура Колонтитул1_ФокусПолучен() Экспорт
// Сообщить("Колонтитул1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Колонтитул_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Колонтитул1_ФокусПотерян() Экспорт
// Сообщить("Колонтитул1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Текст = "Это Колонтитул1";
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Колонтитул1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Колонтитул1_ФокусПолучен");
Колонтитул1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Колонтитул1_ФокусПотерян");
Колонтитул1.Редактируемый = Истина;
Колонтитул2 = ДФ.Колонтитул();
Колонтитул2.Родитель = Форма1;
Колонтитул2.Текст = "Это Колонтитул2";
Колонтитул2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Колонтитул2.Редактируемый = Истина;
Колонтитул1.Фокус();
Форма1.Открыть();
Фокус_КурсивТекст_метод.os
Перем ДФ, КурсивТекст1, ФокусПолучен;
Процедура КурсивТекст1_ФокусПолучен() Экспорт
// Сообщить("КурсивТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_КурсивТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура КурсивТекст1_ФокусПотерян() Экспорт
// Сообщить("КурсивТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Текст = "Это КурсивТекст1";
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
КурсивТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "КурсивТекст1_ФокусПолучен");
КурсивТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "КурсивТекст1_ФокусПотерян");
КурсивТекст1.Редактируемый = Истина;
КурсивТекст2 = ДФ.КурсивТекст();
КурсивТекст2.Родитель = Форма1;
КурсивТекст2.Текст = "Это КурсивТекст2";
КурсивТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
КурсивТекст2.Редактируемый = Истина;
КурсивТекст1.Фокус();
Форма1.Открыть();
Фокус_МаркированныйТекст_метод.os
Перем ДФ, МаркированныйТекст1, ФокусПолучен;
Процедура МаркированныйТекст1_ФокусПолучен() Экспорт
// Сообщить("МаркированныйТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_МаркированныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МаркированныйТекст1_ФокусПотерян() Экспорт
// Сообщить("МаркированныйТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Текст = "Это МаркированныйТекст1";
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
МаркированныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "МаркированныйТекст1_ФокусПолучен");
МаркированныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "МаркированныйТекст1_ФокусПотерян");
МаркированныйТекст1.Редактируемый = Истина;
МаркированныйТекст2 = ДФ.МаркированныйТекст();
МаркированныйТекст2.Родитель = Форма1;
МаркированныйТекст2.Текст = "Это МаркированныйТекст2";
МаркированныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
МаркированныйТекст2.Редактируемый = Истина;
МаркированныйТекст1.Фокус();
Форма1.Открыть();
Фокус_МедиаГруппа_метод.os
Перем ДФ, МедиаГруппа1, ФокусПолучен;
Процедура МедиаГруппа1_ФокусПолучен() Экспорт
// Сообщить("МедиаГруппа1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_МедиаГруппа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МедиаГруппа1_ФокусПотерян() Экспорт
// Сообщить("МедиаГруппа1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Текст = "Это МедиаГруппа1";
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.Красный;
МедиаГруппа1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "МедиаГруппа1_ФокусПолучен");
МедиаГруппа1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "МедиаГруппа1_ФокусПотерян");
МедиаГруппа1.Редактируемый = Истина;
МедиаГруппа2 = ДФ.МедиаГруппа();
МедиаГруппа2.Родитель = Форма1;
МедиаГруппа2.Текст = "Это МедиаГруппа2";
МедиаГруппа2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
МедиаГруппа2.Редактируемый = Истина;
МедиаГруппа1.Фокус();
Форма1.Открыть();
Фокус_МелкийТекст_метод.os
Перем ДФ, МелкийТекст1, ФокусПолучен;
Процедура МелкийТекст1_ФокусПолучен() Экспорт
// Сообщить("МелкийТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_МелкийТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МелкийТекст1_ФокусПотерян() Экспорт
// Сообщить("МелкийТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Текст = "Это МелкийТекст1";
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
МелкийТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "МелкийТекст1_ФокусПолучен");
МелкийТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "МелкийТекст1_ФокусПотерян");
МелкийТекст1.Редактируемый = Истина;
МелкийТекст2 = ДФ.МелкийТекст();
МелкийТекст2.Родитель = Форма1;
МелкийТекст2.Текст = "Это МелкийТекст2";
МелкийТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
МелкийТекст2.Редактируемый = Истина;
МелкийТекст1.Фокус();
Форма1.Открыть();
Фокус_НадстрочныйТекст_метод.os
Перем ДФ, НадстрочныйТекст1, ФокусПолучен;
Процедура НадстрочныйТекст1_ФокусПолучен() Экспорт
// Сообщить("НадстрочныйТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_НадстрочныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура НадстрочныйТекст1_ФокусПотерян() Экспорт
// Сообщить("НадстрочныйТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Текст = "Это НадстрочныйТекст1";
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НадстрочныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "НадстрочныйТекст1_ФокусПолучен");
НадстрочныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "НадстрочныйТекст1_ФокусПотерян");
НадстрочныйТекст1.Редактируемый = Истина;
НадстрочныйТекст2 = ДФ.НадстрочныйТекст();
НадстрочныйТекст2.Родитель = Форма1;
НадстрочныйТекст2.Текст = "Это НадстрочныйТекст2";
НадстрочныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
НадстрочныйТекст2.Редактируемый = Истина;
НадстрочныйТекст1.Фокус();
Форма1.Открыть();
Фокус_НаправленныйТекст_метод.os
Перем ДФ, НаправленныйТекст1, ФокусПолучен;
Процедура НаправленныйТекст1_ФокусПолучен() Экспорт
// Сообщить("НаправленныйТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_НаправленныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура НаправленныйТекст1_ФокусПотерян() Экспорт
// Сообщить("НаправленныйТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Текст = "Это НаправленныйТекст1";
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НаправленныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "НаправленныйТекст1_ФокусПолучен");
НаправленныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "НаправленныйТекст1_ФокусПотерян");
НаправленныйТекст1.Редактируемый = Истина;
НаправленныйТекст2 = ДФ.НаправленныйТекст();
НаправленныйТекст2.Родитель = Форма1;
НаправленныйТекст2.Текст = "Это НаправленныйТекст2";
НаправленныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
НаправленныйТекст2.Редактируемый = Истина;
НаправленныйТекст1.Фокус();
Форма1.Открыть();
Фокус_НеупорядоченныйСписок_метод.os
Перем ДФ, НеупорядоченныйСписок1, ФокусПолучен;
Процедура НеупорядоченныйСписок1_ФокусПолучен() Экспорт
// Сообщить("НеупорядоченныйСписок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_НеупорядоченныйСписок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура НеупорядоченныйСписок1_ФокусПотерян() Экспорт
// Сообщить("НеупорядоченныйСписок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Текст = "Это НеупорядоченныйСписок1";
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НеупорядоченныйСписок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "НеупорядоченныйСписок1_ФокусПолучен");
НеупорядоченныйСписок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "НеупорядоченныйСписок1_ФокусПотерян");
НеупорядоченныйСписок1.Редактируемый = Истина;
НеупорядоченныйСписок2 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок2.Родитель = Форма1;
НеупорядоченныйСписок2.Текст = "Это НеупорядоченныйСписок2";
НеупорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
НеупорядоченныйСписок2.Редактируемый = Истина;
НеупорядоченныйСписок1.Фокус();
Форма1.Открыть();
Фокус_НижнийКолонтитул_метод.os
Перем ДФ, НижнийКолонтитул1, ФокусПолучен;
Процедура НижнийКолонтитул1_ФокусПолучен() Экспорт
// Сообщить("НижнийКолонтитул1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_НижнийКолонтитул_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура НижнийКолонтитул1_ФокусПотерян() Экспорт
// Сообщить("НижнийКолонтитул1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Текст = "Это НижнийКолонтитул1";
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НижнийКолонтитул1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "НижнийКолонтитул1_ФокусПолучен");
НижнийКолонтитул1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "НижнийКолонтитул1_ФокусПотерян");
НижнийКолонтитул1.Редактируемый = Истина;
НижнийКолонтитул2 = ДФ.НижнийКолонтитул();
НижнийКолонтитул2.Родитель = Форма1;
НижнийКолонтитул2.Текст = "Это НижнийКолонтитул2";
НижнийКолонтитул2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
НижнийКолонтитул2.Редактируемый = Истина;
НижнийКолонтитул1.Фокус();
Форма1.Открыть();
Фокус_ОбластьТаблицы_метод.os
Перем ДФ, ОбластьТаблицы1, ФокусПолучен;
Процедура ОбластьТаблицы1_ФокусПолучен() Экспорт
// Сообщить("ОбластьТаблицы1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ОбластьТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ОбластьТаблицы1_ФокусПотерян() Экспорт
// Сообщить("ОбластьТаблицы1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Текст = "Это ОбластьТаблицы1";
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОбластьТаблицы1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ОбластьТаблицы1_ФокусПолучен");
ОбластьТаблицы1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ОбластьТаблицы1_ФокусПотерян");
ОбластьТаблицы1.Редактируемый = Истина;
ОбластьТаблицы2 = ДФ.ОбластьТаблицы();
ОбластьТаблицы2.Родитель = Форма1;
ОбластьТаблицы2.Текст = "Это ОбластьТаблицы2";
ОбластьТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ОбластьТаблицы2.Редактируемый = Истина;
ОбластьТаблицы1.Фокус();
Форма1.Открыть();
Фокус_ОбластьТекста_метод.os
Перем ДФ, ОбластьТекста1, ФокусПолучен;
Процедура ОбластьТекста1_ФокусПолучен() Экспорт
// Сообщить("ОбластьТекста1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ОбластьТекста_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ОбластьТекста1_ФокусПотерян() Экспорт
// Сообщить("ОбластьТекста1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОбластьТекста1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_ФокусПолучен");
ОбластьТекста1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_ФокусПотерян");
ОбластьТекста1.Редактируемый = Истина;
ОбластьТекста2 = ДФ.ОбластьТекста();
ОбластьТекста2.Родитель = Форма1;
ОбластьТекста2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ОбластьТекста2.Редактируемый = Истина;
ОбластьТекста1.Фокус();
Форма1.Открыть();
Фокус_ОписаниеМедиа_метод.os
Перем ДФ, ОписаниеМедиа1, ФокусПолучен;
Процедура ОписаниеМедиа1_ФокусПолучен() Экспорт
// Сообщить("ОписаниеМедиа1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ОписаниеМедиа_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ОписаниеМедиа1_ФокусПотерян() Экспорт
// Сообщить("ОписаниеМедиа1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Текст = "Это ОписаниеМедиа1";
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОписаниеМедиа1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ОписаниеМедиа1_ФокусПолучен");
ОписаниеМедиа1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ОписаниеМедиа1_ФокусПотерян");
ОписаниеМедиа1.Редактируемый = Истина;
ОписаниеМедиа2 = ДФ.ОписаниеМедиа();
ОписаниеМедиа2.Родитель = Форма1;
ОписаниеМедиа2.Текст = "Это ОписаниеМедиа2";
ОписаниеМедиа2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ОписаниеМедиа2.Редактируемый = Истина;
ОписаниеМедиа1.Фокус();
Форма1.Открыть();
Фокус_Определение_метод.os
Перем ДФ, Определение1, ФокусПолучен;
Процедура Определение1_ФокусПолучен() Экспорт
// Сообщить("Определение1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Определение_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Определение1_ФокусПотерян() Экспорт
// Сообщить("Определение1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Текст = "Это Определение1";
Определение1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Определение1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Определение1_ФокусПолучен");
Определение1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Определение1_ФокусПотерян");
Определение1.Редактируемый = Истина;
Определение2 = ДФ.Определение();
Определение2.Родитель = Форма1;
Определение2.Текст = "Это Определение2";
Определение2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Определение2.Редактируемый = Истина;
Определение1.Фокус();
Форма1.Открыть();
Фокус_Переключатель_метод.os
Перем ДФ, Переключатель1, ФокусПолучен;
Процедура Переключатель1_ФокусПолучен() Экспорт
// Сообщить("Переключатель1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Переключатель_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Переключатель1_ФокусПотерян() Экспорт
// Сообщить("Переключатель1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Переключатель1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Переключатель1_ФокусПолучен");
Переключатель1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Переключатель1_ФокусПотерян");
Переключатель1.Редактируемый = Истина;
Переключатель2 = ДФ.Переключатель();
Переключатель2.Родитель = Форма1;
Переключатель2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Переключатель2.Редактируемый = Истина;
Переключатель1.Фокус();
Форма1.Открыть();
Фокус_Перенос_метод.os
Перем ДФ, Перенос1, ФокусПолучен;
Процедура Перенос1_ФокусПолучен() Экспорт
// Сообщить("Перенос1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Перенос_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Перенос1_ФокусПотерян() Экспорт
// Сообщить("Перенос1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Перенос1 = ДФ.Перенос();
Перенос1.Родитель = Форма1;
Перенос1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Перенос1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Перенос1_ФокусПолучен");
Перенос1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Перенос1_ФокусПотерян");
Перенос1.Редактируемый = Истина;
Перенос2 = ДФ.Перенос();
Перенос2.Родитель = Форма1;
Перенос2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Перенос2.Редактируемый = Истина;
Перенос1.Фокус();
Форма1.Открыть();
Фокус_Подпись_метод.os
Перем ДФ, Подпись1, ФокусПолучен;
Процедура Подпись1_ФокусПолучен() Экспорт
// Сообщить("Подпись1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Подпись_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Подпись1_ФокусПотерян() Экспорт
// Сообщить("Подпись1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Это Подпись1";
Подпись1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Подпись1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Подпись1_ФокусПолучен");
Подпись1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Подпись1_ФокусПотерян");
Подпись1.Редактируемый = Истина;
Подпись2 = ДФ.Подпись();
Подпись2.Родитель = Форма1;
Подпись2.Текст = "Это Подпись2";
Подпись2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Подпись2.Редактируемый = Истина;
Подпись1.Фокус();
Форма1.Открыть();
Фокус_ПодстрочныйТекст_метод.os
Перем ДФ, ПодстрочныйТекст1, ФокусПолучен;
Процедура ПодстрочныйТекст1_ФокусПолучен() Экспорт
// Сообщить("ПодстрочныйТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ПодстрочныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПодстрочныйТекст1_ФокусПотерян() Экспорт
// Сообщить("ПодстрочныйТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Текст = "Это ПодстрочныйТекст1";
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПодстрочныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПодстрочныйТекст1_ФокусПолучен");
ПодстрочныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПодстрочныйТекст1_ФокусПотерян");
ПодстрочныйТекст1.Редактируемый = Истина;
ПодстрочныйТекст2 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст2.Родитель = Форма1;
ПодстрочныйТекст2.Текст = "Это ПодстрочныйТекст2";
ПодстрочныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПодстрочныйТекст2.Редактируемый = Истина;
ПодстрочныйТекст1.Фокус();
Форма1.Открыть();
Фокус_ПодчеркнутыйТекст_метод.os
Перем ДФ, ПодчеркнутыйТекст1, ФокусПолучен;
Процедура ПодчеркнутыйТекст1_ФокусПолучен() Экспорт
// Сообщить("ПодчеркнутыйТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ПодчеркнутыйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПодчеркнутыйТекст1_ФокусПотерян() Экспорт
// Сообщить("ПодчеркнутыйТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Текст = "Это ПодчеркнутыйТекст1";
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПодчеркнутыйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПодчеркнутыйТекст1_ФокусПолучен");
ПодчеркнутыйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПодчеркнутыйТекст1_ФокусПотерян");
ПодчеркнутыйТекст1.Редактируемый = Истина;
ПодчеркнутыйТекст2 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст2.Родитель = Форма1;
ПодчеркнутыйТекст2.Текст = "Это ПодчеркнутыйТекст2";
ПодчеркнутыйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПодчеркнутыйТекст2.Редактируемый = Истина;
ПодчеркнутыйТекст1.Фокус();
Форма1.Открыть();
Фокус_ПолеПароля_метод.os
Перем ДФ, ПолеПароля1, ФокусПолучен;
Процедура ПолеПароля1_ФокусПолучен() Экспорт
// Сообщить("ПолеПароля1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ПолеПароля_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПолеПароля1_ФокусПотерян() Экспорт
// Сообщить("ПолеПароля1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеПароля1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_ФокусПолучен");
ПолеПароля1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_ФокусПотерян");
ПолеПароля1.Редактируемый = Истина;
ПолеПароля2 = ДФ.ПолеПароля();
ПолеПароля2.Родитель = Форма1;
ПолеПароля2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеПароля2.Редактируемый = Истина;
ПолеПароля1.Фокус();
Форма1.Открыть();
Фокус_ПолеПоиска_метод.os
Перем ДФ, ПолеПоиска1, ФокусПолучен;
Процедура ПолеПоиска1_ФокусПолучен() Экспорт
// Сообщить("ПолеПоиска1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ПолеПоиска_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПолеПоиска1_ФокусПотерян() Экспорт
// Сообщить("ПолеПоиска1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеПоиска1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_ФокусПолучен");
ПолеПоиска1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_ФокусПотерян");
ПолеПоиска1.Редактируемый = Истина;
ПолеПоиска2 = ДФ.ПолеПоиска();
ПолеПоиска2.Родитель = Форма1;
ПолеПоиска2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеПоиска2.Редактируемый = Истина;
ПолеПоиска1.Фокус();
Форма1.Открыть();
Фокус_ПолеСписка_метод.os
Перем ДФ, ПолеСписка1, ФокусПолучен;
Процедура ПолеСписка1_ФокусПолучен() Экспорт
// Сообщить("ПолеСписка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ПолеСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПолеСписка1_ФокусПотерян() Экспорт
// Сообщить("ПолеСписка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеСписка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеСписка1_ФокусПолучен");
ПолеСписка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеСписка1_ФокусПотерян");
ПолеСписка1.Редактируемый = Истина;
ПолеСписка2 = ДФ.ПолеСписка();
ПолеСписка2.Родитель = Форма1;
ПолеСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеСписка2.Редактируемый = Истина;
ПолеСписка1.Фокус();
Форма1.Открыть();
Фокус_ПолеТекста_метод.os
Перем ДФ, ПолеТекста1, ФокусПолучен;
Процедура ПолеТекста1_ФокусПолучен() Экспорт
// Сообщить("ПолеТекста1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ПолеТекста_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПолеТекста1_ФокусПотерян() Экспорт
// Сообщить("ПолеТекста1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеТекста1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_ФокусПолучен");
ПолеТекста1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_ФокусПотерян");
ПолеТекста2 = ДФ.ПолеТекста();
ПолеТекста2.Родитель = Форма1;
ПолеТекста2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеТекста1.Фокус();
Форма1.Открыть();
Фокус_ПолеЧисла_метод.os
Перем ДФ, ПолеЧисла1, ФокусПолучен;
Процедура ПолеЧисла1_ФокусПолучен() Экспорт
// Сообщить("ПолеЧисла1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ПолеЧисла_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПолеЧисла1_ФокусПотерян() Экспорт
// Сообщить("ПолеЧисла1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеЧисла1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_ФокусПолучен");
ПолеЧисла1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_ФокусПотерян");
ПолеЧисла1.Редактируемый = Истина;
ПолеЧисла2 = ДФ.ПолеЧисла();
ПолеЧисла2.Родитель = Форма1;
ПолеЧисла2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеЧисла2.Редактируемый = Истина;
ПолеЧисла1.Фокус();
Форма1.Открыть();
Фокус_Ползунок_метод.os
Перем ДФ, Ползунок1, ФокусПолучен;
Процедура Ползунок1_ФокусПолучен() Экспорт
// Сообщить("Ползунок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Ползунок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Ползунок1_ФокусПотерян() Экспорт
// Сообщить("Ползунок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ползунок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Ползунок1_ФокусПолучен");
Ползунок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Ползунок1_ФокусПотерян");
Ползунок1.Редактируемый = Истина;
Ползунок2 = ДФ.Ползунок();
Ползунок2.Родитель = Форма1;
Ползунок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Ползунок2.Редактируемый = Истина;
Ползунок1.Фокус();
Форма1.Открыть();
Фокус_РаскрываемыйБлок_метод.os
Перем ДФ, РаскрываемыйБлок1, ФокусПолучен;
Процедура РаскрываемыйБлок1_ФокусПолучен() Экспорт
// Сообщить("РаскрываемыйБлок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_РаскрываемыйБлок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура РаскрываемыйБлок1_ФокусПотерян() Экспорт
// Сообщить("РаскрываемыйБлок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
РаскрываемыйБлок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "РаскрываемыйБлок1_ФокусПолучен");
РаскрываемыйБлок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "РаскрываемыйБлок1_ФокусПотерян");
РаскрываемыйБлок1.Редактируемый = Истина;
РаскрываемыйБлок2 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок2.Родитель = Форма1;
РаскрываемыйБлок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
РаскрываемыйБлок2.Редактируемый = Истина;
РаскрываемыйБлок1.Фокус();
Форма1.Открыть();
Фокус_Результат_метод.os
Перем ДФ, Результат1, ФокусПолучен;
Процедура Результат1_ФокусПолучен() Экспорт
// Сообщить("Результат1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Результат_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Результат1_ФокусПотерян() Экспорт
// Сообщить("Результат1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Текст = "Это Результат1";
Результат1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Результат1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Результат1_ФокусПолучен");
Результат1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Результат1_ФокусПотерян");
Результат1.Редактируемый = Истина;
Результат2 = ДФ.Результат();
Результат2.Родитель = Форма1;
Результат2.Текст = "Это Результат2";
Результат2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Результат2.Редактируемый = Истина;
Результат1.Фокус();
Форма1.Открыть();
Фокус_СписокОпределений_метод.os
Перем ДФ, СписокОпределений1, ФокусПолучен;
Процедура СписокОпределений1_ФокусПолучен() Экспорт
// Сообщить("СписокОпределений1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_СписокОпределений_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СписокОпределений1_ФокусПотерян() Экспорт
// Сообщить("СписокОпределений1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Текст = "Это СписокОпределений1";
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.Красный;
СписокОпределений1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "СписокОпределений1_ФокусПолучен");
СписокОпределений1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "СписокОпределений1_ФокусПотерян");
СписокОпределений1.Редактируемый = Истина;
СписокОпределений2 = ДФ.СписокОпределений();
СписокОпределений2.Родитель = Форма1;
СписокОпределений2.Текст = "Это СписокОпределений2";
СписокОпределений2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
СписокОпределений2.Редактируемый = Истина;
СписокОпределений1.Фокус();
Форма1.Открыть();
Фокус_Ссылка_метод.os
Перем ДФ, Ссылка1, ФокусПолучен;
Процедура Ссылка1_ФокусПолучен() Экспорт
// Сообщить("Ссылка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Ссылка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Ссылка1_ФокусПотерян() Экспорт
// Сообщить("Ссылка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Текст = "Это Ссылка1";
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ссылка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Ссылка1_ФокусПолучен");
Ссылка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Ссылка1_ФокусПотерян");
Ссылка1.Редактируемый = Истина;
Ссылка2 = ДФ.Ссылка();
Ссылка2.Родитель = Форма1;
Ссылка2.Текст = "Это Ссылка2";
Ссылка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Ссылка2.Редактируемый = Истина;
Ссылка1.Фокус();
Форма1.Открыть();
Фокус_СтрокаТаблицы_метод.os
Перем ДФ, СтрокаТаблицы1, ФокусПолучен;
Процедура СтрокаТаблицы1_ФокусПолучен() Экспорт
// Сообщить("СтрокаТаблицы1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_СтрокаТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СтрокаТаблицы1_ФокусПотерян() Экспорт
// Сообщить("СтрокаТаблицы1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Текст = "Это СтрокаТаблицы1";
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Красный;
СтрокаТаблицы1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "СтрокаТаблицы1_ФокусПолучен");
СтрокаТаблицы1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "СтрокаТаблицы1_ФокусПотерян");
СтрокаТаблицы1.Редактируемый = Истина;
СтрокаТаблицы2 = ДФ.СтрокаТаблицы();
СтрокаТаблицы2.Родитель = Форма1;
СтрокаТаблицы2.Текст = "Это СтрокаТаблицы2";
СтрокаТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
СтрокаТаблицы2.Редактируемый = Истина;
СтрокаТаблицы1.Фокус();
Форма1.Открыть();
Фокус_Таблица_метод.os
Перем ДФ, Таблица1, ФокусПолучен;
Процедура Таблица1_ФокусПолучен() Экспорт
// Сообщить("Таблица1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Таблица_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Таблица1_ФокусПотерян() Экспорт
// Сообщить("Таблица1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Текст = "Это Таблица1";
Таблица1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Таблица1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Таблица1_ФокусПолучен");
Таблица1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Таблица1_ФокусПотерян");
Таблица1.Редактируемый = Истина;
Таблица2 = ДФ.Таблица();
Таблица2.Родитель = Форма1;
Таблица2.Текст = "Это Таблица2";
Таблица2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Таблица2.Редактируемый = Истина;
Таблица1.Фокус();
Форма1.Открыть();
Фокус_Термин_метод.os
Перем ДФ, Термин1, ФокусПолучен;
Процедура Термин1_ФокусПолучен() Экспорт
// Сообщить("Термин1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Термин_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Термин1_ФокусПотерян() Экспорт
// Сообщить("Термин1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Текст = "Это Термин1";
Термин1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Термин1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Термин1_ФокусПолучен");
Термин1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Термин1_ФокусПотерян");
Термин1.Редактируемый = Истина;
Термин2 = ДФ.Термин();
Термин2.Родитель = Форма1;
Термин2.Текст = "Это Термин2";
Термин2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Термин2.Редактируемый = Истина;
Термин1.Фокус();
Форма1.Открыть();
Фокус_УдаленыйТекст_метод.os
Перем ДФ, УдаленыйТекст1, ФокусПолучен;
Процедура УдаленыйТекст1_ФокусПолучен() Экспорт
// Сообщить("УдаленыйТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_УдаленыйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура УдаленыйТекст1_ФокусПотерян() Экспорт
// Сообщить("УдаленыйТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Текст = "Это УдаленыйТекст1";
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
УдаленыйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "УдаленыйТекст1_ФокусПолучен");
УдаленыйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "УдаленыйТекст1_ФокусПотерян");
УдаленыйТекст1.Редактируемый = Истина;
УдаленыйТекст2 = ДФ.УдаленыйТекст();
УдаленыйТекст2.Родитель = Форма1;
УдаленыйТекст2.Текст = "Это УдаленыйТекст2";
УдаленыйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
УдаленыйТекст2.Редактируемый = Истина;
УдаленыйТекст1.Фокус();
Форма1.Открыть();
Фокус_УпорядоченныйСписок_метод.os
Перем ДФ, УпорядоченныйСписок1, ФокусПолучен;
Процедура УпорядоченныйСписок1_ФокусПолучен() Экспорт
// Сообщить("УпорядоченныйСписок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_УпорядоченныйСписок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура УпорядоченныйСписок1_ФокусПотерян() Экспорт
// Сообщить("УпорядоченныйСписок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Текст = "Это УпорядоченныйСписок1";
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
УпорядоченныйСписок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "УпорядоченныйСписок1_ФокусПолучен");
УпорядоченныйСписок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "УпорядоченныйСписок1_ФокусПотерян");
УпорядоченныйСписок1.Редактируемый = Истина;
УпорядоченныйСписок2 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок2.Родитель = Форма1;
УпорядоченныйСписок2.Текст = "Это УпорядоченныйСписок2";
УпорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
УпорядоченныйСписок2.Редактируемый = Истина;
УпорядоченныйСписок1.Фокус();
Форма1.Открыть();
Фокус_Флажок_метод.os
Перем ДФ, Флажок1, ФокусПолучен;
Процедура Флажок1_ФокусПолучен() Экспорт
// Сообщить("Флажок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Флажок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Флажок1_ФокусПотерян() Экспорт
// Сообщить("Флажок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Флажок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Флажок1_ФокусПолучен");
Флажок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Флажок1_ФокусПотерян");
Флажок1.Редактируемый = Истина;
Флажок2 = ДФ.Флажок();
Флажок2.Родитель = Форма1;
Флажок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Флажок2.Редактируемый = Истина;
Флажок1.Фокус();
Форма1.Открыть();
Фокус_ФорматированныйТекст_метод.os
Перем ДФ, ФорматированныйТекст1, ФокусПолучен;
Процедура ФорматированныйТекст1_ФокусПолучен() Экспорт
// Сообщить("ФорматированныйТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ФорматированныйТекст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ФорматированныйТекст1_ФокусПотерян() Экспорт
// Сообщить("ФорматированныйТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Текст = "Это ФорматированныйТекст1";
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ФорматированныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ФорматированныйТекст1_ФокусПолучен");
ФорматированныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ФорматированныйТекст1_ФокусПотерян");
ФорматированныйТекст1.Редактируемый = Истина;
ФорматированныйТекст2 = ДФ.ФорматированныйТекст();
ФорматированныйТекст2.Родитель = Форма1;
ФорматированныйТекст2.Текст = "Это ФорматированныйТекст2";
ФорматированныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ФорматированныйТекст2.Редактируемый = Истина;
ФорматированныйТекст1.Фокус();
Форма1.Открыть();
Фокус_Холст_метод.os
Перем ДФ, Холст1, ФокусПолучен;
Процедура Холст1_ФокусПолучен() Экспорт
// Сообщить("Холст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Холст_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Холст1_ФокусПотерян() Экспорт
// Сообщить("Холст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
Холст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Холст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Холст1_ФокусПолучен");
Холст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Холст1_ФокусПотерян");
Холст1.Редактируемый = Истина;
Холст2 = ДФ.Холст();
Холст2.Родитель = Форма1;
Холст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Холст2.Редактируемый = Истина;
Холст1.Фокус();
Форма1.Открыть();
Фокус_ШапкаТаблицы_метод.os
Перем ДФ, ШапкаТаблицы1, ФокусПолучен;
Процедура ШапкаТаблицы1_ФокусПолучен() Экспорт
// Сообщить("ШапкаТаблицы1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ШапкаТаблицы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ШапкаТаблицы1_ФокусПотерян() Экспорт
// Сообщить("ШапкаТаблицы1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Текст = "Это ШапкаТаблицы1";
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ШапкаТаблицы1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ШапкаТаблицы1_ФокусПолучен");
ШапкаТаблицы1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ШапкаТаблицы1_ФокусПотерян");
ШапкаТаблицы1.Редактируемый = Истина;
ШапкаТаблицы2 = ДФ.ШапкаТаблицы();
ШапкаТаблицы2.Родитель = Форма1;
ШапкаТаблицы2.Текст = "Это ШапкаТаблицы2";
ШапкаТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ШапкаТаблицы2.Редактируемый = Истина;
ШапкаТаблицы1.Фокус();
Форма1.Открыть();
Фокус_ЭлементПоляСписка_метод.os
Перем ДФ, ЭлементПоляСписка1, ФокусПолучен;
Процедура ЭлементПоляСписка1_ФокусПолучен() Экспорт
// Сообщить("ЭлементПоляСписка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ЭлементПоляСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ЭлементПоляСписка1_ФокусПотерян() Экспорт
// Сообщить("ЭлементПоляСписка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Текст = "Это ЭлементПоляСписка1";
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЭлементПоляСписка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЭлементПоляСписка1_ФокусПолучен");
ЭлементПоляСписка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЭлементПоляСписка1_ФокусПотерян");
ЭлементПоляСписка1.Редактируемый = Истина;
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = Форма1;
ЭлементПоляСписка2.Текст = "Это ЭлементПоляСписка2";
ЭлементПоляСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЭлементПоляСписка2.Редактируемый = Истина;
ЭлементПоляСписка1.Фокус();
Форма1.Открыть();
Фокус_ЭлементСписка_метод.os
Перем ДФ, ЭлементСписка1, ФокусПолучен;
Процедура ЭлементСписка1_ФокусПолучен() Экспорт
// Сообщить("ЭлементСписка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ЭлементСписка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ЭлементСписка1_ФокусПотерян() Экспорт
// Сообщить("ЭлементСписка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Текст = "Это ЭлементСписка1";
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЭлементСписка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЭлементСписка1_ФокусПолучен");
ЭлементСписка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЭлементСписка1_ФокусПотерян");
ЭлементСписка1.Редактируемый = Истина;
ЭлементСписка2 = ДФ.ЭлементСписка();
ЭлементСписка2.Родитель = Форма1;
ЭлементСписка2.Текст = "Это ЭлементСписка2";
ЭлементСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЭлементСписка2.Редактируемый = Истина;
ЭлементСписка1.Фокус();
Форма1.Открыть();
Фокус_Ячейка_метод.os
Перем ДФ, Ячейка1, ФокусПолучен;
Процедура Ячейка1_ФокусПолучен() Экспорт
// Сообщить("Ячейка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_Ячейка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Ячейка1_ФокусПотерян() Экспорт
// Сообщить("Ячейка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Текст = "Это Ячейка1";
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ячейка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Ячейка1_ФокусПолучен");
Ячейка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Ячейка1_ФокусПотерян");
Ячейка1.Редактируемый = Истина;
Ячейка2 = ДФ.Ячейка();
Ячейка2.Родитель = Форма1;
Ячейка2.Текст = "Это Ячейка2";
Ячейка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Ячейка2.Редактируемый = Истина;
Ячейка1.Фокус();
Форма1.Открыть();
Фокус_ЯчейкаЗаголовка_метод.os
Перем ДФ, ЯчейкаЗаголовка1, ФокусПолучен;
Процедура ЯчейкаЗаголовка1_ФокусПолучен() Экспорт
// Сообщить("ЯчейкаЗаголовка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "Фокус_ЯчейкаЗаголовка_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ЯчейкаЗаголовка1_ФокусПотерян() Экспорт
// Сообщить("ЯчейкаЗаголовка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Текст = "Это ЯчейкаЗаголовка1";
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЯчейкаЗаголовка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЯчейкаЗаголовка1_ФокусПолучен");
ЯчейкаЗаголовка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЯчейкаЗаголовка1_ФокусПотерян");
ЯчейкаЗаголовка1.Редактируемый = Истина;
ЯчейкаЗаголовка2 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка2.Родитель = Форма1;
ЯчейкаЗаголовка2.Текст = "Это ЯчейкаЗаголовка2";
ЯчейкаЗаголовка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЯчейкаЗаголовка2.Редактируемый = Истина;
ЯчейкаЗаголовка1.Фокус();
Форма1.Открыть();
ФокусПолучен_Абзац_событие.os
Перем ДФ, Абзац1, ФокусПолучен;
Процедура Абзац1_ФокусПолучен() Экспорт
// Сообщить("Абзац1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Абзац_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Абзац1_ФокусПотерян() Экспорт
// Сообщить("Абзац1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Абзац1";
Абзац1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Абзац1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Абзац1_ФокусПолучен");
Абзац1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Абзац1_ФокусПотерян");
Абзац1.Редактируемый = Истина;
Абзац2 = ДФ.Абзац();
Абзац2.Родитель = Форма1;
Абзац2.Текст = "Это Абзац2";
Абзац2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Абзац2.Редактируемый = Истина;
Абзац1.Фокус();
Форма1.Открыть();
ФокусПолучен_Артикль_событие.os
Перем ДФ, Артикль1, ФокусПолучен;
Процедура Артикль1_ФокусПолучен() Экспорт
// Сообщить("Артикль1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Артикль_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Артикль1_ФокусПотерян() Экспорт
// Сообщить("Артикль1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Текст = "Это Артикль1";
Артикль1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Артикль1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Артикль1_ФокусПолучен");
Артикль1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Артикль1_ФокусПотерян");
Артикль1.Редактируемый = Истина;
Артикль2 = ДФ.Артикль();
Артикль2.Родитель = Форма1;
Артикль2.Текст = "Это Артикль2";
Артикль2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Артикль2.Редактируемый = Истина;
Артикль1.Фокус();
Форма1.Открыть();
ФокусПолучен_Аудио_событие.os
Перем ДФ, Аудио1, ФокусПолучен;
Процедура Аудио1_ФокусПолучен() Экспорт
// Сообщить("Аудио1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Аудио_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Аудио1_ФокусПотерян() Экспорт
// Сообщить("Аудио1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
// Аудио1.Источник = "file:///C:/444/Pic/Kaoma_Lambada.mp3";
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Аудио1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Аудио1_ФокусПолучен");
Аудио1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Аудио1_ФокусПотерян");
Аудио2 = ДФ.Аудио();
Аудио2.Родитель = Форма1;
Аудио2.Контролы = Истина;
// Аудио2.Источник = "file:///C:/444/Pic/Kaoma_Lambada.mp3";
Аудио2.Источник = "Kaoma_Lambada.mp3";
Аудио2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Аудио1.Фокус();
Форма1.Открыть();
ФокусПолучен_Блок_событие.os
Перем ДФ, Блок1, ФокусПолучен;
Процедура Блок1_ФокусПолучен() Экспорт
// Сообщить("Блок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Блок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Блок1_ФокусПотерян() Экспорт
// Сообщить("Блок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Это Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Блок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Блок1_ФокусПолучен");
Блок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Блок1_ФокусПотерян");
Блок1.Редактируемый = Истина;
Блок2 = ДФ.Блок();
Блок2.Родитель = Форма1;
Блок2.Текст = "Это Блок2";
Блок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Блок2.Редактируемый = Истина;
Блок1.Фокус();
Форма1.Открыть();
ФокусПолучен_ВыборВремени_событие.os
Перем ДФ, ВыборВремени1, ФокусПолучен;
Процедура ВыборВремени1_ФокусПолучен() Экспорт
// Сообщить("ВыборВремени1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ВыборВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборВремени1_ФокусПотерян() Экспорт
// Сообщить("ВыборВремени1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборВремени1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборВремени1_ФокусПолучен");
ВыборВремени1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборВремени1_ФокусПотерян");
ВыборВремени1.Редактируемый = Истина;
ВыборВремени2 = ДФ.ВыборВремени();
ВыборВремени2.Родитель = Форма1;
ВыборВремени2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборВремени2.Редактируемый = Истина;
ВыборВремени1.Фокус();
Форма1.Открыть();
ФокусПолучен_ВыборДаты_событие.os
Перем ДФ, ВыборДаты1, ФокусПолучен;
Процедура ВыборДаты1_ФокусПолучен() Экспорт
// Сообщить("ВыборДаты1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ВыборДаты_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборДаты1_ФокусПотерян() Экспорт
// Сообщить("ВыборДаты1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборДаты1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_ФокусПолучен");
ВыборДаты1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_ФокусПотерян");
ВыборДаты1.Редактируемый = Истина;
ВыборДаты2 = ДФ.ВыборДаты();
ВыборДаты2.Родитель = Форма1;
ВыборДаты2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборДаты2.Редактируемый = Истина;
ВыборДаты1.Фокус();
Форма1.Открыть();
ФокусПолучен_ВыборДатыВремени_событие.os
Перем ДФ, ВыборДатыВремени1, ФокусПолучен;
Процедура ВыборДатыВремени1_ФокусПолучен() Экспорт
// Сообщить("ВыборДатыВремени1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ВыборДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборДатыВремени1_ФокусПотерян() Экспорт
// Сообщить("ВыборДатыВремени1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборДатыВремени1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_ФокусПолучен");
ВыборДатыВремени1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_ФокусПотерян");
ВыборДатыВремени1.Редактируемый = Истина;
ВыборДатыВремени2 = ДФ.ВыборДатыВремени();
ВыборДатыВремени2.Родитель = Форма1;
ВыборДатыВремени2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборДатыВремени2.Редактируемый = Истина;
ВыборДатыВремени1.Фокус();
Форма1.Открыть();
ФокусПолучен_ВыборМестнойДатыВремени_событие.os
Перем ДФ, ВыборМестнойДатыВремени1, ФокусПолучен;
Процедура ВыборМестнойДатыВремени1_ФокусПолучен() Экспорт
// Сообщить("ВыборМестнойДатыВремени1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ВыборМестнойДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборМестнойДатыВремени1_ФокусПотерян() Экспорт
// Сообщить("ВыборМестнойДатыВремени1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборМестнойДатыВремени1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборМестнойДатыВремени1_ФокусПолучен");
ВыборМестнойДатыВремени1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборМестнойДатыВремени1_ФокусПотерян");
ВыборМестнойДатыВремени1.Редактируемый = Истина;
ВыборМестнойДатыВремени2 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени2.Родитель = Форма1;
ВыборМестнойДатыВремени2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборМестнойДатыВремени2.Редактируемый = Истина;
ВыборМестнойДатыВремени1.Фокус();
Форма1.Открыть();
ФокусПолучен_ВыборМесяца_событие.os
Перем ДФ, ВыборМесяца1, ФокусПолучен;
Процедура ВыборМесяца1_ФокусПолучен() Экспорт
// Сообщить("ВыборМесяца1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ВыборМесяца_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборМесяца1_ФокусПотерян() Экспорт
// Сообщить("ВыборМесяца1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборМесяца1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_ФокусПолучен");
ВыборМесяца1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_ФокусПотерян");
ВыборМесяца1.Редактируемый = Истина;
ВыборМесяца2 = ДФ.ВыборМесяца();
ВыборМесяца2.Родитель = Форма1;
ВыборМесяца2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборМесяца2.Редактируемый = Истина;
ВыборМесяца1.Фокус();
Форма1.Открыть();
ФокусПолучен_ВыборНедели_событие.os
Перем ДФ, ВыборНедели1, ФокусПолучен;
Процедура ВыборНедели1_ФокусПолучен() Экспорт
// Сообщить("ВыборНедели1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ВыборНедели_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборНедели1_ФокусПотерян() Экспорт
// Сообщить("ВыборНедели1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборНедели1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_ФокусПолучен");
ВыборНедели1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_ФокусПотерян");
ВыборНедели1.Редактируемый = Истина;
ВыборНедели2 = ДФ.ВыборНедели();
ВыборНедели2.Родитель = Форма1;
ВыборНедели2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборНедели2.Редактируемый = Истина;
ВыборНедели1.Фокус();
Форма1.Открыть();
ФокусПолучен_ВыборФайла_событие.os
Перем ДФ, ВыборФайла1, ФокусПолучен;
Процедура ВыборФайла1_ФокусПолучен() Экспорт
// Сообщить("ВыборФайла1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ВыборФайла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборФайла1_ФокусПотерян() Экспорт
// Сообщить("ВыборФайла1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборФайла1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборФайла1_ФокусПолучен");
ВыборФайла1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборФайла1_ФокусПотерян");
ВыборФайла1.Редактируемый = Истина;
ВыборФайла2 = ДФ.ВыборФайла();
ВыборФайла2.Родитель = Форма1;
ВыборФайла2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборФайла2.Редактируемый = Истина;
ВыборФайла1.Фокус();
Форма1.Открыть();
ФокусПолучен_ВыборЦвета_событие.os
Перем ДФ, ВыборЦвета1, ФокусПолучен;
Процедура ВыборЦвета1_ФокусПолучен() Экспорт
// Сообщить("ВыборЦвета1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ВыборЦвета_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ВыборЦвета1_ФокусПотерян() Экспорт
// Сообщить("ВыборЦвета1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборЦвета1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборЦвета1_ФокусПолучен");
ВыборЦвета1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборЦвета1_ФокусПотерян");
ВыборЦвета1.Редактируемый = Истина;
ВыборЦвета2 = ДФ.ВыборЦвета();
ВыборЦвета2.Родитель = Форма1;
ВыборЦвета2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборЦвета2.Редактируемый = Истина;
ВыборЦвета1.Фокус();
Форма1.Открыть();
ФокусПолучен_Группа_событие.os
Перем ДФ, Группа1, ФокусПолучен;
Процедура Группа1_ФокусПолучен() Экспорт
// Сообщить("Группа1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Группа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Группа1_ФокусПотерян() Экспорт
// Сообщить("Группа1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Текст = "Это Группа1";
Группа1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Группа1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Группа1_ФокусПолучен");
Группа1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Группа1_ФокусПотерян");
Группа1.Редактируемый = Истина;
Группа2 = ДФ.Группа();
Группа2.Родитель = Форма1;
Группа2.Текст = "Это Группа2";
Группа2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Группа2.Редактируемый = Истина;
Группа1.Фокус();
Форма1.Открыть();
ФокусПолучен_ГруппаКолонок_событие.os
Перем ДФ, ГруппаКолонок1, ФокусПолучен;
Процедура ГруппаКолонок1_ФокусПолучен() Экспорт
// Сообщить("ГруппаКолонок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ГруппаКолонок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ГруппаКолонок1_ФокусПотерян() Экспорт
// Сообщить("ГруппаКолонок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Форма1;
ГруппаКолонок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ГруппаКолонок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ГруппаКолонок1_ФокусПолучен");
ГруппаКолонок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ГруппаКолонок1_ФокусПотерян");
ГруппаКолонок1.Редактируемый = Истина;
ГруппаКолонок2 = ДФ.ГруппаКолонок();
ГруппаКолонок2.Родитель = Форма1;
ГруппаКолонок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ГруппаКолонок2.Редактируемый = Истина;
ГруппаКолонок1.Фокус();
Форма1.Открыть();
ФокусПолучен_ГруппировкаПоляСписка_событие.os
Перем ДФ, ГруппировкаПоляСписка1, ФокусПолучен;
Процедура ГруппировкаПоляСписка1_ФокусПолучен() Экспорт
// Сообщить("ГруппировкаПоляСписка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ГруппировкаПоляСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ГруппировкаПоляСписка1_ФокусПотерян() Экспорт
// Сообщить("ГруппировкаПоляСписка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ГруппировкаПоляСписка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ГруппировкаПоляСписка1_ФокусПолучен");
ГруппировкаПоляСписка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ГруппировкаПоляСписка1_ФокусПотерян");
ГруппировкаПоляСписка1.Редактируемый = Истина;
ГруппировкаПоляСписка2 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка2.Родитель = Форма1;
ГруппировкаПоляСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ГруппировкаПоляСписка2.Редактируемый = Истина;
ГруппировкаПоляСписка1.Фокус();
Форма1.Открыть();
ФокусПолучен_Диалог_событие.os
Перем ДФ, Диалог1, ФокусПолучен;
Процедура Диалог1_ФокусПолучен() Экспорт
// Сообщить("Диалог1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Диалог_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Диалог1_ФокусПотерян() Экспорт
// Сообщить("Диалог1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Текст = "Это Диалог1";
Диалог1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Диалог1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Диалог1_ФокусПолучен");
Диалог1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Диалог1_ФокусПотерян");
Диалог1.Редактируемый = Истина;
Диалог2 = ДФ.Диалог();
Диалог2.Родитель = Форма1;
Диалог2.Текст = "Это Диалог2";
Диалог2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Диалог2.Редактируемый = Истина;
Диалог2.Показать();
Диалог1.Показать();
Диалог1.Фокус();
Форма1.Открыть();
ФокусПолучен_ДополнительныйБлок_событие.os
Перем ДФ, ДополнительныйБлок1, ФокусПолучен;
Процедура ДополнительныйБлок1_ФокусПолучен() Экспорт
// Сообщить("ДополнительныйБлок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ДополнительныйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ДополнительныйБлок1_ФокусПотерян() Экспорт
// Сообщить("ДополнительныйБлок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "Это ДополнительныйБлок1";
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ДополнительныйБлок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ДополнительныйБлок1_ФокусПолучен");
ДополнительныйБлок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ДополнительныйБлок1_ФокусПотерян");
ДополнительныйБлок1.Редактируемый = Истина;
ДополнительныйБлок2 = ДФ.ДополнительныйБлок();
ДополнительныйБлок2.Родитель = Форма1;
ДополнительныйБлок2.Текст = "Это ДополнительныйБлок2";
ДополнительныйБлок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ДополнительныйБлок2.Редактируемый = Истина;
ДополнительныйБлок1.Фокус();
Форма1.Открыть();
ФокусПолучен_ЖирныйТекст_событие.os
Перем ДФ, ЖирныйТекст1, ФокусПолучен;
Процедура ЖирныйТекст1_ФокусПолучен() Экспорт
// Сообщить("ЖирныйТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ЖирныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ЖирныйТекст1_ФокусПотерян() Экспорт
// Сообщить("ЖирныйТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Текст = "Это ЖирныйТекст1";
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЖирныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЖирныйТекст1_ФокусПолучен");
ЖирныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЖирныйТекст1_ФокусПотерян");
ЖирныйТекст1.Редактируемый = Истина;
ЖирныйТекст2 = ДФ.ЖирныйТекст();
ЖирныйТекст2.Родитель = Форма1;
ЖирныйТекст2.Текст = "Это ЖирныйТекст2";
ЖирныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЖирныйТекст2.Редактируемый = Истина;
ЖирныйТекст1.Фокус();
Форма1.Открыть();
ФокусПолучен_Заголовок1_событие.os
Перем ДФ, Заголовок11, ФокусПолучен;
Процедура Заголовок11_ФокусПолучен() Экспорт
// Сообщить("Заголовок11_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Заголовок1_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Заголовок11_ФокусПотерян() Экспорт
// Сообщить("Заголовок11_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Текст = "Это Заголовок11";
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок11.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок11_ФокусПолучен");
Заголовок11.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок11_ФокусПотерян");
Заголовок11.Редактируемый = Истина;
Заголовок12 = ДФ.Заголовок1();
Заголовок12.Родитель = Форма1;
Заголовок12.Текст = "Это Заголовок12";
Заголовок12.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок12.Редактируемый = Истина;
Заголовок11.Фокус();
Форма1.Открыть();
ФокусПолучен_Заголовок2_событие.os
Перем ДФ, Заголовок21, ФокусПолучен;
Процедура Заголовок21_ФокусПолучен() Экспорт
// Сообщить("Заголовок21_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Заголовок2_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Заголовок21_ФокусПотерян() Экспорт
// Сообщить("Заголовок21_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Текст = "Это Заголовок21";
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок21.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок21_ФокусПолучен");
Заголовок21.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок21_ФокусПотерян");
Заголовок21.Редактируемый = Истина;
Заголовок22 = ДФ.Заголовок2();
Заголовок22.Родитель = Форма1;
Заголовок22.Текст = "Это Заголовок22";
Заголовок22.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок22.Редактируемый = Истина;
Заголовок21.Фокус();
Форма1.Открыть();
ФокусПолучен_Заголовок3_событие.os
Перем ДФ, Заголовок31, ФокусПолучен;
Процедура Заголовок31_ФокусПолучен() Экспорт
// Сообщить("Заголовок31_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Заголовок3_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Заголовок31_ФокусПотерян() Экспорт
// Сообщить("Заголовок31_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Текст = "Это Заголовок31";
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок31.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок31_ФокусПолучен");
Заголовок31.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок31_ФокусПотерян");
Заголовок31.Редактируемый = Истина;
Заголовок32 = ДФ.Заголовок3();
Заголовок32.Родитель = Форма1;
Заголовок32.Текст = "Это Заголовок32";
Заголовок32.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок32.Редактируемый = Истина;
Заголовок31.Фокус();
Форма1.Открыть();
ФокусПолучен_Заголовок4_событие.os
Перем ДФ, Заголовок41, ФокусПолучен;
Процедура Заголовок41_ФокусПолучен() Экспорт
// Сообщить("Заголовок41_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Заголовок4_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Заголовок41_ФокусПотерян() Экспорт
// Сообщить("Заголовок41_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Текст = "Это Заголовок41";
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок41.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок41_ФокусПолучен");
Заголовок41.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок41_ФокусПотерян");
Заголовок41.Редактируемый = Истина;
Заголовок42 = ДФ.Заголовок4();
Заголовок42.Родитель = Форма1;
Заголовок42.Текст = "Это Заголовок42";
Заголовок42.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок42.Редактируемый = Истина;
Заголовок41.Фокус();
Форма1.Открыть();
ФокусПолучен_Заголовок5_событие.os
Перем ДФ, Заголовок51, ФокусПолучен;
Процедура Заголовок51_ФокусПолучен() Экспорт
// Сообщить("Заголовок51_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Заголовок5_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Заголовок51_ФокусПотерян() Экспорт
// Сообщить("Заголовок51_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Текст = "Это Заголовок51";
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок51.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок51_ФокусПолучен");
Заголовок51.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок51_ФокусПотерян");
Заголовок51.Редактируемый = Истина;
Заголовок52 = ДФ.Заголовок5();
Заголовок52.Родитель = Форма1;
Заголовок52.Текст = "Это Заголовок52";
Заголовок52.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок52.Редактируемый = Истина;
Заголовок51.Фокус();
Форма1.Открыть();
ФокусПолучен_Заголовок6_событие.os
Перем ДФ, Заголовок61, ФокусПолучен;
Процедура Заголовок61_ФокусПолучен() Экспорт
// Сообщить("Заголовок61_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Заголовок6_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Заголовок61_ФокусПотерян() Экспорт
// Сообщить("Заголовок61_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Текст = "Это Заголовок61";
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок61.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок61_ФокусПолучен");
Заголовок61.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок61_ФокусПотерян");
Заголовок61.Редактируемый = Истина;
Заголовок62 = ДФ.Заголовок6();
Заголовок62.Родитель = Форма1;
Заголовок62.Текст = "Это Заголовок62";
Заголовок62.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок62.Редактируемый = Истина;
Заголовок61.Фокус();
Форма1.Открыть();
ФокусПолучен_Заголовок_событие.os
Перем ДФ, Заголовок1, ФокусПолучен;
Процедура Заголовок1_ФокусПолучен() Экспорт
// Сообщить("Заголовок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Заголовок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Заголовок1_ФокусПотерян() Экспорт
// Сообщить("Заголовок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Текст = "Это Заголовок1";
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок1_ФокусПолучен");
Заголовок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок1_ФокусПотерян");
Заголовок1.Редактируемый = Истина;
Заголовок2 = ДФ.Заголовок();
Заголовок2.Родитель = Форма1;
Заголовок2.Текст = "Это Заголовок2";
Заголовок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок2.Редактируемый = Истина;
Заголовок1.Фокус();
Форма1.Открыть();
ФокусПолучен_ЗаголовокГруппы_событие.os
Перем ДФ, ЗаголовокГруппы1, ФокусПолучен;
Процедура ЗаголовокГруппы1_ФокусПолучен() Экспорт
// Сообщить("ЗаголовокГруппы1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ЗаголовокГруппы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ЗаголовокГруппы1_ФокусПотерян() Экспорт
// Сообщить("ЗаголовокГруппы1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Текст = "Это ЗаголовокГруппы1";
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЗаголовокГруппы1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЗаголовокГруппы1_ФокусПолучен");
ЗаголовокГруппы1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЗаголовокГруппы1_ФокусПотерян");
ЗаголовокГруппы1.Редактируемый = Истина;
ЗаголовокГруппы2 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы2.Родитель = Форма1;
ЗаголовокГруппы2.Текст = "Это ЗаголовокГруппы2";
ЗаголовокГруппы2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЗаголовокГруппы2.Редактируемый = Истина;
ЗаголовокГруппы1.Фокус();
Форма1.Открыть();
ФокусПолучен_ЗаголовокРаскрываемогоБлока_событие.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1, ФокусПолучен;
Процедура ЗаголовокРаскрываемогоБлока1_ФокусПолучен() Экспорт
// Сообщить("ЗаголовокРаскрываемогоБлока1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ЗаголовокРаскрываемогоБлока_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ЗаголовокРаскрываемогоБлока1_ФокусПотерян() Экспорт
// Сообщить("ЗаголовокРаскрываемогоБлока1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Текст = "Это ЗаголовокРаскрываемогоБлока1";
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЗаголовокРаскрываемогоБлока1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЗаголовокРаскрываемогоБлока1_ФокусПолучен");
ЗаголовокРаскрываемогоБлока1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЗаголовокРаскрываемогоБлока1_ФокусПотерян");
ЗаголовокРаскрываемогоБлока1.Редактируемый = Истина;
ЗаголовокРаскрываемогоБлока2 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока2.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока2.Текст = "Это ЗаголовокРаскрываемогоБлока2";
ЗаголовокРаскрываемогоБлока2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЗаголовокРаскрываемогоБлока2.Редактируемый = Истина;
ЗаголовокРаскрываемогоБлока1.Фокус();
Форма1.Открыть();
ФокусПолучен_Изображение_событие.os
Перем ДФ, Изображение1, ФокусПолучен;
Процедура Изображение1_ФокусПолучен() Экспорт
// Сообщить("Изображение1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Изображение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Изображение1_ФокусПотерян() Экспорт
// Сообщить("Изображение1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Изображение1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Изображение1_ФокусПолучен");
Изображение1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Изображение1_ФокусПотерян");
Изображение1.Редактируемый = Истина;
Изображение2 = ДФ.Изображение();
Изображение2.Родитель = Форма1;
Изображение2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Изображение2.Редактируемый = Истина;
Изображение1.Фокус();
Форма1.Открыть();
ФокусПолучен_Индикатор_событие.os
Перем ДФ, Индикатор1, ФокусПолучен;
Процедура Индикатор1_ФокусПолучен() Экспорт
// Сообщить("Индикатор1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Индикатор_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Индикатор1_ФокусПотерян() Экспорт
// Сообщить("Индикатор1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Индикатор1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Индикатор1_ФокусПолучен");
Индикатор1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Индикатор1_ФокусПотерян");
Индикатор1.Редактируемый = Истина;
Индикатор2 = ДФ.Индикатор();
Индикатор2.Родитель = Форма1;
Индикатор2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Индикатор2.Редактируемый = Истина;
Индикатор1.Фокус();
Форма1.Открыть();
ФокусПолучен_Итоги_событие.os
Перем ДФ, Итоги1, ФокусПолучен;
Процедура Итоги1_ФокусПолучен() Экспорт
// Сообщить("Итоги1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Итоги_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Итоги1_ФокусПотерян() Экспорт
// Сообщить("Итоги1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Текст = "Это Итоги1";
Итоги1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Итоги1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Итоги1_ФокусПолучен");
Итоги1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Итоги1_ФокусПотерян");
Итоги1.Редактируемый = Истина;
Итоги2 = ДФ.Итоги();
Итоги2.Родитель = Форма1;
Итоги2.Текст = "Это Итоги2";
Итоги2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Итоги2.Редактируемый = Истина;
Итоги1.Фокус();
Форма1.Открыть();
ФокусПолучен_Кнопка_событие.os
Перем ДФ, Кнопка1, ФокусПолучен;
Процедура Кнопка1_ФокусПолучен() Экспорт
// Сообщить("Кнопка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Кнопка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_ФокусПотерян() Экспорт
// Сообщить("Кнопка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Кнопка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Кнопка1_ФокусПолучен");
Кнопка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Кнопка1_ФокусПотерян");
Кнопка1.Редактируемый = Истина;
Кнопка2 = ДФ.Кнопка();
Кнопка2.Родитель = Форма1;
Кнопка2.Текст = "Это Кнопка2";
Кнопка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Кнопка2.Редактируемый = Истина;
Кнопка1.Фокус();
Форма1.Открыть();
ФокусПолучен_Код_событие.os
Перем ДФ, Код1, ФокусПолучен;
Процедура Код1_ФокусПолучен() Экспорт
// Сообщить("Код1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Код_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Код1_ФокусПотерян() Экспорт
// Сообщить("Код1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Текст = "Это Код1";
Код1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Код1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Код1_ФокусПолучен");
Код1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Код1_ФокусПотерян");
Код1.Редактируемый = Истина;
Код2 = ДФ.Код();
Код2.Родитель = Форма1;
Код2.Текст = "Это Код2";
Код2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Код2.Редактируемый = Истина;
Код1.Фокус();
Форма1.Открыть();
ФокусПолучен_Колонка_событие.os
Перем ДФ, Колонка1, ФокусПолучен;
Процедура Колонка1_ФокусПолучен() Экспорт
// Сообщить("Колонка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Колонка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Колонка1_ФокусПотерян() Экспорт
// Сообщить("Колонка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = Форма1;
Колонка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Колонка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Колонка1_ФокусПолучен");
Колонка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Колонка1_ФокусПотерян");
Колонка1.Редактируемый = Истина;
Колонка2 = ДФ.Колонка();
Колонка2.Родитель = Форма1;
Колонка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Колонка2.Редактируемый = Истина;
Колонка1.Фокус();
Форма1.Открыть();
ФокусПолучен_Колонтитул_событие.os
Перем ДФ, Колонтитул1, ФокусПолучен;
Процедура Колонтитул1_ФокусПолучен() Экспорт
// Сообщить("Колонтитул1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Колонтитул_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Колонтитул1_ФокусПотерян() Экспорт
// Сообщить("Колонтитул1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Текст = "Это Колонтитул1";
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Колонтитул1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Колонтитул1_ФокусПолучен");
Колонтитул1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Колонтитул1_ФокусПотерян");
Колонтитул1.Редактируемый = Истина;
Колонтитул2 = ДФ.Колонтитул();
Колонтитул2.Родитель = Форма1;
Колонтитул2.Текст = "Это Колонтитул2";
Колонтитул2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Колонтитул2.Редактируемый = Истина;
Колонтитул1.Фокус();
Форма1.Открыть();
ФокусПолучен_КурсивТекст_событие.os
Перем ДФ, КурсивТекст1, ФокусПолучен;
Процедура КурсивТекст1_ФокусПолучен() Экспорт
// Сообщить("КурсивТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_КурсивТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура КурсивТекст1_ФокусПотерян() Экспорт
// Сообщить("КурсивТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Текст = "Это КурсивТекст1";
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
КурсивТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "КурсивТекст1_ФокусПолучен");
КурсивТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "КурсивТекст1_ФокусПотерян");
КурсивТекст1.Редактируемый = Истина;
КурсивТекст2 = ДФ.КурсивТекст();
КурсивТекст2.Родитель = Форма1;
КурсивТекст2.Текст = "Это КурсивТекст2";
КурсивТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
КурсивТекст2.Редактируемый = Истина;
КурсивТекст1.Фокус();
Форма1.Открыть();
ФокусПолучен_МаркированныйТекст_событие.os
Перем ДФ, МаркированныйТекст1, ФокусПолучен;
Процедура МаркированныйТекст1_ФокусПолучен() Экспорт
// Сообщить("МаркированныйТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_МаркированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МаркированныйТекст1_ФокусПотерян() Экспорт
// Сообщить("МаркированныйТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Текст = "Это МаркированныйТекст1";
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
МаркированныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "МаркированныйТекст1_ФокусПолучен");
МаркированныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "МаркированныйТекст1_ФокусПотерян");
МаркированныйТекст1.Редактируемый = Истина;
МаркированныйТекст2 = ДФ.МаркированныйТекст();
МаркированныйТекст2.Родитель = Форма1;
МаркированныйТекст2.Текст = "Это МаркированныйТекст2";
МаркированныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
МаркированныйТекст2.Редактируемый = Истина;
МаркированныйТекст1.Фокус();
Форма1.Открыть();
ФокусПолучен_МедиаГруппа_событие.os
Перем ДФ, МедиаГруппа1, ФокусПолучен;
Процедура МедиаГруппа1_ФокусПолучен() Экспорт
// Сообщить("МедиаГруппа1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_МедиаГруппа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МедиаГруппа1_ФокусПотерян() Экспорт
// Сообщить("МедиаГруппа1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Текст = "Это МедиаГруппа1";
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.Красный;
МедиаГруппа1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "МедиаГруппа1_ФокусПолучен");
МедиаГруппа1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "МедиаГруппа1_ФокусПотерян");
МедиаГруппа1.Редактируемый = Истина;
МедиаГруппа2 = ДФ.МедиаГруппа();
МедиаГруппа2.Родитель = Форма1;
МедиаГруппа2.Текст = "Это МедиаГруппа2";
МедиаГруппа2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
МедиаГруппа2.Редактируемый = Истина;
МедиаГруппа1.Фокус();
Форма1.Открыть();
ФокусПолучен_МелкийТекст_событие.os
Перем ДФ, МелкийТекст1, ФокусПолучен;
Процедура МелкийТекст1_ФокусПолучен() Экспорт
// Сообщить("МелкийТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_МелкийТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура МелкийТекст1_ФокусПотерян() Экспорт
// Сообщить("МелкийТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Текст = "Это МелкийТекст1";
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
МелкийТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "МелкийТекст1_ФокусПолучен");
МелкийТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "МелкийТекст1_ФокусПотерян");
МелкийТекст1.Редактируемый = Истина;
МелкийТекст2 = ДФ.МелкийТекст();
МелкийТекст2.Родитель = Форма1;
МелкийТекст2.Текст = "Это МелкийТекст2";
МелкийТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
МелкийТекст2.Редактируемый = Истина;
МелкийТекст1.Фокус();
Форма1.Открыть();
ФокусПолучен_НадстрочныйТекст_событие.os
Перем ДФ, НадстрочныйТекст1, ФокусПолучен;
Процедура НадстрочныйТекст1_ФокусПолучен() Экспорт
// Сообщить("НадстрочныйТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_НадстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура НадстрочныйТекст1_ФокусПотерян() Экспорт
// Сообщить("НадстрочныйТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Текст = "Это НадстрочныйТекст1";
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НадстрочныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "НадстрочныйТекст1_ФокусПолучен");
НадстрочныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "НадстрочныйТекст1_ФокусПотерян");
НадстрочныйТекст1.Редактируемый = Истина;
НадстрочныйТекст2 = ДФ.НадстрочныйТекст();
НадстрочныйТекст2.Родитель = Форма1;
НадстрочныйТекст2.Текст = "Это НадстрочныйТекст2";
НадстрочныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
НадстрочныйТекст2.Редактируемый = Истина;
НадстрочныйТекст1.Фокус();
Форма1.Открыть();
ФокусПолучен_НаправленныйТекст_событие.os
Перем ДФ, НаправленныйТекст1, ФокусПолучен;
Процедура НаправленныйТекст1_ФокусПолучен() Экспорт
// Сообщить("НаправленныйТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_НаправленныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура НаправленныйТекст1_ФокусПотерян() Экспорт
// Сообщить("НаправленныйТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Текст = "Это НаправленныйТекст1";
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НаправленныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "НаправленныйТекст1_ФокусПолучен");
НаправленныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "НаправленныйТекст1_ФокусПотерян");
НаправленныйТекст1.Редактируемый = Истина;
НаправленныйТекст2 = ДФ.НаправленныйТекст();
НаправленныйТекст2.Родитель = Форма1;
НаправленныйТекст2.Текст = "Это НаправленныйТекст2";
НаправленныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
НаправленныйТекст2.Редактируемый = Истина;
НаправленныйТекст1.Фокус();
Форма1.Открыть();
ФокусПолучен_НеупорядоченныйСписок_событие.os
Перем ДФ, НеупорядоченныйСписок1, ФокусПолучен;
Процедура НеупорядоченныйСписок1_ФокусПолучен() Экспорт
// Сообщить("НеупорядоченныйСписок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_НеупорядоченныйСписок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура НеупорядоченныйСписок1_ФокусПотерян() Экспорт
// Сообщить("НеупорядоченныйСписок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Текст = "Это НеупорядоченныйСписок1";
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НеупорядоченныйСписок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "НеупорядоченныйСписок1_ФокусПолучен");
НеупорядоченныйСписок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "НеупорядоченныйСписок1_ФокусПотерян");
НеупорядоченныйСписок1.Редактируемый = Истина;
НеупорядоченныйСписок2 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок2.Родитель = Форма1;
НеупорядоченныйСписок2.Текст = "Это НеупорядоченныйСписок2";
НеупорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
НеупорядоченныйСписок2.Редактируемый = Истина;
НеупорядоченныйСписок1.Фокус();
Форма1.Открыть();
ФокусПолучен_НижнийКолонтитул_событие.os
Перем ДФ, НижнийКолонтитул1, ФокусПолучен;
Процедура НижнийКолонтитул1_ФокусПолучен() Экспорт
// Сообщить("НижнийКолонтитул1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_НижнийКолонтитул_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура НижнийКолонтитул1_ФокусПотерян() Экспорт
// Сообщить("НижнийКолонтитул1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Текст = "Это НижнийКолонтитул1";
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НижнийКолонтитул1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "НижнийКолонтитул1_ФокусПолучен");
НижнийКолонтитул1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "НижнийКолонтитул1_ФокусПотерян");
НижнийКолонтитул1.Редактируемый = Истина;
НижнийКолонтитул2 = ДФ.НижнийКолонтитул();
НижнийКолонтитул2.Родитель = Форма1;
НижнийКолонтитул2.Текст = "Это НижнийКолонтитул2";
НижнийКолонтитул2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
НижнийКолонтитул2.Редактируемый = Истина;
НижнийКолонтитул1.Фокус();
Форма1.Открыть();
ФокусПолучен_ОбластьТаблицы_событие.os
Перем ДФ, ОбластьТаблицы1, ФокусПолучен;
Процедура ОбластьТаблицы1_ФокусПолучен() Экспорт
// Сообщить("ОбластьТаблицы1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ОбластьТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ОбластьТаблицы1_ФокусПотерян() Экспорт
// Сообщить("ОбластьТаблицы1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Текст = "Это ОбластьТаблицы1";
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОбластьТаблицы1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ОбластьТаблицы1_ФокусПолучен");
ОбластьТаблицы1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ОбластьТаблицы1_ФокусПотерян");
ОбластьТаблицы1.Редактируемый = Истина;
ОбластьТаблицы2 = ДФ.ОбластьТаблицы();
ОбластьТаблицы2.Родитель = Форма1;
ОбластьТаблицы2.Текст = "Это ОбластьТаблицы2";
ОбластьТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ОбластьТаблицы2.Редактируемый = Истина;
ОбластьТаблицы1.Фокус();
Форма1.Открыть();
ФокусПолучен_ОбластьТекста_событие.os
Перем ДФ, ОбластьТекста1, ФокусПолучен;
Процедура ОбластьТекста1_ФокусПолучен() Экспорт
// Сообщить("ОбластьТекста1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ОбластьТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ОбластьТекста1_ФокусПотерян() Экспорт
// Сообщить("ОбластьТекста1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОбластьТекста1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_ФокусПолучен");
ОбластьТекста1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_ФокусПотерян");
ОбластьТекста1.Редактируемый = Истина;
ОбластьТекста2 = ДФ.ОбластьТекста();
ОбластьТекста2.Родитель = Форма1;
ОбластьТекста2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ОбластьТекста2.Редактируемый = Истина;
ОбластьТекста1.Фокус();
Форма1.Открыть();
ФокусПолучен_ОписаниеМедиа_событие.os
Перем ДФ, ОписаниеМедиа1, ФокусПолучен;
Процедура ОписаниеМедиа1_ФокусПолучен() Экспорт
// Сообщить("ОписаниеМедиа1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ОписаниеМедиа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ОписаниеМедиа1_ФокусПотерян() Экспорт
// Сообщить("ОписаниеМедиа1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Текст = "Это ОписаниеМедиа1";
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОписаниеМедиа1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ОписаниеМедиа1_ФокусПолучен");
ОписаниеМедиа1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ОписаниеМедиа1_ФокусПотерян");
ОписаниеМедиа1.Редактируемый = Истина;
ОписаниеМедиа2 = ДФ.ОписаниеМедиа();
ОписаниеМедиа2.Родитель = Форма1;
ОписаниеМедиа2.Текст = "Это ОписаниеМедиа2";
ОписаниеМедиа2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ОписаниеМедиа2.Редактируемый = Истина;
ОписаниеМедиа1.Фокус();
Форма1.Открыть();
ФокусПолучен_Определение_событие.os
Перем ДФ, Определение1, ФокусПолучен;
Процедура Определение1_ФокусПолучен() Экспорт
// Сообщить("Определение1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Определение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Определение1_ФокусПотерян() Экспорт
// Сообщить("Определение1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Текст = "Это Определение1";
Определение1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Определение1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Определение1_ФокусПолучен");
Определение1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Определение1_ФокусПотерян");
Определение1.Редактируемый = Истина;
Определение2 = ДФ.Определение();
Определение2.Родитель = Форма1;
Определение2.Текст = "Это Определение2";
Определение2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Определение2.Редактируемый = Истина;
Определение1.Фокус();
Форма1.Открыть();
ФокусПолучен_Переключатель_событие.os
Перем ДФ, Переключатель1, ФокусПолучен;
Процедура Переключатель1_ФокусПолучен() Экспорт
// Сообщить("Переключатель1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Переключатель_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Переключатель1_ФокусПотерян() Экспорт
// Сообщить("Переключатель1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Переключатель1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Переключатель1_ФокусПолучен");
Переключатель1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Переключатель1_ФокусПотерян");
Переключатель1.Редактируемый = Истина;
Переключатель2 = ДФ.Переключатель();
Переключатель2.Родитель = Форма1;
Переключатель2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Переключатель2.Редактируемый = Истина;
Переключатель1.Фокус();
Форма1.Открыть();
ФокусПолучен_Перенос_событие.os
Перем ДФ, Перенос1, ФокусПолучен;
Процедура Перенос1_ФокусПолучен() Экспорт
// Сообщить("Перенос1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Перенос_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Перенос1_ФокусПотерян() Экспорт
// Сообщить("Перенос1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Перенос1 = ДФ.Перенос();
Перенос1.Родитель = Форма1;
Перенос1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Перенос1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Перенос1_ФокусПолучен");
Перенос1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Перенос1_ФокусПотерян");
Перенос1.Редактируемый = Истина;
Перенос2 = ДФ.Перенос();
Перенос2.Родитель = Форма1;
Перенос2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Перенос2.Редактируемый = Истина;
Перенос1.Фокус();
Форма1.Открыть();
ФокусПолучен_Подпись_событие.os
Перем ДФ, Подпись1, ФокусПолучен;
Процедура Подпись1_ФокусПолучен() Экспорт
// Сообщить("Подпись1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Подпись_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Подпись1_ФокусПотерян() Экспорт
// Сообщить("Подпись1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Это Подпись1";
Подпись1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Подпись1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Подпись1_ФокусПолучен");
Подпись1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Подпись1_ФокусПотерян");
Подпись1.Редактируемый = Истина;
Подпись2 = ДФ.Подпись();
Подпись2.Родитель = Форма1;
Подпись2.Текст = "Это Подпись2";
Подпись2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Подпись2.Редактируемый = Истина;
Подпись1.Фокус();
Форма1.Открыть();
ФокусПолучен_ПодстрочныйТекст_событие.os
Перем ДФ, ПодстрочныйТекст1, ФокусПолучен;
Процедура ПодстрочныйТекст1_ФокусПолучен() Экспорт
// Сообщить("ПодстрочныйТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ПодстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПодстрочныйТекст1_ФокусПотерян() Экспорт
// Сообщить("ПодстрочныйТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Текст = "Это ПодстрочныйТекст1";
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПодстрочныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПодстрочныйТекст1_ФокусПолучен");
ПодстрочныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПодстрочныйТекст1_ФокусПотерян");
ПодстрочныйТекст1.Редактируемый = Истина;
ПодстрочныйТекст2 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст2.Родитель = Форма1;
ПодстрочныйТекст2.Текст = "Это ПодстрочныйТекст2";
ПодстрочныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПодстрочныйТекст2.Редактируемый = Истина;
ПодстрочныйТекст1.Фокус();
Форма1.Открыть();
ФокусПолучен_ПодчеркнутыйТекст_событие.os
Перем ДФ, ПодчеркнутыйТекст1, ФокусПолучен;
Процедура ПодчеркнутыйТекст1_ФокусПолучен() Экспорт
// Сообщить("ПодчеркнутыйТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ПодчеркнутыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПодчеркнутыйТекст1_ФокусПотерян() Экспорт
// Сообщить("ПодчеркнутыйТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Текст = "Это ПодчеркнутыйТекст1";
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПодчеркнутыйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПодчеркнутыйТекст1_ФокусПолучен");
ПодчеркнутыйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПодчеркнутыйТекст1_ФокусПотерян");
ПодчеркнутыйТекст1.Редактируемый = Истина;
ПодчеркнутыйТекст2 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст2.Родитель = Форма1;
ПодчеркнутыйТекст2.Текст = "Это ПодчеркнутыйТекст2";
ПодчеркнутыйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПодчеркнутыйТекст2.Редактируемый = Истина;
ПодчеркнутыйТекст1.Фокус();
Форма1.Открыть();
ФокусПолучен_ПолеПароля_событие.os
Перем ДФ, ПолеПароля1, ФокусПолучен;
Процедура ПолеПароля1_ФокусПолучен() Экспорт
// Сообщить("ПолеПароля1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ПолеПароля_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПолеПароля1_ФокусПотерян() Экспорт
// Сообщить("ПолеПароля1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеПароля1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_ФокусПолучен");
ПолеПароля1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_ФокусПотерян");
ПолеПароля1.Редактируемый = Истина;
ПолеПароля2 = ДФ.ПолеПароля();
ПолеПароля2.Родитель = Форма1;
ПолеПароля2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеПароля2.Редактируемый = Истина;
ПолеПароля1.Фокус();
Форма1.Открыть();
ФокусПолучен_ПолеПоиска_событие.os
Перем ДФ, ПолеПоиска1, ФокусПолучен;
Процедура ПолеПоиска1_ФокусПолучен() Экспорт
// Сообщить("ПолеПоиска1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ПолеПоиска_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПолеПоиска1_ФокусПотерян() Экспорт
// Сообщить("ПолеПоиска1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеПоиска1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_ФокусПолучен");
ПолеПоиска1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_ФокусПотерян");
ПолеПоиска1.Редактируемый = Истина;
ПолеПоиска2 = ДФ.ПолеПоиска();
ПолеПоиска2.Родитель = Форма1;
ПолеПоиска2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеПоиска2.Редактируемый = Истина;
ПолеПоиска1.Фокус();
Форма1.Открыть();
ФокусПолучен_ПолеСписка_событие.os
Перем ДФ, ПолеСписка1, ФокусПолучен;
Процедура ПолеСписка1_ФокусПолучен() Экспорт
// Сообщить("ПолеСписка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ПолеСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПолеСписка1_ФокусПотерян() Экспорт
// Сообщить("ПолеСписка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеСписка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеСписка1_ФокусПолучен");
ПолеСписка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеСписка1_ФокусПотерян");
ПолеСписка1.Редактируемый = Истина;
ПолеСписка2 = ДФ.ПолеСписка();
ПолеСписка2.Родитель = Форма1;
ПолеСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеСписка2.Редактируемый = Истина;
ПолеСписка1.Фокус();
Форма1.Открыть();
ФокусПолучен_ПолеТекста_событие.os
Перем ДФ, ПолеТекста1, ФокусПолучен;
Процедура ПолеТекста1_ФокусПолучен() Экспорт
// Сообщить("ПолеТекста1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ПолеТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПолеТекста1_ФокусПотерян() Экспорт
// Сообщить("ПолеТекста1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеТекста1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_ФокусПолучен");
ПолеТекста1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_ФокусПотерян");
ПолеТекста2 = ДФ.ПолеТекста();
ПолеТекста2.Родитель = Форма1;
ПолеТекста2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеТекста1.Фокус();
Форма1.Открыть();
ФокусПолучен_ПолеЧисла_событие.os
Перем ДФ, ПолеЧисла1, ФокусПолучен;
Процедура ПолеЧисла1_ФокусПолучен() Экспорт
// Сообщить("ПолеЧисла1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ПолеЧисла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ПолеЧисла1_ФокусПотерян() Экспорт
// Сообщить("ПолеЧисла1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеЧисла1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_ФокусПолучен");
ПолеЧисла1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_ФокусПотерян");
ПолеЧисла1.Редактируемый = Истина;
ПолеЧисла2 = ДФ.ПолеЧисла();
ПолеЧисла2.Родитель = Форма1;
ПолеЧисла2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеЧисла2.Редактируемый = Истина;
ПолеЧисла1.Фокус();
Форма1.Открыть();
ФокусПолучен_Ползунок_событие.os
Перем ДФ, Ползунок1, ФокусПолучен;
Процедура Ползунок1_ФокусПолучен() Экспорт
// Сообщить("Ползунок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Ползунок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Ползунок1_ФокусПотерян() Экспорт
// Сообщить("Ползунок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ползунок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Ползунок1_ФокусПолучен");
Ползунок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Ползунок1_ФокусПотерян");
Ползунок1.Редактируемый = Истина;
Ползунок2 = ДФ.Ползунок();
Ползунок2.Родитель = Форма1;
Ползунок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Ползунок2.Редактируемый = Истина;
Ползунок1.Фокус();
Форма1.Открыть();
ФокусПолучен_РаскрываемыйБлок_событие.os
Перем ДФ, РаскрываемыйБлок1, ФокусПолучен;
Процедура РаскрываемыйБлок1_ФокусПолучен() Экспорт
// Сообщить("РаскрываемыйБлок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_РаскрываемыйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура РаскрываемыйБлок1_ФокусПотерян() Экспорт
// Сообщить("РаскрываемыйБлок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
РаскрываемыйБлок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "РаскрываемыйБлок1_ФокусПолучен");
РаскрываемыйБлок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "РаскрываемыйБлок1_ФокусПотерян");
РаскрываемыйБлок1.Редактируемый = Истина;
РаскрываемыйБлок2 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок2.Родитель = Форма1;
РаскрываемыйБлок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
РаскрываемыйБлок2.Редактируемый = Истина;
РаскрываемыйБлок1.Фокус();
Форма1.Открыть();
ФокусПолучен_Результат_событие.os
Перем ДФ, Результат1, ФокусПолучен;
Процедура Результат1_ФокусПолучен() Экспорт
// Сообщить("Результат1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Результат_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Результат1_ФокусПотерян() Экспорт
// Сообщить("Результат1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Текст = "Это Результат1";
Результат1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Результат1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Результат1_ФокусПолучен");
Результат1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Результат1_ФокусПотерян");
Результат1.Редактируемый = Истина;
Результат2 = ДФ.Результат();
Результат2.Родитель = Форма1;
Результат2.Текст = "Это Результат2";
Результат2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Результат2.Редактируемый = Истина;
Результат1.Фокус();
Форма1.Открыть();
ФокусПолучен_СписокОпределений_событие.os
Перем ДФ, СписокОпределений1, ФокусПолучен;
Процедура СписокОпределений1_ФокусПолучен() Экспорт
// Сообщить("СписокОпределений1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_СписокОпределений_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СписокОпределений1_ФокусПотерян() Экспорт
// Сообщить("СписокОпределений1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Текст = "Это СписокОпределений1";
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.Красный;
СписокОпределений1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "СписокОпределений1_ФокусПолучен");
СписокОпределений1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "СписокОпределений1_ФокусПотерян");
СписокОпределений1.Редактируемый = Истина;
СписокОпределений2 = ДФ.СписокОпределений();
СписокОпределений2.Родитель = Форма1;
СписокОпределений2.Текст = "Это СписокОпределений2";
СписокОпределений2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
СписокОпределений2.Редактируемый = Истина;
СписокОпределений1.Фокус();
Форма1.Открыть();
ФокусПолучен_Ссылка_событие.os
Перем ДФ, Ссылка1, ФокусПолучен;
Процедура Ссылка1_ФокусПолучен() Экспорт
// Сообщить("Ссылка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Ссылка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Ссылка1_ФокусПотерян() Экспорт
// Сообщить("Ссылка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Текст = "Это Ссылка1";
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ссылка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Ссылка1_ФокусПолучен");
Ссылка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Ссылка1_ФокусПотерян");
Ссылка1.Редактируемый = Истина;
Ссылка2 = ДФ.Ссылка();
Ссылка2.Родитель = Форма1;
Ссылка2.Текст = "Это Ссылка2";
Ссылка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Ссылка2.Редактируемый = Истина;
Ссылка1.Фокус();
Форма1.Открыть();
ФокусПолучен_СтрокаТаблицы_событие.os
Перем ДФ, СтрокаТаблицы1, ФокусПолучен;
Процедура СтрокаТаблицы1_ФокусПолучен() Экспорт
// Сообщить("СтрокаТаблицы1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_СтрокаТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура СтрокаТаблицы1_ФокусПотерян() Экспорт
// Сообщить("СтрокаТаблицы1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Текст = "Это СтрокаТаблицы1";
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Красный;
СтрокаТаблицы1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "СтрокаТаблицы1_ФокусПолучен");
СтрокаТаблицы1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "СтрокаТаблицы1_ФокусПотерян");
СтрокаТаблицы1.Редактируемый = Истина;
СтрокаТаблицы2 = ДФ.СтрокаТаблицы();
СтрокаТаблицы2.Родитель = Форма1;
СтрокаТаблицы2.Текст = "Это СтрокаТаблицы2";
СтрокаТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
СтрокаТаблицы2.Редактируемый = Истина;
СтрокаТаблицы1.Фокус();
Форма1.Открыть();
ФокусПолучен_Таблица_событие.os
Перем ДФ, Таблица1, ФокусПолучен;
Процедура Таблица1_ФокусПолучен() Экспорт
// Сообщить("Таблица1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Таблица_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Таблица1_ФокусПотерян() Экспорт
// Сообщить("Таблица1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Текст = "Это Таблица1";
Таблица1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Таблица1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Таблица1_ФокусПолучен");
Таблица1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Таблица1_ФокусПотерян");
Таблица1.Редактируемый = Истина;
Таблица2 = ДФ.Таблица();
Таблица2.Родитель = Форма1;
Таблица2.Текст = "Это Таблица2";
Таблица2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Таблица2.Редактируемый = Истина;
Таблица1.Фокус();
Форма1.Открыть();
ФокусПолучен_Термин_событие.os
Перем ДФ, Термин1, ФокусПолучен;
Процедура Термин1_ФокусПолучен() Экспорт
// Сообщить("Термин1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Термин_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Термин1_ФокусПотерян() Экспорт
// Сообщить("Термин1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Текст = "Это Термин1";
Термин1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Термин1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Термин1_ФокусПолучен");
Термин1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Термин1_ФокусПотерян");
Термин1.Редактируемый = Истина;
Термин2 = ДФ.Термин();
Термин2.Родитель = Форма1;
Термин2.Текст = "Это Термин2";
Термин2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Термин2.Редактируемый = Истина;
Термин1.Фокус();
Форма1.Открыть();
ФокусПолучен_УдаленыйТекст_событие.os
Перем ДФ, УдаленыйТекст1, ФокусПолучен;
Процедура УдаленыйТекст1_ФокусПолучен() Экспорт
// Сообщить("УдаленыйТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_УдаленыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура УдаленыйТекст1_ФокусПотерян() Экспорт
// Сообщить("УдаленыйТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Текст = "Это УдаленыйТекст1";
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
УдаленыйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "УдаленыйТекст1_ФокусПолучен");
УдаленыйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "УдаленыйТекст1_ФокусПотерян");
УдаленыйТекст1.Редактируемый = Истина;
УдаленыйТекст2 = ДФ.УдаленыйТекст();
УдаленыйТекст2.Родитель = Форма1;
УдаленыйТекст2.Текст = "Это УдаленыйТекст2";
УдаленыйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
УдаленыйТекст2.Редактируемый = Истина;
УдаленыйТекст1.Фокус();
Форма1.Открыть();
ФокусПолучен_УпорядоченныйСписок_событие.os
Перем ДФ, УпорядоченныйСписок1, ФокусПолучен;
Процедура УпорядоченныйСписок1_ФокусПолучен() Экспорт
// Сообщить("УпорядоченныйСписок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_УпорядоченныйСписок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура УпорядоченныйСписок1_ФокусПотерян() Экспорт
// Сообщить("УпорядоченныйСписок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Текст = "Это УпорядоченныйСписок1";
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
УпорядоченныйСписок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "УпорядоченныйСписок1_ФокусПолучен");
УпорядоченныйСписок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "УпорядоченныйСписок1_ФокусПотерян");
УпорядоченныйСписок1.Редактируемый = Истина;
УпорядоченныйСписок2 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок2.Родитель = Форма1;
УпорядоченныйСписок2.Текст = "Это УпорядоченныйСписок2";
УпорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
УпорядоченныйСписок2.Редактируемый = Истина;
УпорядоченныйСписок1.Фокус();
Форма1.Открыть();
ФокусПолучен_Флажок_событие.os
Перем ДФ, Флажок1, ФокусПолучен;
Процедура Флажок1_ФокусПолучен() Экспорт
// Сообщить("Флажок1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Флажок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Флажок1_ФокусПотерян() Экспорт
// Сообщить("Флажок1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Флажок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Флажок1_ФокусПолучен");
Флажок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Флажок1_ФокусПотерян");
Флажок1.Редактируемый = Истина;
Флажок2 = ДФ.Флажок();
Флажок2.Родитель = Форма1;
Флажок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Флажок2.Редактируемый = Истина;
Флажок1.Фокус();
Форма1.Открыть();
ФокусПолучен_ФорматированныйТекст_событие.os
Перем ДФ, ФорматированныйТекст1, ФокусПолучен;
Процедура ФорматированныйТекст1_ФокусПолучен() Экспорт
// Сообщить("ФорматированныйТекст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ФорматированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ФорматированныйТекст1_ФокусПотерян() Экспорт
// Сообщить("ФорматированныйТекст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Текст = "Это ФорматированныйТекст1";
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ФорматированныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ФорматированныйТекст1_ФокусПолучен");
ФорматированныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ФорматированныйТекст1_ФокусПотерян");
ФорматированныйТекст1.Редактируемый = Истина;
ФорматированныйТекст2 = ДФ.ФорматированныйТекст();
ФорматированныйТекст2.Родитель = Форма1;
ФорматированныйТекст2.Текст = "Это ФорматированныйТекст2";
ФорматированныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ФорматированныйТекст2.Редактируемый = Истина;
ФорматированныйТекст1.Фокус();
Форма1.Открыть();
ФокусПолучен_Холст_событие.os
Перем ДФ, Холст1, ФокусПолучен;
Процедура Холст1_ФокусПолучен() Экспорт
// Сообщить("Холст1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Холст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Холст1_ФокусПотерян() Экспорт
// Сообщить("Холст1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
Холст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Холст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Холст1_ФокусПолучен");
Холст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Холст1_ФокусПотерян");
Холст1.Редактируемый = Истина;
Холст2 = ДФ.Холст();
Холст2.Родитель = Форма1;
Холст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Холст2.Редактируемый = Истина;
Холст1.Фокус();
Форма1.Открыть();
ФокусПолучен_ШапкаТаблицы_событие.os
Перем ДФ, ШапкаТаблицы1, ФокусПолучен;
Процедура ШапкаТаблицы1_ФокусПолучен() Экспорт
// Сообщить("ШапкаТаблицы1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ШапкаТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ШапкаТаблицы1_ФокусПотерян() Экспорт
// Сообщить("ШапкаТаблицы1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Текст = "Это ШапкаТаблицы1";
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ШапкаТаблицы1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ШапкаТаблицы1_ФокусПолучен");
ШапкаТаблицы1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ШапкаТаблицы1_ФокусПотерян");
ШапкаТаблицы1.Редактируемый = Истина;
ШапкаТаблицы2 = ДФ.ШапкаТаблицы();
ШапкаТаблицы2.Родитель = Форма1;
ШапкаТаблицы2.Текст = "Это ШапкаТаблицы2";
ШапкаТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ШапкаТаблицы2.Редактируемый = Истина;
ШапкаТаблицы1.Фокус();
Форма1.Открыть();
ФокусПолучен_ЭлементПоляСписка_событие.os
Перем ДФ, ЭлементПоляСписка1, ФокусПолучен;
Процедура ЭлементПоляСписка1_ФокусПолучен() Экспорт
// Сообщить("ЭлементПоляСписка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ЭлементПоляСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ЭлементПоляСписка1_ФокусПотерян() Экспорт
// Сообщить("ЭлементПоляСписка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Текст = "Это ЭлементПоляСписка1";
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЭлементПоляСписка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЭлементПоляСписка1_ФокусПолучен");
ЭлементПоляСписка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЭлементПоляСписка1_ФокусПотерян");
ЭлементПоляСписка1.Редактируемый = Истина;
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = Форма1;
ЭлементПоляСписка2.Текст = "Это ЭлементПоляСписка2";
ЭлементПоляСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЭлементПоляСписка2.Редактируемый = Истина;
ЭлементПоляСписка1.Фокус();
Форма1.Открыть();
ФокусПолучен_ЭлементСписка_событие.os
Перем ДФ, ЭлементСписка1, ФокусПолучен;
Процедура ЭлементСписка1_ФокусПолучен() Экспорт
// Сообщить("ЭлементСписка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ЭлементСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ЭлементСписка1_ФокусПотерян() Экспорт
// Сообщить("ЭлементСписка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Текст = "Это ЭлементСписка1";
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЭлементСписка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЭлементСписка1_ФокусПолучен");
ЭлементСписка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЭлементСписка1_ФокусПотерян");
ЭлементСписка1.Редактируемый = Истина;
ЭлементСписка2 = ДФ.ЭлементСписка();
ЭлементСписка2.Родитель = Форма1;
ЭлементСписка2.Текст = "Это ЭлементСписка2";
ЭлементСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЭлементСписка2.Редактируемый = Истина;
ЭлементСписка1.Фокус();
Форма1.Открыть();
ФокусПолучен_Ячейка_событие.os
Перем ДФ, Ячейка1, ФокусПолучен;
Процедура Ячейка1_ФокусПолучен() Экспорт
// Сообщить("Ячейка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_Ячейка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Ячейка1_ФокусПотерян() Экспорт
// Сообщить("Ячейка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Текст = "Это Ячейка1";
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ячейка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Ячейка1_ФокусПолучен");
Ячейка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Ячейка1_ФокусПотерян");
Ячейка1.Редактируемый = Истина;
Ячейка2 = ДФ.Ячейка();
Ячейка2.Родитель = Форма1;
Ячейка2.Текст = "Это Ячейка2";
Ячейка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Ячейка2.Редактируемый = Истина;
Ячейка1.Фокус();
Форма1.Открыть();
ФокусПолучен_ЯчейкаЗаголовка_событие.os
Перем ДФ, ЯчейкаЗаголовка1, ФокусПолучен;
Процедура ЯчейкаЗаголовка1_ФокусПолучен() Экспорт
// Сообщить("ЯчейкаЗаголовка1_ФокусПолучен");
ФокусПолучен = Истина;
Сообщить(?(
ФокусПолучен
, "", "!!! ") + "ФокусПолучен_ЯчейкаЗаголовка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура ЯчейкаЗаголовка1_ФокусПотерян() Экспорт
// Сообщить("ЯчейкаЗаголовка1_ФокусПотерян");
КонецПроцедуры
ФокусПолучен = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Текст = "Это ЯчейкаЗаголовка1";
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЯчейкаЗаголовка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЯчейкаЗаголовка1_ФокусПолучен");
ЯчейкаЗаголовка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЯчейкаЗаголовка1_ФокусПотерян");
ЯчейкаЗаголовка1.Редактируемый = Истина;
ЯчейкаЗаголовка2 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка2.Родитель = Форма1;
ЯчейкаЗаголовка2.Текст = "Это ЯчейкаЗаголовка2";
ЯчейкаЗаголовка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЯчейкаЗаголовка2.Редактируемый = Истина;
ЯчейкаЗаголовка1.Фокус();
Форма1.Открыть();
ФокусПотерян_Абзац_событие.os
Перем ДФ, Абзац1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Абзац1.СнятьФокус();
КонецПроцедуры
Процедура Абзац1_ФокусПолучен() Экспорт
// Сообщить("Абзац1_ФокусПолучен");
КонецПроцедуры
Процедура Абзац1_ФокусПотерян() Экспорт
// Сообщить("Абзац1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Абзац_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Это Абзац1";
Абзац1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Абзац1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Абзац1_ФокусПолучен");
Абзац1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Абзац1_ФокусПотерян");
Абзац1.Редактируемый = Истина;
Абзац2 = ДФ.Абзац();
Абзац2.Родитель = Форма1;
Абзац2.Текст = "Это Абзац2";
Абзац2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Абзац2.Редактируемый = Истина;
Абзац1.Фокус();
Форма1.Открыть();
ФокусПотерян_Артикль_событие.os
Перем ДФ, Артикль1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Артикль1.СнятьФокус();
КонецПроцедуры
Процедура Артикль1_ФокусПолучен() Экспорт
// Сообщить("Артикль1_ФокусПолучен");
КонецПроцедуры
Процедура Артикль1_ФокусПотерян() Экспорт
// Сообщить("Артикль1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Артикль_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Текст = "Это Артикль1";
Артикль1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Артикль1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Артикль1_ФокусПолучен");
Артикль1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Артикль1_ФокусПотерян");
Артикль1.Редактируемый = Истина;
Артикль2 = ДФ.Артикль();
Артикль2.Родитель = Форма1;
Артикль2.Текст = "Это Артикль2";
Артикль2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Артикль2.Редактируемый = Истина;
Артикль1.Фокус();
Форма1.Открыть();
ФокусПотерян_Аудио_событие.os
Перем ДФ, Аудио1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Аудио1.СнятьФокус();
КонецПроцедуры
Процедура Аудио1_ФокусПолучен() Экспорт
// Сообщить("Аудио1_ФокусПолучен");
КонецПроцедуры
Процедура Аудио1_ФокусПотерян() Экспорт
// Сообщить("Аудио1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Аудио_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Аудио1 = ДФ.Аудио();
Аудио1.Родитель = Форма1;
Аудио1.Контролы = Истина;
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Аудио1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Аудио1_ФокусПолучен");
Аудио1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Аудио1_ФокусПотерян");
Аудио2 = ДФ.Аудио();
Аудио2.Родитель = Форма1;
Аудио1.Контролы = Истина;
// Аудио1.Источник = "file:///C:/444/Pic/Kaoma_Lambada.mp3";
Аудио1.Источник = "Kaoma_Lambada.mp3";
Аудио2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Аудио1.Фокус();
Форма1.Открыть();
ФокусПотерян_Блок_событие.os
Перем ДФ, Блок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Блок1.СнятьФокус();
КонецПроцедуры
Процедура Блок1_ФокусПолучен() Экспорт
// Сообщить("Блок1_ФокусПолучен");
КонецПроцедуры
Процедура Блок1_ФокусПотерян() Экспорт
// Сообщить("Блок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Блок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Это Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Блок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Блок1_ФокусПолучен");
Блок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Блок1_ФокусПотерян");
Блок1.Редактируемый = Истина;
Блок2 = ДФ.Блок();
Блок2.Родитель = Форма1;
Блок2.Текст = "Это Блок2";
Блок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Блок2.Редактируемый = Истина;
Блок1.Фокус();
Форма1.Открыть();
ФокусПотерян_ВыборВремени_событие.os
Перем ДФ, ВыборВремени1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ВыборВремени1.СнятьФокус();
КонецПроцедуры
Процедура ВыборВремени1_ФокусПолучен() Экспорт
// Сообщить("ВыборВремени1_ФокусПолучен");
КонецПроцедуры
Процедура ВыборВремени1_ФокусПотерян() Экспорт
// Сообщить("ВыборВремени1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ВыборВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборВремени1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборВремени1_ФокусПолучен");
ВыборВремени1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборВремени1_ФокусПотерян");
ВыборВремени1.Редактируемый = Истина;
ВыборВремени2 = ДФ.ВыборВремени();
ВыборВремени2.Родитель = Форма1;
ВыборВремени2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборВремени2.Редактируемый = Истина;
ВыборВремени1.Фокус();
Форма1.Открыть();
ФокусПотерян_ВыборДаты_событие.os
Перем ДФ, ВыборДаты1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ВыборДаты1.СнятьФокус();
КонецПроцедуры
Процедура ВыборДаты1_ФокусПолучен() Экспорт
// Сообщить("ВыборДаты1_ФокусПолучен");
КонецПроцедуры
Процедура ВыборДаты1_ФокусПотерян() Экспорт
// Сообщить("ВыборДаты1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ВыборДаты_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборДаты1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_ФокусПолучен");
ВыборДаты1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборДаты1_ФокусПотерян");
ВыборДаты1.Редактируемый = Истина;
ВыборДаты2 = ДФ.ВыборДаты();
ВыборДаты2.Родитель = Форма1;
ВыборДаты2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборДаты2.Редактируемый = Истина;
ВыборДаты1.Фокус();
Форма1.Открыть();
ФокусПотерян_ВыборДатыВремени_событие.os
Перем ДФ, ВыборДатыВремени1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ВыборДатыВремени1.СнятьФокус();
КонецПроцедуры
Процедура ВыборДатыВремени1_ФокусПолучен() Экспорт
// Сообщить("ВыборДатыВремени1_ФокусПолучен");
КонецПроцедуры
Процедура ВыборДатыВремени1_ФокусПотерян() Экспорт
// Сообщить("ВыборДатыВремени1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ВыборДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборДатыВремени1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_ФокусПолучен");
ВыборДатыВремени1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборДатыВремени1_ФокусПотерян");
ВыборДатыВремени1.Редактируемый = Истина;
ВыборДатыВремени2 = ДФ.ВыборДатыВремени();
ВыборДатыВремени2.Родитель = Форма1;
ВыборДатыВремени2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборДатыВремени2.Редактируемый = Истина;
ВыборДатыВремени1.Фокус();
Форма1.Открыть();
ФокусПотерян_ВыборМестнойДатыВремени_событие.os
Перем ДФ, ВыборМестнойДатыВремени1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ВыборМестнойДатыВремени1.СнятьФокус();
КонецПроцедуры
Процедура ВыборМестнойДатыВремени1_ФокусПолучен() Экспорт
// Сообщить("ВыборМестнойДатыВремени1_ФокусПолучен");
КонецПроцедуры
Процедура ВыборМестнойДатыВремени1_ФокусПотерян() Экспорт
// Сообщить("ВыборМестнойДатыВремени1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ВыборМестнойДатыВремени_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборМестнойДатыВремени1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборМестнойДатыВремени1_ФокусПолучен");
ВыборМестнойДатыВремени1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборМестнойДатыВремени1_ФокусПотерян");
ВыборМестнойДатыВремени1.Редактируемый = Истина;
ВыборМестнойДатыВремени2 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени2.Родитель = Форма1;
ВыборМестнойДатыВремени2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборМестнойДатыВремени2.Редактируемый = Истина;
ВыборМестнойДатыВремени1.Фокус();
Форма1.Открыть();
ФокусПотерян_ВыборМесяца_событие.os
Перем ДФ, ВыборМесяца1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ВыборМесяца1.СнятьФокус();
КонецПроцедуры
Процедура ВыборМесяца1_ФокусПолучен() Экспорт
// Сообщить("ВыборМесяца1_ФокусПолучен");
КонецПроцедуры
Процедура ВыборМесяца1_ФокусПотерян() Экспорт
// Сообщить("ВыборМесяца1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ВыборМесяца_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборМесяца1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_ФокусПолучен");
ВыборМесяца1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборМесяца1_ФокусПотерян");
ВыборМесяца1.Редактируемый = Истина;
ВыборМесяца2 = ДФ.ВыборМесяца();
ВыборМесяца2.Родитель = Форма1;
ВыборМесяца2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборМесяца2.Редактируемый = Истина;
ВыборМесяца1.Фокус();
Форма1.Открыть();
ФокусПотерян_ВыборНедели_событие.os
Перем ДФ, ВыборНедели1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ВыборНедели1.СнятьФокус();
КонецПроцедуры
Процедура ВыборНедели1_ФокусПолучен() Экспорт
// Сообщить("ВыборНедели1_ФокусПолучен");
КонецПроцедуры
Процедура ВыборНедели1_ФокусПотерян() Экспорт
// Сообщить("ВыборНедели1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ВыборНедели_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборНедели1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_ФокусПолучен");
ВыборНедели1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборНедели1_ФокусПотерян");
ВыборНедели1.Редактируемый = Истина;
ВыборНедели2 = ДФ.ВыборНедели();
ВыборНедели2.Родитель = Форма1;
ВыборНедели2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборНедели2.Редактируемый = Истина;
ВыборНедели1.Фокус();
Форма1.Открыть();
ФокусПотерян_ВыборФайла_событие.os
Перем ДФ, ВыборФайла1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ВыборФайла1.СнятьФокус();
КонецПроцедуры
Процедура ВыборФайла1_ФокусПолучен() Экспорт
// Сообщить("ВыборФайла1_ФокусПолучен");
КонецПроцедуры
Процедура ВыборФайла1_ФокусПотерян() Экспорт
// Сообщить("ВыборФайла1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ВыборФайла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборФайла1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборФайла1_ФокусПолучен");
ВыборФайла1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборФайла1_ФокусПотерян");
ВыборФайла1.Редактируемый = Истина;
ВыборФайла2 = ДФ.ВыборФайла();
ВыборФайла2.Родитель = Форма1;
ВыборФайла2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборФайла2.Редактируемый = Истина;
ВыборФайла1.Фокус();
Форма1.Открыть();
ФокусПотерян_ВыборЦвета_событие.os
Перем ДФ, ВыборЦвета1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ВыборЦвета1.СнятьФокус();
КонецПроцедуры
Процедура ВыборЦвета1_ФокусПолучен() Экспорт
// Сообщить("ВыборЦвета1_ФокусПолучен");
КонецПроцедуры
Процедура ВыборЦвета1_ФокусПотерян() Экспорт
// Сообщить("ВыборЦвета1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ВыборЦвета_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ВыборЦвета1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ВыборЦвета1_ФокусПолучен");
ВыборЦвета1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ВыборЦвета1_ФокусПотерян");
ВыборЦвета1.Редактируемый = Истина;
ВыборЦвета2 = ДФ.ВыборЦвета();
ВыборЦвета2.Родитель = Форма1;
ВыборЦвета2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ВыборЦвета2.Редактируемый = Истина;
ВыборЦвета1.Фокус();
Форма1.Открыть();
ФокусПотерян_Группа_событие.os
Перем ДФ, Группа1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Группа1.СнятьФокус();
КонецПроцедуры
Процедура Группа1_ФокусПолучен() Экспорт
// Сообщить("Группа1_ФокусПолучен");
КонецПроцедуры
Процедура Группа1_ФокусПотерян() Экспорт
// Сообщить("Группа1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Группа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Текст = "Это Группа1";
Группа1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Группа1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Группа1_ФокусПолучен");
Группа1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Группа1_ФокусПотерян");
Группа1.Редактируемый = Истина;
Группа2 = ДФ.Группа();
Группа2.Родитель = Форма1;
Группа2.Текст = "Это Группа2";
Группа2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Группа2.Редактируемый = Истина;
Группа1.Фокус();
Форма1.Открыть();
ФокусПотерян_ГруппаКолонок_событие.os
Перем ДФ, ГруппаКолонок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ГруппаКолонок1.СнятьФокус();
КонецПроцедуры
Процедура ГруппаКолонок1_ФокусПолучен() Экспорт
// Сообщить("ГруппаКолонок1_ФокусПолучен");
КонецПроцедуры
Процедура ГруппаКолонок1_ФокусПотерян() Экспорт
// Сообщить("ГруппаКолонок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ГруппаКолонок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Форма1;
ГруппаКолонок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ГруппаКолонок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ГруппаКолонок1_ФокусПолучен");
ГруппаКолонок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ГруппаКолонок1_ФокусПотерян");
ГруппаКолонок1.Редактируемый = Истина;
ГруппаКолонок2 = ДФ.ГруппаКолонок();
ГруппаКолонок2.Родитель = Форма1;
ГруппаКолонок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ГруппаКолонок2.Редактируемый = Истина;
ГруппаКолонок1.Фокус();
Форма1.Открыть();
ФокусПотерян_ГруппировкаПоляСписка_событие.os
Перем ДФ, ГруппировкаПоляСписка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ГруппировкаПоляСписка1.СнятьФокус();
КонецПроцедуры
Процедура ГруппировкаПоляСписка1_ФокусПолучен() Экспорт
// Сообщить("ГруппировкаПоляСписка1_ФокусПолучен");
КонецПроцедуры
Процедура ГруппировкаПоляСписка1_ФокусПотерян() Экспорт
// Сообщить("ГруппировкаПоляСписка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ГруппировкаПоляСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ГруппировкаПоляСписка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ГруппировкаПоляСписка1_ФокусПолучен");
ГруппировкаПоляСписка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ГруппировкаПоляСписка1_ФокусПотерян");
ГруппировкаПоляСписка1.Редактируемый = Истина;
ГруппировкаПоляСписка2 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка2.Родитель = Форма1;
ГруппировкаПоляСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ГруппировкаПоляСписка2.Редактируемый = Истина;
ГруппировкаПоляСписка1.Фокус();
Форма1.Открыть();
ФокусПотерян_Диалог_событие.os
Перем ДФ, Диалог1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Диалог1.СнятьФокус();
КонецПроцедуры
Процедура Диалог1_ФокусПолучен() Экспорт
// Сообщить("Диалог1_ФокусПолучен");
КонецПроцедуры
Процедура Диалог1_ФокусПотерян() Экспорт
// Сообщить("Диалог1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Диалог_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Текст = "Это Диалог1";
Диалог1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Диалог1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Диалог1_ФокусПолучен");
Диалог1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Диалог1_ФокусПотерян");
Диалог1.Редактируемый = Истина;
Диалог2 = ДФ.Диалог();
Диалог2.Родитель = Форма1;
Диалог2.Текст = "Это Диалог2";
Диалог2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Диалог2.Редактируемый = Истина;
Диалог1.Показать();
Диалог2.Показать();
Диалог1.Фокус();
Форма1.Открыть();
ФокусПотерян_ДополнительныйБлок_событие.os
Перем ДФ, ДополнительныйБлок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ДополнительныйБлок1.СнятьФокус();
КонецПроцедуры
Процедура ДополнительныйБлок1_ФокусПолучен() Экспорт
// Сообщить("ДополнительныйБлок1_ФокусПолучен");
КонецПроцедуры
Процедура ДополнительныйБлок1_ФокусПотерян() Экспорт
// Сообщить("ДополнительныйБлок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ДополнительныйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "Это ДополнительныйБлок1";
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ДополнительныйБлок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ДополнительныйБлок1_ФокусПолучен");
ДополнительныйБлок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ДополнительныйБлок1_ФокусПотерян");
ДополнительныйБлок1.Редактируемый = Истина;
ДополнительныйБлок2 = ДФ.ДополнительныйБлок();
ДополнительныйБлок2.Родитель = Форма1;
ДополнительныйБлок2.Текст = "Это ДополнительныйБлок2";
ДополнительныйБлок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ДополнительныйБлок2.Редактируемый = Истина;
ДополнительныйБлок1.Фокус();
Форма1.Открыть();
ФокусПотерян_ЖирныйТекст_событие.os
Перем ДФ, ЖирныйТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ЖирныйТекст1.СнятьФокус();
КонецПроцедуры
Процедура ЖирныйТекст1_ФокусПолучен() Экспорт
// Сообщить("ЖирныйТекст1_ФокусПолучен");
КонецПроцедуры
Процедура ЖирныйТекст1_ФокусПотерян() Экспорт
// Сообщить("ЖирныйТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ЖирныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Текст = "Это ЖирныйТекст1";
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЖирныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЖирныйТекст1_ФокусПолучен");
ЖирныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЖирныйТекст1_ФокусПотерян");
ЖирныйТекст1.Редактируемый = Истина;
ЖирныйТекст2 = ДФ.ЖирныйТекст();
ЖирныйТекст2.Родитель = Форма1;
ЖирныйТекст2.Текст = "Это ЖирныйТекст2";
ЖирныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЖирныйТекст2.Редактируемый = Истина;
ЖирныйТекст1.Фокус();
Форма1.Открыть();
ФокусПотерян_Заголовок1_событие.os
Перем ДФ, Заголовок11, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Заголовок11.СнятьФокус();
КонецПроцедуры
Процедура Заголовок11_ФокусПолучен() Экспорт
// Сообщить("Заголовок11_ФокусПолучен");
КонецПроцедуры
Процедура Заголовок11_ФокусПотерян() Экспорт
// Сообщить("Заголовок11_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Заголовок1_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Текст = "Это Заголовок11";
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок11.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок11_ФокусПолучен");
Заголовок11.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок11_ФокусПотерян");
Заголовок11.Редактируемый = Истина;
Заголовок12 = ДФ.Заголовок1();
Заголовок12.Родитель = Форма1;
Заголовок12.Текст = "Это Заголовок12";
Заголовок12.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок12.Редактируемый = Истина;
Заголовок11.Фокус();
Форма1.Открыть();
ФокусПотерян_Заголовок2_событие.os
Перем ДФ, Заголовок21, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Заголовок21.СнятьФокус();
КонецПроцедуры
Процедура Заголовок21_ФокусПолучен() Экспорт
// Сообщить("Заголовок21_ФокусПолучен");
КонецПроцедуры
Процедура Заголовок21_ФокусПотерян() Экспорт
// Сообщить("Заголовок21_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Заголовок2_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Текст = "Это Заголовок21";
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок21.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок21_ФокусПолучен");
Заголовок21.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок21_ФокусПотерян");
Заголовок21.Редактируемый = Истина;
Заголовок22 = ДФ.Заголовок2();
Заголовок22.Родитель = Форма1;
Заголовок22.Текст = "Это Заголовок22";
Заголовок22.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок22.Редактируемый = Истина;
Заголовок21.Фокус();
Форма1.Открыть();
ФокусПотерян_Заголовок3_событие.os
Перем ДФ, Заголовок31, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Заголовок31.СнятьФокус();
КонецПроцедуры
Процедура Заголовок31_ФокусПолучен() Экспорт
// Сообщить("Заголовок31_ФокусПолучен");
КонецПроцедуры
Процедура Заголовок31_ФокусПотерян() Экспорт
// Сообщить("Заголовок31_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Заголовок3_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Текст = "Это Заголовок31";
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок31.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок31_ФокусПолучен");
Заголовок31.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок31_ФокусПотерян");
Заголовок31.Редактируемый = Истина;
Заголовок32 = ДФ.Заголовок3();
Заголовок32.Родитель = Форма1;
Заголовок32.Текст = "Это Заголовок32";
Заголовок32.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок32.Редактируемый = Истина;
Заголовок31.Фокус();
Форма1.Открыть();
ФокусПотерян_Заголовок4_событие.os
Перем ДФ, Заголовок41, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Заголовок41.СнятьФокус();
КонецПроцедуры
Процедура Заголовок41_ФокусПолучен() Экспорт
// Сообщить("Заголовок41_ФокусПолучен");
КонецПроцедуры
Процедура Заголовок41_ФокусПотерян() Экспорт
// Сообщить("Заголовок41_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Заголовок4_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Текст = "Это Заголовок41";
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок41.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок41_ФокусПолучен");
Заголовок41.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок41_ФокусПотерян");
Заголовок41.Редактируемый = Истина;
Заголовок42 = ДФ.Заголовок4();
Заголовок42.Родитель = Форма1;
Заголовок42.Текст = "Это Заголовок42";
Заголовок42.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок42.Редактируемый = Истина;
Заголовок41.Фокус();
Форма1.Открыть();
ФокусПотерян_Заголовок5_событие.os
Перем ДФ, Заголовок51, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Заголовок51.СнятьФокус();
КонецПроцедуры
Процедура Заголовок51_ФокусПолучен() Экспорт
// Сообщить("Заголовок51_ФокусПолучен");
КонецПроцедуры
Процедура Заголовок51_ФокусПотерян() Экспорт
// Сообщить("Заголовок51_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Заголовок5_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Текст = "Это Заголовок51";
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок51.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок51_ФокусПолучен");
Заголовок51.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок51_ФокусПотерян");
Заголовок51.Редактируемый = Истина;
Заголовок52 = ДФ.Заголовок5();
Заголовок52.Родитель = Форма1;
Заголовок52.Текст = "Это Заголовок52";
Заголовок52.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок52.Редактируемый = Истина;
Заголовок51.Фокус();
Форма1.Открыть();
ФокусПотерян_Заголовок6_событие.os
Перем ДФ, Заголовок61, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Заголовок61.СнятьФокус();
КонецПроцедуры
Процедура Заголовок61_ФокусПолучен() Экспорт
// Сообщить("Заголовок61_ФокусПолучен");
КонецПроцедуры
Процедура Заголовок61_ФокусПотерян() Экспорт
// Сообщить("Заголовок61_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Заголовок6_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Текст = "Это Заголовок61";
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок61.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок61_ФокусПолучен");
Заголовок61.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок61_ФокусПотерян");
Заголовок61.Редактируемый = Истина;
Заголовок62 = ДФ.Заголовок6();
Заголовок62.Родитель = Форма1;
Заголовок62.Текст = "Это Заголовок62";
Заголовок62.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок62.Редактируемый = Истина;
Заголовок61.Фокус();
Форма1.Открыть();
ФокусПотерян_Заголовок_событие.os
Перем ДФ, Заголовок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Заголовок1.СнятьФокус();
КонецПроцедуры
Процедура Заголовок1_ФокусПолучен() Экспорт
// Сообщить("Заголовок1_ФокусПолучен");
КонецПроцедуры
Процедура Заголовок1_ФокусПотерян() Экспорт
// Сообщить("Заголовок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Заголовок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Текст = "Это Заголовок1";
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Заголовок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Заголовок1_ФокусПолучен");
Заголовок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Заголовок1_ФокусПотерян");
Заголовок1.Редактируемый = Истина;
Заголовок2 = ДФ.Заголовок();
Заголовок2.Родитель = Форма1;
Заголовок2.Текст = "Это Заголовок2";
Заголовок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Заголовок2.Редактируемый = Истина;
Заголовок1.Фокус();
Форма1.Открыть();
ФокусПотерян_ЗаголовокГруппы_событие.os
Перем ДФ, ЗаголовокГруппы1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ЗаголовокГруппы1.СнятьФокус();
КонецПроцедуры
Процедура ЗаголовокГруппы1_ФокусПолучен() Экспорт
// Сообщить("ЗаголовокГруппы1_ФокусПолучен");
КонецПроцедуры
Процедура ЗаголовокГруппы1_ФокусПотерян() Экспорт
// Сообщить("ЗаголовокГруппы1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ЗаголовокГруппы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Текст = "Это ЗаголовокГруппы1";
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЗаголовокГруппы1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЗаголовокГруппы1_ФокусПолучен");
ЗаголовокГруппы1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЗаголовокГруппы1_ФокусПотерян");
ЗаголовокГруппы1.Редактируемый = Истина;
ЗаголовокГруппы2 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы2.Родитель = Форма1;
ЗаголовокГруппы2.Текст = "Это ЗаголовокГруппы2";
ЗаголовокГруппы2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЗаголовокГруппы2.Редактируемый = Истина;
ЗаголовокГруппы1.Фокус();
Форма1.Открыть();
ФокусПотерян_ЗаголовокРаскрываемогоБлока_событие.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ЗаголовокРаскрываемогоБлока1.СнятьФокус();
КонецПроцедуры
Процедура ЗаголовокРаскрываемогоБлока1_ФокусПолучен() Экспорт
// Сообщить("ЗаголовокРаскрываемогоБлока1_ФокусПолучен");
КонецПроцедуры
Процедура ЗаголовокРаскрываемогоБлока1_ФокусПотерян() Экспорт
// Сообщить("ЗаголовокРаскрываемогоБлока1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ЗаголовокРаскрываемогоБлока_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Текст = "Это ЗаголовокРаскрываемогоБлока1";
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЗаголовокРаскрываемогоБлока1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЗаголовокРаскрываемогоБлока1_ФокусПолучен");
ЗаголовокРаскрываемогоБлока1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЗаголовокРаскрываемогоБлока1_ФокусПотерян");
ЗаголовокРаскрываемогоБлока1.Редактируемый = Истина;
ЗаголовокРаскрываемогоБлока2 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока2.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока2.Текст = "Это ЗаголовокРаскрываемогоБлока2";
ЗаголовокРаскрываемогоБлока2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЗаголовокРаскрываемогоБлока2.Редактируемый = Истина;
ЗаголовокРаскрываемогоБлока1.Фокус();
Форма1.Открыть();
ФокусПотерян_Изображение_событие.os
Перем ДФ, Изображение1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Изображение1.СнятьФокус();
КонецПроцедуры
Процедура Изображение1_ФокусПолучен() Экспорт
// Сообщить("Изображение1_ФокусПолучен");
КонецПроцедуры
Процедура Изображение1_ФокусПотерян() Экспорт
// Сообщить("Изображение1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Изображение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Изображение1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Изображение1_ФокусПолучен");
Изображение1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Изображение1_ФокусПотерян");
Изображение1.Редактируемый = Истина;
Изображение2 = ДФ.Изображение();
Изображение2.Родитель = Форма1;
Изображение2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Изображение2.Редактируемый = Истина;
Изображение1.Фокус();
Форма1.Открыть();
ФокусПотерян_Индикатор_событие.os
Перем ДФ, Индикатор1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Индикатор1.СнятьФокус();
КонецПроцедуры
Процедура Индикатор1_ФокусПолучен() Экспорт
// Сообщить("Индикатор1_ФокусПолучен");
КонецПроцедуры
Процедура Индикатор1_ФокусПотерян() Экспорт
// Сообщить("Индикатор1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Индикатор_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Индикатор1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Индикатор1_ФокусПолучен");
Индикатор1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Индикатор1_ФокусПотерян");
Индикатор1.Редактируемый = Истина;
Индикатор2 = ДФ.Индикатор();
Индикатор2.Родитель = Форма1;
Индикатор2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Индикатор2.Редактируемый = Истина;
Индикатор1.Фокус();
Форма1.Открыть();
ФокусПотерян_Итоги_событие.os
Перем ДФ, Итоги1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Итоги1.СнятьФокус();
КонецПроцедуры
Процедура Итоги1_ФокусПолучен() Экспорт
// Сообщить("Итоги1_ФокусПолучен");
КонецПроцедуры
Процедура Итоги1_ФокусПотерян() Экспорт
// Сообщить("Итоги1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Итоги_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Текст = "Это Итоги1";
Итоги1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Итоги1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Итоги1_ФокусПолучен");
Итоги1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Итоги1_ФокусПотерян");
Итоги1.Редактируемый = Истина;
Итоги2 = ДФ.Итоги();
Итоги2.Родитель = Форма1;
Итоги2.Текст = "Это Итоги2";
Итоги2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Итоги2.Редактируемый = Истина;
Итоги1.Фокус();
Форма1.Открыть();
ФокусПотерян_Кнопка_событие.os
Перем ДФ, Кнопка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Кнопка1.СнятьФокус();
КонецПроцедуры
Процедура Кнопка1_ФокусПолучен() Экспорт
// Сообщить("Кнопка1_ФокусПолучен");
КонецПроцедуры
Процедура Кнопка1_ФокусПотерян() Экспорт
// Сообщить("Кнопка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Кнопка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Кнопка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Кнопка1_ФокусПолучен");
Кнопка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Кнопка1_ФокусПотерян");
Кнопка1.Редактируемый = Истина;
Кнопка2 = ДФ.Кнопка();
Кнопка2.Родитель = Форма1;
Кнопка2.Текст = "Это Кнопка2";
Кнопка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Кнопка2.Редактируемый = Истина;
Кнопка1.Фокус();
Форма1.Открыть();
ФокусПотерян_Код_событие.os
Перем ДФ, Код1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Код1.СнятьФокус();
КонецПроцедуры
Процедура Код1_ФокусПолучен() Экспорт
// Сообщить("Код1_ФокусПолучен");
КонецПроцедуры
Процедура Код1_ФокусПотерян() Экспорт
// Сообщить("Код1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Код_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Текст = "Это Код1";
Код1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Код1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Код1_ФокусПолучен");
Код1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Код1_ФокусПотерян");
Код1.Редактируемый = Истина;
Код2 = ДФ.Код();
Код2.Родитель = Форма1;
Код2.Текст = "Это Код2";
Код2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Код2.Редактируемый = Истина;
Код1.Фокус();
Форма1.Открыть();
ФокусПотерян_Колонка_событие.os
Перем ДФ, Колонка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Колонка1.СнятьФокус();
КонецПроцедуры
Процедура Колонка1_ФокусПолучен() Экспорт
// Сообщить("Колонка1_ФокусПолучен");
КонецПроцедуры
Процедура Колонка1_ФокусПотерян() Экспорт
// Сообщить("Колонка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Колонка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = Форма1;
Колонка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Колонка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Колонка1_ФокусПолучен");
Колонка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Колонка1_ФокусПотерян");
Колонка1.Редактируемый = Истина;
Колонка2 = ДФ.Колонка();
Колонка2.Родитель = Форма1;
Колонка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Колонка2.Редактируемый = Истина;
Колонка1.Фокус();
Форма1.Открыть();
ФокусПотерян_Колонтитул_событие.os
Перем ДФ, Колонтитул1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Колонтитул1.СнятьФокус();
КонецПроцедуры
Процедура Колонтитул1_ФокусПолучен() Экспорт
// Сообщить("Колонтитул1_ФокусПолучен");
КонецПроцедуры
Процедура Колонтитул1_ФокусПотерян() Экспорт
// Сообщить("Колонтитул1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Колонтитул_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Текст = "Это Колонтитул1";
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Колонтитул1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Колонтитул1_ФокусПолучен");
Колонтитул1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Колонтитул1_ФокусПотерян");
Колонтитул1.Редактируемый = Истина;
Колонтитул2 = ДФ.Колонтитул();
Колонтитул2.Родитель = Форма1;
Колонтитул2.Текст = "Это Колонтитул2";
Колонтитул2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Колонтитул2.Редактируемый = Истина;
Колонтитул1.Фокус();
Форма1.Открыть();
ФокусПотерян_КурсивТекст_событие.os
Перем ДФ, КурсивТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
КурсивТекст1.СнятьФокус();
КонецПроцедуры
Процедура КурсивТекст1_ФокусПолучен() Экспорт
// Сообщить("КурсивТекст1_ФокусПолучен");
КонецПроцедуры
Процедура КурсивТекст1_ФокусПотерян() Экспорт
// Сообщить("КурсивТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_КурсивТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Текст = "Это КурсивТекст1";
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
КурсивТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "КурсивТекст1_ФокусПолучен");
КурсивТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "КурсивТекст1_ФокусПотерян");
КурсивТекст1.Редактируемый = Истина;
КурсивТекст2 = ДФ.КурсивТекст();
КурсивТекст2.Родитель = Форма1;
КурсивТекст2.Текст = "Это КурсивТекст2";
КурсивТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
КурсивТекст2.Редактируемый = Истина;
КурсивТекст1.Фокус();
Форма1.Открыть();
ФокусПотерян_МаркированныйТекст_событие.os
Перем ДФ, МаркированныйТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
МаркированныйТекст1.СнятьФокус();
КонецПроцедуры
Процедура МаркированныйТекст1_ФокусПолучен() Экспорт
// Сообщить("МаркированныйТекст1_ФокусПолучен");
КонецПроцедуры
Процедура МаркированныйТекст1_ФокусПотерян() Экспорт
// Сообщить("МаркированныйТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_МаркированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Текст = "Это МаркированныйТекст1";
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
МаркированныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "МаркированныйТекст1_ФокусПолучен");
МаркированныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "МаркированныйТекст1_ФокусПотерян");
МаркированныйТекст1.Редактируемый = Истина;
МаркированныйТекст2 = ДФ.МаркированныйТекст();
МаркированныйТекст2.Родитель = Форма1;
МаркированныйТекст2.Текст = "Это МаркированныйТекст2";
МаркированныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
МаркированныйТекст2.Редактируемый = Истина;
МаркированныйТекст1.Фокус();
Форма1.Открыть();
ФокусПотерян_МедиаГруппа_событие.os
Перем ДФ, МедиаГруппа1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
МедиаГруппа1.СнятьФокус();
КонецПроцедуры
Процедура МедиаГруппа1_ФокусПолучен() Экспорт
// Сообщить("МедиаГруппа1_ФокусПолучен");
КонецПроцедуры
Процедура МедиаГруппа1_ФокусПотерян() Экспорт
// Сообщить("МедиаГруппа1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_МедиаГруппа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Текст = "Это МедиаГруппа1";
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.Красный;
МедиаГруппа1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "МедиаГруппа1_ФокусПолучен");
МедиаГруппа1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "МедиаГруппа1_ФокусПотерян");
МедиаГруппа1.Редактируемый = Истина;
МедиаГруппа2 = ДФ.МедиаГруппа();
МедиаГруппа2.Родитель = Форма1;
МедиаГруппа2.Текст = "Это МедиаГруппа2";
МедиаГруппа2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
МедиаГруппа2.Редактируемый = Истина;
МедиаГруппа1.Фокус();
Форма1.Открыть();
ФокусПотерян_МелкийТекст_событие.os
Перем ДФ, МелкийТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
МелкийТекст1.СнятьФокус();
КонецПроцедуры
Процедура МелкийТекст1_ФокусПолучен() Экспорт
// Сообщить("МелкийТекст1_ФокусПолучен");
КонецПроцедуры
Процедура МелкийТекст1_ФокусПотерян() Экспорт
// Сообщить("МелкийТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_МелкийТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Текст = "Это МелкийТекст1";
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
МелкийТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "МелкийТекст1_ФокусПолучен");
МелкийТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "МелкийТекст1_ФокусПотерян");
МелкийТекст1.Редактируемый = Истина;
МелкийТекст2 = ДФ.МелкийТекст();
МелкийТекст2.Родитель = Форма1;
МелкийТекст2.Текст = "Это МелкийТекст2";
МелкийТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
МелкийТекст2.Редактируемый = Истина;
МелкийТекст1.Фокус();
Форма1.Открыть();
ФокусПотерян_НадстрочныйТекст_событие.os
Перем ДФ, НадстрочныйТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
НадстрочныйТекст1.СнятьФокус();
КонецПроцедуры
Процедура НадстрочныйТекст1_ФокусПолучен() Экспорт
// Сообщить("НадстрочныйТекст1_ФокусПолучен");
КонецПроцедуры
Процедура НадстрочныйТекст1_ФокусПотерян() Экспорт
// Сообщить("НадстрочныйТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_НадстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Текст = "Это НадстрочныйТекст1";
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НадстрочныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "НадстрочныйТекст1_ФокусПолучен");
НадстрочныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "НадстрочныйТекст1_ФокусПотерян");
НадстрочныйТекст1.Редактируемый = Истина;
НадстрочныйТекст2 = ДФ.НадстрочныйТекст();
НадстрочныйТекст2.Родитель = Форма1;
НадстрочныйТекст2.Текст = "Это НадстрочныйТекст2";
НадстрочныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
НадстрочныйТекст2.Редактируемый = Истина;
НадстрочныйТекст1.Фокус();
Форма1.Открыть();
ФокусПотерян_НаправленныйТекст_событие.os
Перем ДФ, НаправленныйТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
НаправленныйТекст1.СнятьФокус();
КонецПроцедуры
Процедура НаправленныйТекст1_ФокусПолучен() Экспорт
// Сообщить("НаправленныйТекст1_ФокусПолучен");
КонецПроцедуры
Процедура НаправленныйТекст1_ФокусПотерян() Экспорт
// Сообщить("НаправленныйТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_НаправленныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Текст = "Это НаправленныйТекст1";
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НаправленныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "НаправленныйТекст1_ФокусПолучен");
НаправленныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "НаправленныйТекст1_ФокусПотерян");
НаправленныйТекст1.Редактируемый = Истина;
НаправленныйТекст2 = ДФ.НаправленныйТекст();
НаправленныйТекст2.Родитель = Форма1;
НаправленныйТекст2.Текст = "Это НаправленныйТекст2";
НаправленныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
НаправленныйТекст2.Редактируемый = Истина;
НаправленныйТекст1.Фокус();
Форма1.Открыть();
ФокусПотерян_НеупорядоченныйСписок_событие.os
Перем ДФ, НеупорядоченныйСписок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
НеупорядоченныйСписок1.СнятьФокус();
КонецПроцедуры
Процедура НеупорядоченныйСписок1_ФокусПолучен() Экспорт
// Сообщить("НеупорядоченныйСписок1_ФокусПолучен");
КонецПроцедуры
Процедура НеупорядоченныйСписок1_ФокусПотерян() Экспорт
// Сообщить("НеупорядоченныйСписок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_НеупорядоченныйСписок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Текст = "Это НеупорядоченныйСписок1";
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НеупорядоченныйСписок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "НеупорядоченныйСписок1_ФокусПолучен");
НеупорядоченныйСписок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "НеупорядоченныйСписок1_ФокусПотерян");
НеупорядоченныйСписок1.Редактируемый = Истина;
НеупорядоченныйСписок2 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок2.Родитель = Форма1;
НеупорядоченныйСписок2.Текст = "Это НеупорядоченныйСписок2";
НеупорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
НеупорядоченныйСписок2.Редактируемый = Истина;
НеупорядоченныйСписок1.Фокус();
Форма1.Открыть();
ФокусПотерян_НижнийКолонтитул_событие.os
Перем ДФ, НижнийКолонтитул1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
НижнийКолонтитул1.СнятьФокус();
КонецПроцедуры
Процедура НижнийКолонтитул1_ФокусПолучен() Экспорт
// Сообщить("НижнийКолонтитул1_ФокусПолучен");
КонецПроцедуры
Процедура НижнийКолонтитул1_ФокусПотерян() Экспорт
// Сообщить("НижнийКолонтитул1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_НижнийКолонтитул_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Текст = "Это НижнийКолонтитул1";
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.Красный;
НижнийКолонтитул1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "НижнийКолонтитул1_ФокусПолучен");
НижнийКолонтитул1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "НижнийКолонтитул1_ФокусПотерян");
НижнийКолонтитул1.Редактируемый = Истина;
НижнийКолонтитул2 = ДФ.НижнийКолонтитул();
НижнийКолонтитул2.Родитель = Форма1;
НижнийКолонтитул2.Текст = "Это НижнийКолонтитул2";
НижнийКолонтитул2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
НижнийКолонтитул2.Редактируемый = Истина;
НижнийКолонтитул1.Фокус();
Форма1.Открыть();
ФокусПотерян_ОбластьТаблицы_событие.os
Перем ДФ, ОбластьТаблицы1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ОбластьТаблицы1.СнятьФокус();
КонецПроцедуры
Процедура ОбластьТаблицы1_ФокусПолучен() Экспорт
// Сообщить("ОбластьТаблицы1_ФокусПолучен");
КонецПроцедуры
Процедура ОбластьТаблицы1_ФокусПотерян() Экспорт
// Сообщить("ОбластьТаблицы1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ОбластьТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Текст = "Это ОбластьТаблицы1";
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОбластьТаблицы1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ОбластьТаблицы1_ФокусПолучен");
ОбластьТаблицы1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ОбластьТаблицы1_ФокусПотерян");
ОбластьТаблицы1.Редактируемый = Истина;
ОбластьТаблицы2 = ДФ.ОбластьТаблицы();
ОбластьТаблицы2.Родитель = Форма1;
ОбластьТаблицы2.Текст = "Это ОбластьТаблицы2";
ОбластьТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ОбластьТаблицы2.Редактируемый = Истина;
ОбластьТаблицы1.Фокус();
Форма1.Открыть();
ФокусПотерян_ОбластьТекста_событие.os
Перем ДФ, ОбластьТекста1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ОбластьТекста1.СнятьФокус();
КонецПроцедуры
Процедура ОбластьТекста1_ФокусПолучен() Экспорт
// Сообщить("ОбластьТекста1_ФокусПолучен");
КонецПроцедуры
Процедура ОбластьТекста1_ФокусПотерян() Экспорт
// Сообщить("ОбластьТекста1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ОбластьТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОбластьТекста1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_ФокусПолучен");
ОбластьТекста1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ОбластьТекста1_ФокусПотерян");
ОбластьТекста1.Редактируемый = Истина;
ОбластьТекста2 = ДФ.ОбластьТекста();
ОбластьТекста2.Родитель = Форма1;
ОбластьТекста2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ОбластьТекста2.Редактируемый = Истина;
ОбластьТекста1.Фокус();
Форма1.Открыть();
ФокусПотерян_ОписаниеМедиа_событие.os
Перем ДФ, ОписаниеМедиа1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ОписаниеМедиа1.СнятьФокус();
КонецПроцедуры
Процедура ОписаниеМедиа1_ФокусПолучен() Экспорт
// Сообщить("ОписаниеМедиа1_ФокусПолучен");
КонецПроцедуры
Процедура ОписаниеМедиа1_ФокусПотерян() Экспорт
// Сообщить("ОписаниеМедиа1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ОписаниеМедиа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Текст = "Это ОписаниеМедиа1";
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ОписаниеМедиа1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ОписаниеМедиа1_ФокусПолучен");
ОписаниеМедиа1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ОписаниеМедиа1_ФокусПотерян");
ОписаниеМедиа1.Редактируемый = Истина;
ОписаниеМедиа2 = ДФ.ОписаниеМедиа();
ОписаниеМедиа2.Родитель = Форма1;
ОписаниеМедиа2.Текст = "Это ОписаниеМедиа2";
ОписаниеМедиа2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ОписаниеМедиа2.Редактируемый = Истина;
ОписаниеМедиа1.Фокус();
Форма1.Открыть();
ФокусПотерян_Определение_событие.os
Перем ДФ, Определение1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Определение1.СнятьФокус();
КонецПроцедуры
Процедура Определение1_ФокусПолучен() Экспорт
// Сообщить("Определение1_ФокусПолучен");
КонецПроцедуры
Процедура Определение1_ФокусПотерян() Экспорт
// Сообщить("Определение1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Определение_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Текст = "Это Определение1";
Определение1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Определение1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Определение1_ФокусПолучен");
Определение1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Определение1_ФокусПотерян");
Определение1.Редактируемый = Истина;
Определение2 = ДФ.Определение();
Определение2.Родитель = Форма1;
Определение2.Текст = "Это Определение2";
Определение2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Определение2.Редактируемый = Истина;
Определение1.Фокус();
Форма1.Открыть();
ФокусПотерян_Переключатель_событие.os
Перем ДФ, Переключатель1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Переключатель1.СнятьФокус();
КонецПроцедуры
Процедура Переключатель1_ФокусПолучен() Экспорт
// Сообщить("Переключатель1_ФокусПолучен");
КонецПроцедуры
Процедура Переключатель1_ФокусПотерян() Экспорт
// Сообщить("Переключатель1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Переключатель_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Переключатель1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Переключатель1_ФокусПолучен");
Переключатель1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Переключатель1_ФокусПотерян");
Переключатель1.Редактируемый = Истина;
Переключатель2 = ДФ.Переключатель();
Переключатель2.Родитель = Форма1;
Переключатель2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Переключатель2.Редактируемый = Истина;
Переключатель1.Фокус();
Форма1.Открыть();
ФокусПотерян_Перенос_событие.os
Перем ДФ, Перенос1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Перенос1.СнятьФокус();
КонецПроцедуры
Процедура Перенос1_ФокусПолучен() Экспорт
// Сообщить("Перенос1_ФокусПолучен");
КонецПроцедуры
Процедура Перенос1_ФокусПотерян() Экспорт
// Сообщить("Перенос1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Перенос_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Перенос1 = ДФ.Перенос();
Перенос1.Родитель = Форма1;
Перенос1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Перенос1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Перенос1_ФокусПолучен");
Перенос1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Перенос1_ФокусПотерян");
Перенос1.Редактируемый = Истина;
Перенос2 = ДФ.Перенос();
Перенос2.Родитель = Форма1;
Перенос2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Перенос2.Редактируемый = Истина;
Перенос1.Фокус();
Форма1.Открыть();
ФокусПотерян_Подпись_событие.os
Перем ДФ, Подпись1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Подпись1.СнятьФокус();
КонецПроцедуры
Процедура Подпись1_ФокусПолучен() Экспорт
// Сообщить("Подпись1_ФокусПолучен");
КонецПроцедуры
Процедура Подпись1_ФокусПотерян() Экспорт
// Сообщить("Подпись1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Подпись_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Это Подпись1";
Подпись1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Подпись1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Подпись1_ФокусПолучен");
Подпись1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Подпись1_ФокусПотерян");
Подпись1.Редактируемый = Истина;
Подпись2 = ДФ.Подпись();
Подпись2.Родитель = Форма1;
Подпись2.Текст = "Это Подпись2";
Подпись2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Подпись2.Редактируемый = Истина;
Подпись1.Фокус();
Форма1.Открыть();
ФокусПотерян_ПодстрочныйТекст_событие.os
Перем ДФ, ПодстрочныйТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ПодстрочныйТекст1.СнятьФокус();
КонецПроцедуры
Процедура ПодстрочныйТекст1_ФокусПолучен() Экспорт
// Сообщить("ПодстрочныйТекст1_ФокусПолучен");
КонецПроцедуры
Процедура ПодстрочныйТекст1_ФокусПотерян() Экспорт
// Сообщить("ПодстрочныйТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ПодстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Текст = "Это ПодстрочныйТекст1";
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПодстрочныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПодстрочныйТекст1_ФокусПолучен");
ПодстрочныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПодстрочныйТекст1_ФокусПотерян");
ПодстрочныйТекст1.Редактируемый = Истина;
ПодстрочныйТекст2 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст2.Родитель = Форма1;
ПодстрочныйТекст2.Текст = "Это ПодстрочныйТекст2";
ПодстрочныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПодстрочныйТекст2.Редактируемый = Истина;
ПодстрочныйТекст1.Фокус();
Форма1.Открыть();
ФокусПотерян_ПодчеркнутыйТекст_событие.os
Перем ДФ, ПодчеркнутыйТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ПодчеркнутыйТекст1.СнятьФокус();
КонецПроцедуры
Процедура ПодчеркнутыйТекст1_ФокусПолучен() Экспорт
// Сообщить("ПодчеркнутыйТекст1_ФокусПолучен");
КонецПроцедуры
Процедура ПодчеркнутыйТекст1_ФокусПотерян() Экспорт
// Сообщить("ПодчеркнутыйТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ПодчеркнутыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Текст = "Это ПодчеркнутыйТекст1";
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПодчеркнутыйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПодчеркнутыйТекст1_ФокусПолучен");
ПодчеркнутыйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПодчеркнутыйТекст1_ФокусПотерян");
ПодчеркнутыйТекст1.Редактируемый = Истина;
ПодчеркнутыйТекст2 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст2.Родитель = Форма1;
ПодчеркнутыйТекст2.Текст = "Это ПодчеркнутыйТекст2";
ПодчеркнутыйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПодчеркнутыйТекст2.Редактируемый = Истина;
ПодчеркнутыйТекст1.Фокус();
Форма1.Открыть();
ФокусПотерян_ПолеПароля_событие.os
Перем ДФ, ПолеПароля1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ПолеПароля1.СнятьФокус();
КонецПроцедуры
Процедура ПолеПароля1_ФокусПолучен() Экспорт
// Сообщить("ПолеПароля1_ФокусПолучен");
КонецПроцедуры
Процедура ПолеПароля1_ФокусПотерян() Экспорт
// Сообщить("ПолеПароля1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ПолеПароля_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеПароля1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_ФокусПолучен");
ПолеПароля1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеПароля1_ФокусПотерян");
ПолеПароля1.Редактируемый = Истина;
ПолеПароля2 = ДФ.ПолеПароля();
ПолеПароля2.Родитель = Форма1;
ПолеПароля2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеПароля2.Редактируемый = Истина;
ПолеПароля1.Фокус();
Форма1.Открыть();
ФокусПотерян_ПолеПоиска_событие.os
Перем ДФ, ПолеПоиска1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ПолеПоиска1.СнятьФокус();
КонецПроцедуры
Процедура ПолеПоиска1_ФокусПолучен() Экспорт
// Сообщить("ПолеПоиска1_ФокусПолучен");
КонецПроцедуры
Процедура ПолеПоиска1_ФокусПотерян() Экспорт
// Сообщить("ПолеПоиска1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ПолеПоиска_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеПоиска1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_ФокусПолучен");
ПолеПоиска1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеПоиска1_ФокусПотерян");
ПолеПоиска1.Редактируемый = Истина;
ПолеПоиска2 = ДФ.ПолеПоиска();
ПолеПоиска2.Родитель = Форма1;
ПолеПоиска2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеПоиска2.Редактируемый = Истина;
ПолеПоиска1.Фокус();
Форма1.Открыть();
ФокусПотерян_ПолеСписка_событие.os
Перем ДФ, ПолеСписка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ПолеСписка1.СнятьФокус();
КонецПроцедуры
Процедура ПолеСписка1_ФокусПолучен() Экспорт
// Сообщить("ПолеСписка1_ФокусПолучен");
КонецПроцедуры
Процедура ПолеСписка1_ФокусПотерян() Экспорт
// Сообщить("ПолеСписка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ПолеСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеСписка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеСписка1_ФокусПолучен");
ПолеСписка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеСписка1_ФокусПотерян");
ПолеСписка1.Редактируемый = Истина;
ПолеСписка2 = ДФ.ПолеСписка();
ПолеСписка2.Родитель = Форма1;
ПолеСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеСписка2.Редактируемый = Истина;
ПолеСписка1.Фокус();
Форма1.Открыть();
ФокусПотерян_ПолеТекста_событие.os
Перем ДФ, ПолеТекста1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ПолеТекста1.СнятьФокус();
КонецПроцедуры
Процедура ПолеТекста1_ФокусПолучен() Экспорт
// Сообщить("ПолеТекста1_ФокусПолучен");
КонецПроцедуры
Процедура ПолеТекста1_ФокусПотерян() Экспорт
// Сообщить("ПолеТекста1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ПолеТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеТекста1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_ФокусПолучен");
ПолеТекста1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеТекста1_ФокусПотерян");
ПолеТекста2 = ДФ.ПолеТекста();
ПолеТекста2.Родитель = Форма1;
ПолеТекста2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеТекста1.Фокус();
Форма1.Открыть();
ФокусПотерян_ПолеЧисла_событие.os
Перем ДФ, ПолеЧисла1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ПолеЧисла1.СнятьФокус();
КонецПроцедуры
Процедура ПолеЧисла1_ФокусПолучен() Экспорт
// Сообщить("ПолеЧисла1_ФокусПолучен");
КонецПроцедуры
Процедура ПолеЧисла1_ФокусПотерян() Экспорт
// Сообщить("ПолеЧисла1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ПолеЧисла_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ПолеЧисла1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_ФокусПолучен");
ПолеЧисла1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ПолеЧисла1_ФокусПотерян");
ПолеЧисла1.Редактируемый = Истина;
ПолеЧисла2 = ДФ.ПолеЧисла();
ПолеЧисла2.Родитель = Форма1;
ПолеЧисла2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ПолеЧисла2.Редактируемый = Истина;
ПолеЧисла1.Фокус();
Форма1.Открыть();
ФокусПотерян_Ползунок_событие.os
Перем ДФ, Ползунок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Ползунок1.СнятьФокус();
КонецПроцедуры
Процедура Ползунок1_ФокусПолучен() Экспорт
// Сообщить("Ползунок1_ФокусПолучен");
КонецПроцедуры
Процедура Ползунок1_ФокусПотерян() Экспорт
// Сообщить("Ползунок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Ползунок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ползунок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Ползунок1_ФокусПолучен");
Ползунок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Ползунок1_ФокусПотерян");
Ползунок1.Редактируемый = Истина;
Ползунок2 = ДФ.Ползунок();
Ползунок2.Родитель = Форма1;
Ползунок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Ползунок2.Редактируемый = Истина;
Ползунок1.Фокус();
Форма1.Открыть();
ФокусПотерян_РаскрываемыйБлок_событие.os
Перем ДФ, РаскрываемыйБлок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
РаскрываемыйБлок1.СнятьФокус();
КонецПроцедуры
Процедура РаскрываемыйБлок1_ФокусПолучен() Экспорт
// Сообщить("РаскрываемыйБлок1_ФокусПолучен");
КонецПроцедуры
Процедура РаскрываемыйБлок1_ФокусПотерян() Экспорт
// Сообщить("РаскрываемыйБлок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_РаскрываемыйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
РаскрываемыйБлок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "РаскрываемыйБлок1_ФокусПолучен");
РаскрываемыйБлок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "РаскрываемыйБлок1_ФокусПотерян");
РаскрываемыйБлок1.Редактируемый = Истина;
РаскрываемыйБлок2 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок2.Родитель = Форма1;
РаскрываемыйБлок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
РаскрываемыйБлок2.Редактируемый = Истина;
РаскрываемыйБлок1.Фокус();
Форма1.Открыть();
ФокусПотерян_Результат_событие.os
Перем ДФ, Результат1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Результат1.СнятьФокус();
КонецПроцедуры
Процедура Результат1_ФокусПолучен() Экспорт
// Сообщить("Результат1_ФокусПолучен");
КонецПроцедуры
Процедура Результат1_ФокусПотерян() Экспорт
// Сообщить("Результат1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Результат_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Текст = "Это Результат1";
Результат1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Результат1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Результат1_ФокусПолучен");
Результат1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Результат1_ФокусПотерян");
Результат1.Редактируемый = Истина;
Результат2 = ДФ.Результат();
Результат2.Родитель = Форма1;
Результат2.Текст = "Это Результат2";
Результат2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Результат2.Редактируемый = Истина;
Результат1.Фокус();
Форма1.Открыть();
ФокусПотерян_СписокОпределений_событие.os
Перем ДФ, СписокОпределений1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
СписокОпределений1.СнятьФокус();
КонецПроцедуры
Процедура СписокОпределений1_ФокусПолучен() Экспорт
// Сообщить("СписокОпределений1_ФокусПолучен");
КонецПроцедуры
Процедура СписокОпределений1_ФокусПотерян() Экспорт
// Сообщить("СписокОпределений1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_СписокОпределений_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Текст = "Это СписокОпределений1";
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.Красный;
СписокОпределений1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "СписокОпределений1_ФокусПолучен");
СписокОпределений1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "СписокОпределений1_ФокусПотерян");
СписокОпределений1.Редактируемый = Истина;
СписокОпределений2 = ДФ.СписокОпределений();
СписокОпределений2.Родитель = Форма1;
СписокОпределений2.Текст = "Это СписокОпределений2";
СписокОпределений2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
СписокОпределений2.Редактируемый = Истина;
СписокОпределений1.Фокус();
Форма1.Открыть();
ФокусПотерян_Ссылка_событие.os
Перем ДФ, Ссылка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Ссылка1.СнятьФокус();
КонецПроцедуры
Процедура Ссылка1_ФокусПолучен() Экспорт
// Сообщить("Ссылка1_ФокусПолучен");
КонецПроцедуры
Процедура Ссылка1_ФокусПотерян() Экспорт
// Сообщить("Ссылка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Ссылка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Текст = "Это Ссылка1";
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ссылка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Ссылка1_ФокусПолучен");
Ссылка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Ссылка1_ФокусПотерян");
Ссылка1.Редактируемый = Истина;
Ссылка2 = ДФ.Ссылка();
Ссылка2.Родитель = Форма1;
Ссылка2.Текст = "Это Ссылка2";
Ссылка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Ссылка2.Редактируемый = Истина;
Ссылка1.Фокус();
Форма1.Открыть();
ФокусПотерян_СтрокаТаблицы_событие.os
Перем ДФ, СтрокаТаблицы1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
СтрокаТаблицы1.СнятьФокус();
КонецПроцедуры
Процедура СтрокаТаблицы1_ФокусПолучен() Экспорт
// Сообщить("СтрокаТаблицы1_ФокусПолучен");
КонецПроцедуры
Процедура СтрокаТаблицы1_ФокусПотерян() Экспорт
// Сообщить("СтрокаТаблицы1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_СтрокаТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Текст = "Это СтрокаТаблицы1";
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Красный;
СтрокаТаблицы1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "СтрокаТаблицы1_ФокусПолучен");
СтрокаТаблицы1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "СтрокаТаблицы1_ФокусПотерян");
СтрокаТаблицы1.Редактируемый = Истина;
СтрокаТаблицы2 = ДФ.СтрокаТаблицы();
СтрокаТаблицы2.Родитель = Форма1;
СтрокаТаблицы2.Текст = "Это СтрокаТаблицы2";
СтрокаТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
СтрокаТаблицы2.Редактируемый = Истина;
СтрокаТаблицы1.Фокус();
Форма1.Открыть();
ФокусПотерян_Таблица_событие.os
Перем ДФ, Таблица1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Таблица1.СнятьФокус();
КонецПроцедуры
Процедура Таблица1_ФокусПолучен() Экспорт
// Сообщить("Таблица1_ФокусПолучен");
КонецПроцедуры
Процедура Таблица1_ФокусПотерян() Экспорт
// Сообщить("Таблица1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Таблица_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Текст = "Это Таблица1";
Таблица1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Таблица1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Таблица1_ФокусПолучен");
Таблица1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Таблица1_ФокусПотерян");
Таблица1.Редактируемый = Истина;
Таблица2 = ДФ.Таблица();
Таблица2.Родитель = Форма1;
Таблица2.Текст = "Это Таблица2";
Таблица2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Таблица2.Редактируемый = Истина;
Таблица1.Фокус();
Форма1.Открыть();
ФокусПотерян_Термин_событие.os
Перем ДФ, Термин1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Термин1.СнятьФокус();
КонецПроцедуры
Процедура Термин1_ФокусПолучен() Экспорт
// Сообщить("Термин1_ФокусПолучен");
КонецПроцедуры
Процедура Термин1_ФокусПотерян() Экспорт
// Сообщить("Термин1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Термин_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Текст = "Это Термин1";
Термин1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Термин1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Термин1_ФокусПолучен");
Термин1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Термин1_ФокусПотерян");
Термин1.Редактируемый = Истина;
Термин2 = ДФ.Термин();
Термин2.Родитель = Форма1;
Термин2.Текст = "Это Термин2";
Термин2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Термин2.Редактируемый = Истина;
Термин1.Фокус();
Форма1.Открыть();
ФокусПотерян_УдаленыйТекст_событие.os
Перем ДФ, УдаленыйТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
УдаленыйТекст1.СнятьФокус();
КонецПроцедуры
Процедура УдаленыйТекст1_ФокусПолучен() Экспорт
// Сообщить("УдаленыйТекст1_ФокусПолучен");
КонецПроцедуры
Процедура УдаленыйТекст1_ФокусПотерян() Экспорт
// Сообщить("УдаленыйТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_УдаленыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Текст = "Это УдаленыйТекст1";
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
УдаленыйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "УдаленыйТекст1_ФокусПолучен");
УдаленыйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "УдаленыйТекст1_ФокусПотерян");
УдаленыйТекст1.Редактируемый = Истина;
УдаленыйТекст2 = ДФ.УдаленыйТекст();
УдаленыйТекст2.Родитель = Форма1;
УдаленыйТекст2.Текст = "Это УдаленыйТекст2";
УдаленыйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
УдаленыйТекст2.Редактируемый = Истина;
УдаленыйТекст1.Фокус();
Форма1.Открыть();
ФокусПотерян_УпорядоченныйСписок_событие.os
Перем ДФ, УпорядоченныйСписок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
УпорядоченныйСписок1.СнятьФокус();
КонецПроцедуры
Процедура УпорядоченныйСписок1_ФокусПолучен() Экспорт
// Сообщить("УпорядоченныйСписок1_ФокусПолучен");
КонецПроцедуры
Процедура УпорядоченныйСписок1_ФокусПотерян() Экспорт
// Сообщить("УпорядоченныйСписок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_УпорядоченныйСписок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Текст = "Это УпорядоченныйСписок1";
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
УпорядоченныйСписок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "УпорядоченныйСписок1_ФокусПолучен");
УпорядоченныйСписок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "УпорядоченныйСписок1_ФокусПотерян");
УпорядоченныйСписок1.Редактируемый = Истина;
УпорядоченныйСписок2 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок2.Родитель = Форма1;
УпорядоченныйСписок2.Текст = "Это УпорядоченныйСписок2";
УпорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
УпорядоченныйСписок2.Редактируемый = Истина;
УпорядоченныйСписок1.Фокус();
Форма1.Открыть();
ФокусПотерян_Флажок_событие.os
Перем ДФ, Флажок1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Флажок1.СнятьФокус();
КонецПроцедуры
Процедура Флажок1_ФокусПолучен() Экспорт
// Сообщить("Флажок1_ФокусПолучен");
КонецПроцедуры
Процедура Флажок1_ФокусПотерян() Экспорт
// Сообщить("Флажок1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Флажок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Флажок1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Флажок1_ФокусПолучен");
Флажок1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Флажок1_ФокусПотерян");
Флажок1.Редактируемый = Истина;
Флажок2 = ДФ.Флажок();
Флажок2.Родитель = Форма1;
Флажок2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Флажок2.Редактируемый = Истина;
Флажок1.Фокус();
Форма1.Открыть();
ФокусПотерян_ФорматированныйТекст_событие.os
Перем ДФ, ФорматированныйТекст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ФорматированныйТекст1.СнятьФокус();
КонецПроцедуры
Процедура ФорматированныйТекст1_ФокусПолучен() Экспорт
// Сообщить("ФорматированныйТекст1_ФокусПолучен");
КонецПроцедуры
Процедура ФорматированныйТекст1_ФокусПотерян() Экспорт
// Сообщить("ФорматированныйТекст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ФорматированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Текст = "Это ФорматированныйТекст1";
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ФорматированныйТекст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ФорматированныйТекст1_ФокусПолучен");
ФорматированныйТекст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ФорматированныйТекст1_ФокусПотерян");
ФорматированныйТекст1.Редактируемый = Истина;
ФорматированныйТекст2 = ДФ.ФорматированныйТекст();
ФорматированныйТекст2.Родитель = Форма1;
ФорматированныйТекст2.Текст = "Это ФорматированныйТекст2";
ФорматированныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ФорматированныйТекст2.Редактируемый = Истина;
ФорматированныйТекст1.Фокус();
Форма1.Открыть();
ФокусПотерян_Холст_событие.os
Перем ДФ, Холст1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Холст1.СнятьФокус();
КонецПроцедуры
Процедура Холст1_ФокусПолучен() Экспорт
// Сообщить("Холст1_ФокусПолучен");
КонецПроцедуры
Процедура Холст1_ФокусПотерян() Экспорт
// Сообщить("Холст1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Холст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Холст1 = ДФ.Холст();
Холст1.Родитель = Форма1;
Холст1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Холст1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Холст1_ФокусПолучен");
Холст1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Холст1_ФокусПотерян");
Холст1.Редактируемый = Истина;
Холст2 = ДФ.Холст();
Холст2.Родитель = Форма1;
Холст2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Холст2.Редактируемый = Истина;
Холст1.Фокус();
Форма1.Открыть();
ФокусПотерян_ШапкаТаблицы_событие.os
Перем ДФ, ШапкаТаблицы1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ШапкаТаблицы1.СнятьФокус();
КонецПроцедуры
Процедура ШапкаТаблицы1_ФокусПолучен() Экспорт
// Сообщить("ШапкаТаблицы1_ФокусПолучен");
КонецПроцедуры
Процедура ШапкаТаблицы1_ФокусПотерян() Экспорт
// Сообщить("ШапкаТаблицы1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ШапкаТаблицы_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Текст = "Это ШапкаТаблицы1";
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ШапкаТаблицы1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ШапкаТаблицы1_ФокусПолучен");
ШапкаТаблицы1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ШапкаТаблицы1_ФокусПотерян");
ШапкаТаблицы1.Редактируемый = Истина;
ШапкаТаблицы2 = ДФ.ШапкаТаблицы();
ШапкаТаблицы2.Родитель = Форма1;
ШапкаТаблицы2.Текст = "Это ШапкаТаблицы2";
ШапкаТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ШапкаТаблицы2.Редактируемый = Истина;
ШапкаТаблицы1.Фокус();
Форма1.Открыть();
ФокусПотерян_ЭлементПоляСписка_событие.os
Перем ДФ, ЭлементПоляСписка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ЭлементПоляСписка1.СнятьФокус();
КонецПроцедуры
Процедура ЭлементПоляСписка1_ФокусПолучен() Экспорт
// Сообщить("ЭлементПоляСписка1_ФокусПолучен");
КонецПроцедуры
Процедура ЭлементПоляСписка1_ФокусПотерян() Экспорт
// Сообщить("ЭлементПоляСписка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ЭлементПоляСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Текст = "Это ЭлементПоляСписка1";
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЭлементПоляСписка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЭлементПоляСписка1_ФокусПолучен");
ЭлементПоляСписка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЭлементПоляСписка1_ФокусПотерян");
ЭлементПоляСписка1.Редактируемый = Истина;
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = Форма1;
ЭлементПоляСписка2.Текст = "Это ЭлементПоляСписка2";
ЭлементПоляСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЭлементПоляСписка2.Редактируемый = Истина;
ЭлементПоляСписка1.Фокус();
Форма1.Открыть();
ФокусПотерян_ЭлементСписка_событие.os
Перем ДФ, ЭлементСписка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ЭлементСписка1.СнятьФокус();
КонецПроцедуры
Процедура ЭлементСписка1_ФокусПолучен() Экспорт
// Сообщить("ЭлементСписка1_ФокусПолучен");
КонецПроцедуры
Процедура ЭлементСписка1_ФокусПотерян() Экспорт
// Сообщить("ЭлементСписка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ЭлементСписка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Текст = "Это ЭлементСписка1";
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЭлементСписка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЭлементСписка1_ФокусПолучен");
ЭлементСписка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЭлементСписка1_ФокусПотерян");
ЭлементСписка1.Редактируемый = Истина;
ЭлементСписка2 = ДФ.ЭлементСписка();
ЭлементСписка2.Родитель = Форма1;
ЭлементСписка2.Текст = "Это ЭлементСписка2";
ЭлементСписка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЭлементСписка2.Редактируемый = Истина;
ЭлементСписка1.Фокус();
Форма1.Открыть();
ФокусПотерян_Ячейка_событие.os
Перем ДФ, Ячейка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
Ячейка1.СнятьФокус();
КонецПроцедуры
Процедура Ячейка1_ФокусПолучен() Экспорт
// Сообщить("Ячейка1_ФокусПолучен");
КонецПроцедуры
Процедура Ячейка1_ФокусПотерян() Экспорт
// Сообщить("Ячейка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_Ячейка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Текст = "Это Ячейка1";
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Ячейка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "Ячейка1_ФокусПолучен");
Ячейка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "Ячейка1_ФокусПотерян");
Ячейка1.Редактируемый = Истина;
Ячейка2 = ДФ.Ячейка();
Ячейка2.Родитель = Форма1;
Ячейка2.Текст = "Это Ячейка2";
Ячейка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
Ячейка2.Редактируемый = Истина;
Ячейка1.Фокус();
Форма1.Открыть();
ФокусПотерян_ЯчейкаЗаголовка_событие.os
Перем ДФ, ЯчейкаЗаголовка1, ФокусПотерян;
Процедура Форма1_Загружена() Экспорт
// Сообщить("Форма1_Загружена");
Приостановить(1); // Без этой строки не сработает строка ниже.
ЯчейкаЗаголовка1.СнятьФокус();
КонецПроцедуры
Процедура ЯчейкаЗаголовка1_ФокусПолучен() Экспорт
// Сообщить("ЯчейкаЗаголовка1_ФокусПолучен");
КонецПроцедуры
Процедура ЯчейкаЗаголовка1_ФокусПотерян() Экспорт
// Сообщить("ЯчейкаЗаголовка1_ФокусПотерян");
ФокусПотерян = Истина;
Сообщить(?(
ФокусПотерян
, "", "!!! ") + "ФокусПотерян_ЯчейкаЗаголовка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ФокусПотерян = Ложь;
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Текст = "Это ЯчейкаЗаголовка1";
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.Красный;
ЯчейкаЗаголовка1.ФокусПолучен = ДФ.Действие(ЭтотОбъект, "ЯчейкаЗаголовка1_ФокусПолучен");
ЯчейкаЗаголовка1.ФокусПотерян = ДФ.Действие(ЭтотОбъект, "ЯчейкаЗаголовка1_ФокусПотерян");
ЯчейкаЗаголовка1.Редактируемый = Истина;
ЯчейкаЗаголовка2 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка2.Родитель = Форма1;
ЯчейкаЗаголовка2.Текст = "Это ЯчейкаЗаголовка2";
ЯчейкаЗаголовка2.Стиль.ЦветФона = ДФ.Цвет.Голубой;
ЯчейкаЗаголовка2.Редактируемый = Истина;
ЯчейкаЗаголовка1.Фокус();
Форма1.Открыть();
Фон_Стиль_свойство.os
Перем ДФ, Контент, Фон1;
Процедура Свойство() Экспорт
Сообщить(?(
Контент.Стиль.Фон = "false"
, "", "!!! ") + "Фон_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Контент.Стиль, "Фон", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Фиксировано;
Контент.Стиль.Фон = Фон1;
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Контент.Стиль.Фон = Фон1;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент = Форма1.Контент;
Кнопка1 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "ФоновоеВложение = Фиксировано";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "ФоновоеВложение = Прокрутка";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка2.Стиль.ОтступСлева = 25;
Для А = 0 По 15 Цикл
Контент.ДобавитьДочерний(ДФ.Абзац()).Текст = "Алиса и сама не заметила, как очутилась на каминной полке.";
Контент.ДобавитьДочерний(ДФ.Перенос());
Контент.ДобавитьДочерний(ДФ.Перенос());
КонецЦикла;
Фон1 = ДФ.Фон();
Фон1.ЦветФона = ДФ.Цвет(243, 243, 243);
Фон1.ФоновоеИзображение = "img_flwr.gif";
Фон1.МозаикаКартинки = ДФ.МозаикаКартинки.НеПовторять;
Фон1.ПоложениеКартинки = ДФ.ПоложениеКартинки.ВерхПраво;
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Контент.Стиль.Фон = Фон1;
Форма1.Открыть();
ФоновоеВложение_Стиль_свойство.os
Перем ДФ, Контент, Фон1;
Процедура Свойство() Экспорт
Сообщить(?(
Контент.Стиль.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка
, "", "!!! ") + "ФоновоеВложение_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Контент.Стиль, "ФоновоеВложение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Контент.Стиль.ФоновоеВложение = ДФ.ФоновоеВложение.Фиксировано;
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Контент.Стиль.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент = Форма1.Контент;
Кнопка1 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "ФоновоеВложение = Фиксировано";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "ФоновоеВложение = Прокрутка";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка2.Стиль.ОтступСлева = 25;
Для А = 0 По 15 Цикл
Контент.ДобавитьДочерний(ДФ.Абзац()).Текст = "Алиса и сама не заметила, как очутилась на каминной полке.";
Контент.ДобавитьДочерний(ДФ.Перенос());
Контент.ДобавитьДочерний(ДФ.Перенос());
КонецЦикла;
Контент.Стиль.ЦветФона = ДФ.Цвет(243, 243, 243);
Контент.Стиль.ФоновоеИзображение = "img_flwr.gif";
Контент.Стиль.МозаикаКартинки = ДФ.МозаикаКартинки.НеПовторять;
Контент.Стиль.ПоложениеКартинки = ДФ.ПоложениеКартинки.ВерхПраво;
Контент.Стиль.ОбластьКартинки = ДФ.ОбластьКартинки.Содержимое;
Контент.Стиль.ОбластьРисования = ДФ.ОбластьРисования.Содержимое;
Контент.Стиль.РазмерКартинки = ДФ.Размер(400, 400);
Контент.Стиль.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Форма1.Открыть();
ФоновоеВложение_Фон_свойство.os
Перем ДФ, Контент, Фон1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка
, "", "!!! ") + "ФоновоеВложение_Фон_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Фиксировано;
Контент.Стиль.Фон = Фон1;
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Контент.Стиль.Фон = Фон1;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент = Форма1.Контент;
Кнопка1 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "ФоновоеВложение = Фиксировано";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "ФоновоеВложение = Прокрутка";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка2.Стиль.ОтступСлева = 25;
Для А = 0 По 15 Цикл
Контент.ДобавитьДочерний(ДФ.Абзац()).Текст = "Алиса и сама не заметила, как очутилась на каминной полке.";
Контент.ДобавитьДочерний(ДФ.Перенос());
Контент.ДобавитьДочерний(ДФ.Перенос());
КонецЦикла;
Фон1 = ДФ.Фон();
Фон1.ЦветФона = ДФ.Цвет(243, 243, 243);
Фон1.ФоновоеИзображение = "img_flwr.gif";
Фон1.МозаикаКартинки = ДФ.МозаикаКартинки.НеПовторять;
Фон1.ПоложениеКартинки = ДФ.ПоложениеКартинки.ВерхПраво;
Фон1.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
Контент.Стиль.Фон = Фон1;
Форма1.Открыть();
ФоновоеИзображение_Стиль_свойство.os
Перем ДФ, Форма1;
Процедура Свойство() Экспорт
Сообщить(?(
Форма1.Контент.Стиль.ФоновоеИзображение = "url(""maslenica10.jpg"")"
, "", "!!! ") + "ФоновоеИзображение_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Форма1.Контент.Стиль, "ФоновоеИзображение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Форма1.Контент.Стиль.Отступ = ДФ.Отступ(0, 0, 0, 0);
Форма1.Контент.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.Контент.Стиль.ФоновоеИзображение = "maslenica10.jpg";
Форма1.Открыть();
ФоновоеИзображение_Фон_свойство.os
Перем ДФ, Контент, Фон1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Фон1.ФоновоеИзображение = "img_flwr.gif"
, "", "!!! ") + "ФоновоеИзображение_Фон_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент = Форма1.Контент;
Контент.ДобавитьДочерний(ДФ.Абзац()).Текст = "Алиса и сама не заметила, как очутилась на каминной полке.";
Фон1 = ДФ.Фон();
Фон1.ЦветФона = ДФ.Цвет(243, 243, 243);
Фон1.ФоновоеИзображение = "img_flwr.gif";
Контент.Стиль.Фон = Фон1;
Форма1.Открыть();
Форма_ДекларативныеФормы_свойство.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Форма1 = "ДфФорма"
, "", "!!! ") + "Форма_ДекларативныеФормы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Открыть();
Форма_Область_свойство.os
Перем ДФ, Область1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Область1.Форма = "ДфКруг"
, "", "!!! ") + "Форма_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Карта1 = ДФ.Карта();
Форма1.ДобавитьДочерний(Карта1);
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Источник = "maslenica10.jpg";
Изображение1.ИмяКарты = Карта1.Имя;
Изображение1.Стиль.Ширина = "500";
Изображение1.Стиль.Высота = "500";
Область1 = Карта1.ДобавитьДочерний(ДФ.Область());
Область1.Форма = ДФ.Круг(50, 50, 35);
Область1.Описание = "Это круг";
Область1.Адрес = "Motif.jpg";
Область2 = Карта1.ДобавитьДочерний(ДФ.Область());
М1 = Новый Массив();
М1.Добавить(ДФ.Точка(100, 100));
М1.Добавить(ДФ.Точка(200, 80));
М1.Добавить(ДФ.Точка(300, 180));
М1.Добавить(ДФ.Точка(180, 220));
Область2.Форма = ДФ.Полигон(М1);
Область2.Описание = "Это Полигон";
Область2.Адрес = "Motif.jpg";
Область3 = Карта1.ДобавитьДочерний(ДФ.Область());
Область3.Форма = ДФ.Прямоугольник(400, 400, 90, 90);
Область3.Описание = "Это прямоугольник";
Область3.Адрес = "Motif.jpg";
Форма1.Открыть();
Фрейм_Форма_свойство.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Истина
, "", "!!! ") + "Фрейм_Форма_свойство.os" + " " + ТекущаяДата());
// ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.Контент.Текст = "Окно должно быть безрамочное.";
Форма1.Фрейм = Ложь;
Форма1.Открыть();
ФункцияПерехода_Переход_свойство.os
Перем ДФ, Переход1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Переход1.ФункцияПерехода = ДФ.ФункцияПерехода.Линейно
, "", "!!! ") + "ФункцияПерехода_Переход_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Переход1 = ДФ.Переход();
Переход1.СвойствоПерехода = ДФ.СвойствоПерехода.Все;
Переход1.ВремяПерехода = 5;
Переход1.ФункцияПерехода = ДФ.ФункцияПерехода.Линейно;
Переход1.ЗадержкаПерехода = 4;
Переход2 = ДФ.Переход(ДФ.СвойствоПерехода.Все, 5, ДФ.ФункцияПерехода.Линейно, 4);
Форма1.Открыть();
ФункцияПерехода_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ФункцияПерехода = ДФ.ФункцияПерехода.МедленноВконце
, "", "!!! ") + "ФункцияПерехода_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ФункцияПерехода", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
Процедура МышьНадЭлементом() Экспорт
Блок1.Стиль.ЦветФона = ДФ.Цвет.Синий;
Блок1.Стиль.Ширина = 300;
Блок1.Стиль.Высота = 200;
КонецПроцедуры
Процедура МышьПокинулаЭлемент() Экспорт
Блок1.Стиль.ЦветФона = ДФ.Цвет.Красный;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.Высота = 100;
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.Высота = 100;
Блок1.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Красный);
Блок1.МышьНадЭлементом = ДФ.Действие(ЭтотОбъект, "МышьНадЭлементом");
Блок1.МышьПокинулаЭлемент = ДФ.Действие(ЭтотОбъект, "МышьПокинулаЭлемент");
Переход1 = ДФ.Переход();
Переход1.СвойствоПерехода = "Ширина, Высота";
Переход1.ВремяПерехода = 1500;
Переход1.ЗадержкаПерехода = 200;
Блок1.Стиль.Переход = Переход1;
Блок1.Стиль.ФункцияПерехода = ДФ.ФункцияПерехода.МедленноВконце;
Форма1.Открыть();
ФункцияСинхронизации_ПараметрыАнимации_свойство.os
Перем АнимацияВращение, АнимацияМасштаб;
Перем ДФ, ПараметрыАнимации1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПараметрыАнимации1.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце
, "", "!!! ") + "ФункцияСинхронизации_ПараметрыАнимации_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Кнопка1_Нажатие() Экспорт
АнимацияВращение.Запустить();
АнимацияМасштаб.Запустить();
КонецПроцедуры
Процедура Кнопка2_Нажатие() Экспорт
АнимацияВращение.Пауза();
АнимацияМасштаб.Пауза();
КонецПроцедуры
Процедура Кнопка3_Нажатие() Экспорт
АнимацияВращение.Завершить();
АнимацияМасштаб.Завершить();
КонецПроцедуры
Процедура Кнопка4_Нажатие() Экспорт
АнимацияВращение.Отменить();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Кнопка1 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка1.Текст = "Запустить";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
Кнопка2 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "Пауза";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка3 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка3.Текст = "Завершить";
Кнопка3.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка3_Нажатие");
Кнопка4 = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Кнопка4.Текст = "Отменить вращение";
Кнопка4.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка4_Нажатие");
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Отступ = ДФ.Отступ(25, , , 25);
Кадр1 = ДФ.Стиль();
Кадр1.ОтступСлева = 10;
Кадр1.Сдвиг = "rotate(0deg)";
Кадр2 = ДФ.Стиль();
Кадр2.ОтступСлева = 300;
Кадр2.Сдвиг = "rotate(180deg)";
Кадры1 = ДФ.Кадры();
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Блок2 = Блок1.ДобавитьДочерний(ДФ.Блок());
Блок2.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок2.Стиль.Ширина = 45;
Блок2.Стиль.Высота = 45;
Блок2.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок2.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок2.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок2.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок2";
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.Зеленый;
Кадр3.Сдвиг = "scale(1)";
Кадр3.Смещение = 0;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Желтый;
Кадр4.Сдвиг = "scale(1.05)";
Кадр4.Смещение = 0.1;
Кадр5 = ДФ.Стиль();
Кадр5.ЦветФона = ДФ.Цвет.Желтый;
Кадр5.Сдвиг = "scale(1.4)";
Кадр5.Смещение = 0.7;
Кадр6 = ДФ.Стиль();
Кадр6.ЦветФона = ДФ.Цвет.Красный;
Кадр6.Сдвиг = "scale(1.5)";
Кадр6.Смещение = 1;
Кадры2 = ДФ.Кадры();
Кадры2.Добавить(Кадр3);
Кадры2.Добавить(Кадр4);
Кадры2.Добавить(Кадр5);
Кадры2.Добавить(Кадр6);
ПараметрыАнимации1 = ДФ.ПараметрыАнимации(3000,
ДФ.ФункцияСинхронизации.МедленноВначалеВконце,
600,
1000,
ДФ.НаправлениеАнимации.Чередовать,
ДФ.ЗаливкаАнимации.Назад,
100);
АнимацияВращение = Блок1.Анимация(Кадры1, ПараметрыАнимации1);
АнимацияМасштаб = Блок2.Анимация(Кадры2, ПараметрыАнимации1);
Форма1.Открыть();
ФункцияСинхронизации_СвойстваАнимации_свойство.os
Перем ДФ, Анимация1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Анимация1.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце
, "", "!!! ") + "ФункцияСинхронизации_СвойстваАнимации_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Анимация1 = ДФ.СвойстваАнимации();
Анимация1.ИмяАнимации = Кадры1.Имя;
Анимация1.ДлительностьАнимации = 3000;
Анимация1.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце;
Анимация1.ЗадержкаАнимации = 600;
Анимация1.КоличествоПовторов = -1;
Анимация1.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать;
Анимация1.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад;
Анимация1.Состояние = ДФ.Состояние.Запущена;
Блок1.Стиль.Анимация = Анимация1;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
ФункцияСинхронизации_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце
, "", "!!! ") + "ФункцияСинхронизации_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ФункцияСинхронизации", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 300;
Блок0 = Форма1.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет вращаться.
Блок0.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок0.Стиль.Ширина = 45;
Блок0.Стиль.Высота = 45;
Блок0.Стиль.Отступ = ДФ.Отступ(100, , , 100);
// Создадим одельные кадры.
Кадр01 = ДФ.Стиль();
Кадр01.ОтступСлева = 10;
Кадр01.Сдвиг = ДФ.Поворот(0);
Кадр01.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр02 = ДФ.Стиль();
Кадр02.ОтступСлева = 300;
Кадр02.Сдвиг = ДФ.Поворот(180);
Кадр02.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры0 = ДФ.Кадры();
Кадры0.Имя = "вращение"; // Обязательно задаем имя.
Кадры0.Добавить(Кадр01);
Кадры0.Добавить(Кадр02);
Блок1 = Блок0.ДобавитьДочерний(ДФ.Блок()); // Этот блок будет масштабироваться.
Блок1.Стиль.Позиция = ДФ.Позиция.Относительно;
Блок1.Стиль.Ширина = 45;
Блок1.Стиль.Высота = 45;
Блок1.Стиль.Границы = ДФ.Границы(2, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Красный);
Блок1.Стиль.РадиусГраницы = ДФ.РадиусГраницы(5, 5, 5, 5);
Блок1.Стиль.ЦветТекста = ДФ.Цвет.Зеленый;
Блок1.ДобавитьДочерний(ДФ.Абзац()).Текст = "Блок1";
// Создадим одельные кадры.
Кадр1 = ДФ.Стиль();
Кадр1.ЦветФона = ДФ.Цвет.Серый;
Кадр1.ЦветТекста = ДФ.Цвет.Бирюзовый;
Кадр1.Сдвиг = ДФ.Масштаб(1, 1);
Кадр1.Смещение = 0; // Для первого и последнего кадра задать смещение во времени обязятельно.
Кадр2 = ДФ.Стиль();
Кадр2.ЦветФона = ДФ.Цвет.Лаванда;
Кадр2.ЦветТекста = ДФ.Цвет.Красный;
Кадр2.Сдвиг = ДФ.Масштаб(2, 2);
Кадр2.Смещение = 0.33;
Кадр3 = ДФ.Стиль();
Кадр3.ЦветФона = ДФ.Цвет.БледноЖелтый;
Кадр3.ЦветТекста = ДФ.Цвет.Васильковый;
Кадр3.Сдвиг = ДФ.Масштаб(3.5, 3.5);
Кадр3.Смещение = 0.66;
Кадр4 = ДФ.Стиль();
Кадр4.ЦветФона = ДФ.Цвет.Красный;
Кадр4.ЦветТекста = ДФ.Цвет.Черный;
Кадр4.Сдвиг = ДФ.Масштаб(4.5, 4.5);
Кадр4.Смещение = 1; // Для первого и последнего кадра задать смещение во времени обязятельно.
// Соберем одельные кадры.
Кадры1 = ДФ.Кадры();
Кадры1.Имя = "масштаб"; // Обязательно задаем имя.
Кадры1.Добавить(Кадр1);
Кадры1.Добавить(Кадр2);
Кадры1.Добавить(Кадр3);
Кадры1.Добавить(Кадр4);
Стиль1 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль1.Кадры = Кадры1;
Блок1.Стиль.ИмяАнимации = Кадры1.Имя;
Блок1.Стиль.ДлительностьАнимации = 3000;
Блок1.Стиль.ФункцияСинхронизации = ДФ.ФункцияСинхронизации.МедленноВначалеВконце;
Блок1.Стиль.ЗадержкаАнимации = 600;
Блок1.Стиль.КоличествоПовторов = -1;
Блок1.Стиль.НаправлениеАнимации = ДФ.НаправлениеАнимации.Чередовать;
Блок1.Стиль.ЗаливкаАнимации = ДФ.ЗаливкаАнимации.Назад;
Блок1.Стиль.Состояние = ДФ.Состояние.Запущена;
Стиль0 = ДФ.Стиль(); // Обязательно создаем стиль для кадров.
Стиль0.Кадры = Кадры0;
Анимация0 = ДФ.СвойстваАнимации(Кадры0.Имя, 3000, ДФ.ФункцияСинхронизации.МедленноВначалеВконце, 600, -1, ДФ.НаправлениеАнимации.Чередовать, ДФ.ЗаливкаАнимации.Назад, ДФ.Состояние.Запущена);
Блок0.Стиль.Анимация = Анимация0;
Форма1.Открыть();
Цвет_ДанныеРисунка_свойство.os
Перем ДФ, ДанныеРисунка2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДанныеРисунка2.Цвет = ДФ.Цвет.Синий
, "", "!!! ") + "Цвет_ДанныеРисунка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 650;
Холст1.Высота = 550;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
ДанныеРисунка1 = Контекст2d1.СоздатьДанныеРисунка(600, 500);
ДанныеРисунка2 = Контекст2d1.СоздатьДанныеРисунка(ДанныеРисунка1);
ДанныеРисунка2.Цвет = ДФ.Цвет.Синий;
Контекст2d1.ПоместитьДанныеРисунка(ДанныеРисунка2, 10, 10);
Форма1.Открыть();
Цвет_ДекларативныеФормы_метод.os
Перем ДФ, Цвет3;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Цвет3 = ДФ.Цвет(175, 238, 238)
, "", "!!! ") + "Цвет_ДекларативныеФормы_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Это Кнопка1";
Цвет1 = ДФ.Цвет("БледноБирюзовый");
Кнопка1.Стиль.ЦветФона = Цвет1;
Цвет2 = ДФ.Цвет();
Кнопка1.Стиль.ЦветФона = Цвет2.БледноБирюзовый;
Цвет3 = ДФ.Цвет(175, 238, 238);
Кнопка1.Стиль.ЦветФона = Цвет3;
Форма1.Открыть();
Цвет_Тень_свойство.os
Перем ДФ, Тень1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Тень1.Цвет = "rgb(0, 0, 0)"
, "", "!!! ") + "Цвет_Тень_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Блок1";
Блок1.Стиль.Высота = 100;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Отступ = ДФ.Отступ(50, 50, 50, 50);
Тень1 = ДФ.Тень();
Тень1.Икс = 30;
Тень1.Игрек = 20;
Тень1.Размытие = 8;
Тень1.Величина = 10;
Тень1.Цвет = ДФ.Цвет.Черный;
Блок1.Стиль.Тень = Тень1;
Форма1.Открыть();
ЦветВерхнейГраницы_ВерхняяГраница_свойство.os
Перем ДФ, ВерхняяГраница1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВерхняяГраница1.ЦветВерхнейГраницы = ДФ.Цвет.Красный
, "", "!!! ") + "ЦветВерхнейГраницы_ВерхняяГраница_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВерхняяГраница1 = ДФ.ВерхняяГраница();
ВерхняяГраница1.ЦветВерхнейГраницы = ДФ.Цвет.Красный;
Форма1.Открыть();
ЦветВерхнейГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЦветВерхнейГраницы = "rgb(0, 0, 0)"
, "", "!!! ") + "ЦветВерхнейГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЦветВерхнейГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.НебесноГолубой ;
Блок1.Стиль.СтильВерхнейГраницы = ДФ.СтильГраницы.Сплошная;
Блок1.Стиль.ЦветВерхнейГраницы = ДФ.Цвет.Черный;
Форма1.Открыть();
ЦветВерхнейГраницы_ЦветГраниц_свойство.os
Перем ДФ, ЦветГраниц1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЦветГраниц1.ЦветВерхнейГраницы = "rgb(255, 0, 0)"
, "", "!!! ") + "ЦветВерхнейГраницы_ЦветГраниц_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Толстая, ДФ.СтильГраницы.ЧертаПробел);
ЦветГраниц1 = ДФ.ЦветГраниц();
ЦветГраниц1.ЦветВерхнейГраницы = ДФ.Цвет.Красный;
ЦветГраниц1.ЦветПравойГраницы = ДФ.Цвет.Желтый;
ЦветГраниц1.ЦветНижнейГраницы = ДФ.Цвет.Зеленый;
ЦветГраниц1.ЦветЛевойГраницы = ДФ.Цвет.Синий;
Блок1.Стиль.ЦветГраниц = ЦветГраниц1;
Форма1.Открыть();
ЦветГраниц_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЦветГраниц = "rgb(255, 0, 0) rgb(255, 255, 0) rgb(0, 128, 0) rgb(0, 0, 255)"
, "", "!!! ") + "ЦветГраниц_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЦветГраниц", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.НебесноГолубой ;
Блок1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Толстая, ДФ.СтильГраницы.ЧертаПробел);
Блок1.Стиль.ЦветГраниц = ДФ.ЦветГраниц(ДФ.Цвет.Красный, ДФ.Цвет.Желтый, ДФ.Цвет.Зеленый, ДФ.Цвет.Синий);
Форма1.Открыть();
ЦветГраницы_Границы_свойство.os
Перем ДФ, Границы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Границы1.ЦветГраницы = ДФ.Цвет.Аквамариновый
, "", "!!! ") + "ЦветГраницы_Границы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Блок1.Текст = "Блок1";
Границы1 = ДФ.Границы();
Границы1.ШиринаГраницы = ДФ.ШиринаГраницы.Толстая;
Границы1.СтильГраницы = ДФ.СтильГраницы.Двойная;
Границы1.ЦветГраницы = ДФ.Цвет.Аквамариновый;
Блок1.Стиль.Границы = Границы1;
Форма1.Открыть();
ЦветЗаголовка_ОкноСообщений_свойство.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОкноСообщений1.ЦветЗаголовка = ДФ.Цвет.Красный
, "", "!!! ") + "ЦветЗаголовка_ОкноСообщений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.ЦветЗаголовка = ДФ.Цвет.Красный;
ОкноСообщений1.Показать();
Форма1.Открыть();
ЦветЗаголовка_Уведомления_свойство.os
Перем ДФ, Уведомления1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Уведомления1.ЦветЗаголовка = ДФ.Цвет.Красный
, "", "!!! ") + "ЦветЗаголовка_Уведомления_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
Уведомления1.ЦветЗаголовка = ДФ.Цвет.Красный;
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Форма1.Открыть();
ЦветКонтура_Контур_свойство.os
Перем ДФ, Контур1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контур1.ЦветКонтура = "rgb(0, 0, 0)"
, "", "!!! ") + "ЦветКонтура_Контур_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Текст = "Здравствуй МИР!";
Блок1.Стиль.Границы = ДФ.Границы(15, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Заполнение = ДФ.Заполнение(10, 20, 20, 10);
Контур1 = ДФ.Контур();
Контур1.ШиринаКонтура = 5;
Контур1.СтильКонтура = ДФ.СтильГраницы.Двойная;
Контур1.ЦветКонтура = ДФ.Цвет.Черный;
Блок1.Стиль.Контур = Контур1;
Форма1.Открыть();
ЦветКонтура_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЦветКонтура = "rgb(128, 128, 128)"
, "", "!!! ") + "ЦветКонтура_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЦветКонтура", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Текст = "Здравствуй МИР!";
Блок1.Стиль.СтильКонтура = ДФ.СтильКонтура.ТочкаПробел;
Блок1.Стиль.ЦветКонтура = ДФ.Цвет.Серый;
Форма1.Открыть();
ЦветКурсора_Стиль_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеТекста1.Стиль.ЦветКурсора = "rgb(255, 0, 0)"
, "", "!!! ") + "ЦветКурсора_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеТекста1.Стиль, "ЦветКурсора", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Стиль.Ширина = 300;
ПолеТекста1.Значение = "ПолеТекста1 ПолеТекста1";
ПолеТекста1.АвтоФокус = Истина;
ПолеТекста1.Стиль.ЦветКурсора = ДФ.Цвет.Красный;
Форма1.Открыть();
ЦветЛевойГраницы_ЛеваяГраница_свойство.os
Перем ДФ, ЛеваяГраница1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЛеваяГраница1.ЦветЛевойГраницы = "rgb(0, 0, 0)"
, "", "!!! ") + "ЦветЛевойГраницы_ЛеваяГраница_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Здравствуй МИР!";
ЛеваяГраница1 = ДФ.ЛеваяГраница();
ЛеваяГраница1.ШиринаЛевойГраницы = 4;
ЛеваяГраница1.СтильЛевойГраницы = ДФ.СтильГраницы.ТочкаПробел;
ЛеваяГраница1.ЦветЛевойГраницы = ДФ.Цвет.Черный;
ЛеваяГраница1 = ЛеваяГраница1;
Блок1.Стиль.ЛеваяГраница = ЛеваяГраница1;
Блок1.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Форма1.Открыть();
ЦветЛевойГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЦветЛевойГраницы = "rgb(255, 0, 0)"
, "", "!!! ") + "ЦветЛевойГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЦветЛевойГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.НебесноГолубой ;
Блок1.Стиль.СтильЛевойГраницы = ДФ.СтильГраницы.Сплошная;
Блок1.Стиль.ЦветЛевойГраницы = ДФ.Цвет.Красный;
Форма1.Открыть();
ЦветЛевойГраницы_ЦветГраниц_свойство.os
Перем ДФ, ЦветГраниц1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЦветГраниц1.ЦветЛевойГраницы = "rgb(0, 0, 255)"
, "", "!!! ") + "ЦветЛевойГраницы_ЦветГраниц_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Толстая, ДФ.СтильГраницы.ЧертаПробел);
ЦветГраниц1 = ДФ.ЦветГраниц();
ЦветГраниц1.ЦветВерхнейГраницы = ДФ.Цвет.Красный;
ЦветГраниц1.ЦветПравойГраницы = ДФ.Цвет.Желтый;
ЦветГраниц1.ЦветНижнейГраницы = ДФ.Цвет.Зеленый;
ЦветГраниц1.ЦветЛевойГраницы = ДФ.Цвет.Синий;
Блок1.Стиль.ЦветГраниц = ЦветГраниц1;
Форма1.Открыть();
ЦветНижнейГраницы_НижняяГраница_свойство.os
Перем ДФ, НижняяГраница1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НижняяГраница1.ЦветНижнейГраницы = "rgb(0, 0, 0)"
, "", "!!! ") + "ЦветНижнейГраницы_НижняяГраница_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Здравствуй МИР!";
НижняяГраница1 = ДФ.НижняяГраница();
НижняяГраница1.ШиринаНижнейГраницы = 4;
НижняяГраница1.СтильНижнейГраницы = ДФ.СтильГраницы.ТочкаПробел;
НижняяГраница1.ЦветНижнейГраницы = ДФ.Цвет.Черный;
Блок1.Стиль.НижняяГраница = НижняяГраница1;
Блок1.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Форма1.Открыть();
ЦветНижнейГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЦветНижнейГраницы = "rgb(255, 0, 0)"
, "", "!!! ") + "ЦветНижнейГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЦветНижнейГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.НебесноГолубой ;
Блок1.Стиль.СтильНижнейГраницы = ДФ.СтильГраницы.Сплошная;
Блок1.Стиль.ЦветНижнейГраницы = ДФ.Цвет.Красный;
Форма1.Открыть();
ЦветНижнейГраницы_ЦветГраниц_свойство.os
Перем ДФ, ЦветГраниц1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЦветГраниц1.ЦветНижнейГраницы = "rgb(0, 128, 0)"
, "", "!!! ") + "ЦветНижнейГраницы_ЦветГраниц_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Толстая, ДФ.СтильГраницы.ЧертаПробел);
ЦветГраниц1 = ДФ.ЦветГраниц();
ЦветГраниц1.ЦветВерхнейГраницы = ДФ.Цвет.Красный;
ЦветГраниц1.ЦветПравойГраницы = ДФ.Цвет.Желтый;
ЦветГраниц1.ЦветНижнейГраницы = ДФ.Цвет.Зеленый;
ЦветГраниц1.ЦветЛевойГраницы = ДФ.Цвет.Синий;
Блок1.Стиль.ЦветГраниц = ЦветГраниц1;
Форма1.Открыть();
ЦветПравойГраницы_ПраваяГраница_свойство.os
Перем ДФ, ПраваяГраница1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПраваяГраница1.ЦветПравойГраницы = "rgb(0, 0, 0)"
, "", "!!! ") + "ЦветПравойГраницы_ПраваяГраница_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Здравствуй МИР!";
ПраваяГраница1 = ДФ.ПраваяГраница();
ПраваяГраница1.ШиринаПравойГраницы = 4;
ПраваяГраница1.СтильПравойГраницы = ДФ.СтильГраницы.ТочкаПробел;
ПраваяГраница1.ЦветПравойГраницы = ДФ.Цвет.Черный;
Блок1.Стиль.ПраваяГраница = ПраваяГраница1;
Блок1.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Форма1.Открыть();
ЦветПравойГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЦветПравойГраницы = "rgb(255, 0, 0)"
, "", "!!! ") + "ЦветПравойГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЦветПравойГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.НебесноГолубой ;
Блок1.Стиль.СтильПравойГраницы = ДФ.СтильГраницы.Сплошная;
Блок1.Стиль.ЦветПравойГраницы = ДФ.Цвет.Красный;
Форма1.Открыть();
ЦветПравойГраницы_ЦветГраниц_свойство.os
Перем ДФ, ЦветГраниц1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЦветГраниц1.ЦветПравойГраницы = "rgb(255, 255, 0)"
, "", "!!! ") + "ЦветПравойГраницы_ЦветГраниц_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Толстая, ДФ.СтильГраницы.ЧертаПробел);
ЦветГраниц1 = ДФ.ЦветГраниц();
ЦветГраниц1.ЦветВерхнейГраницы = ДФ.Цвет.Красный;
ЦветГраниц1.ЦветПравойГраницы = ДФ.Цвет.Желтый;
ЦветГраниц1.ЦветНижнейГраницы = ДФ.Цвет.Зеленый;
ЦветГраниц1.ЦветЛевойГраницы = ДФ.Цвет.Синий;
Блок1.Стиль.ЦветГраниц = ЦветГраниц1;
Форма1.Открыть();
ЦветРазделителяКолонок_РазделительКолонок_свойство.os
Перем ДФ, РазделительКолонок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
РазделительКолонок1.ЦветРазделителяКолонок = "rgb(0, 0, 0)"
, "", "!!! ") + "ЦветРазделителяКолонок_РазделительКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РазделительКолонок1 = ДФ.РазделительКолонок();
РазделительКолонок1.ШиринаРазделителяКолонок = ДФ.ШиринаГраницы.Средняя;
РазделительКолонок1.СтильРазделителяКолонок = ДФ.СтильГраницы.Двойная;
РазделительКолонок1.ЦветРазделителяКолонок = ДФ.Цвет.Черный;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("БелаяДымка");
Абзац1.Текст = "И тут появилась Черная Королева.
|«Ого! Как выросла! – подумала Алиса. – Когда я нашла ее в золе, она была не больше моего пальца. А теперь я ей по плечо».
|– У нас такой чудесный воздух, что все тянутся вверх не по дням, а по часам, – сказала Роза, будто подслушала мысли Алисы.
|– Пойду навстречу ей, – сказала Алиса, как бы извиняясь перед цветами.
|С ними было, конечно, весело поболтать, но беседа с Королевой наверняка намного интересней.
|– Если хочешь встретиться, – посоветовала Роза, – иди не к ней, а от нее.
|Такой явной глупости Алиса и слушать не стала. И, конечно же, пошла прямиком к Королеве. Но, к ее изумлению, Королева мгновенно исчезла из виду.
|А дорожка снова привела Алису к дому. Раздосадованная, Алиса отпрянула от дома и оглянулась. Королева маячила вдалеке позади нее.
|Алиса заколебалась: уж не права ли была Роза и не следует ли двинуться в противоположную от Королевы сторону? Так она и сделала.
|И все вышло чудесно! Буквально через минуту она столкнулась нос к носу с Королевой. И что удивительно, холм, до которого она так
|долго не могла дойти, возвышался прямо перед ней.
|– Ты откуда взялась? – строго спросила Королева. – Куда идешь? Гляди в глаза! Говори почтительно! Не маши руками, не верти головой и не дрыгай ногами!
|Алиса как можно вежливее объяснила, что немного заблудилась, а теперь разобралась, что к чему и что куда, и идет себе своей дорогой.";
Абзац1.Стиль.РазделительКолонок = РазделительКолонок1;
Абзац1.Стиль.КоличествоКолонок = 3;
Форма1.Открыть();
ЦветРазделителяКолонок_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ЦветРазделителяКолонок = "rgb(255, 0, 0)"
, "", "!!! ") + "ЦветРазделителяКолонок_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ЦветРазделителяКолонок", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РазделительКолонок1 = ДФ.РазделительКолонок(ДФ.ШиринаГраницы.Средняя, ДФ.СтильГраницы.Двойная, ДФ.Цвет.Синий);
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("БелаяДымка");
Абзац1.Текст = "И тут появилась Черная Королева.
|«Ого! Как выросла! – подумала Алиса. – Когда я нашла ее в золе, она была не больше моего пальца. А теперь я ей по плечо».
|– У нас такой чудесный воздух, что все тянутся вверх не по дням, а по часам, – сказала Роза, будто подслушала мысли Алисы.
|– Пойду навстречу ей, – сказала Алиса, как бы извиняясь перед цветами.
|С ними было, конечно, весело поболтать, но беседа с Королевой наверняка намного интересней.
|– Если хочешь встретиться, – посоветовала Роза, – иди не к ней, а от нее.
|Такой явной глупости Алиса и слушать не стала. И, конечно же, пошла прямиком к Королеве. Но, к ее изумлению, Королева мгновенно исчезла из виду.
|А дорожка снова привела Алису к дому. Раздосадованная, Алиса отпрянула от дома и оглянулась. Королева маячила вдалеке позади нее.
|Алиса заколебалась: уж не права ли была Роза и не следует ли двинуться в противоположную от Королевы сторону? Так она и сделала.
|И все вышло чудесно! Буквально через минуту она столкнулась нос к носу с Королевой. И что удивительно, холм, до которого она так
|долго не могла дойти, возвышался прямо перед ней.
|– Ты откуда взялась? – строго спросила Королева. – Куда идешь? Гляди в глаза! Говори почтительно! Не маши руками, не верти головой и не дрыгай ногами!
|Алиса как можно вежливее объяснила, что немного заблудилась, а теперь разобралась, что к чему и что куда, и идет себе своей дорогой.";
Абзац1.Стиль.РазделительКолонок = РазделительКолонок1;
Абзац1.Стиль.КоличествоКолонок = 3;
Абзац1.Стиль.ЦветРазделителяКолонок = ДФ.Цвет.Красный;
Форма1.Открыть();
ЦветТекста_ОкноСообщений_свойство.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОкноСообщений1.ЦветТекста = ДФ.Цвет.СинийЭлис
, "", "!!! ") + "ЦветТекста_ОкноСообщений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.ЦветТекста = ДФ.Цвет.СинийЭлис;
ОкноСообщений1.Показать();
Форма1.Открыть();
ЦветТекста_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ЦветТекста = "rgb(255, 0, 0)"
, "", "!!! ") + "ЦветТекста_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ЦветТекста", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 200;
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Стиль.ЦветТекста (Style.TextColor) Свойство";
Абзац1.Стиль.ЦветТекста = ДФ.Цвет.Красный;
Форма1.Открыть();
ЦветТекста_Уведомления_свойство.os
Перем ДФ, Уведомления1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Уведомления1.ЦветТекста = ДФ.Цвет.Красный
, "", "!!! ") + "ЦветТекста_Уведомления_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
Уведомления1.ЦветТекста = ДФ.Цвет.Красный;
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Форма1.Открыть();
ЦветТекстаЗаголовка_ОкноСообщений_свойство.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОкноСообщений1.ЦветТекстаЗаголовка = ДФ.Цвет.Синий
, "", "!!! ") + "ЦветТекстаЗаголовка_ОкноСообщений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.ЦветТекстаЗаголовка = ДФ.Цвет.Синий;
ОкноСообщений1.Показать();
Форма1.Открыть();
ЦветТекстаЗаголовка_Уведомления_свойство.os
Перем ДФ, Уведомления1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Уведомления1.ЦветТекстаЗаголовка = ДФ.Цвет.Красный
, "", "!!! ") + "ЦветТекстаЗаголовка_Уведомления_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
Уведомления1.ЦветТекстаЗаголовка = ДФ.Цвет.Красный;
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Форма1.Открыть();
ЦветТени_Контекст2d_свойство.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контекст2d1.ЦветТени = "rgb(0, 0, 0)"
, "", "!!! ") + "ЦветТени_Контекст2d_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.РазмытиеТени = 20;
Контекст2d1.ЦветТени = ДФ.Цвет.Черный;
Контекст2d1.СтильЗаполнения = ДФ.Цвет.СветлаяМорскаяВолна;
Контекст2d1.ЗаполнитьПрямоугольник(20, 20, 100, 80);
Форма1.Открыть();
ЦветФона_ОкноСообщений_свойство.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОкноСообщений1.ЦветФона = ДФ.Цвет.СерыйШифер
, "", "!!! ") + "ЦветФона_ОкноСообщений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.ЦветФона = ДФ.Цвет.СерыйШифер;
ОкноСообщений1.Показать();
Форма1.Открыть();
ЦветФона_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ЦветФона = "rgb(135, 206, 235)"
, "", "!!! ") + "ЦветФона_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ЦветФона", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Текст = "Здравствуй МИР!";
Блок1.Стиль.ЦветФона = ДФ.Цвет.НебесноГолубой;
Форма1.Открыть();
ЦветФона_Уведомления_свойство.os
Перем ДФ, Уведомления1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Уведомления1.ЦветФона = ДФ.Цвет.Красный
, "", "!!! ") + "ЦветФона_Уведомления_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
Уведомления1.ЦветФона = ДФ.Цвет.Красный;
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Форма1.Открыть();
ЦветФона_Фон_свойство.os
Перем ДФ, Контент, Фон1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Фон1.ЦветФона = ДФ.Цвет(243, 243, 243)
, "", "!!! ") + "ЦветФона_Фон_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Контент = Форма1.Контент;
Контент.ДобавитьДочерний(ДФ.Абзац()).Текст = "Алиса и сама не заметила, как очутилась на каминной полке.";
Фон1 = ДФ.Фон();
Фон1.ЦветФона = ДФ.Цвет(243, 243, 243);
Контент.Стиль.Фон = Фон1;
Форма1.Открыть();
Целое_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().Целое(-55.64) = -55
, "", "!!! ") + "Целое_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().Целое(-55.64);
Форма1.Открыть();
ЦельПокинута_Абзац_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_Абзац_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Абзац());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_Артикль_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_Артикль_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Артикль());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Артикль());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_Блок_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_Блок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Блок());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Блок());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_Группа_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_Группа_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Группа());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Группа());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_Диалог_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_Диалог_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Диалог());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Источник.Показать();
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Диалог());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Цель.Стиль.Позиция = ДФ.Позиция.Абсолютно;
Цель.Стиль.Верх = 150;
Цель.Показать();
Форма1.Открыть();
ЦельПокинута_ДополнительныйБлок_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_ДополнительныйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.ДополнительныйБлок());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_ЖирныйТекст_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_ЖирныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.ЖирныйТекст());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_Заголовок1_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_Заголовок1_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок1());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_Заголовок2_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_Заголовок2_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок2());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_Заголовок3_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_Заголовок3_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок3());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_Заголовок4_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_Заголовок4_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок4());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_Заголовок5_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_Заголовок5_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок5());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_Заголовок6_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_Заголовок6_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Заголовок6());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_Кнопка_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_Кнопка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Кнопка());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_КурсивТекст_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_КурсивТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.КурсивТекст());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_МаркированныйТекст_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_МаркированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.МаркированныйТекст());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_МелкийТекст_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_МелкийТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.МелкийТекст());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_НадстрочныйТекст_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_НадстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.НадстрочныйТекст());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_НаправленныйТекст_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_НаправленныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.НаправленныйТекст());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_ОбластьТекста_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_ОбластьТекста_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.ОбластьТекста());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_ПодстрочныйТекст_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_ПодстрочныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.ПодстрочныйТекст());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_ПодчеркнутыйТекст_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_ПодчеркнутыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.ПодчеркнутыйТекст());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_РаскрываемыйБлок_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_РаскрываемыйБлок_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.РаскрываемыйБлок());
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_Результат_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_Результат_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Результат());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Результат());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_Ссылка_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_Ссылка_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Ссылка());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_Таблица_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_Таблица_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Таблица());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Таблица());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_УдаленыйТекст_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_УдаленыйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.УдаленыйТекст());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_ФорматированныйТекст_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_ФорматированныйТекст_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
Источник.Текст = "Источник";
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.ФорматированныйТекст());
Цель.Текст = "Перетащи сквозь Цель";
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
ЦельПокинута_Шкала_событие.os
Перем ДФ, Цель;
Процедура ЦельПокинута() Экспорт
Сообщить(?(
ДФ.АргументыСобытия.Отправитель = Цель
, "", "!!! ") + "ЦельПокинута_Шкала_событие.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 480;
Форма1.Контент.Стиль.РазмерШрифта = 30;
Форма1.Контент.Стиль.ЖирностьШрифта = "700";
Форма1.Контент.Стиль.СемействоШрифтов = "sans-serif";
Форма1.Заголовок = "Перетащите мышью";
Источник = Форма1.ДобавитьДочерний(ДФ.Шкала());
Источник.Перетаскиваемый = Истина;
Источник.Стиль.Ширина = 150;
Источник.Стиль.Высота = 150;
Источник.Стиль.Фон = ДФ.Фон(ДФ.Цвет.Фиолетовый);
Источник.Стиль.Отступ = ДФ.Отступ(10, 10, 10, 10, Истина);
Источник.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
Форма1.ДобавитьДочерний(ДФ.Абзац());
Цель = Форма1.ДобавитьДочерний(ДФ.Шкала());
Цель.Стиль.Ширина = 200;
Цель.Стиль.Высота = 200;
Цель.Стиль.Границы = ДФ.Границы(10, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Фиолетовый);
Цель.Стиль.Отступ = ДФ.Отступ(30, 30, 30, 30, Истина);
Цель.Стиль.Заполнение = ДФ.Заполнение(10, 10, 10, 10);
Цель.ЦельПокинута = ДФ.Действие(ЭтотОбъект, "ЦельПокинута");
Форма1.Открыть();
Четное_Математика_метод.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Форма1.Контент.Текст = "Мат.Четное(82) = Да
|Мат.Четное(-82) = Да
|Мат.Четное(83) = Нет
|Мат.Четное(-83) = Нет
|Мат.Четное(24.2) =
|"
, "", "!!! ") + "Четное_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Мат = ДФ.Математика();
Форма1.Контент.Текст = "Мат.Четное(82) = " + Мат.Четное(82) + "
|Мат.Четное(-82) = " + Мат.Четное(-82) + "
|Мат.Четное(83) = " + Мат.Четное(83) + "
|Мат.Четное(-83) = " + Мат.Четное(-83) + "
|Мат.Четное(24.2) = " + Мат.Четное(24.2) + "
|";
Форма1.Открыть();
Число10_Матрица3Д_свойство.os
Перем ДФ, Матрица3Д2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица3Д2.Число10 = 9
, "", "!!! ") + "Число10_Матрица3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Массив = Новый Массив();
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(-50);
Массив.Добавить(-100);
Массив.Добавить(0);
Массив.Добавить(1.1);
Матрица3Д1 = ДФ.Матрица3Д(Массив);
Матрица3Д2 = ДФ.Матрица3Д();
Матрица3Д2.Число1 = 0;
Матрица3Д2.Число2 = 1;
Матрица3Д2.Число3 = 2;
Матрица3Д2.Число4 = 3;
Матрица3Д2.Число5 = 4;
Матрица3Д2.Число6 = 5;
Матрица3Д2.Число7 = 6;
Матрица3Д2.Число8 = 7;
Матрица3Д2.Число9 = 8;
Матрица3Д2.Число10 = 9;
Матрица3Д2.Число11 = 10;
Матрица3Д2.Число12 = 11;
Матрица3Д2.Число13 = 12;
Матрица3Д2.Число14 = 13;
Матрица3Д2.Число15 = 14;
Матрица3Д2.Число16 = 15;
Форма1.Открыть();
Число11_Матрица3Д_свойство.os
Перем ДФ, Матрица3Д2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица3Д2.Число11 = 10
, "", "!!! ") + "Число11_Матрица3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Массив = Новый Массив();
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(-50);
Массив.Добавить(-100);
Массив.Добавить(0);
Массив.Добавить(1.1);
Матрица3Д1 = ДФ.Матрица3Д(Массив);
Матрица3Д2 = ДФ.Матрица3Д();
Матрица3Д2.Число1 = 0;
Матрица3Д2.Число2 = 1;
Матрица3Д2.Число3 = 2;
Матрица3Д2.Число4 = 3;
Матрица3Д2.Число5 = 4;
Матрица3Д2.Число6 = 5;
Матрица3Д2.Число7 = 6;
Матрица3Д2.Число8 = 7;
Матрица3Д2.Число9 = 8;
Матрица3Д2.Число10 = 9;
Матрица3Д2.Число11 = 10;
Матрица3Д2.Число12 = 11;
Матрица3Д2.Число13 = 12;
Матрица3Д2.Число14 = 13;
Матрица3Д2.Число15 = 14;
Матрица3Д2.Число16 = 15;
Форма1.Открыть();
Число12_Матрица3Д_свойство.os
Перем ДФ, Матрица3Д2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица3Д2.Число12 = 11
, "", "!!! ") + "Число12_Матрица3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Массив = Новый Массив();
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(-50);
Массив.Добавить(-100);
Массив.Добавить(0);
Массив.Добавить(1.1);
Матрица3Д1 = ДФ.Матрица3Д(Массив);
Матрица3Д2 = ДФ.Матрица3Д();
Матрица3Д2.Число1 = 0;
Матрица3Д2.Число2 = 1;
Матрица3Д2.Число3 = 2;
Матрица3Д2.Число4 = 3;
Матрица3Д2.Число5 = 4;
Матрица3Д2.Число6 = 5;
Матрица3Д2.Число7 = 6;
Матрица3Д2.Число8 = 7;
Матрица3Д2.Число9 = 8;
Матрица3Д2.Число10 = 9;
Матрица3Д2.Число11 = 10;
Матрица3Д2.Число12 = 11;
Матрица3Д2.Число13 = 12;
Матрица3Д2.Число14 = 13;
Матрица3Д2.Число15 = 14;
Матрица3Д2.Число16 = 15;
Форма1.Открыть();
Число13_Матрица3Д_свойство.os
Перем ДФ, Матрица3Д2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица3Д2.Число13 = 12
, "", "!!! ") + "Число13_Матрица3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Массив = Новый Массив();
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(-50);
Массив.Добавить(-100);
Массив.Добавить(0);
Массив.Добавить(1.1);
Матрица3Д1 = ДФ.Матрица3Д(Массив);
Матрица3Д2 = ДФ.Матрица3Д();
Матрица3Д2.Число1 = 0;
Матрица3Д2.Число2 = 1;
Матрица3Д2.Число3 = 2;
Матрица3Д2.Число4 = 3;
Матрица3Д2.Число5 = 4;
Матрица3Д2.Число6 = 5;
Матрица3Д2.Число7 = 6;
Матрица3Д2.Число8 = 7;
Матрица3Д2.Число9 = 8;
Матрица3Д2.Число10 = 9;
Матрица3Д2.Число11 = 10;
Матрица3Д2.Число12 = 11;
Матрица3Д2.Число13 = 12;
Матрица3Д2.Число14 = 13;
Матрица3Д2.Число15 = 14;
Матрица3Д2.Число16 = 15;
Форма1.Открыть();
Число14_Матрица3Д_свойство.os
Перем ДФ, Матрица3Д2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица3Д2.Число14 = 13
, "", "!!! ") + "Число14_Матрица3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Массив = Новый Массив();
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(-50);
Массив.Добавить(-100);
Массив.Добавить(0);
Массив.Добавить(1.1);
Матрица3Д1 = ДФ.Матрица3Д(Массив);
Матрица3Д2 = ДФ.Матрица3Д();
Матрица3Д2.Число1 = 0;
Матрица3Д2.Число2 = 1;
Матрица3Д2.Число3 = 2;
Матрица3Д2.Число4 = 3;
Матрица3Д2.Число5 = 4;
Матрица3Д2.Число6 = 5;
Матрица3Д2.Число7 = 6;
Матрица3Д2.Число8 = 7;
Матрица3Д2.Число9 = 8;
Матрица3Д2.Число10 = 9;
Матрица3Д2.Число11 = 10;
Матрица3Д2.Число12 = 11;
Матрица3Д2.Число13 = 12;
Матрица3Д2.Число14 = 13;
Матрица3Д2.Число15 = 14;
Матрица3Д2.Число16 = 15;
Форма1.Открыть();
Число15_Матрица3Д_свойство.os
Перем ДФ, Матрица3Д2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица3Д2.Число15 = 14
, "", "!!! ") + "Число15_Матрица3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Массив = Новый Массив();
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(-50);
Массив.Добавить(-100);
Массив.Добавить(0);
Массив.Добавить(1.1);
Матрица3Д1 = ДФ.Матрица3Д(Массив);
Матрица3Д2 = ДФ.Матрица3Д();
Матрица3Д2.Число1 = 0;
Матрица3Д2.Число2 = 1;
Матрица3Д2.Число3 = 2;
Матрица3Д2.Число4 = 3;
Матрица3Д2.Число5 = 4;
Матрица3Д2.Число6 = 5;
Матрица3Д2.Число7 = 6;
Матрица3Д2.Число8 = 7;
Матрица3Д2.Число9 = 8;
Матрица3Д2.Число10 = 9;
Матрица3Д2.Число11 = 10;
Матрица3Д2.Число12 = 11;
Матрица3Д2.Число13 = 12;
Матрица3Д2.Число14 = 13;
Матрица3Д2.Число15 = 14;
Матрица3Д2.Число16 = 15;
Форма1.Открыть();
Число16_Матрица3Д_свойство.os
Перем ДФ, Матрица3Д2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица3Д2.Число16 = 15
, "", "!!! ") + "Число16_Матрица3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Массив = Новый Массив();
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(-50);
Массив.Добавить(-100);
Массив.Добавить(0);
Массив.Добавить(1.1);
Матрица3Д1 = ДФ.Матрица3Д(Массив);
Матрица3Д2 = ДФ.Матрица3Д();
Матрица3Д2.Число1 = 0;
Матрица3Д2.Число2 = 1;
Матрица3Д2.Число3 = 2;
Матрица3Д2.Число4 = 3;
Матрица3Д2.Число5 = 4;
Матрица3Д2.Число6 = 5;
Матрица3Д2.Число7 = 6;
Матрица3Д2.Число8 = 7;
Матрица3Д2.Число9 = 8;
Матрица3Д2.Число10 = 9;
Матрица3Д2.Число11 = 10;
Матрица3Д2.Число12 = 11;
Матрица3Д2.Число13 = 12;
Матрица3Д2.Число14 = 13;
Матрица3Д2.Число15 = 14;
Матрица3Д2.Число16 = 15;
Форма1.Открыть();
Число1_БезьеКуб_свойство.os
Перем ДФ, БезьеКуб1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
БезьеКуб1.Число1 = 0.1
, "", "!!! ") + "Число1_БезьеКуб_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
БезьеКуб1 = ДФ.БезьеКуб(0.1, 0.7, 1.0, 0.1);
БезьеКуб2 = ДФ.БезьеКуб();
Число1 = 0.1;
Число2 = 0.7;
Число3 = 1.0;
Число4 = 0.1;
Форма1.Открыть();
Число1_Матрица3Д_свойство.os
Перем ДФ, Матрица3Д2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица3Д2.Число1 = 0
, "", "!!! ") + "Число1_Матрица3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Массив = Новый Массив();
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(-50);
Массив.Добавить(-100);
Массив.Добавить(0);
Массив.Добавить(1.1);
Матрица3Д1 = ДФ.Матрица3Д(Массив);
Матрица3Д2 = ДФ.Матрица3Д();
Матрица3Д2.Число1 = 0;
Матрица3Д2.Число2 = 1;
Матрица3Д2.Число3 = 2;
Матрица3Д2.Число4 = 3;
Матрица3Д2.Число5 = 4;
Матрица3Д2.Число6 = 5;
Матрица3Д2.Число7 = 6;
Матрица3Д2.Число8 = 7;
Матрица3Д2.Число9 = 8;
Матрица3Д2.Число10 = 9;
Матрица3Д2.Число11 = 10;
Матрица3Д2.Число12 = 11;
Матрица3Д2.Число13 = 12;
Матрица3Д2.Число14 = 13;
Матрица3Д2.Число15 = 14;
Матрица3Д2.Число16 = 15;
Форма1.Открыть();
Число2_БезьеКуб_свойство.os
Перем ДФ, БезьеКуб1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
БезьеКуб1.Число2 = 0.7
, "", "!!! ") + "Число2_БезьеКуб_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
БезьеКуб1 = ДФ.БезьеКуб(0.1, 0.7, 1.0, 0.1);
БезьеКуб2 = ДФ.БезьеКуб();
Число1 = 0.1;
Число2 = 0.7;
Число3 = 1.0;
Число4 = 0.1;
Форма1.Открыть();
Число2_Матрица3Д_свойство.os
Перем ДФ, Матрица3Д2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица3Д2.Число2 = 1
, "", "!!! ") + "Число2_Матрица3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Массив = Новый Массив();
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(-50);
Массив.Добавить(-100);
Массив.Добавить(0);
Массив.Добавить(1.1);
Матрица3Д1 = ДФ.Матрица3Д(Массив);
Матрица3Д2 = ДФ.Матрица3Д();
Матрица3Д2.Число1 = 0;
Матрица3Д2.Число2 = 1;
Матрица3Д2.Число3 = 2;
Матрица3Д2.Число4 = 3;
Матрица3Д2.Число5 = 4;
Матрица3Д2.Число6 = 5;
Матрица3Д2.Число7 = 6;
Матрица3Д2.Число8 = 7;
Матрица3Д2.Число9 = 8;
Матрица3Д2.Число10 = 9;
Матрица3Д2.Число11 = 10;
Матрица3Д2.Число12 = 11;
Матрица3Д2.Число13 = 12;
Матрица3Д2.Число14 = 13;
Матрица3Д2.Число15 = 14;
Матрица3Д2.Число16 = 15;
Форма1.Открыть();
Число3_БезьеКуб_свойство.os
Перем ДФ, БезьеКуб1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
БезьеКуб1.Число3 = 1.0
, "", "!!! ") + "Число3_БезьеКуб_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
БезьеКуб1 = ДФ.БезьеКуб(0.1, 0.7, 1.0, 0.1);
БезьеКуб2 = ДФ.БезьеКуб();
Число1 = 0.1;
Число2 = 0.7;
Число3 = 1.0;
Число4 = 0.1;
Форма1.Открыть();
Число3_Матрица3Д_свойство.os
Перем ДФ, Матрица3Д2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица3Д2.Число3 = 2
, "", "!!! ") + "Число3_Матрица3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Массив = Новый Массив();
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(-50);
Массив.Добавить(-100);
Массив.Добавить(0);
Массив.Добавить(1.1);
Матрица3Д1 = ДФ.Матрица3Д(Массив);
Матрица3Д2 = ДФ.Матрица3Д();
Матрица3Д2.Число1 = 0;
Матрица3Д2.Число2 = 1;
Матрица3Д2.Число3 = 2;
Матрица3Д2.Число4 = 3;
Матрица3Д2.Число5 = 4;
Матрица3Д2.Число6 = 5;
Матрица3Д2.Число7 = 6;
Матрица3Д2.Число8 = 7;
Матрица3Д2.Число9 = 8;
Матрица3Д2.Число10 = 9;
Матрица3Д2.Число11 = 10;
Матрица3Д2.Число12 = 11;
Матрица3Д2.Число13 = 12;
Матрица3Д2.Число14 = 13;
Матрица3Д2.Число15 = 14;
Матрица3Д2.Число16 = 15;
Форма1.Открыть();
Число4_БезьеКуб_свойство.os
Перем ДФ, БезьеКуб1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
БезьеКуб1.Число4 = 0.1
, "", "!!! ") + "Число4_БезьеКуб_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
БезьеКуб1 = ДФ.БезьеКуб(0.1, 0.7, 1.0, 0.1);
БезьеКуб2 = ДФ.БезьеКуб();
Число1 = 0.1;
Число2 = 0.7;
Число3 = 1.0;
Число4 = 0.1;
Форма1.Открыть();
Число4_Матрица3Д_свойство.os
Перем ДФ, Матрица3Д2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица3Д2.Число4 = 3
, "", "!!! ") + "Число4_Матрица3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Массив = Новый Массив();
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(-50);
Массив.Добавить(-100);
Массив.Добавить(0);
Массив.Добавить(1.1);
Матрица3Д1 = ДФ.Матрица3Д(Массив);
Матрица3Д2 = ДФ.Матрица3Д();
Матрица3Д2.Число1 = 0;
Матрица3Д2.Число2 = 1;
Матрица3Д2.Число3 = 2;
Матрица3Д2.Число4 = 3;
Матрица3Д2.Число5 = 4;
Матрица3Д2.Число6 = 5;
Матрица3Д2.Число7 = 6;
Матрица3Д2.Число8 = 7;
Матрица3Д2.Число9 = 8;
Матрица3Д2.Число10 = 9;
Матрица3Д2.Число11 = 10;
Матрица3Д2.Число12 = 11;
Матрица3Д2.Число13 = 12;
Матрица3Д2.Число14 = 13;
Матрица3Д2.Число15 = 14;
Матрица3Д2.Число16 = 15;
Форма1.Открыть();
Число5_Матрица3Д_свойство.os
Перем ДФ, Матрица3Д2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица3Д2.Число5 = 4
, "", "!!! ") + "Число5_Матрица3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Массив = Новый Массив();
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(-50);
Массив.Добавить(-100);
Массив.Добавить(0);
Массив.Добавить(1.1);
Матрица3Д1 = ДФ.Матрица3Д(Массив);
Матрица3Д2 = ДФ.Матрица3Д();
Матрица3Д2.Число1 = 0;
Матрица3Д2.Число2 = 1;
Матрица3Д2.Число3 = 2;
Матрица3Д2.Число4 = 3;
Матрица3Д2.Число5 = 4;
Матрица3Д2.Число6 = 5;
Матрица3Д2.Число7 = 6;
Матрица3Д2.Число8 = 7;
Матрица3Д2.Число9 = 8;
Матрица3Д2.Число10 = 9;
Матрица3Д2.Число11 = 10;
Матрица3Д2.Число12 = 11;
Матрица3Д2.Число13 = 12;
Матрица3Д2.Число14 = 13;
Матрица3Д2.Число15 = 14;
Матрица3Д2.Число16 = 15;
Форма1.Открыть();
Число6_Матрица3Д_свойство.os
Перем ДФ, Матрица3Д2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица3Д2.Число6 = 5
, "", "!!! ") + "Число6_Матрица3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Массив = Новый Массив();
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(-50);
Массив.Добавить(-100);
Массив.Добавить(0);
Массив.Добавить(1.1);
Матрица3Д1 = ДФ.Матрица3Д(Массив);
Матрица3Д2 = ДФ.Матрица3Д();
Матрица3Д2.Число1 = 0;
Матрица3Д2.Число2 = 1;
Матрица3Д2.Число3 = 2;
Матрица3Д2.Число4 = 3;
Матрица3Д2.Число5 = 4;
Матрица3Д2.Число6 = 5;
Матрица3Д2.Число7 = 6;
Матрица3Д2.Число8 = 7;
Матрица3Д2.Число9 = 8;
Матрица3Д2.Число10 = 9;
Матрица3Д2.Число11 = 10;
Матрица3Д2.Число12 = 11;
Матрица3Д2.Число13 = 12;
Матрица3Д2.Число14 = 13;
Матрица3Д2.Число15 = 14;
Матрица3Д2.Число16 = 15;
Форма1.Открыть();
Число7_Матрица3Д_свойство.os
Перем ДФ, Матрица3Д2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица3Д2.Число7 = 6
, "", "!!! ") + "Число7_Матрица3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Массив = Новый Массив();
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(-50);
Массив.Добавить(-100);
Массив.Добавить(0);
Массив.Добавить(1.1);
Матрица3Д1 = ДФ.Матрица3Д(Массив);
Матрица3Д2 = ДФ.Матрица3Д();
Матрица3Д2.Число1 = 0;
Матрица3Д2.Число2 = 1;
Матрица3Д2.Число3 = 2;
Матрица3Д2.Число4 = 3;
Матрица3Д2.Число5 = 4;
Матрица3Д2.Число6 = 5;
Матрица3Д2.Число7 = 6;
Матрица3Д2.Число8 = 7;
Матрица3Д2.Число9 = 8;
Матрица3Д2.Число10 = 9;
Матрица3Д2.Число11 = 10;
Матрица3Д2.Число12 = 11;
Матрица3Д2.Число13 = 12;
Матрица3Д2.Число14 = 13;
Матрица3Д2.Число15 = 14;
Матрица3Д2.Число16 = 15;
Форма1.Открыть();
Число8_Матрица3Д_свойство.os
Перем ДФ, Матрица3Д2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица3Д2.Число8 = 7
, "", "!!! ") + "Число8_Матрица3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Массив = Новый Массив();
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(-50);
Массив.Добавить(-100);
Массив.Добавить(0);
Массив.Добавить(1.1);
Матрица3Д1 = ДФ.Матрица3Д(Массив);
Матрица3Д2 = ДФ.Матрица3Д();
Матрица3Д2.Число1 = 0;
Матрица3Д2.Число2 = 1;
Матрица3Д2.Число3 = 2;
Матрица3Д2.Число4 = 3;
Матрица3Д2.Число5 = 4;
Матрица3Д2.Число6 = 5;
Матрица3Д2.Число7 = 6;
Матрица3Д2.Число8 = 7;
Матрица3Д2.Число9 = 8;
Матрица3Д2.Число10 = 9;
Матрица3Д2.Число11 = 10;
Матрица3Д2.Число12 = 11;
Матрица3Д2.Число13 = 12;
Матрица3Д2.Число14 = 13;
Матрица3Д2.Число15 = 14;
Матрица3Д2.Число16 = 15;
Форма1.Открыть();
Число9_Матрица3Д_свойство.os
Перем ДФ, Матрица3Д2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Матрица3Д2.Число9 = 8
, "", "!!! ") + "Число9_Матрица3Д_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Массив = Новый Массив();
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(0);
Массив.Добавить(1);
Массив.Добавить(0);
Массив.Добавить(-50);
Массив.Добавить(-100);
Массив.Добавить(0);
Массив.Добавить(1.1);
Матрица3Д1 = ДФ.Матрица3Д(Массив);
Матрица3Д2 = ДФ.Матрица3Д();
Матрица3Д2.Число1 = 0;
Матрица3Д2.Число2 = 1;
Матрица3Д2.Число3 = 2;
Матрица3Д2.Число4 = 3;
Матрица3Д2.Число5 = 4;
Матрица3Д2.Число6 = 5;
Матрица3Д2.Число7 = 6;
Матрица3Д2.Число8 = 7;
Матрица3Д2.Число9 = 8;
Матрица3Д2.Число10 = 9;
Матрица3Д2.Число11 = 10;
Матрица3Д2.Число12 = 11;
Матрица3Д2.Число13 = 12;
Матрица3Д2.Число14 = 13;
Матрица3Д2.Число15 = 14;
Матрица3Д2.Число16 = 15;
Форма1.Открыть();
Шаг_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.Шаг = 3
, "", "!!! ") + "Шаг_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "Шаг", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Шаг = 3;
Форма1.Открыть();
Шаг_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.Шаг = 3
, "", "!!! ") + "Шаг_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "Шаг", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Шаг = 3;
Форма1.Открыть();
Шаг_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДатыВремени1.Шаг = 3
, "", "!!! ") + "Шаг_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДатыВремени1, "Шаг", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Шаг = 3;
Форма1.Открыть();
Шаг_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Шаг = 3
, "", "!!! ") + "Шаг_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "Шаг", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Шаг = 3;
Форма1.Открыть();
Шаг_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.Шаг = 3
, "", "!!! ") + "Шаг_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "Шаг", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Шаг = 3;
Форма1.Открыть();
Шаг_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.Шаг = 3
, "", "!!! ") + "Шаг_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "Шаг", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Шаг = 3;
Форма1.Открыть();
Шаг_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.Шаг = 3
, "", "!!! ") + "Шаг_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "Шаг", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Шаг = 3;
Форма1.Открыть();
Шаг_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.Шаг = 3
, "", "!!! ") + "Шаг_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "Шаг", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Шаг = 3;
Форма1.Открыть();
ШагВверх_ВыборВремени_метод.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.Значение = "21:35:12"
, "", "!!! ") + "ШагВверх_ВыборВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Шаг = 3;
ВыборВремени1.Значение = "21:35:09";
ВыборВремени1.ШагВверх(1);
Форма1.Открыть();
ШагВверх_ВыборДаты_метод.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.Значение = "1970-01-07"
, "", "!!! ") + "ШагВверх_ВыборДаты_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Шаг = 3;
ВыборДаты1.Значение = "1970-01-04";
ВыборДаты1.ШагВверх(1);
Форма1.Открыть();
ШагВверх_ВыборМестнойДатыВремени_метод.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Значение = "1970-01-01T00:00:06"
, "", "!!! ") + "ШагВверх_ВыборМестнойДатыВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Шаг = 3;
ВыборМестнойДатыВремени1.Значение = "1970-01-01T00:00:03";
ВыборМестнойДатыВремени1.ШагВверх(1);
Форма1.Открыть();
ШагВверх_ВыборМесяца_метод.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.Значение = "1970-07"
, "", "!!! ") + "ШагВверх_ВыборМесяца_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Шаг = 3;
ВыборМесяца1.Значение = "1970-04";
ВыборМесяца1.ШагВверх(1);
Форма1.Открыть();
ШагВверх_ВыборНедели_метод.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.Значение = "1970-W07"
, "", "!!! ") + "ШагВверх_ВыборНедели_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Шаг = 3;
ВыборНедели1.Значение = "1970-W04";
ВыборНедели1.ШагВверх(1);
Форма1.Открыть();
ШагВверх_ПолеЧисла_метод.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.Значение = 78.5
, "", "!!! ") + "ШагВверх_ПолеЧисла_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ПолеЧисла1.ШагВверх(1);
ДФ.ПолучитьСвойство(ПолеЧисла1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Шаг = 0.5;
ПолеЧисла1.Значение = 77.5;
ПолеЧисла1.ШагВверх(1);
Форма1.Открыть();
ШагВверх_Ползунок_метод.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.Значение = 0.6
, "", "!!! ") + "ШагВверх_Ползунок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Шаг = 0.3;
Ползунок1.Значение = 0.3;
Ползунок1.ШагВверх(1);
Форма1.Открыть();
ШагВниз_ВыборВремени_метод.os
Перем ДФ, ВыборВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборВремени1.Значение = "21:35:03"
, "", "!!! ") + "ШагВниз_ВыборВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборВремени1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Шаг = 3;
ВыборВремени1.Значение = "21:35:06";
ВыборВремени1.ШагВниз(1);
Форма1.Открыть();
ШагВниз_ВыборДаты_метод.os
Перем ДФ, ВыборДаты1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборДаты1.Значение = "1969-12-26"
, "", "!!! ") + "ШагВниз_ВыборДаты_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборДаты1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Шаг = 3;
ВыборДаты1.Значение = "1969-12-29";
ВыборДаты1.ШагВниз(1);
Форма1.Открыть();
ШагВниз_ВыборМестнойДатыВремени_метод.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Значение = "1969-12-31T23:59:54"
, "", "!!! ") + "ШагВниз_ВыборМестнойДатыВремени_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМестнойДатыВремени1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Шаг = 3;
ВыборМестнойДатыВремени1.Значение = "1969-12-31T23:59:57";
ВыборМестнойДатыВремени1.ШагВниз(1);
Форма1.Открыть();
ШагВниз_ВыборМесяца_метод.os
Перем ДФ, ВыборМесяца1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборМесяца1.Значение = "1969-07"
, "", "!!! ") + "ШагВниз_ВыборМесяца_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборМесяца1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Шаг = 3;
ВыборМесяца1.Значение = "1969-10";
ВыборМесяца1.ШагВниз(1);
Форма1.Открыть();
ШагВниз_ВыборНедели_метод.os
Перем ДФ, ВыборНедели1;
Процедура Свойство() Экспорт
Сообщить(?(
ВыборНедели1.Значение = "1969-W50"
, "", "!!! ") + "ШагВниз_ВыборНедели_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ВыборНедели1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Шаг = 3;
ВыборНедели1.Значение = "1970-W01";
ВыборНедели1.ШагВниз(1);
Форма1.Открыть();
ШагВниз_ПолеЧисла_метод.os
Перем ДФ, ПолеЧисла1;
Процедура Свойство() Экспорт
Сообщить(?(
ПолеЧисла1.Значение = 12
, "", "!!! ") + "ШагВниз_ПолеЧисла_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеЧисла1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Шаг = 3;
ПолеЧисла1.Значение = 15;
ПолеЧисла1.ШагВниз(1);
Форма1.Открыть();
ШагВниз_Ползунок_метод.os
Перем ДФ, Ползунок1;
Процедура Свойство() Экспорт
Сообщить(?(
Ползунок1.Значение = 12
, "", "!!! ") + "ШагВниз_Ползунок_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Ползунок1, "Значение", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Шаг = 3;
Ползунок1.Значение = 15;
Ползунок1.ШагВниз(1);
Форма1.Открыть();
ШапкаТаблицы_Таблица_свойство.os
Перем ДФ, Таблица1, ШапкаТаблицы1;
Процедура Форма1_Загружена() Экспорт
// Элементы = ШапкаТаблицы1.Элементы;
// Для А = 0 По Элементы.ВГраница() Цикл
// Эл = Элементы.Получить(А);
// Сообщить("Эл = " + Эл + " ключ - " + Эл.КлючЭлемента);
// КонецЦикла;
Сообщить(?(
ШапкаТаблицы1.Элементы.Количество() = 1
, "", "!!! ") + "ШапкаТаблицы_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
Форма1.Открыть();
Ширина_ДанныеРисунка_свойство.os
Перем ДФ, ДанныеРисунка2;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДанныеРисунка2.Ширина = 600
, "", "!!! ") + "Ширина_ДанныеРисунка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 650;
Холст1.Высота = 550;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
ДанныеРисунка1 = Контекст2d1.СоздатьДанныеРисунка(600, 500);
// Сообщить("ДанныеРисунка1.Ширина = " + ДанныеРисунка1.Ширина);
// Сообщить("ДанныеРисунка1.Высота = " + ДанныеРисунка1.Высота);
ДанныеРисунка2 = Контекст2d1.СоздатьДанныеРисунка(ДанныеРисунка1);
ДанныеРисунка2.Цвет = ДФ.Цвет.Синий;
Контекст2d1.ПоместитьДанныеРисунка(ДанныеРисунка2, 10, 10);
Форма1.Открыть();
Ширина_Изображение_свойство.os
Перем ДФ, Изображение2;
Процедура Свойство() Экспорт
Сообщить(?(
Изображение2.Ширина = 32
, "", "!!! ") + "Ширина_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Изображение2, "Ширина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Источник = "border.png";
Абзац2 = Форма1.ДобавитьДочерний(ДФ.Абзац());
Изображение2 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение2.Источник = "border.png";
Изображение2.Ширина = 32;
Изображение2.Высота = 32;
Форма1.Открыть();
Ширина_ОкноСообщений_свойство.os
Перем ДФ, ОкноСообщений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОкноСообщений1.Ширина = 750
, "", "!!! ") + "Ширина_ОкноСообщений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
ОкноСообщений1.Ширина = 750;
ОкноСообщений1.Показать();
Форма1.Открыть();
Ширина_Прямоугольник_свойство.os
Перем ДФ, Прямоугольник1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Прямоугольник1.Ширина = 100
, "", "!!! ") + "Ширина_Прямоугольник_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Прямоугольник1 = ДФ.Прямоугольник();
Прямоугольник1.Икс = 10;
Прямоугольник1.Игрек = 10;
Прямоугольник1.Ширина = 100;
Прямоугольник1.Высота = 150;
Прямоугольник2 = ДФ.Прямоугольник(10, 10, 100, 150);
Форма1.Открыть();
Ширина_Размер_свойство.os
Перем ДФ, Размер1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Размер1.Ширина = 20
, "", "!!! ") + "Ширина_Размер_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Размер1 = ДФ.Размер();
Размер1.Ширина = 20;
Размер1.Высота = 40;
Размер2 = ДФ.Размер(50, 60);
Форма1.Открыть();
Ширина_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.Ширина = "400px"
, "", "!!! ") + "Ширина_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "Ширина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 400;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.Границы = ДФ.Границы(1, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Блок1.Стиль.ЦветФона = ДФ.Цвет.Розовый;
Форма1.Открыть();
Ширина_Уведомления_свойство.os
Перем ДФ, Уведомления1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Уведомления1.Ширина = 550
, "", "!!! ") + "Ширина_Уведомления_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Уведомления1 = ДФ.Уведомления();
Уведомления1.Текст = "В декабре, в декабре
|Все деревья в серебре.
|Нашу речку, словно в сказке,
|За ночь вымостил мороз,
|Обновил коньки, салазки,
|Елку из лесу привез.
|";
Уведомления1.Ширина = 550;
Уведомления1.Показать();
Уведомления1.Показать();
Уведомления1.Показать();
Форма1.Открыть();
Ширина_Холст_свойство.os
Перем ДФ, Холст1;
Процедура Свойство() Экспорт
Сообщить(?(
Холст1.Ширина = 250
, "", "!!! ") + "Ширина_Холст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Холст1, "Ширина", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 250;
Холст1.Высота = 250;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.ЗаполнитьПрямоугольник(10, 10, 100, 100);
Форма1.Открыть();
ШиринаВерхнейГраницы_ВерхняяГраница_свойство.os
Перем ДФ, ВерхняяГраница1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВерхняяГраница1.ШиринаВерхнейГраницы = 10
, "", "!!! ") + "ШиринаВерхнейГраницы_ВерхняяГраница_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ВерхняяГраница1 = ДФ.ВерхняяГраница();
ВерхняяГраница1.ШиринаВерхнейГраницы = 10;
Форма1.Открыть();
ШиринаВерхнейГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ШиринаВерхнейГраницы = "15px"
, "", "!!! ") + "ШиринаВерхнейГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ШиринаВерхнейГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.СтильВерхнейГраницы = ДФ.СтильГраницы.ЧертаПробел;
Блок1.Стиль.ШиринаВерхнейГраницы = 15;
Форма1.Открыть();
ШиринаВерхнейГраницы_ШиринаГраниц_свойство.os
Перем ДФ, ШиринаГраниц1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ШиринаГраниц1.ШиринаВерхнейГраницы = 2
, "", "!!! ") + "ШиринаВерхнейГраницы_ШиринаГраниц_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Границы = ДФ.Границы(, ДФ.СтильГраницы.ЧертаПробел, ДФ.Цвет.Красный);
ШиринаГраниц1 = ДФ.ШиринаГраниц();
ШиринаГраниц1.ШиринаВерхнейГраницы = 2;
ШиринаГраниц1.ШиринаПравойГраницы = 4;
ШиринаГраниц1.ШиринаНижнейГраницы = 6;
ШиринаГраниц1.ШиринаЛевойГраницы = 8;
Блок1.Стиль.ШиринаГраниц = ШиринаГраниц1;
Форма1.Открыть();
ШиринаГраниц_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ШиринаГраниц = "2px 4px 6px 8px"
, "", "!!! ") + "ШиринаГраниц_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ШиринаГраниц", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Границы = ДФ.Границы(, ДФ.СтильГраницы.ЧертаПробел, ДФ.Цвет.Красный);
Блок1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(2, 4, 6, 8);
Форма1.Открыть();
ШиринаГраницы_Границы_свойство.os
Перем ДФ, Границы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Границы1.ШиринаГраницы = ДФ.ШиринаГраницы.Толстая
, "", "!!! ") + "ШиринаГраницы_Границы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Блок1.Текст = "Блок1";
Границы1 = ДФ.Границы();
Границы1.ШиринаГраницы = ДФ.ШиринаГраницы.Толстая;
Границы1.СтильГраницы = ДФ.СтильГраницы.Двойная;
Границы1.ЦветГраницы = ДФ.Цвет.Аквамариновый;
Блок1.Стиль.Границы = Границы1;
Форма1.Открыть();
ШиринаКартинкиГраницы_КартинкаГраницы_свойство.os
Перем ДФ, КартинкаГраницы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
КартинкаГраницы1.ШиринаКартинкиГраницы = 10
, "", "!!! ") + "ШиринаКартинкиГраницы_КартинкаГраницы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Текст = "Здравствуй МИР!";
Блок1.Стиль.Границы = ДФ.Границы(15, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Заполнение = ДФ.Заполнение(10, 20, 20, 10);
КартинкаГраницы1 = ДФ.КартинкаГраницы();
// КартинкаГраницы1.ИсточникКартинкиГраницы = "file:///C:/444/~Деклар Форма/abc.png";
КартинкаГраницы1.ИсточникКартинкиГраницы = "border.png";
КартинкаГраницы1.НарезкаКартинкиГраницы = 30;
КартинкаГраницы1.ШиринаКартинкиГраницы = 10;
КартинкаГраницы1.СмещениеКартинкиГраницы = 10;
КартинкаГраницы1.МозаикаКартинкиГраницы = ДФ.МозаикаКартинкиГраницы.Закруглять;
Блок1.Стиль.КартинкаГраницы = КартинкаГраницы1;
Форма1.Открыть();
ШиринаКартинкиГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ШиринаКартинкиГраницы = "10px 20px"
, "", "!!! ") + "ШиринаКартинкиГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ШиринаКартинкиГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.ЦветФона = ДФ.Цвет.СветлоСерый;
Блок1.Стиль.Границы = ДФ.Границы(30, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.ИсточникКартинкиГраницы = "border.png";
Блок1.Стиль.НарезкаКартинкиГраницы = 30;
Блок1.Стиль.ШиринаКартинкиГраницы = ДФ.Размер(10, 20);
Блок1.Стиль.СмещениеКартинкиГраницы = 0;
Блок1.Стиль.МозаикаКартинкиГраницы = ДФ.МозаикаКартинкиГраницы.Закруглять;
Форма1.Открыть();
ШиринаКолонок_КолонкиЭлемента_свойство.os
Перем ДФ, КолонкиЭлемента1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
КолонкиЭлемента1.ШиринаКолонок = 100
, "", "!!! ") + "ШиринаКолонок_КолонкиЭлемента_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.Текст = "– Ах ты, шалун! – воскликнула Алиса и чмокнула котенка в мокрый носик, делая при этом сердитое лицо.
|– Разве Дина тебе не объясняла, что хорошо, а что плохо? Ай-я-яй, Дина! Ты слышишь? Плохо!
|И Алиса укоризненно покачала головой. Потом она подхватила котенка, собрала запутанный ворох ниток и, поудобнее устроившись в кресле, стала снова мотать клубок.
|Но работа не очень-то спорилась, потому что она не переставая болтала то с котенком, а то и сама с собой.
|Котенок с невинным видом сидел у нее на коленях и только иногда легонько цапал когтистой лапкой клубок, словно хотел помочь Алисе.
|– Ты, котик, и не догадываешься, наверное, что будет завтра? – спрашивала Алиса.
|– Откуда тебе! Ты же не сидел со мной вчера у окошка. Тебя умывали. А я видела, как ребята собирали ветки для костра.
|Знаешь, какой ворох нужен для хорошего костра? Но тут, как назло, пошел снег, стало холодно, и их всех позвали домой.
|Но завтра! Завтра непременно будет костер, и мы с тобой, котик, пойдем поглядеть.
|
|Разговаривая, Алиса обматывала котенка ниткой. Шерстяная нитка так подходила к цвету его шерстки!
|Но котенок вдруг вырвался, клубок вывалился из рук Алисы и снова размотался.";
КолонкиЭлемента1 = ДФ.КолонкиЭлемента();
КолонкиЭлемента1.ШиринаКолонок = 100;
КолонкиЭлемента1.КоличествоКолонок = 3;
Абзац1.Стиль.КолонкиЭлемента = КолонкиЭлемента1;
Форма1.Открыть();
ШиринаКолонок_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ШиринаКолонок = "100px"
, "", "!!! ") + "ШиринаКолонок_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ШиринаКолонок", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Абзац1.Текст = "– Ах ты, шалун! – воскликнула Алиса и чмокнула котенка в мокрый носик, делая при этом сердитое лицо.
|– Разве Дина тебе не объясняла, что хорошо, а что плохо? Ай-я-яй, Дина! Ты слышишь? Плохо!
|И Алиса укоризненно покачала головой. Потом она подхватила котенка, собрала запутанный ворох ниток и, поудобнее устроившись в кресле, стала снова мотать клубок.
|Но работа не очень-то спорилась, потому что она не переставая болтала то с котенком, а то и сама с собой.
|Котенок с невинным видом сидел у нее на коленях и только иногда легонько цапал когтистой лапкой клубок, словно хотел помочь Алисе.
|– Ты, котик, и не догадываешься, наверное, что будет завтра? – спрашивала Алиса.
|– Откуда тебе! Ты же не сидел со мной вчера у окошка. Тебя умывали. А я видела, как ребята собирали ветки для костра.
|Знаешь, какой ворох нужен для хорошего костра? Но тут, как назло, пошел снег, стало холодно, и их всех позвали домой.
|Но завтра! Завтра непременно будет костер, и мы с тобой, котик, пойдем поглядеть.
|
|Разговаривая, Алиса обматывала котенка ниткой. Шерстяная нитка так подходила к цвету его шерстки!
|Но котенок вдруг вырвался, клубок вывалился из рук Алисы и снова размотался.";
Абзац1.Стиль.ШиринаКолонок = 100;
Форма1.Открыть();
ШиринаКонтура_Контур_свойство.os
Перем ДФ, Контур1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контур1.ШиринаКонтура = 5
, "", "!!! ") + "ШиринаКонтура_Контур_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Текст = "Здравствуй МИР!";
Блок1.Стиль.Границы = ДФ.Границы(15, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);
Блок1.Стиль.Заполнение = ДФ.Заполнение(10, 20, 20, 10);
Контур1 = ДФ.Контур();
Контур1.ШиринаКонтура = 5;
Контур1.СтильКонтура = ДФ.СтильГраницы.Двойная;
Контур1.ЦветКонтура = ДФ.Цвет.Серый;
Блок1.Стиль.Контур = Контур1;
Форма1.Открыть();
ШиринаКонтура_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ШиринаКонтура = "7px"
, "", "!!! ") + "ШиринаКонтура_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ШиринаКонтура", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 250;
Блок1.Текст = "Здравствуй МИР!";
Блок1.Стиль.СтильКонтура = ДФ.СтильКонтура.ТочкаПробел;
Блок1.Стиль.ШиринаКонтура = 7;
Форма1.Открыть();
ШиринаЛевойГраницы_ЛеваяГраница_свойство.os
Перем ДФ, ЛеваяГраница1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЛеваяГраница1.ШиринаЛевойГраницы = 4
, "", "!!! ") + "ШиринаЛевойГраницы_ЛеваяГраница_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Здравствуй МИР!";
ЛеваяГраница1 = ДФ.ЛеваяГраница();
ЛеваяГраница1.ШиринаЛевойГраницы = 4;
ЛеваяГраница1.СтильЛевойГраницы = ДФ.СтильГраницы.ТочкаПробел;
ЛеваяГраница1.ЦветЛевойГраницы = ДФ.Цвет.Красный;
ЛеваяГраница1 = ЛеваяГраница1;
Блок1.Стиль.ЛеваяГраница = ЛеваяГраница1;
Блок1.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Форма1.Открыть();
ШиринаЛевойГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ШиринаЛевойГраницы = "2px"
, "", "!!! ") + "ШиринаЛевойГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ШиринаЛевойГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.СтильЛевойГраницы = ДФ.СтильГраницы.ЧертаПробел;
Блок1.Стиль.ШиринаЛевойГраницы = 2;
Форма1.Открыть();
ШиринаЛевойГраницы_ШиринаГраниц_свойство.os
Перем ДФ, ШиринаГраниц1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ШиринаГраниц1.ШиринаЛевойГраницы = 8
, "", "!!! ") + "ШиринаЛевойГраницы_ШиринаГраниц_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Границы = ДФ.Границы(, ДФ.СтильГраницы.ЧертаПробел, ДФ.Цвет.Красный);
ШиринаГраниц1 = ДФ.ШиринаГраниц();
ШиринаГраниц1.ШиринаВерхнейГраницы = 2;
ШиринаГраниц1.ШиринаПравойГраницы = 4;
ШиринаГраниц1.ШиринаНижнейГраницы = 6;
ШиринаГраниц1.ШиринаЛевойГраницы = 8;
Блок1.Стиль.ШиринаГраниц = ШиринаГраниц1;
Форма1.Открыть();
ШиринаЛинии_Контекст2d_свойство.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контекст2d1.ШиринаЛинии = 10
, "", "!!! ") + "ШиринаЛинии_Контекст2d_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.НачатьПуть();
Контекст2d1.ШиринаЛинии = 10;
Контекст2d1.СтильКонцовЛинии = ДФ.СтильКонцовЛинии.Торец;
Контекст2d1.ПерейтиКТочке(20, 20);
Контекст2d1.Линия(200, 20);
Контекст2d1.Начертить();
Контекст2d1.НачатьПуть();
Контекст2d1.ШиринаЛинии = 10;
Контекст2d1.СтильКонцовЛинии = ДФ.СтильКонцовЛинии.Круг;
Контекст2d1.ПерейтиКТочке(20, 40);
Контекст2d1.Линия(200, 40);
Контекст2d1.Начертить();
Контекст2d1.НачатьПуть();
Контекст2d1.ШиринаЛинии = 10;
Контекст2d1.СтильКонцовЛинии = ДФ.СтильКонцовЛинии.Квадрат;
Контекст2d1.ПерейтиКТочке(20, 60);
Контекст2d1.Линия(200, 60);
Контекст2d1.Начертить();
Форма1.Открыть();
ШиринаНижнейГраницы_НижняяГраница_свойство.os
Перем ДФ, НижняяГраница1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НижняяГраница1.ШиринаНижнейГраницы = 4
, "", "!!! ") + "ШиринаНижнейГраницы_НижняяГраница_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Здравствуй МИР!";
НижняяГраница1 = ДФ.НижняяГраница();
НижняяГраница1.ШиринаНижнейГраницы = 4;
НижняяГраница1.СтильНижнейГраницы = ДФ.СтильГраницы.ТочкаПробел;
НижняяГраница1.ЦветНижнейГраницы = ДФ.Цвет.Красный;
Блок1.Стиль.НижняяГраница = НижняяГраница1;
Блок1.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Форма1.Открыть();
ШиринаНижнейГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ШиринаНижнейГраницы = "5px"
, "", "!!! ") + "ШиринаНижнейГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ШиринаНижнейГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.СтильНижнейГраницы = ДФ.СтильГраницы.ЧертаПробел;
Блок1.Стиль.ШиринаНижнейГраницы = 5;
Форма1.Открыть();
ШиринаНижнейГраницы_ШиринаГраниц_свойство.os
Перем ДФ, ШиринаГраниц1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ШиринаГраниц1.ШиринаНижнейГраницы = 6
, "", "!!! ") + "ШиринаНижнейГраницы_ШиринаГраниц_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Границы = ДФ.Границы(, ДФ.СтильГраницы.ЧертаПробел, ДФ.Цвет.Красный);
ШиринаГраниц1 = ДФ.ШиринаГраниц();
ШиринаГраниц1.ШиринаВерхнейГраницы = 2;
ШиринаГраниц1.ШиринаПравойГраницы = 4;
ШиринаГраниц1.ШиринаНижнейГраницы = 6;
ШиринаГраниц1.ШиринаЛевойГраницы = 8;
Блок1.Стиль.ШиринаГраниц = ШиринаГраниц1;
Форма1.Открыть();
ШиринаОкна_АргументыСобытия_свойство.os
Перем ДФ, Кнопка5, Абзац1, Форма1;
Процедура Форма1_РазмерИзменен() Экспорт
// Сообщить("Форма1_РазмерИзменен " + ДФ.АргументыСобытия.ШиринаОкна + " х " + ДФ.АргументыСобытия.ВысотаОкна);
// Сообщить("Форма1_РазмерИзменен " + Форма1.ШиринаОкна + " х " + Форма1.ВысотаОкна);
Сообщить(?(
ДФ.АргументыСобытия.ШиринаОкна > 0
, "", "!!! ") + "ШиринаОкна_АргументыСобытия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 500;
Форма1.РазмерИзменен = ДФ.Действие(ЭтотОбъект, "Форма1_РазмерИзменен");
Форма1.Позиция = ДФ.ПозицияФормы.Центр;
Форма1.Контент.Текст = "Измени размер формы";
Форма1.Открыть();
ШиринаПравойГраницы_ПраваяГраница_свойство.os
Перем ДФ, ПраваяГраница1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПраваяГраница1.ШиринаПравойГраницы = 4
, "", "!!! ") + "ШиринаПравойГраницы_ПраваяГраница_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Здравствуй МИР!";
ПраваяГраница1 = ДФ.ПраваяГраница();
ПраваяГраница1.ШиринаПравойГраницы = 4;
ПраваяГраница1.СтильПравойГраницы = ДФ.СтильГраницы.ТочкаПробел;
ПраваяГраница1.ЦветПравойГраницы = ДФ.Цвет.Красный;
Блок1.Стиль.ПраваяГраница = ПраваяГраница1;
Блок1.Стиль.ЦветФона = ДФ.Цвет("БледноБирюзовый");
Форма1.Открыть();
ШиринаПравойГраницы_Стиль_свойство.os
Перем ДФ, Блок1;
Процедура Свойство() Экспорт
Сообщить(?(
Блок1.Стиль.ШиринаПравойГраницы = "5px"
, "", "!!! ") + "ШиринаПравойГраницы_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Блок1.Стиль, "ШиринаПравойГраницы", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Ширина = 100;
Блок1.Стиль.Высота = 50;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.СтильПравойГраницы = ДФ.СтильГраницы.ЧертаПробел;
Блок1.Стиль.ШиринаПравойГраницы = 5;
Форма1.Открыть();
ШиринаПравойГраницы_ШиринаГраниц_свойство.os
Перем ДФ, ШиринаГраниц1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ШиринаГраниц1.ШиринаПравойГраницы = 4
, "", "!!! ") + "ШиринаПравойГраницы_ШиринаГраниц_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Стиль.Высота = 20;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;
Блок1.Стиль.Границы = ДФ.Границы(, ДФ.СтильГраницы.ЧертаПробел, ДФ.Цвет.Красный);
ШиринаГраниц1 = ДФ.ШиринаГраниц();
ШиринаГраниц1.ШиринаВерхнейГраницы = 2;
ШиринаГраниц1.ШиринаПравойГраницы = 4;
ШиринаГраниц1.ШиринаНижнейГраницы = 6;
ШиринаГраниц1.ШиринаЛевойГраницы = 8;
Блок1.Стиль.ШиринаГраниц = ШиринаГраниц1;
Форма1.Открыть();
ШиринаРазделителяКолонок_РазделительКолонок_свойство.os
Перем ДФ, РазделительКолонок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
РазделительКолонок1.ШиринаРазделителяКолонок = ДФ.ШиринаГраницы.Средняя
, "", "!!! ") + "ШиринаРазделителяКолонок_РазделительКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РазделительКолонок1 = ДФ.РазделительКолонок();
РазделительКолонок1.ШиринаРазделителяКолонок = ДФ.ШиринаГраницы.Средняя;
РазделительКолонок1.СтильРазделителяКолонок = ДФ.СтильГраницы.Двойная;
РазделительКолонок1.ЦветРазделителяКолонок = ДФ.Цвет.Синий;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("БелаяДымка");
Абзац1.Текст = "И тут появилась Черная Королева.
|«Ого! Как выросла! – подумала Алиса. – Когда я нашла ее в золе, она была не больше моего пальца. А теперь я ей по плечо».
|– У нас такой чудесный воздух, что все тянутся вверх не по дням, а по часам, – сказала Роза, будто подслушала мысли Алисы.
|– Пойду навстречу ей, – сказала Алиса, как бы извиняясь перед цветами.
|С ними было, конечно, весело поболтать, но беседа с Королевой наверняка намного интересней.
|– Если хочешь встретиться, – посоветовала Роза, – иди не к ней, а от нее.
|Такой явной глупости Алиса и слушать не стала. И, конечно же, пошла прямиком к Королеве. Но, к ее изумлению, Королева мгновенно исчезла из виду.
|А дорожка снова привела Алису к дому. Раздосадованная, Алиса отпрянула от дома и оглянулась. Королева маячила вдалеке позади нее.
|Алиса заколебалась: уж не права ли была Роза и не следует ли двинуться в противоположную от Королевы сторону? Так она и сделала.
|И все вышло чудесно! Буквально через минуту она столкнулась нос к носу с Королевой. И что удивительно, холм, до которого она так
|долго не могла дойти, возвышался прямо перед ней.
|– Ты откуда взялась? – строго спросила Королева. – Куда идешь? Гляди в глаза! Говори почтительно! Не маши руками, не верти головой и не дрыгай ногами!
|Алиса как можно вежливее объяснила, что немного заблудилась, а теперь разобралась, что к чему и что куда, и идет себе своей дорогой.";
Абзац1.Стиль.РазделительКолонок = РазделительКолонок1;
Абзац1.Стиль.КоличествоКолонок = 3;
Форма1.Открыть();
ШиринаРазделителяКолонок_Стиль_свойство.os
Перем ДФ,Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.ШиринаРазделителяКолонок = "15px"
, "", "!!! ") + "ШиринаРазделителяКолонок_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "ШиринаРазделителяКолонок", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
РазделительКолонок1 = ДФ.РазделительКолонок(ДФ.ШиринаГраницы.Средняя, ДФ.СтильГраницы.Двойная, ДФ.Цвет.Синий);
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Стиль.ЦветФона = ДФ.Цвет("БелаяДымка");
Абзац1.Текст = "И тут появилась Черная Королева.
|«Ого! Как выросла! – подумала Алиса. – Когда я нашла ее в золе, она была не больше моего пальца. А теперь я ей по плечо».
|– У нас такой чудесный воздух, что все тянутся вверх не по дням, а по часам, – сказала Роза, будто подслушала мысли Алисы.
|– Пойду навстречу ей, – сказала Алиса, как бы извиняясь перед цветами.
|С ними было, конечно, весело поболтать, но беседа с Королевой наверняка намного интересней.
|– Если хочешь встретиться, – посоветовала Роза, – иди не к ней, а от нее.
|Такой явной глупости Алиса и слушать не стала. И, конечно же, пошла прямиком к Королеве. Но, к ее изумлению, Королева мгновенно исчезла из виду.
|А дорожка снова привела Алису к дому. Раздосадованная, Алиса отпрянула от дома и оглянулась. Королева маячила вдалеке позади нее.
|Алиса заколебалась: уж не права ли была Роза и не следует ли двинуться в противоположную от Королевы сторону? Так она и сделала.
|И все вышло чудесно! Буквально через минуту она столкнулась нос к носу с Королевой. И что удивительно, холм, до которого она так
|долго не могла дойти, возвышался прямо перед ней.
|– Ты откуда взялась? – строго спросила Королева. – Куда идешь? Гляди в глаза! Говори почтительно! Не маши руками, не верти головой и не дрыгай ногами!
|Алиса как можно вежливее объяснила, что немного заблудилась, а теперь разобралась, что к чему и что куда, и идет себе своей дорогой.";
Абзац1.Стиль.РазделительКолонок = РазделительКолонок1;
Абзац1.Стиль.КоличествоКолонок = 3;
Абзац1.Стиль.ШиринаРазделителяКолонок = 15;
Форма1.Открыть();
Шрифт_Контекст2d_свойство.os
Перем ДФ, Контекст2d1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
"" + Контекст2d1.Шрифт = "ДфШрифт"
, "", "!!! ") + "Шрифт_Контекст2d_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 500;
Форма1.НачальнаяВысота = 400;
Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Ширина = 300;
Холст1.Высота = 150;
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);
Контекст2d1 = Холст1.Контекст2d;
Контекст2d1.Шрифт = ДФ.Шрифт(ДФ.СтильШрифта.Курсив, , ДФ.ЖирностьШрифта.Жирный, 20, 50, "serif");
Контекст2d1.ЗаполнитьТекст("OneScript", 10, 60);
Форма1.Открыть();
Шрифт_Стиль_свойство.os
Перем ДФ, Абзац1;
Процедура Свойство() Экспорт
Сообщить(?(
Абзац1.Стиль.Шрифт = "italic small-caps bold 20px / 50px arial, serif"
, "", "!!! ") + "Шрифт_Стиль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(Абзац1.Стиль, "Шрифт", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Когда нежданно грусти тень
|Заденет нас крылом,
|Мы вспомним тот июльский день
|И в сень его сойдем.
|И сказка снова потечет,
|И новым дням начнется счет.";
Абзац1.Стиль.ЦветФона = ДФ.Цвет("НебесноГолубой");
Шрифт1 = ДФ.Шрифт();
Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
Шрифт1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
Шрифт1.РазмерШрифта = 20;
Шрифт1.ВысотаСтроки = 50;
Шрифт1.СемействоШрифтов = "arial,serif";
Абзац1.Стиль.Шрифт = Шрифт1;
Форма1.Открыть();
Экспонента_Математика_метод.os
Перем ДФ;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДФ.Математика().Экспонента(5) = 148.413159102577
, "", "!!! ") + "Экспонента_Математика_метод.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 200;
Форма1.Контент.Текст = "" + ДФ.Математика().Экспонента(5);
Форма1.Открыть();
Элементы_Абзац_свойство.os
Перем ДФ, Абзац1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Абзац1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Абзац_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Форма1;
Абзац1.Текст = "Абзац1";
Абзац1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац2 = ДФ.Абзац();
Абзац2.Родитель = Абзац1;
Абзац2.Текст = "Абзац2";
Абзац2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Артикль_свойство.os
Перем ДФ, Артикль1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Артикль1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Артикль_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Артикль1 = ДФ.Артикль();
Артикль1.Родитель = Форма1;
Артикль1.Текст = "Артикль1";
Артикль1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Артикль2 = ДФ.Артикль();
Артикль2.Родитель = Артикль1;
Артикль2.Текст = "Артикль2";
Артикль2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Блок_свойство.os
Перем ДФ, Блок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Блок1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Блок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Блок1.Текст = "Блок1";
Блок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Текст = "Блок2";
Блок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ВыборВремени_свойство.os
Перем ДФ, ВыборВремени1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборВремени1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ВыборВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ВыборВремени1 = ДФ.ВыборВремени();
ВыборВремени1.Родитель = Форма1;
ВыборВремени1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборВремени2 = ДФ.ВыборВремени();
ВыборВремени2.Родитель = ВыборВремени1;
ВыборВремени2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ВыборДаты_свойство.os
Перем ДФ, ВыборДаты1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборДаты1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ВыборДаты_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ВыборДаты1 = ДФ.ВыборДаты();
ВыборДаты1.Родитель = Форма1;
ВыборДаты1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборДаты2 = ДФ.ВыборДаты();
ВыборДаты2.Родитель = ВыборДаты1;
ВыборДаты2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ВыборДатыВремени_свойство.os
Перем ДФ, ВыборДатыВремени1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборДатыВремени1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ВыборДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ВыборДатыВремени1 = ДФ.ВыборДатыВремени();
ВыборДатыВремени1.Родитель = Форма1;
ВыборДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборДатыВремени2 = ДФ.ВыборДатыВремени();
ВыборДатыВремени2.Родитель = ВыборДатыВремени1;
ВыборДатыВремени2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ВыборМестнойДатыВремени_свойство.os
Перем ДФ, ВыборМестнойДатыВремени1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборМестнойДатыВремени1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ВыборМестнойДатыВремени_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ВыборМестнойДатыВремени1 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени1.Родитель = Форма1;
ВыборМестнойДатыВремени1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборМестнойДатыВремени2 = ДФ.ВыборМестнойДатыВремени();
ВыборМестнойДатыВремени2.Родитель = ВыборМестнойДатыВремени1;
ВыборМестнойДатыВремени2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ВыборМесяца_свойство.os
Перем ДФ, ВыборМесяца1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборМесяца1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ВыборМесяца_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ВыборМесяца1 = ДФ.ВыборМесяца();
ВыборМесяца1.Родитель = Форма1;
ВыборМесяца1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборМесяца2 = ДФ.ВыборМесяца();
ВыборМесяца2.Родитель = ВыборМесяца1;
ВыборМесяца2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ВыборНедели_свойство.os
Перем ДФ, ВыборНедели1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборНедели1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ВыборНедели_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ВыборНедели1 = ДФ.ВыборНедели();
ВыборНедели1.Родитель = Форма1;
ВыборНедели1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборНедели2 = ДФ.ВыборНедели();
ВыборНедели2.Родитель = ВыборНедели1;
ВыборНедели2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ВыборФайла_свойство.os
Перем ДФ, ВыборФайла1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборФайла1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ВыборФайла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ВыборФайла1 = ДФ.ВыборФайла();
ВыборФайла1.Родитель = Форма1;
ВыборФайла1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборФайла2 = ДФ.ВыборФайла();
ВыборФайла2.Родитель = ВыборФайла1;
ВыборФайла2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ВыборЦвета_свойство.os
Перем ДФ, ВыборЦвета1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ВыборЦвета1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ВыборЦвета_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ВыборЦвета1 = ДФ.ВыборЦвета();
ВыборЦвета1.Родитель = Форма1;
ВыборЦвета1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ВыборЦвета2 = ДФ.ВыборЦвета();
ВыборЦвета2.Родитель = ВыборЦвета1;
ВыборЦвета2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Группа_свойство.os
Перем ДФ, Группа1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Группа1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Группа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Группа1 = ДФ.Группа();
Группа1.Родитель = Форма1;
Группа1.Текст = "Группа1";
Группа1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Группа2 = ДФ.Группа();
Группа2.Родитель = Группа1;
Группа2.Текст = "Группа2";
Группа2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ГруппаКолонок_свойство.os
Перем ДФ, ГруппаКолонок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ГруппаКолонок1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ГруппаКолонок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ГруппаКолонок1 = ДФ.ГруппаКолонок();
ГруппаКолонок1.Родитель = Форма1;
ГруппаКолонок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ГруппаКолонок2 = ДФ.ГруппаКолонок();
ГруппаКолонок2.Родитель = ГруппаКолонок1;
ГруппаКолонок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ГруппировкаПоляСписка_свойство.os
Перем ДФ, ГруппировкаПоляСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ГруппировкаПоляСписка1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ГруппировкаПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = Форма1;
ГруппировкаПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ГруппировкаПоляСписка2 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ГруппировкаПоляСписка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Диалог_свойство.os
Перем ДФ, Диалог1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Диалог1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Диалог_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Текст = "Диалог1";
Диалог1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Диалог2 = ДФ.Диалог();
Диалог2.Родитель = Диалог1;
Диалог2.Текст = "Диалог2";
Диалог2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ДополнительныйБлок_свойство.os
Перем ДФ, ДополнительныйБлок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ДополнительныйБлок1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ДополнительныйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "ДополнительныйБлок1";
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ДополнительныйБлок2 = ДФ.ДополнительныйБлок();
ДополнительныйБлок2.Родитель = ДополнительныйБлок1;
ДополнительныйБлок2.Текст = "ДополнительныйБлок2";
ДополнительныйБлок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ЖирныйТекст_свойство.os
Перем ДФ, ЖирныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЖирныйТекст1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ЖирныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЖирныйТекст1 = ДФ.ЖирныйТекст();
ЖирныйТекст1.Родитель = Форма1;
ЖирныйТекст1.Текст = "ЖирныйТекст1";
ЖирныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЖирныйТекст2 = ДФ.ЖирныйТекст();
ЖирныйТекст2.Родитель = ЖирныйТекст1;
ЖирныйТекст2.Текст = "ЖирныйТекст2";
ЖирныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Заголовок1_свойство.os
Перем ДФ, Заголовок11;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок11.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Заголовок1_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок11 = ДФ.Заголовок1();
Заголовок11.Родитель = Форма1;
Заголовок11.Текст = "Заголовок11";
Заголовок11.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок12 = ДФ.Заголовок1();
Заголовок12.Родитель = Заголовок11;
Заголовок12.Текст = "Заголовок12";
Заголовок12.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Заголовок2_свойство.os
Перем ДФ, Заголовок21;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок21.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Заголовок2_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок21 = ДФ.Заголовок2();
Заголовок21.Родитель = Форма1;
Заголовок21.Текст = "Заголовок21";
Заголовок21.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок22 = ДФ.Заголовок2();
Заголовок22.Родитель = Заголовок21;
Заголовок22.Текст = "Заголовок22";
Заголовок22.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Заголовок3_свойство.os
Перем ДФ, Заголовок31;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок31.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Заголовок3_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок31 = ДФ.Заголовок3();
Заголовок31.Родитель = Форма1;
Заголовок31.Текст = "Заголовок31";
Заголовок31.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок32 = ДФ.Заголовок3();
Заголовок32.Родитель = Заголовок31;
Заголовок32.Текст = "Заголовок32";
Заголовок32.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Заголовок4_свойство.os
Перем ДФ, Заголовок41;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок41.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Заголовок4_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок41 = ДФ.Заголовок4();
Заголовок41.Родитель = Форма1;
Заголовок41.Текст = "Заголовок41";
Заголовок41.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок42 = ДФ.Заголовок4();
Заголовок42.Родитель = Заголовок41;
Заголовок42.Текст = "Заголовок42";
Заголовок42.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Заголовок5_свойство.os
Перем ДФ, Заголовок51;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок51.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Заголовок5_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок51 = ДФ.Заголовок5();
Заголовок51.Родитель = Форма1;
Заголовок51.Текст = "Заголовок51";
Заголовок51.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок52 = ДФ.Заголовок5();
Заголовок52.Родитель = Заголовок51;
Заголовок52.Текст = "Заголовок52";
Заголовок52.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Заголовок6_свойство.os
Перем ДФ, Заголовок61;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок61.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Заголовок6_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок61 = ДФ.Заголовок6();
Заголовок61.Родитель = Форма1;
Заголовок61.Текст = "Заголовок61";
Заголовок61.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок62 = ДФ.Заголовок6();
Заголовок62.Родитель = Заголовок61;
Заголовок62.Текст = "Заголовок62";
Заголовок62.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Заголовок_свойство.os
Перем ДФ, Заголовок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Заголовок1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Заголовок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Заголовок1 = ДФ.Заголовок();
Заголовок1.Родитель = Форма1;
Заголовок1.Текст = "Заголовок1";
Заголовок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Заголовок2 = ДФ.Заголовок();
Заголовок2.Родитель = Заголовок1;
Заголовок2.Текст = "Заголовок2";
Заголовок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ЗаголовокГруппы_свойство.os
Перем ДФ, ЗаголовокГруппы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЗаголовокГруппы1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ЗаголовокГруппы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЗаголовокГруппы1 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы1.Родитель = Форма1;
ЗаголовокГруппы1.Текст = "ЗаголовокГруппы1";
ЗаголовокГруппы1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЗаголовокГруппы2 = ДФ.ЗаголовокГруппы();
ЗаголовокГруппы2.Родитель = ЗаголовокГруппы1;
ЗаголовокГруппы2.Текст = "ЗаголовокГруппы2";
ЗаголовокГруппы2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ЗаголовокРаскрываемогоБлока_свойство.os
Перем ДФ, ЗаголовокРаскрываемогоБлока1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЗаголовокРаскрываемогоБлока1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ЗаголовокРаскрываемогоБлока_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЗаголовокРаскрываемогоБлока1 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока1.Родитель = Форма1;
ЗаголовокРаскрываемогоБлока1.Текст = "ЗаголовокРаскрываемогоБлока1";
ЗаголовокРаскрываемогоБлока1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЗаголовокРаскрываемогоБлока2 = ДФ.ЗаголовокРаскрываемогоБлока();
ЗаголовокРаскрываемогоБлока2.Родитель = ЗаголовокРаскрываемогоБлока1;
ЗаголовокРаскрываемогоБлока2.Текст = "ЗаголовокРаскрываемогоБлока2";
ЗаголовокРаскрываемогоБлока2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Изображение_свойство.os
Перем ДФ, Изображение1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Изображение1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Изображение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Изображение1 = ДФ.Изображение();
Изображение1.Родитель = Форма1;
Изображение1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Изображение2 = ДФ.Изображение();
Изображение2.Родитель = Изображение1;
Изображение2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Индикатор_свойство.os
Перем ДФ, Индикатор1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Индикатор1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Индикатор_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Индикатор1 = ДФ.Индикатор();
Индикатор1.Родитель = Форма1;
Индикатор1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Индикатор2 = ДФ.Индикатор();
Индикатор2.Родитель = Индикатор1;
Индикатор2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Итоги_свойство.os
Перем ДФ, Итоги1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Итоги1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Итоги_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Итоги1 = ДФ.Итоги();
Итоги1.Родитель = Форма1;
Итоги1.Текст = "Итоги1";
Итоги1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Итоги2 = ДФ.Итоги();
Итоги2.Родитель = Итоги1;
Итоги2.Текст = "Итоги2";
Итоги2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Карта_свойство.os
Перем ДФ, Карта1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Карта1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Карта_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Карта1 = ДФ.Карта();
Карта1.Родитель = Форма1;
Карта1.Текст = "Карта1";
Карта1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Карта2 = ДФ.Карта();
Карта2.Родитель = Карта1;
Карта2.Текст = "Карта2";
Карта2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Кнопка_свойство.os
Перем ДФ, Кнопка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Кнопка1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Кнопка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Кнопка1";
Кнопка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Кнопка2 = ДФ.Кнопка();
Кнопка2.Родитель = Кнопка1;
Кнопка2.Текст = "Кнопка2";
Кнопка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Код_свойство.os
Перем ДФ, Код1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Код1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Код_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Код1 = ДФ.Код();
Код1.Родитель = Форма1;
Код1.Текст = "Код1";
Код1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Код2 = ДФ.Код();
Код2.Родитель = Код1;
Код2.Текст = "Код2";
Код2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Колонка_свойство.os
Перем ДФ, Колонка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Колонка1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Колонка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Колонка1 = ДФ.Колонка();
Колонка1.Родитель = Форма1;
Колонка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Колонка2 = ДФ.Колонка();
Колонка2.Родитель = Колонка1;
Колонка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Колонтитул_свойство.os
Перем ДФ, Колонтитул1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Колонтитул1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Колонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Колонтитул1 = ДФ.Колонтитул();
Колонтитул1.Родитель = Форма1;
Колонтитул1.Текст = "Колонтитул1";
Колонтитул1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Колонтитул2 = ДФ.Колонтитул();
Колонтитул2.Родитель = Колонтитул1;
Колонтитул2.Текст = "Колонтитул2";
Колонтитул2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Контент_свойство.os
Перем ДФ, Контент1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Контент1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Контент_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Контент1 = Форма1.Контент;
Контент1.Текст = "Контент1";
Контент1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Абзац2 = ДФ.Абзац();
Абзац2.Родитель = Контент1;
Абзац2.Текст = "Абзац2";
Абзац2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_КурсивТекст_свойство.os
Перем ДФ, КурсивТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
КурсивТекст1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_КурсивТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
КурсивТекст1 = ДФ.КурсивТекст();
КурсивТекст1.Родитель = Форма1;
КурсивТекст1.Текст = "КурсивТекст1";
КурсивТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
КурсивТекст2 = ДФ.КурсивТекст();
КурсивТекст2.Родитель = КурсивТекст1;
КурсивТекст2.Текст = "КурсивТекст2";
КурсивТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Линия_свойство.os
Перем ДФ, Линия1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Линия1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Линия_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Линия1 = ДФ.Линия();
Линия1.Родитель = Форма1;
Линия1.Текст = "Линия1";
Линия1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Линия2 = ДФ.Линия();
Линия2.Родитель = Линия1;
Линия2.Текст = "Линия2";
Линия2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_МаркированныйТекст_свойство.os
Перем ДФ, МаркированныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МаркированныйТекст1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_МаркированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
МаркированныйТекст1 = ДФ.МаркированныйТекст();
МаркированныйТекст1.Родитель = Форма1;
МаркированныйТекст1.Текст = "МаркированныйТекст1";
МаркированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
МаркированныйТекст2 = ДФ.МаркированныйТекст();
МаркированныйТекст2.Родитель = МаркированныйТекст1;
МаркированныйТекст2.Текст = "МаркированныйТекст2";
МаркированныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_МедиаГруппа_свойство.os
Перем ДФ, МедиаГруппа1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МедиаГруппа1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_МедиаГруппа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
МедиаГруппа1 = ДФ.МедиаГруппа();
МедиаГруппа1.Родитель = Форма1;
МедиаГруппа1.Текст = "МедиаГруппа1";
МедиаГруппа1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
МедиаГруппа2 = ДФ.МедиаГруппа();
МедиаГруппа2.Родитель = МедиаГруппа1;
МедиаГруппа2.Текст = "МедиаГруппа2";
МедиаГруппа2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_МелкийТекст_свойство.os
Перем ДФ, МелкийТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
МелкийТекст1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_МелкийТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
МелкийТекст1 = ДФ.МелкийТекст();
МелкийТекст1.Родитель = Форма1;
МелкийТекст1.Текст = "МелкийТекст1";
МелкийТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
МелкийТекст2 = ДФ.МелкийТекст();
МелкийТекст2.Родитель = МелкийТекст1;
МелкийТекст2.Текст = "МелкийТекст2";
МелкийТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_НадстрочныйТекст_свойство.os
Перем ДФ, НадстрочныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НадстрочныйТекст1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_НадстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
НадстрочныйТекст1 = ДФ.НадстрочныйТекст();
НадстрочныйТекст1.Родитель = Форма1;
НадстрочныйТекст1.Текст = "НадстрочныйТекст1";
НадстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
НадстрочныйТекст2 = ДФ.НадстрочныйТекст();
НадстрочныйТекст2.Родитель = НадстрочныйТекст1;
НадстрочныйТекст2.Текст = "НадстрочныйТекст2";
НадстрочныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_НаправленныйТекст_свойство.os
Перем ДФ, НаправленныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НаправленныйТекст1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_НаправленныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
НаправленныйТекст1 = ДФ.НаправленныйТекст();
НаправленныйТекст1.Родитель = Форма1;
НаправленныйТекст1.Текст = "НаправленныйТекст1";
НаправленныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
НаправленныйТекст2 = ДФ.НаправленныйТекст();
НаправленныйТекст2.Родитель = НаправленныйТекст1;
НаправленныйТекст2.Текст = "НаправленныйТекст2";
НаправленныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_НеупорядоченныйСписок_свойство.os
Перем ДФ, НеупорядоченныйСписок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НеупорядоченныйСписок1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_НеупорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
НеупорядоченныйСписок1 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок1.Родитель = Форма1;
НеупорядоченныйСписок1.Текст = "НеупорядоченныйСписок1";
НеупорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
НеупорядоченныйСписок2 = ДФ.НеупорядоченныйСписок();
НеупорядоченныйСписок2.Родитель = НеупорядоченныйСписок1;
НеупорядоченныйСписок2.Текст = "НеупорядоченныйСписок2";
НеупорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_НижнийКолонтитул_свойство.os
Перем ДФ, НижнийКолонтитул1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
НижнийКолонтитул1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_НижнийКолонтитул_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
НижнийКолонтитул1 = ДФ.НижнийКолонтитул();
НижнийКолонтитул1.Родитель = Форма1;
НижнийКолонтитул1.Текст = "НижнийКолонтитул1";
НижнийКолонтитул1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
НижнийКолонтитул2 = ДФ.НижнийКолонтитул();
НижнийКолонтитул2.Родитель = НижнийКолонтитул1;
НижнийКолонтитул2.Текст = "НижнийКолонтитул2";
НижнийКолонтитул2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Область_свойство.os
Перем ДФ, Область1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Область1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Область_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Область1 = ДФ.Область();
Область1.Родитель = Форма1;
Область1.Текст = "Область1";
Область1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Область2 = ДФ.Область();
Область2.Родитель = Область1;
Область2.Текст = "Область2";
Область2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ОбластьТаблицы_свойство.os
Перем ДФ, ОбластьТаблицы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОбластьТаблицы1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ОбластьТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ОбластьТаблицы1 = ДФ.ОбластьТаблицы();
ОбластьТаблицы1.Родитель = Форма1;
ОбластьТаблицы1.Текст = "ОбластьТаблицы1";
ОбластьТаблицы1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ОбластьТаблицы2 = ДФ.ОбластьТаблицы();
ОбластьТаблицы2.Родитель = ОбластьТаблицы1;
ОбластьТаблицы2.Текст = "ОбластьТаблицы2";
ОбластьТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ОбластьТекста_свойство.os
Перем ДФ, ОбластьТекста1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОбластьТекста1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ОбластьТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ОбластьТекста1 = ДФ.ОбластьТекста();
ОбластьТекста1.Родитель = Форма1;
ОбластьТекста1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ОбластьТекста2 = ДФ.ОбластьТекста();
ОбластьТекста2.Родитель = ОбластьТекста1;
ОбластьТекста2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ОписаниеМедиа_свойство.os
Перем ДФ, ОписаниеМедиа1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ОписаниеМедиа1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ОписаниеМедиа_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ОписаниеМедиа1 = ДФ.ОписаниеМедиа();
ОписаниеМедиа1.Родитель = Форма1;
ОписаниеМедиа1.Текст = "ОписаниеМедиа1";
ОписаниеМедиа1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ОписаниеМедиа2 = ДФ.ОписаниеМедиа();
ОписаниеМедиа2.Родитель = ОписаниеМедиа1;
ОписаниеМедиа2.Текст = "ОписаниеМедиа2";
ОписаниеМедиа2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Определение_свойство.os
Перем ДФ, Определение1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Определение1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Определение_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Определение1 = ДФ.Определение();
Определение1.Родитель = Форма1;
Определение1.Текст = "Определение1";
Определение1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Определение2 = ДФ.Определение();
Определение2.Родитель = Определение1;
Определение2.Текст = "Определение2";
Определение2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Переключатель_свойство.os
Перем ДФ, Переключатель1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Переключатель1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Переключатель_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Переключатель1 = ДФ.Переключатель();
Переключатель1.Родитель = Форма1;
Переключатель1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Переключатель2 = ДФ.Переключатель();
Переключатель2.Родитель = Переключатель1;
Переключатель2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Перенос_свойство.os
Перем ДФ, Перенос1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Перенос1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Перенос_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Перенос1 = ДФ.Перенос();
Перенос1.Родитель = Форма1;
Перенос1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Перенос2 = ДФ.Перенос();
Перенос2.Родитель = Перенос1;
Перенос2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Подпись_свойство.os
Перем ДФ, Подпись1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Подпись1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Подпись_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Подпись1 = ДФ.Подпись();
Подпись1.Родитель = Форма1;
Подпись1.Текст = "Подпись1";
Подпись1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Подпись2 = ДФ.Подпись();
Подпись2.Родитель = Подпись1;
Подпись2.Текст = "Подпись2";
Подпись2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ПодстрочныйТекст_свойство.os
Перем ДФ, ПодстрочныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПодстрочныйТекст1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ПодстрочныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ПодстрочныйТекст1 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст1.Родитель = Форма1;
ПодстрочныйТекст1.Текст = "ПодстрочныйТекст1";
ПодстрочныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПодстрочныйТекст2 = ДФ.ПодстрочныйТекст();
ПодстрочныйТекст2.Родитель = ПодстрочныйТекст1;
ПодстрочныйТекст2.Текст = "ПодстрочныйТекст2";
ПодстрочныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ПодчеркнутыйТекст_свойство.os
Перем ДФ, ПодчеркнутыйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПодчеркнутыйТекст1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ПодчеркнутыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ПодчеркнутыйТекст1 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст1.Родитель = Форма1;
ПодчеркнутыйТекст1.Текст = "ПодчеркнутыйТекст1";
ПодчеркнутыйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПодчеркнутыйТекст2 = ДФ.ПодчеркнутыйТекст();
ПодчеркнутыйТекст2.Родитель = ПодчеркнутыйТекст1;
ПодчеркнутыйТекст2.Текст = "ПодчеркнутыйТекст2";
ПодчеркнутыйТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ПолеПароля_свойство.os
Перем ДФ, ПолеПароля1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеПароля1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ПолеПароля_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ПолеПароля1 = ДФ.ПолеПароля();
ПолеПароля1.Родитель = Форма1;
ПолеПароля1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПолеПароля2 = ДФ.ПолеПароля();
ПолеПароля2.Родитель = ПолеПароля1;
ПолеПароля2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ПолеПоиска_свойство.os
Перем ДФ, ПолеПоиска1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеПоиска1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ПолеПоиска_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ПолеПоиска1 = ДФ.ПолеПоиска();
ПолеПоиска1.Родитель = Форма1;
ПолеПоиска1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПолеПоиска2 = ДФ.ПолеПоиска();
ПолеПоиска2.Родитель = ПолеПоиска1;
ПолеПоиска2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Форма1_Загружена() Экспорт
// Для А = 0 По ПолеСписка1.Элементы.ВГраница() Цикл
// Эл = ПолеСписка1.Элементы.Получить(А);
// Сообщить("Эл " + А + " " + Эл + " " + Эл.КлючЭлемента);
// КонецЦикла;
Сообщить(?(
ПолеСписка1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Ширина = 150;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = ПолеСписка1;
ГруппировкаПоляСписка1.Надпись = "Жители деревни Простоквашино";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка1.Значение = "Кот";
ЭлементПоляСписка1.Текст = "Матроскин";
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Пёс";
ЭлементПоляСписка2.Текст = "Шарик";
ЭлементПоляСписка3 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка3.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка3.Значение = "Птица";
ЭлементПоляСписка3.Текст = "Галчонок";
Форма1.Открыть();
Элементы_ПолеТекста_свойство.os
Перем ДФ, ПолеТекста1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеТекста1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ПолеТекста_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПолеТекста2 = ДФ.ПолеТекста();
ПолеТекста2.Родитель = ПолеТекста1;
ПолеТекста2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ПолеЧисла_свойство.os
Перем ДФ, ПолеЧисла1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ПолеЧисла1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ПолеЧисла_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ПолеЧисла1 = ДФ.ПолеЧисла();
ПолеЧисла1.Родитель = Форма1;
ПолеЧисла1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ПолеЧисла2 = ДФ.ПолеЧисла();
ПолеЧисла2.Родитель = ПолеЧисла1;
ПолеЧисла2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Ползунок_свойство.os
Перем ДФ, Ползунок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Ползунок1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Ползунок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Ползунок1 = ДФ.Ползунок();
Ползунок1.Родитель = Форма1;
Ползунок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Ползунок2 = ДФ.Ползунок();
Ползунок2.Родитель = Ползунок1;
Ползунок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_РаскрываемыйБлок_свойство.os
Перем ДФ, РаскрываемыйБлок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
РаскрываемыйБлок1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_РаскрываемыйБлок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
РаскрываемыйБлок1 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок1.Родитель = Форма1;
РаскрываемыйБлок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
РаскрываемыйБлок2 = ДФ.РаскрываемыйБлок();
РаскрываемыйБлок2.Родитель = РаскрываемыйБлок1;
РаскрываемыйБлок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Результат_свойство.os
Перем ДФ, Результат1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Результат1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Результат_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Результат1 = ДФ.Результат();
Результат1.Родитель = Форма1;
Результат1.Текст = "Результат1";
Результат1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Результат2 = ДФ.Результат();
Результат2.Родитель = Результат1;
Результат2.Текст = "Результат2";
Результат2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_СписокОпределений_свойство.os
Перем ДФ, СписокОпределений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СписокОпределений1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_СписокОпределений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
СписокОпределений1 = ДФ.СписокОпределений();
СписокОпределений1.Родитель = Форма1;
СписокОпределений1.Текст = "СписокОпределений1";
СписокОпределений1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
СписокОпределений2 = ДФ.СписокОпределений();
СписокОпределений2.Родитель = СписокОпределений1;
СписокОпределений2.Текст = "СписокОпределений2";
СписокОпределений2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Ссылка_свойство.os
Перем ДФ, Ссылка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Ссылка1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Ссылка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Ссылка1 = ДФ.Ссылка();
Ссылка1.Родитель = Форма1;
Ссылка1.Текст = "Ссылка1";
Ссылка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Ссылка2 = ДФ.Ссылка();
Ссылка2.Родитель = Ссылка1;
Ссылка2.Текст = "Ссылка2";
Ссылка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаТаблицы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
СтрокаТаблицы1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
СтрокаТаблицы1 = ДФ.СтрокаТаблицы();
СтрокаТаблицы1.Родитель = Форма1;
СтрокаТаблицы1.Текст = "СтрокаТаблицы1";
СтрокаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
СтрокаТаблицы2 = ДФ.СтрокаТаблицы();
СтрокаТаблицы2.Родитель = СтрокаТаблицы1;
СтрокаТаблицы2.Текст = "СтрокаТаблицы2";
СтрокаТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Таблица_свойство.os
Перем ДФ, Таблица1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Таблица1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Таблица_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Текст = "Таблица1";
Таблица1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Таблица2 = ДФ.Таблица();
Таблица2.Родитель = Таблица1;
Таблица2.Текст = "Таблица2";
Таблица2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Термин_свойство.os
Перем ДФ, Термин1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Термин1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Термин_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Термин1 = ДФ.Термин();
Термин1.Родитель = Форма1;
Термин1.Текст = "Термин1";
Термин1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Термин2 = ДФ.Термин();
Термин2.Родитель = Термин1;
Термин2.Текст = "Термин2";
Термин2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_УдаленыйТекст_свойство.os
Перем ДФ, УдаленыйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
УдаленыйТекст1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_УдаленыйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
УдаленыйТекст1 = ДФ.УдаленыйТекст();
УдаленыйТекст1.Родитель = Форма1;
УдаленыйТекст1.Текст = "УдаленыйТекст1";
УдаленыйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
УдаленыйТекст2 = ДФ.УдаленыйТекст();
УдаленыйТекст2.Родитель = УдаленыйТекст1;
УдаленыйТекст2.Текст = "УдаленыйТекст2";
УдаленыйТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_УпорядоченныйСписок_свойство.os
Перем ДФ, УпорядоченныйСписок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
УпорядоченныйСписок1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_УпорядоченныйСписок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
УпорядоченныйСписок1 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок1.Родитель = Форма1;
УпорядоченныйСписок1.Текст = "УпорядоченныйСписок1";
УпорядоченныйСписок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
УпорядоченныйСписок2 = ДФ.УпорядоченныйСписок();
УпорядоченныйСписок2.Родитель = УпорядоченныйСписок1;
УпорядоченныйСписок2.Текст = "УпорядоченныйСписок2";
УпорядоченныйСписок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Флажок_свойство.os
Перем ДФ, Флажок1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Флажок1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Флажок_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Флажок1 = ДФ.Флажок();
Флажок1.Родитель = Форма1;
Флажок1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Флажок2 = ДФ.Флажок();
Флажок2.Родитель = Флажок1;
Флажок2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Форма_свойство.os
Перем ДФ, Форма1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Форма1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Форма_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Абзац2 = ДФ.Абзац();
Абзац2.Родитель = Форма1;
Абзац2.Текст = "Абзац2";
Абзац2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ФорматированныйТекст_свойство.os
Перем ДФ, ФорматированныйТекст1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ФорматированныйТекст1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ФорматированныйТекст_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ФорматированныйТекст1 = ДФ.ФорматированныйТекст();
ФорматированныйТекст1.Родитель = Форма1;
ФорматированныйТекст1.Текст = "ФорматированныйТекст1";
ФорматированныйТекст1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ФорматированныйТекст2 = ДФ.ФорматированныйТекст();
ФорматированныйТекст2.Родитель = ФорматированныйТекст1;
ФорматированныйТекст2.Текст = "ФорматированныйТекст2";
ФорматированныйТекст2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Фрейм_свойство.os
Перем ДФ, Фрейм1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Фрейм1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Фрейм_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Фрейм1 = ДФ.Фрейм();
Фрейм1.Родитель = Форма1;
Фрейм1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Фрейм2 = ДФ.Фрейм();
Фрейм2.Родитель = Фрейм1;
Фрейм2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ШапкаТаблицы_свойство.os
Перем ДФ, ШапкаТаблицы1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ШапкаТаблицы1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ШапкаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ШапкаТаблицы1 = ДФ.ШапкаТаблицы();
ШапкаТаблицы1.Родитель = Форма1;
ШапкаТаблицы1.Текст = "ШапкаТаблицы1";
ШапкаТаблицы1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ШапкаТаблицы2 = ДФ.ШапкаТаблицы();
ШапкаТаблицы2.Родитель = ШапкаТаблицы1;
ШапкаТаблицы2.Текст = "ШапкаТаблицы2";
ШапкаТаблицы2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Шкала_свойство.os
Перем ДФ, Шкала1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Шкала1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Шкала_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Шкала1 = ДФ.Шкала();
Шкала1.Родитель = Форма1;
Шкала1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Шкала2 = ДФ.Шкала();
Шкала2.Родитель = Шкала1;
Шкала2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ЭлементПоляСписка_свойство.os
Перем ДФ, ЭлементПоляСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЭлементПоляСписка1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ЭлементПоляСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = Форма1;
ЭлементПоляСписка1.Текст = "ЭлементПоляСписка1";
ЭлементПоляСписка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ЭлементПоляСписка1;
ЭлементПоляСписка2.Текст = "ЭлементПоляСписка2";
ЭлементПоляСписка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ЭлементСписка_свойство.os
Перем ДФ, ЭлементСписка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЭлементСписка1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ЭлементСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЭлементСписка1 = ДФ.ЭлементСписка();
ЭлементСписка1.Родитель = Форма1;
ЭлементСписка1.Текст = "ЭлементСписка1";
ЭлементСписка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЭлементСписка2 = ДФ.ЭлементСписка();
ЭлементСписка2.Родитель = ЭлементСписка1;
ЭлементСписка2.Текст = "ЭлементСписка2";
ЭлементСписка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_Ячейка_свойство.os
Перем ДФ, Ячейка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
Ячейка1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_Ячейка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
Ячейка1 = ДФ.Ячейка();
Ячейка1.Родитель = Форма1;
Ячейка1.Текст = "Ячейка1";
Ячейка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
Ячейка2 = ДФ.Ячейка();
Ячейка2.Родитель = Ячейка1;
Ячейка2.Текст = "Ячейка2";
Ячейка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
Элементы_ЯчейкаЗаголовка_свойство.os
Перем ДФ, ЯчейкаЗаголовка1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ЯчейкаЗаголовка1.Элементы.Количество() = 1
, "", "!!! ") + "Элементы_ЯчейкаЗаголовка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;
ЯчейкаЗаголовка1 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка1.Родитель = Форма1;
ЯчейкаЗаголовка1.Текст = "ЯчейкаЗаголовка1";
ЯчейкаЗаголовка1.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;
ЯчейкаЗаголовка2 = ДФ.ЯчейкаЗаголовка();
ЯчейкаЗаголовка2.Родитель = ЯчейкаЗаголовка1;
ЯчейкаЗаголовка2.Текст = "ЯчейкаЗаголовка2";
ЯчейкаЗаголовка2.Стиль.ЦветФона = ДФ.Цвет.Красный;
Форма1.Открыть();
ЭлементыСписка_ПолеСписка_свойство.os
Перем ДФ, ПолеСписка1;
Процедура Свойство() Экспорт
// ЭлементыСписка = ПолеСписка1.ЭлементыСписка;
// Для А = 0 По ЭлементыСписка.ВГраница() Цикл
// Эл = ЭлементыСписка.Получить(А);
// Сообщить("Эл = " + Эл + " ключ - " + Эл.КлючЭлемента);
// КонецЦикла;
Сообщить(?(
ПолеСписка1.ЭлементыСписка.Количество() = 3
, "", "!!! ") + "ЭлементыСписка_ПолеСписка_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(ПолеСписка1, "ЭлементыСписка", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;
ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Ширина = 150;
ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = ПолеСписка1;
ГруппировкаПоляСписка1.Надпись = "Жители деревни Простоквашино";
ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка1.Значение = "Кот";
ЭлементПоляСписка1.Текст = "Матроскин";
ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Пёс";
ЭлементПоляСписка2.Текст = "Шарик";
ЭлементПоляСписка3 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка3.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка3.Значение = "Птица";
ЭлементПоляСписка3.Текст = "Галчонок";
Форма1.Открыть();
Яркость_ФильтрИзображений_свойство.os
Перем ДФ, ФильтрИзображений1;
Процедура Форма1_Загружена() Экспорт
Сообщить(?(
ФильтрИзображений1.Яркость = 200
, "", "!!! ") + "Яркость_ФильтрИзображений_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 400;
Изображение1 = ДФ.Изображение();
Форма1.ДобавитьДочерний(Изображение1);
Изображение1.Источник = "maslenica10.jpg";
Изображение1.Стиль.Ширина = 200;
ФильтрИзображений1 = ДФ.ФильтрИзображений();
ФильтрИзображений1.Яркость = 200;
Изображение1.Стиль.Фильтр = ФильтрИзображений1;
Форма1.Открыть();
Ячейки_СтрокаТаблицы_свойство.os
Перем ДФ, СтрокаШарик;
Процедура Свойство() Экспорт
// Ячейки = СтрокаШарик.Ячейки;
// Сообщить("СтрокаШарик.Ячейки = " + Ячейки);
// Для А = 0 По Ячейки.ВГраница() Цикл
// Эл = Ячейки.Получить(А);
// Сообщить("Эл = " + Эл + " - " + Эл.Текст);
// КонецЦикла;
Сообщить(?(
СтрокаШарик.Ячейки.Количество() = 3
, "", "!!! ") + "Ячейки_СтрокаТаблицы_свойство.os" + " " + ТекущаяДата());
ДФ.ЗавершитьРаботу();
КонецПроцедуры
Процедура Форма1_Загружена() Экспорт
ДФ.ПолучитьСвойство(СтрокаШарик, "Ячейки", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры
ПодключитьВнешнююКомпоненту(ОбъединитьПути(Новый Файл(ТекущийСценарий().Источник).Путь, "DeclarativeForms.dll"));
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Таблица1 = ДФ.Таблица();
Таблица1.Родитель = Форма1;
Таблица1.Разлиновка = ДФ.Разлиновка.Все;
Таблица1.Стиль.РазмещениеВТаблице = ДФ.РазмещениеВТаблице.Фиксировано;
Таблица1.Стиль.СтильГраниц = ДФ.СтильГраниц(ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная, ДФ.СтильГраницы.Сплошная);
Таблица1.Стиль.ШиринаГраниц = ДФ.ШиринаГраниц(4, 4, 4, 4);
Заголовок1 = Таблица1.ДобавитьДочерний(ДФ.Заголовок());
Заголовок1.Текст = "Жители деревни Простоквашино";
ГруппаКолонок1 = Таблица1.ДобавитьДочерний(ДФ.ГруппаКолонок());
Колонка1 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка1.Стиль.Ширина = 200;
Колонка2 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка2.Стиль.Ширина = 100;
Колонка3 = ГруппаКолонок1.ДобавитьДочерний(ДФ.Колонка());
Колонка3.Стиль.Копировать(Колонка2.Стиль);
ШапкаТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ШапкаТаблицы());
СтрокаШапка = ШапкаТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
ЯчейкаЗаголовка1 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка1.Текст = "Имя";
ЯчейкаЗаголовка2 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка2.Текст = "Вид";
ЯчейкаЗаголовка3 = СтрокаШапка.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка3.Текст = "Количество лап";
ОбластьТаблицы1 = Таблица1.ДобавитьДочерний(ДФ.ОбластьТаблицы());
СтрокаМатроскин = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаМатроскин.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Центр;
ЯчейкаЗаголовка4 = СтрокаМатроскин.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка4.Текст = "Матроскин";
Ячейка1 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка1.Текст = "Кот";
Ячейка2 = СтрокаМатроскин.ДобавитьДочерний(ДФ.Ячейка());
Ячейка2.Текст = "4";
СтрокаШарик = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаШарик.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка5 = СтрокаШарик.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка5.Текст = "Шарик";
Ячейка3 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка3.Текст = "Пёс";
Ячейка4 = СтрокаШарик.ДобавитьДочерний(ДФ.Ячейка());
Ячейка4.Текст = "4";
СтрокаГалчонок = ОбластьТаблицы1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаГалчонок.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка6.Текст = "Галчонок";
Ячейка5 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка5.Текст = "Птица";
Ячейка6 = СтрокаГалчонок.ДобавитьДочерний(ДФ.Ячейка());
Ячейка6.Текст = "2";
Итоги1 = Таблица1.ДобавитьДочерний(ДФ.Итоги());
СтрокаИтого = Итоги1.ДобавитьДочерний(ДФ.СтрокаТаблицы());
СтрокаИтого.Стиль.Копировать(СтрокаМатроскин.Стиль);
ЯчейкаЗаголовка7 = СтрокаИтого.ДобавитьДочерний(ДФ.ЯчейкаЗаголовка());
ЯчейкаЗаголовка7.Текст = "Итого:";
ЯчейкаЗаголовка7.ДиапазонКолонок = 2;
ЯчейкаЗаголовка7.Стиль.ГоризонтальноеВыравниваниеТекста = ДФ.ГоризонтальноеВыравниваниеТекста.Право;
Ячейка7 = СтрокаИтого.ДобавитьДочерний(ДФ.Ячейка());
Ячейка7.Текст = "10";
Форма1.Открыть();
Смотрите также
Библиотека DeclarativeForms | Примеры тестирования