рФорма=СоздатьОбъект(РасширениеФормы);
рФорма.УстановитьФорму(Форма);
Для н=0 по рФорма.КоличествоАтрибутов()-1 Цикл
Атрибут=рФорма.ПолучитьАртибут(н);
Сообщить(Атрибут.Значение);
КонецЦикла
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший