Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 18:10

ПолеВыбора

Автор cannabis_86, 13 окт 2011, 10:48

0 Пользователей и 1 гость просматривают эту тему.

cannabis_86

Здравствуйте, 1с 8.2, управляемые формы, конфа своя. Подскажите как правильно нужно сделать, раньше помню как-то делал, но щас не получается. Вот код:
&НаКлиенте
Процедура НаименованиеНачалоВыбораИзСписка(Элемент, СтандартнаяОбработка)
Фам = Фамилия;
Им = Имя;
Отч = Отчество;

СписокВозможныхНаименований = Новый СписокЗначений;
Если ЗначениеЗаполнено(Фам) Тогда
СписокВозможныхНаименований.Добавить(Фам);
Если ЗначениеЗаполнено(Им) Тогда
СписокВозможныхНаименований.Добавить(СокрЛП(Фам) + " " + СокрЛП(Им));
СписокВозможныхНаименований.Добавить(СокрЛП(Фам) + " " + Лев(Им,1) + ".");
Если ЗначениеЗаполнено(Отчество) Тогда
СписокВозможныхНаименований.Добавить(СокрЛП(Фам) + " " + СокрЛП(Им) + " " + СокрЛП(Отч));
СписокВозможныхНаименований.Добавить(СокрЛП(Фам) + " " + Лев(Им,1) + ". " + Лев(Отч,1)+ ".");
КонецЕсли;
КонецЕсли;
Иначе
Если ЗначениеЗаполнено(Им) Тогда
СписокВозможныхНаименований.Добавить(Им);
Если ЗначениеЗаполнено(Отч) Тогда
СписокВозможныхНаименований.Добавить(СокрЛП(Им) + " " + СокрЛП(Отч));
СписокВозможныхНаименований.Добавить(СокрЛП(Им) + ". " + Лев(Отч,1)+ ".");
КонецЕсли;
Иначе
Если ЗначениеЗаполнено(Отч) Тогда
СписокВозможныхНаименований.Добавить(Отч);
КонецЕсли;
КонецЕсли;
КонецЕсли;
         
Элемент.СписокВыбора = СписокВозможныхНаименований;
КонецПроцедуры

Ругается на Элемент.СписокВыбора = СписокВозможныхНаименований; Не может присвоить ему значение.

cannabis_86

Не уже ли нужно делать только так? :
Для Каждого Значение Из СписокВозможныхНаименований Цикл
Элемент.СписокВыбора.Добавить(Значение);
КонецЦикла;

Теги:
Рейтинг@Mail.ru

Поиск