IVZBubbleTree.OrbitsPen

Fore Syntax

OrbitsPen: IGxPenBase;

Fore.NET Syntax

OrbitsPen: Prognoz.Platform.Interop.Drawing.IGxPenBase;

Description

The OrbitsPen property determines orbit line pen for a bubble tree.

Fore Example

Executing the example requires that the repository contains an express report with the EXP identifier. The module containing the example should have links to the Drawing, Express, Metabase and Visualizators system assemblies. The selected procedure should be called from the Main entry point.

Before executing this example, the bubble tree looks as shown on the description page of the IVZBubbleTree interface. Select purple color for orbit lines in a bubble tree, and select the number of colors for the chart palette:

Sub UserProc;
Var
    Metabase: IMetabase; // Metabase
    Analyzer: IEaxAnalyzer; // Express report
    BubbleTree: IVZBubbleTree; // Bubble tree
    OrbitsPen: IGxPenBase; // Orbit lines  
    Color: IGxColor; // Line color
    Palette: IVZPalette; // Color palette
Begin
    // Get metabase object
    Metabase := MetabaseClass.Active;
    // Get express report object
    Analyzer := Metabase.ItemById("EXP").Edit As IEaxAnalyzer;
    // Get bubble tree
    BubbleTree := Analyzer.BubbleTree.BubbleTree;
    // Create pen with purple color fill
    Color := New GxColor.CreateRGB(255, 0, 255);
    OrbitsPen := New GxPen.CreateSolid(Color);
    // Set pen width
    OrbitsPen.Width := 5;
    // Select created pen
    BubbleTree.OrbitsPen := OrbitsPen;
    // Obtain color palette
    Palette := BubbleTree.Palette;
    // Determine the number of colors in palette
    Debug.WriteLine("Number of colors in palette: " + 
        Palette.BackgroundArray.Count.ToString);
    // Save changes, made in express report
    (Analyzer As IMetabaseObject).Save;
End Sub UserProc;

After executing the example, orbit lines in a bubble tree are colored purple:

The number of colors in the bubble tree palette is shown in the development environment console window:

Number of colors in the palette: 36

Fore.NET Example

Executing the example requires that the repository contains an express report with the EXP identifier. The selected procedure is the Main entry point in the Program module of the .NET assembly. The Drawing, Express, Metabase and Visualizators assemblies should be imported to this module from the Prognoz.Platform.Interop system assembly.

Before executing this example, the bubble tree looks as shown on the description page of the IVZBubbleTree interface. Select purple color for orbit lines in a bubble tree, and select the number of colors for the chart palette:

Public Shared Sub Main(Params: StartParams);
Var
    Metabase: IMetabase; // Metabase
    Analyzer: IEaxAnalyzer; // Express report
    BubbleTree: IVZBubbleTree; // Bubble tree
    OrbitsPen: GxPen; // Orbit lines   
    Color: GxColor; // Lines color
    Palette: IVZPalette; // Color palette
Begin
    // Get metabase object
    Metabase := Params.Metabase;
    // Get express report object
    Analyzer := Metabase.ItemById["EXP"].Edit() As IEaxAnalyzer;
    // Get bubble tree
    BubbleTree := Analyzer.BubbleTree.BubbleTree;
    // Create pen with purple color fill
    Color := New GxColorClass_2();
    Color.CreateRGB(255, 0, 255);
    OrbitsPen := New GxPenClass();
    OrbitsPen.CreateSolid(Color, 5);
    // Select created pen
    BubbleTree.OrbitsPen := OrbitsPen;
    // Obtain color palette
    Palette := BubbleTree.Palette;
    // Determine the number of colors in palette
    System.Diagnostics.Debug.WriteLine("Number of colors in palette: " + 
        Palette.BackgroundArray.Count.ToString());
    // Save changes, made in express report
    (Analyzer As IMetabaseObject).Save();
End Sub;

The result of the executed example is the same as that, executed for Fore language.

See also:

IVZBubbleTree