Имя: Пароль:
1C
1С v8
Разные цвета в диаграмме ганта
,
0 КусокЗабора
 
01.12.14
11:07
http://s1.radikale.ru/uploads/2014/12/1/f86fe5c8ab16d62391e779397ff3ec11-full.png

где это настраивается? Почему цвета в самой диаграмме и в списке справа разные, как тогда сопоставить какая строка к чему относится?
1 Asmody
 
01.12.14
11:27
У тебя, скорее всего, перекрывающиеся интервалы.
Можно принудительно выставить нужный цвет сериям, интервалам и точкам.
2 КусокЗабора
 
01.12.14
11:29
(1) перекрытия там нет, эт точно
3 КусокЗабора
 
01.12.14
11:30
(1) можно пример кода в котором задается цвет?
4 ilyavorobyev
 
01.12.14
11:50
(3) // Получаем диаграмму и запрещаем на время заполнения ее обновление.
// В случае большого объема данных это существенно ускорит выполнение.
//Диаграмма = ЭлементыФормы.ДиаграммаГанта;
Диаграмма.Обновление = Ложь;
Диаграмма.Очистить();

Диаграмма.ОтображатьЗаголовок = Ложь;
// Серия будет одна.
ТекущаяСерия = Диаграмма.Серии.Добавить();
// ТекущаяСерия=Диаграмма.УстановитьСерию("Тест-драйв");
  
// Интервал будем определять самостоятельно.
Диаграмма.АвтоОпределениеПолногоИнтервала = Ложь;
// Установить интервал.
Диаграмма.УстановитьПолныйИнтервал(ДатаНачала,ДатаОкончания);
  // подумать, как избежать умножения этих шкал
ЭлементМеток = Диаграмма.ОбластьПостроения.ШкалаВремени.Элементы.Добавить();  //добавляется много раз!!! Подумать!
ЭлементМеток.Единица = ТипЕдиницыШкалыВремени.Час;

// ЭлементМеток = Диаграмма.ОбластьПостроения.ШкалаВремени.Элементы.Удалить(ЭлементМеток);
// Заполняем диаграмму

Пока Выборка.Следующий() Цикл
  //Получить серию, точку и значение для них.
// ТекущаяСерия=Диаграмма.УстановитьСерию(Выборка.НачалоТестДрайва);
  ТекущаяТочка=Диаграмма.УстановитьТочку(Выборка.Имя);
  ТекущееЗначение=Диаграмма.ПолучитьЗначение(ТекущаяТочка,ТекущаяСерия);
  
  Если Выборка.Регистратор<>NULL Тогда
//Создать нужные нам интервалы в значении
     ТекущийИнтервал = ТекущееЗначение.Добавить();
  
  //Преобразование даты в число - потом подумаю
  ТекущийИнтервал.Начало =Выборка.НачалоТестДрайва;
  ТекущийИнтервал.Конец=Выборка.НачалоТестДрайва+3600;
  
  
  ТекущийИнтервал.Текст=Строка(Выборка.Сотрудник)+" "+Строка(Выборка.Контрагент)+" "+Строка(Выборка.Телефон);
  ТекущийИнтервал.Расшифровка = Выборка.Регистратор;
  КонецЕсли;
КонецЦикла;

Для Каждого Серия из Диаграмма.Серии Цикл
  Серия.Цвет =  WEBЦвета.Бирюзовый;
КонецЦикла;

  // Включаем обновление диаграммы.
Диаграмма.Обновление = Истина;
5 ilyavorobyev
 
01.12.14
11:50
6 КусокЗабора
 
01.12.14
12:02
Выборка = Запрос.Выполнить().Выбрать();
  Пока Выборка.Следующий() Цикл
    Точка = ДГ.УстановитьТочку(Выборка.Руководитель);
    Серия = ДГ.УстановитьСерию(Выборка.Заместитель);
    Серия.Цвет = WebЦвета.Бирюзовый;
    
    Значение = ДГ.ПолучитьЗначение(Точка, Серия);
    Интервал = Значение.Добавить();
    Интервал.Начало = Выборка.ДатаНачалаЗамещения;
    Интервал.Конец = Выборка.ДатаОкончанияЗамещения;  
  КонецЦикла;


цвет поменялся только в списке справа, сама диаграмма осталась со своими цветами (
7 КусокЗабора
 
01.12.14
13:38
ку
8 КусокЗабора
 
01.12.14
18:04
(1) да, как оказалось это перекрытие, я просто не знал что оно из-за этого цвет меняет, даже если серии разные но в этом же периоде, цвет меняется. Фигово (
9 Asmody
 
01.12.14
18:21
(8) Есть свойство ЦветПерекрытия
10 КусокЗабора
 
01.12.14
18:34
(9) свойство чего?
СП про ЦветПерекрытия ничего не знает