IVZBubbleTree.ItemsToolTipStyle

Синтаксис Fore

ItemsToolTipStyle: IVZToolTipStyle;

Синтаксис Fore.NET

ItemsToolTipStyle: Prognoz.Platform.Interop.Visualizzators.VZToolTipStyle;

Описание

Свойство ItemsToolTipStyle возвращает объект для работы со стилем всплывающих подсказок.

Комментарии

Для определения, используется ли стандартный цвет шрифта всплывающей подсказки используйте IVZBubbleTree.LabelAutoColor.

Пример Fore

Для выполнения примера необходимо наличие экспресс-отчета с идентификатором «EXPRESS_IVZBUBBLETREE», который содержит пузырьковое дерево.

Добавьте ссылки на системные сборки: Drawing, Express, Metabase, Visualizators.

Sub UserProc;
Var
    mb: IMetabase;
    analyzer: IEaxAnalyzer;
    bt: IEaxBubbleTree;
    BubbleTree: IVZBubbleTree;
    ItemsTooltipStyle: IVZToolTipStyle;
    color: GxColor;
Begin
    // Получим объект метабазы
    mb := MetabaseClass.Active;
    // Получим объект экспресс-отчёта
    analyzer := mb.ItemById("EXPRESS_IVZBUBBLETREE").Edit As IEaxAnalyzer;
    // Получим пузырьковое дерево
    bt := analyzer.BubbleTree;
    // Получим пузырьковое дерево в качестве визуализатора
    BubbleTree := bt.BubbleTree;
    // Получим стиль всплывающей подсказки
    ItemsTooltipStyle := bubbletree.ItemsToolTipStyle;
    // Отключим стандартный цвет шрифта подсказки
    BubbleTree.LabelAutoColor := False;
    // Создадим новый цвет
    color := New GxColor.CreateRGB(120, 0, 120);
    // Зададим новый цвет шрифта подсказки
    ItemsTooltipStyle.FontColor := color;
    // Сохраним изменения
    (analyzer As IMetabaseObject).Save;
End Sub UserProc;

После выполнения примера изменится цвет шрифта всплывающей подсказки.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

Imports Prognoz.Platform.Interop.Drawing;
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Visualizators;
…
Public Shared Sub Main(Params: StartParams);
Var
    mb: IMetabase;
    analyzer: IEaxAnalyzer;
    bt: IEaxBubbleTree;
    BubbleTree: IVZBubbleTree;
    ItemsTooltipStyle: IVZToolTipStyle;
    color: GxColorClass_2 = New GxColorClass_2();
Begin
    // Получим объект метабазы
    mb := Params.Metabase;
    // Получим объект экспресс-отчёта
    analyzer := mb.ItemById["EXPRESS_IVZBUBBLETREE"].Edit() As IEaxAnalyzer;
    // Получим пузырьковое дерево
    bt := analyzer.BubbleTree;
    // Получим пузырьковое дерево в качестве визуализатора
    BubbleTree := bt.BubbleTree;
    // Получим стиль всплывающей подсказки
    ItemsTooltipStyle := bubbletree.ItemsToolTipStyle;
    // Отключим стандартный цвет шрифта подсказки
    BubbleTree.LabelAutoColor := False;
    // Создадим новый цвет
    color.CreateRGB(120, 0, 120);
    // Зададим новый цвет шрифта подсказки
    ItemsTooltipStyle.FontColor := color;
    // Сохраним изменения
    (analyzer As IMetabaseObject).Save();
End Sub;

См. также:

IVZBubbleTree