IMapLayer.VisualOffset

Fore Syntax

VisualOffset: Integer;

Fore.NET Syntax

VisualOffset: integer;

Description

The VisualOffset property determines a distance between bar and pie factors located in line.

Comments

To set a distance between bar and pie factors, the IMapLayer.PlaceVisualsOneByOne property must be set to True.

Fore Example

Executing the example requires that the repository contains a regular report with the REPORT identifier containing a map. The map contains bar and pie factors.

Add links to the Map, Metabase, Report system assemblies.

Sub UserProc;
Var
    MB: IMetabase;
    Report: IPrxReport;
    Map: IMap;
    Layer: IMapLayer;
Begin
    MB := MetabaseClass.Active;
    Report := MB.ItemById("REPORT").Edit As IPrxReport;
    Map := (Report.ActiveSheet As IPrxTable).TabSheet.Objects.Item(0).Extension As IMap;
    Layer := Map.Layers.Item(0);
    Layer.VisualOffset := 10;
    If Not Layer.PlaceVisualsOneByOne Then
        Layer.PlaceVisualsOneByOne := True;
    End If;
End Sub UserProc;

After executing the example a distance between bar and pie factors is changed.

Fore.NET Example

The requirements and result of the Fore.NET example execution match with those in the Fore example.

Imports Prognoz.Platform.Interop.Map;
Imports Prognoz.Platform.Interop.Report;
…
Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    Report: IPrxReport;
    Map: IMap;
    Layer: IMapLayer;
Begin
    MB := Params.Metabase;
    Report := MB.ItemById["REPORT"].Edit() As IPrxReport;
    Map := (Report.ActiveSheet As IPrxTable).TabSheet.Objects.Item[0].Extension As IMap;
    Layer := Map.Layers.Item[0];
    Layer.VisualOffset := 10;
    If Not Layer.PlaceVisualsOneByOne Then
        Layer.PlaceVisualsOneByOne := True;
    End If;
End Sub;