ДополнительныйБлок (AdditionalDiv) Конструктор

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

Процедура ДополнительныйБлок1_Нажатие() Экспорт
	Сообщить("ДополнительныйБлок1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры

ПодключитьВнешнююКомпоненту("C:\444\111\DeclarativeForms\DeclarativeForms\bin\Debug\DeclarativeForms.dll");
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Заголовок = "Нажмите кнопку";
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;

ДополнительныйБлок1 = ДФ.ДополнительныйБлок();
ДополнительныйБлок1.Родитель = Форма1;
ДополнительныйБлок1.Текст = "ДополнительныйБлок1";
ДополнительныйБлок1.Нажатие = ДФ.Действие(ЭтотОбъект, "ДополнительныйБлок1_Нажатие");
ДополнительныйБлок1.Стиль.ЦветФона = ДФ.Цвет("ТуманноБелый");

Форма1.Открыть();