IMapBackground.GradientAngle

Syntax

GradientAngle: Double;

Description

The GradientAngle property determines legend background gradient angle.

Comments

This property is relevant if:

The IMapBackground.Type property uses the MapBackgroundType.Gradient fill type.
Gradient fill color is set using the IMapBackground.GradientColor property.

Example

Executing the example requires that the repository contains a form containing the components:

ReportBox with the ReportBox1 identifier.
UiReport with the UiReport1 identifier that is a data source for ReportBox1.

It is also required to have a regular report containing a map with enabled legend that is a data source for UiReport1.

Add links to the Drawing, Map, Report, Tab system assemblies.

Sub UserProc;
Var
    regrep: IPrxReport;
    sheet: IPrxSheet;
    table: IPrxTable;
    objects: ITabObjects;
    map: IMap;
    legend: IMapLegend;
    background: IMapBackground;
Begin
    // Get regular report
    regrep := UiReport1.Report;
    // Get map from regular report
    sheet := regrep.Activesheet;
    table := sheet As IPrxTable;
    objects := table.TabSheet.Objects;
    map := objects.Item(0).Extension As IMap;
    // Get map legend
    legend := map.View.Legend;
    // Get legend background on map
    background := legend.Background;
    // Set legend gradient fill type
    background.Type := MapBackgroundType.Gradient;
    // Set gradient color
    background.GradientColor := New GxColor.CreateRGB(120, 0, 120);
    // Set gradient angle
    background.GradientAngle := 45;
    // Refresh map
    map.Refresh;
End Sub UserProc;

After executing the example legend background fill becomes gradient, gradient angle becomes equal to 45°.