0
Vladislava-smile
29.08.16
✎
10:06
|
Программно определяется тип значения при разных вариантах сравнения. Не работает свойство поля выбор групп и элементов.
Процедура ОбработатьИзменениеВидаСравнения(Элемент, ИмяТипа)
Перем ИмяПараметра;
Перем Флажок;
Перем ПолеНастройки;
ИмяПараметра = СтрЗаменить(Элемент.Имя, "ПолеВидаСравнения", "");
Флажок = ЭлементыФормы["Флажок" + ИмяПараметра];
ПолеНастройки = ЭлементыФормы["Поле" + ИмяПараметра];
Если Элемент.Значение = ВидСравнения.НеРавно
Или Элемент.Значение = ВидСравнения.Равно Тогда
ПолеНастройки.ТипЗначения = Новый ОписаниеТипов(ИмяТипа);
Флажок.Значение = Истина;
ИначеЕсли Элемент.Значение = ВидСравнения.ВИерархии
Или Элемент.Значение = ВидСравнения.НеВИерархии Тогда
ПолеНастройки.ВыборГруппИЭлементов = ИспользованиеГруппИЭлементов.ГруппыИЭлементы;
ПолеНастройки.ТипЗначения = Новый ОписаниеТипов(ИмяТипа);
Флажок.Значение = Истина;
ИначеЕсли Элемент.Значение = ВидСравнения.ВСписке
Или Элемент.Значение = ВидСравнения.НеВСписке Тогда
ПолеНастройки.ТипЗначения = Новый ОписаниеТипов("СписокЗначений");
ПолеНастройки.ТипЗначенияСписка = Новый ОписаниеТипов(ИмяТипа);
Флажок.Значение = Истина;
ИначеЕсли Элемент.Значение = ВидСравнения.ВСпискеПоИерархии
Или Элемент.Значение = ВидСравнения.НеВСпискеПоИерархии Тогда
ПолеНастройки.ВыборГруппИЭлементов = ИспользованиеГруппИЭлементов.ГруппыИЭлементы;
ПолеНастройки.ТипЗначения = Новый ОписаниеТипов("СписокЗначений");
ПолеНастройки.ТипЗначенияСписка = Новый ОписаниеТипов(ИмяТипа);
Флажок.Значение = Истина;
Иначе
Флажок.Значение = Ложь;
КонецЕсли;
КонецПроцедуры
В чем проблема не подскажите?
|
|