BranchItemsToolTipStyle: IVZToolTipStyle;
BranchItemsToolTipStyle: Prognoz.Platform.Interop.Visualizators.VZToolTipStyle;
Свойство BranchItemsToolTipStyle определяет стиль всплывающих подсказок ветвей плоского дерева.
Всплывающая подсказка ветви плоского дерева может выглядеть следующим образом:
Для выполнения примера предполагается наличие в репозитории экспресс-отчета с идентификатором «EXP». Модуль, в котором размещается пример, должен иметь ссылки на системные сборки Drawing, Express, Metabase и Visualizators. Указанная процедура должна вызываться из точки входа Main.
Изменим фон всплывающих подсказок ветвей плоского дерева, выведем длительность анимации и количество цветов в палитре компонента:
Sub UserProc;
Var
Metabase: IMetabase; // Метабаза
EaxAnalyzer: IEaxAnalyzer; // Экспресс-отчёт
TreeMap: IVZTreeMap; // Плоское дерево
BranchItemsToolTipStyle: IVZToolTipStyle; // Стиль подсказок ветвей плоского дерева
Begin
// Получим объект метабазы
Metabase := MetabaseClass.Active;
// Получим объект экспресс-отчёта
EaxAnalyzer := Metabase.ItemById("EXP").Edit As IEaxAnalyzer;
// Получим плоское дерево
TreeMap := EaxAnalyzer.TreeMap.TreeMap;
// Изменим фон всплывающих подсказок ветвей плоского дерева
BranchItemsToolTipStyle := TreeMap.BranchItemsToolTipStyle;
BranchItemsToolTipStyle.Background := New GxSolidBrush.Create(New GxColor.CreateRGB(250,220,220));
BranchItemsTooltipStyle.NoDataText := "данные отсутствуют";
// Выведем длительность анимации
Debug.WriteLine("Длительность анимации: " + TreeMap.AnimationTime.ToString);
// Выведем количество цветов в палитре
Debug.WriteLine("Количество цветов в палитре: " +
TreeMap.Palette.BackgroundArray.Count.ToString);
// Сохраним экспресс-отчет
(EaxAnalyzer As IMetabaseObject).Save;
End Sub UserProc;
В результате выполнения примера был изменен фон всплывающих подсказок ветвей плоского дерева:
Также в консоли среды разработки была выведена длительность анимации плоского дерева и количество цветов в палитре:
Длительность анимации: 1.5
Количество цветов в палитре: 36
Для выполнения примера предполагается наличие в репозитории экспресс-отчета с идентификатором «EXP». Указанная процедура является точкой входа Main в модуле Program .NET-сборки. В данный модуль должны быть импортированы сборки Express, Metabase, Drawing и Visualizators из системной сборки Prognoz.Platform.Interop.
Изменим фон всплывающих подсказок ветвей плоского дерева, выведем длительность анимации и количество цветов в палитре компонента:
Public Shared Sub Main(Params: StartParams);
Var
Metabase: IMetabase; // Метабаза
EaxAnalyzer: IEaxAnalyzer; // Экспресс-отчёт
TreeMap: IVZTreeMap; // Плоское дерево
BranchItemsToolTipStyle: IVZToolTipStyle; // Стиль подсказок ветвей плоского дерева
Brush: GxSolidBrush; // Кисть
Color: GxColor; // Цвет фона
Begin
// Получим объект метабазы
Metabase := Params.Metabase;
// Получим объект экспресс-отчёта
EaxAnalyzer := Metabase.ItemById["EXP"].Edit() As IEaxAnalyzer;
// Получим плоское дерево
TreeMap := EaxAnalyzer.TreeMap.TreeMap;
// Изменим фон всплывающих подсказок ветвей плоского дерева
BranchItemsToolTipStyle := TreeMap.BranchItemsToolTipStyle;
Color := New GxColor();
Color.CreateRGB(250, 220, 220);
Brush := New GxSolidBrush();
Brush.Create(Color);
BranchItemsToolTipStyle.Background := Brush;
// Выведем длительность анимации
System.Diagnostics.Debug.WriteLine("Длительность анимации: "
+ TreeMap.AnimationTime.ToString());
// Выведем количество цветов в палитре
System.Diagnostics.Debug.WriteLine("Количество цветов в палитре: " +
TreeMap.Palette.BackgroundArray.Count.ToString());
// Сохраним экспресс-отчет
(EaxAnalyzer As IMetabaseObject).Save();
End Sub;
Результат выполнения примера аналогичен результату, полученному после выполнения примера для языка Fore.
См. также: