Имя: Пароль:
1C
1С v8
Как скопировать ТабДок?
0 extrim-style
 
24.10.11
11:10
Понедельнег день тяжелый...

ТабДок = Новый ТабличныйДокумент;
ТабДок = ЭлементыФормы.Результат;
ОбластьШапка = СформироватьШапку(Заголовок);
ТабДок.ВставитьОбласть(ОбластьШапка, ТабДок.Область("R1"), ТипСмещенияТабличногоДокумента.ПоГоризонтали);
ТабДок.показать();

В результате изменяется ЭлементыФормы.Результат, видимо потому что получаю по ссылке? Как скопировать Результат в ТабДок (полностью).
ЭлементыФормы.Результат - поле табличного документа.
1 vicof
 
24.10.11
11:11
чего?
2 extrim-style
 
24.10.11
11:12
(1) ага)
3 Irbis
 
24.10.11
11:12
ТабДок = ЭлементыФормы.Результат;
Это зачем? особенно после
ТабДок = Новый ТабличныйДокумент;
4 extrim-style
 
24.10.11
11:13
(3) да это случайно осталось
5 extrim-style
 
24.10.11
11:15
(3) хотя не знаю как тут верно, ведь ЭлементыФормы.Результат - поле табличного документа, а мне нужен табличный документ.
6 НЕА123
 
24.10.11
11:18
ПОлучитьОбласть()
+
ЗаполнитьЗначениеСвойств()
?
7 Irbis
 
24.10.11
11:19
(5) Закомментируй
// ТабДок = ЭлементыФормы.Результат;
8 extrim-style
 
24.10.11
11:21
(7) зачем? я создаю новый ТабДок на основе ЭлементыФормы.Результат.
9 Irbis
 
24.10.11
11:24
ТабличныйДокумент (SpreadsheetDocument)
Вывести (Put)
Синтаксис:
Вывести(<Таблица>, <Уровень>, <Имя группы>, <Открыта>)
Параметры:
<Таблица> (обязательный)
Тип: ТабличныйДокумент, ПолеТабличногоДокумента. Выводимая таблица.
<Уровень> (необязательный)
Тип: Число. Уровень используется для автоматической группировки строк табличного документа. Соседние строки с одинаковым уровнем будут отнесены к одной группе. Строки с минимальным уровнем в группу не объединяются.
<Имя группы> (необязательный)
Тип: Строка. Название группы, к которой относятся выводимые строки.
Значение по умолчанию: Пустая строка
<Открыта> (необязательный)
Тип: Булево. Истина - выведенная группа будет открыта, Ложь - группа будет выведена в свернутом виде.
Значение по умолчанию: Истина
Возвращаемое значение:
Тип: ОбластьЯчеекТабличногоДокумента. Область, в которую был осуществлен вывод.
Описание:
Выводит табличный документ в результирующий табличный документ, добавляя его со следующей строки вслед за самой нижней выведенной строкой, начиная с первой колонки.
Пример:
ТабДок = Новый ТабличныйДокумент;
Секция = ТабДок.ПолучитьОбласть("R1");
Секция.Область("R1C1").Текст = "Численность сотрудников";
ТабДок.НачатьАвтогруппировкуСтрок();
ТабДок.Вывести(Секция,1,"Группа",Истина);
Итого = 0;
Для Н=1 По 3 Цикл
   Значение = Н; Итог = 0;
   Секция.Область("R1C1").Текст = "Отдел "+Н;
   Секция.Область("R1C2").Текст = "";
   ТабДок.Вывести(Секция,2,"Группа 1",Истина);
   Секция.Область("R1C1").Текст = "Группа";
   Секция.Область("R1C2").Текст = "Численность";
   ТабДок.Вывести(Секция,2,"Группа 1",Истина);
   Для К=1 По 10 Цикл
       Секция.Область("R1C1").Текст = "А"+Н+К;
       Секция.Область("R1C2").Текст = Значение;
       ТабДок.Вывести(Секция,3,"Группа 2",Истина);
       Итог = Итог + Значение;
       Значение = Значение + 10;
   КонецЦикла;
   Секция.Область("R1C1").Текст = "Итого"+Н;
   Секция.Область("R1C2").Текст = Итог;
   ТабДок.Вывести(Секция,2,"Группа 1",Истина);
   Секция.Область("R1C1:R1C2").Текст = "";
   ТабДок.Вывести(Секция);
   Итого = Итого + Итог;
КонецЦикла;
Секция.Область("R1C1").Текст = "Всего:";
Секция.Область("R1C2").Текст = Итого;
ТабДок.Вывести(Секция,1,"Группа",Истина);
ТабДок.ЗакончитьАвтогруппировкуСтрок();
ТабДок.ИтогиСнизу = Истина;
ТабДок.ОтображатьСетку = Ложь;
ТабДок.Защита = Ложь;
ТабДок.ТолькоПросмотр = Истина;
ТабДок.Показать("Пример использования верт. автогруппировки");
См. также:
ТабличныйДокумент, метод Присоединить
10 Irbis
 
24.10.11
11:24
Создал новый, вывел существующий, добавил то что надо, показал.
11 extrim-style
 
24.10.11
11:30
Смысл в том, что мне необходимо скопировать полностью ЭлементыФормы.Результат со всеми свойствами. Под свойствами в первую очередь подразумеваются колонтитулы, которые не хочется передавать отдельно.

(6) ЗаполнитьЗначенияСвойст колонтитулы не заполняет.
12 Irbis
 
24.10.11
11:31
ТабДок.Вывести(ЭлементыФормы.Результат);
не работает?
13 extrim-style
 
24.10.11
11:33
(12) не передает колонтитулы
14 extrim-style
 
24.10.11
11:35
Как скопировать ПолеТабличногоДокумента в ТабличныйДокумент полностью?
15 hhhh
 
24.10.11
12:36
а как делал "ЗаполнитьЗначенияСвойст"?