ПолеСписка.ПриИзменении (Select.Change) Событие

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

Перем ДФ, ПолеТекста1;

Процедура ПолеСписка1_ПриИзменении() Экспорт
	Сообщить("ДФ.АргументыСобытия.Значение = " + ДФ.АргументыСобытия.Значение);
КонецПроцедуры

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

ПолеСписка1 = ДФ.ПолеСписка();
ПолеСписка1.Родитель = Форма1;
ПолеСписка1.Стиль.Ширина = 150;
ПолеСписка1.МножественныйВыбор = Истина;

ГруппировкаПоляСписка1 = ДФ.ГруппировкаПоляСписка();
ГруппировкаПоляСписка1.Родитель = ПолеСписка1;
ГруппировкаПоляСписка1.Надпись = "Жители деревни Простоквашино";

ЭлементПоляСписка1 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка1.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка1.Значение = "Кот";
ЭлементПоляСписка1.Текст = "Матроскин";

ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Пёс";
ЭлементПоляСписка2.Текст = "Шарик";

ЭлементПоляСписка2 = ДФ.ЭлементПоляСписка();
ЭлементПоляСписка2.Родитель = ГруппировкаПоляСписка1;
ЭлементПоляСписка2.Значение = "Птица";
ЭлементПоляСписка2.Текст = "Галчонок";

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

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