lustin писал(а) 18. Марта 2008 :: 07:29:

Не переживайте, все проверено.
Например, рабочий тест

Процедура Проверить_Информатор_ПолучитьДинамическихСвойств(Объект)
	Сам=Сам();
	Информатор = СоздатьОбъект("Информатор");
	ТабСвойств = Информатор.ПолучитьТаблицуСвойств(Объект);
	//ТабСвойств.ВыбратьСтроку();

	лКоличествоСвойств = 4;
	Сам.ПроверитьРавенство(ТабСвойств.КоличествоСтрок(), лКоличествоСвойств);
	Сам.ПроверитьРавенство(ТабСвойств.ПолучитьЗначение(лКоличествоСвойств-1, "NameRus"), "Свойство");
	Сам.ПроверитьРавенство(ТабСвойств.ПолучитьЗначение(лКоличествоСвойств, "NameRus"), "ДинамическоеСвойство");
КонецПроцедуры

Процедура Тест_Информатор_ПолучитьДинамическихСвойств() Экспорт
	Сам=Сам();
	Объект = СоздатьОбъект("КлассСДинамическимСвойством");

	Проверить_Информатор_ПолучитьДинамическихСвойств(Объект);
КонецПроцедуры

Процедура Тест_Информатор_ПолучитьДинамическихСвойствНаследника() Экспорт
	Сам=Сам();
	Объект = СоздатьОбъект("КлассСДинамическимСвойством_Наследник");
	Информатор = СоздатьОбъект("Информатор");
	ТабСвойств = Информатор.ПолучитьТаблицуСвойств(Объект);
	//ТабСвойств.ВыбратьСтроку();

	лКоличествоСвойств = 7;
	Сам.ПроверитьРавенство(ТабСвойств.КоличествоСтрок(), лКоличествоСвойств);
	Сам.ПроверитьРавенство(ТабСвойств.ПолучитьЗначение(лКоличествоСвойств-2, "NameRus"), "Свойство");
	Сам.ПроверитьРавенство(ТабСвойств.ПолучитьЗначение(лКоличествоСвойств-1, "NameRus"), "ДинамическоеСвойство");
	Сам.ПроверитьРавенство(ТабСвойств.ПолучитьЗначение(лКоличествоСвойств, "NameRus"), "ДинамическоеСвойствоНаследника");

	База = Объект.ПолучитьБазовыйКласс();
	Проверить_Информатор_ПолучитьДинамическихСвойств(База);
КонецПроцедуры
 

Короче, все залито.
Начиная со сборки 19.03.08 динамические свойства необходимо добавить вручную через метод ДобавитьДинамическоеСвойство, больше никаких изменений делать не нужно!

В 3.0 перенос будет выполнен буквально на днях

artbear писал(а) 04. Апреля 2008 :: 12:03:


По совету kms повторяю свой вопрос здесь (т.к. эта ветка дейстительно больше подходит под мой случай)

Раньше у меня в функции _ПриЧтенииСвойства(стрИмяАтрибута) работал следующий код

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

Т.е. если я в СпискеЗначений нашел этот атрибут то вернул его, если не нашел то или просто ругнулся или выдал исключение (по желанию), то теперь получается мне постоянно нужно следить что в этом списке, и добавлять/удалять ДинамическоеСвойство

Но если в этом классе это хотя-бы теоретическти возможно, то в другом , который "Константы" и к которому я обращаюсь Константы.ИмяКонстанты и где "ИмяКонстанты" может быть абсолютно произвольное, отследить его никак не получится.    
Как-бы это побороть? Чтобы и [bug 3606] был доволен, и я тоже. Плизззз!    

Цитата:


А сейчас сработает такой код, или получим исключение?
Т.е. что будет если попытатся обратится к не добавленному атрибуту?

kms писал(а) 19. Мая 2008 :: 14:48:


Ну у меня уже куча кода написана - переписывать облом

А если использовать метод, то тогда точно прападает весь смысл в динамических атрибутах
Т.к. в этом случае они практически статичны. Только определются не в момент компиляции/интерпретации а в момент исполнения. Но определять их таки нужно.

Это конечно глубокое IMHO

avgreen писал(а) 19. Мая 2008 :: 19:25:


тогда глубокое мое ИМХО... Если ты по коду обращаешься к "Константа.МоеНазваниеКонстанты" напрямую в коде, значит ты знаешь, что такое название "константы" должно существовать. В чем проблема прописать/определить его в классе?

ЗЫ... Если мне память не изменяет в 1С-ке нет макроподстановок... Вот в фоксе-это да... Так что обратиться к "Константа.ХренЗнаетЧегоЯХочуДаЕщеИСПеременнымНазванием" вряд ли получится. Методом - это да. А остальное все равно статично