| 
 
  Авторизация
                    
                    
                    
                        
                      
                    На сайте: 
 |  | Содержание 
 Как заполнить диаграмму Ганта данными?
 
 
 
 ДГ = ЭлементыФормы.ДГ; // Установить заголовок диаграммы.
 ДГ.ОбластьЗаголовка.Текст = "График дежурств";
 // Интервал будем определять самостоятельно.
 ДГ.АвтоОпределениеПолногоИнтервала = Ложь;
 // Установить интервал.
 ДГ.УстановитьПолныйИнтервал(НачалоМесяца(ТекущаяДата()), КонецМесяца(ТекущаяДата()));
 // В диаграмме будет две точки - сотрудники Петров и Сидоров...
 ТочкаП = ДГ.УстановитьТочку("Петров");
 ТочкаС = ДГ.УстановитьТочку("Сидоров");
 // и две серии - дежурство на вахте и дежурство в центральном офисе.
 СерияНаВахте = ДГ.УстановитьСерию("На вахте");
 СерияВЦентре = ДГ.УстановитьСерию("В центральном офисе");
 // Задать цвета серий, отличные от цвета по умолчанию.
 СерияНаВахте.Цвет = WebЦвета.Синий;
 СерияВЦентре.Цвет = WebЦвета.СветлоЖелтый;
 ПервыйДень = НачалоМесяца(ТекущаяДата());
 // Получить значение диаграммы - дежурство Петрова на вахте.
 Значение = ДГ.ПолучитьЗначение(ТочкаП, СерияНаВахте);
 // В значении определить новый интервал.
 Интервал = Значение.Добавить();
 Интервал.Текст = "Работает на вахте";
 // Определить границы интервала.
 Интервал.Начало = ПервыйДень;
 Интервал.Конец = ПервыйДень + 10 * 24 * 60 * 60;
 // Получить значение диаграммы - дежурство Петрова в центральном офисе.
 Значение = ДГ.ПолучитьЗначение(ТочкаП, СерияВЦентре);
 Интервал = Значение.Добавить();
 Интервал.Текст = "Работает в центральном офисе";
 Интервал.Начало = ПервыйДень + 14 * 24 * 60 * 60;
 Интервал.Конец = ПервыйДень + 24 * 24 * 60 * 60;
 // Получить значение диаграммы - дежурство Сидорова на вахте.
 Значение = ДГ.ПолучитьЗначение(ТочкаС, СерияНаВахте);
 Интервал = Значение.Добавить();
 Интервал.Текст = "Работает на вахте";
 Интервал.Начало = ПервыйДень + 5 * 24 * 60 * 60;
 Интервал.Конец = ПервыйДень + 15 * 24 * 60 * 60;
 // Получить значение диаграммы - дежурство Сидорова в центральном офисе.
 Значение = ДГ.ПолучитьЗначение(ТочкаС, СерияВЦентре);
 Интервал = Значение.Добавить();
 Интервал.Текст = "Работает в центральном офисе";
 Интервал.Начало = ПервыйДень + 21 * 24 * 60 * 60;
 Интервал.Конец = ПервыйДень + 25 * 24 * 60 * 60;
 
 |