ЭлементУправления.ЭлементДобавлен (Control.ControlAdded) Свойство

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

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

Значение

Тип: Действие (Action).

Возвращает или задает код для выполнения при добавлении нового элемента управления в ЭлементыУправления (ControlCollection).

Примечание

Пример

Кнопка1.ЭлементДобавлен = Ф.Действие(ЭтотОбъект, "Кнопка1_ЭлементДобавлен");
Полный пример кода 

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


Перем Ф;

Функция Форма1_ЭлементДобавлен() Экспорт
	ЭлементУправленияАрг1 = Ф.ЭлементУправленияАрг();
	Сообщить("Добавлен ЭлементУправления = " + ЭлементУправленияАрг1.ЭлементУправления.Текст);
КонецФункции

Функция Панель1_ЭлементДобавлен() Экспорт
	ЭлементУправленияАрг1 = Ф.ЭлементУправленияАрг();
	Сообщить("Добавлен ЭлементУправления = " + ЭлементУправленияАрг1.ЭлементУправления.Текст);
КонецФункции

Функция Кнопка1_ЭлементДобавлен() Экспорт
	ЭлементУправленияАрг1 = Ф.ЭлементУправленияАрг();
	Сообщить("Добавлен ЭлементУправления = " + ЭлементУправленияАрг1.ЭлементУправления.Текст);
КонецФункции

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

Форма1.Текст = "Форма1";
Форма1.ЭлементДобавлен = Ф.Действие(ЭтотОбъект, "Форма1_ЭлементДобавлен");

Панель1 = Ф.Панель();
Панель1.Родитель = Форма1;
Панель1.Текст = "Панель1";
Панель1.Размер = Ф.Размер(300, 300);
Панель1.СтильГраницы = Ф.СтильГраницы.Трехмерная;
Панель1.ЦветФона = Ф.Цвет().Красный;
Панель1.Центр();
Панель1.ЭлементДобавлен = Ф.Действие(ЭтотОбъект, "Панель1_ЭлементДобавлен");

Панель2 = Панель1.ЭлементыУправления.Добавить(Ф.Панель());
Панель2.Текст = "Панель2";
Панель2.Размер = Ф.Размер(200, 200);
Панель2.СтильГраницы = Ф.СтильГраницы.Трехмерная;
Панель2.ЦветФона = Ф.Цвет().Синий;
Панель2.Центр();

Кнопка1 = Ф.Кнопка();
Кнопка1.Родитель = Панель2;
Кнопка1.Текст = "Кнопка1";
Кнопка1.Размер = Ф.Размер(100, 100);
Кнопка1.ЦветФона = Ф.Цвет().Зеленый;
Кнопка1.Центр();
Кнопка1.ЭлементДобавлен = Ф.Действие(ЭтотОбъект, "Кнопка1_ЭлементДобавлен");

Кнопка2 = Ф.Кнопка();
Кнопка2.Родитель = Кнопка1;
Кнопка2.Текст = "Кнопка2";
Кнопка2.Размер = Ф.Размер(50, 50);
Кнопка2.ЦветФона = Ф.Цвет().Розовый;
Кнопка2.Центр();

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

Тестовый код 

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


Перем Ф;

Функция Форма1_ЭлементДобавлен() Экспорт
	ЭлементУправленияАрг1 = Ф.ЭлементУправленияАрг();
	// Сообщить("Добавлен ЭлементУправления = " + ЭлементУправленияАрг1.ЭлементУправления.Текст);
КонецФункции

Функция Панель1_ЭлементДобавлен() Экспорт
	ЭлементУправленияАрг1 = Ф.ЭлементУправленияАрг();
	// Сообщить("Добавлен ЭлементУправления = " + ЭлементУправленияАрг1.ЭлементУправления.Текст);
КонецФункции

Функция Кнопка1_ЭлементДобавлен() Экспорт
	ЭлементУправленияАрг1 = Ф.ЭлементУправленияАрг();
	// Сообщить("Добавлен ЭлементУправления = " + ЭлементУправленияАрг1.ЭлементУправления.Текст);
КонецФункции

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

Форма1.Текст = "Форма1";
Форма1.ЭлементДобавлен = Ф.Действие(ЭтотОбъект, "Форма1_ЭлементДобавлен");

Панель1 = Ф.Панель();
Панель1.Родитель = Форма1;
Панель1.Текст = "Панель1";
Панель1.Размер = Ф.Размер(300, 300);
Панель1.СтильГраницы = Ф.СтильГраницы.Трехмерная;
Панель1.ЦветФона = Ф.Цвет().Красный;
Панель1.Центр();
Панель1.ЭлементДобавлен = Ф.Действие(ЭтотОбъект, "Панель1_ЭлементДобавлен");

Панель2 = Панель1.ЭлементыУправления.Добавить(Ф.Панель());
Панель2.Текст = "Панель2";
Панель2.Размер = Ф.Размер(200, 200);
Панель2.СтильГраницы = Ф.СтильГраницы.Трехмерная;
Панель2.ЦветФона = Ф.Цвет().Синий;
Панель2.Центр();

Кнопка1 = Ф.Кнопка();
Кнопка1.Родитель = Панель2;
Кнопка1.Текст = "Кнопка1";
Кнопка1.Размер = Ф.Размер(100, 100);
Кнопка1.ЦветФона = Ф.Цвет().Зеленый;
Кнопка1.Центр();
Кнопка1.ЭлементДобавлен = Ф.Действие(ЭтотОбъект, "Кнопка1_ЭлементДобавлен");

Кнопка2 = Ф.Кнопка();
Кнопка2.Родитель = Кнопка1;
Кнопка2.Текст = "Кнопка2";
Кнопка2.Размер = Ф.Размер(50, 50);
Кнопка2.ЦветФона = Ф.Цвет().Розовый;
Кнопка2.Центр();

Сообщить(?(
Кнопка1.ЭлементДобавлен.ИмяМетода = "Кнопка1_ЭлементДобавлен"
, "", "!!! ") + "ЭлементУправления.ЭлементДобавлен (Control.ControlAdded) Свойство" + " " + ТекущаяДата());

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

ЭлементУправления (Control) Класс | Библиотека OneScriptForms