1C 8.1.13.41 диаграмма
03.03.2009
13:42
#1
"Создаю круговую диаграмму, ставлю отображать Серию и Значение. Но после формирования текст серии всегда пустой. Где я ошибаюсь?
д=обл.Рисунки.Диаграмма.Объект;
д.обновление=ложь;
д.Очистить();
д.МаксимумСерий=МаксимумСерий.Ограничено;
д.МаксимумСерийКоличество=ОстаткиЦБ.Количество();
д.КоличествоСерий=0;
точка=д.УстановитьТочку(0);
д.КоличествоТочек=1;
д.Точки[0].Текст="ЦБ";
КолвоСерий=0;
для каждого т из ОстаткиЦБ цикл
имя=строка(т.ЦБ.наименование);
серия=д.Серии.Добавить(имя);
серия.текст=имя;
д.УстановитьЗначение(точка,серия,т.цена*т.колво,,имя);
КолвоСерий=КолвоСерий+1;
конеццикла;
д.обновление=истина;
ТабДок.Вывести(обл);"
д=обл.Рисунки.Диаграмма.Объект;
д.обновление=ложь;
д.Очистить();
д.МаксимумСерий=МаксимумСерий.Ограничено;
д.МаксимумСерийКоличество=ОстаткиЦБ.Количество();
д.КоличествоСерий=0;
точка=д.УстановитьТочку(0);
д.КоличествоТочек=1;
д.Точки[0].Текст="ЦБ";
КолвоСерий=0;
для каждого т из ОстаткиЦБ цикл
имя=строка(т.ЦБ.наименование);
серия=д.Серии.Добавить(имя);
серия.текст=имя;
д.УстановитьЗначение(точка,серия,т.цена*т.колво,,имя);
КолвоСерий=КолвоСерий+1;
конеццикла;
д.обновление=истина;
ТабДок.Вывести(обл);"
Читают тему
(гостей: 1)