IVZBubbleTree.Captions

Синтаксис Fore

Captions: IVZItemsNames;

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

Captions: Prognoz.Platform.Interop.Visualizators.VZItemsNames;

Описание

Свойство Captions определяет подписи к элементам пузырькового дерева.

Пример Fore

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

Добавьте ссылки на системные сборки: Metabase, Express, Visualizators. Указанная процедура должна вызываться из точки входа Main.

Sub UserProc;
Var
    Metabase: IMetabase; // Репозиторий
    EaxAnalyzer: IEaxAnalyzer; // Экспресс-отчёт
    BubbleTree: IVZBubbleTree; // Пузырьковое дерево
    i: Integer; // Счётчик цикла
    AllKeys: IVZStringArray;
    Key, Captions: String;
Begin
    // Получим объект репозитория
    Metabase := MetabaseClass.Active;
    // Получим объект экспресс-отчёта  
    EaxAnalyzer := Metabase.ItemById("EXPRESS_REPORT").Edit As IEaxAnalyzer;
    // Получим пузырьковое дерево
    BubbleTree := EaxAnalyzer.BubbleTree.BubbleTree;
    // Получим все ключи подписей
    AllKeys := BubbleTree.Captions.AllKeys;
    // Выведем коллекцию подписей к элементам пузырькового дерева
    For i:=0 To AllKeys.Count-1 Do 
        Key := AllKeys.Item(i);
        Captions := BubbleTree.Captions.Item(Key);
        BubbleTree.Captions.Item(Key) := Captions;
        Debug.WriteLine(Captions);
    End For;
End Sub UserProc;

После выполнения примера в консоль будут выведены подписи к элементам пузырькового дерева:

Белгородская область

Кировская область

Тульская область

Владимирская область
...

Пример Fore.NET

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

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Visualizators;
…
Public Shared Sub Main(Params: StartParams);
Var
    Metabase: IMetabase; // Репозиторий
    EaxAnalyzer: IEaxAnalyzer; // Экспресс-отчёт
    BubbleTree: IVZBubbleTree; // Пузырьковое дерево
    i: Integer; // Счётчик цикла
    AllKeys: IVZStringArray;
    Key, Captions: String;
Begin
    // Получим объект репозитория
    Metabase := Params.Metabase;
    // Получим объект экспресс-отчёта  
    EaxAnalyzer := Metabase.ItemById["EXPRESS_REPORT"].Edit() As IEaxAnalyzer;
    // Получим пузырьковое дерево
    BubbleTree := EaxAnalyzer.BubbleTree.BubbleTree;
    // Получим все ключи подписей
    AllKeys := BubbleTree.Captions.AllKeys;
    // Выведем коллекцию подписей к элементам пузырькового дерева
    For i:=0 To AllKeys.Count-1 Do 
        Key := AllKeys.Item[i];
        Captions := BubbleTree.Captions.Item[Key];
        BubbleTree.Captions.Item[Key] := Captions;
        System.Diagnostics.Debug.WriteLine(Captions);
    End For;
End Sub;

См. также:

IVZBubbleTree