Имя: Пароль:
1C
1С v8
Заполнение Табличного Поля, помогите
0 zladenuw
 
07.09.11
13:45
Есть ТП
Заполняю колонками

// Создание описателя типов для таблицы значений
   КЧ = Новый КвалификаторыЧисла(15,2);
   КС = Новый КвалификаторыСтроки(50);
   Массив = Новый Массив;
   Массив.Добавить(Тип("Строка"));
   ОписаниеТиповС = Новый ОписаниеТипов(Массив, , КС);
   Массив.Очистить();
   Массив.Добавить(Тип("Число"));
   ОписаниеТиповЧ = Новый ОписаниеТипов(Массив, , ,КЧ);
   
   Если ЭлементыФормы.ТЗДанныхФайла.Колонки.Количество() <> ВсегоКолонок Тогда
        лНеобкол = 0;
        Пока ЭлементыФормы.ТЗДанныхФайла.Колонки.Количество() <> ВсегоКолонок Цикл
             ТЗДанныхФайла.Колонки.Добавить("Колонка"+лНеобкол,ОписаниеТиповС,"Колонка"+лНеобкол);
             ЭлементыФормы.ТЗДанныхФайла.Колонки.Добавить("Колонка"+лНеобкол,"Колонка"+лНеобкол);
             лНеобкол = лНеобкол+1;        
        КонецЦикла;
   
   КонецЕсли;


RowCount     = ExcelЛист.UsedRange.Rows.Count;
       НомерПервойКолонки = 1;
       //Создадим таблицу данных для загрузки в нее Екселя
       СоздатьТЧДанных();
       //Обратаем всю область данных
           Область = ExcelЛист.Range(ExcelЛист.Cells(1,НомерПервойКолонки), ExcelЛист.Cells(RowCount,ВсегоКолонок));
           Данные = Область.Value.Выгрузить();        
       //Создание пустых строк по RowCount    
       
       Для Счетчик = 1 По RowCount Цикл
           НоваяСтрока = ТЗДанныхФайла.Добавить();
       КонецЦикла;
       
       //Заполнение Тч данными
       Для Счетчик = 0 По ВсегоКолонок-1 Цикл
           ТЗДанныхФайла.ЗагрузитьКолонку(Данные[Счетчик], "Колонка"+Счетчик);
       КонецЦикла;
       
       ЭлементыФормы.ТЗДанныхФайла.ОбновитьСтроки();
Загружаю в ТЗ данные.
В ТЗ данные есть а вот на форме не обновляется, подскажите где не так.
Заранее спасибо
1 Eugene_life
 
07.09.11
13:51
ЭлементыФормы.ТЗДанныхФайла.СоздатьКолонки();
2 zladenuw
 
07.09.11
13:52
спасибо
Оптимист верит, что мы живем в лучшем из миров. Пессимист боится, что так оно и есть.