Имя: Пароль:
1C
1С v8
Помогите с удалением реквизитов формы
0 irlandets1980
 
13.08.11
14:17
Помогите плиз. прогрмано создаю реквизиты формы и не понимаю как их удалить
пробовал так:

ЗагрузкаЭксель ()
Для y=1 По Колонок Цикл
           
           ДобавляемыеРеквизиты.Добавить(Новый РеквизитФормы(ЛишниеСимвол(СокрЛП(Строка(Лист.Cells(х, y).Value))),Новый ОписаниеТипов("Строка"),"РеквизитФормы_Таблица"));
            МассивУдаляемыхРеквизитов.Добавить("РеквизитФормы_Таблица."+ЛишниеСимвол(СокрЛП(Строка(Лист.Cells(х, y).Value))));

    КонецЦикла;
       

       ИзменитьРеквизиты(ДобавляемыеРеквизиты,МассивУдаляемыхРеквизитов);

       у =0 ;


   Для y=1 По Колонок Цикл
           
           // создаем элементы
           Элемент = Элементы.Добавить(ЛишниеСимвол(СокрЛП(Строка(Лист.Cells(х, y).Value))),Тип("ПолеФормы"),Элементы.ЭлементФормы_Таблица);
           Элемент.Вид = ВидПоляФормы.ПолеВвода;
           Элемент.ПутьКДанным = "РеквизитФормы_Таблица."+ЛишниеСимвол(СокрЛП(Строка(Лист.Cells(х, y).Value)));    
                               
   КонецЦикла;
Ошибка:
Недопустимый путь к реквизиту. Путь: "РеквизитФормы_Таблица.Артикулище"
1 saddy
 
15.08.11
05:03
Дело в том что ИзменитьРеквизиты(ДобавляемыеРеквизиты,МассивУдаляемыхРеквизитов) сначала пытается удалить МассивУдаляемыхРеквизитов, а уже потом добавить ДобавляемыеРеквизиты.

Сработает например так:
ИзменитьРеквизиты(ДобавляемыеРеквизиты);
ИзменитьРеквизиты(,МассивУдаляемыхРеквизитов);
2 saddy
 
15.08.11
05:11
Или вот так, когда неизвестны имена колонок существующей таблицы значений:
   
РеквизитыДляУдаления=Новый Массив;
КолонкиТЗ = ПолучитьРеквизиты("РеквизитФормы_Таблица");
Для Каждого КОлонкаТЗ из КолонкиТЗ Цикл
   РеквизитыДляУдаления.Добавить("РеквизитФормы_Таблица."+КОлонкаТЗ.Имя);
КонецЦикла;
ИзменитьРеквизиты(,РеквизитыДляУдаления);
Программист всегда исправляет последнюю ошибку.