IPPSpeedometerScale.OuterRadius

Fore Syntax

OuterRadius: IGxSizeF;

Fore.NET Syntax

OuterRadius: Prognoz.Platform.Interop.Drawing.GxSizeF;

Description

The OuterRadius property determines an area of scale rendering relative to its center.

Comments

The range of available values: [0,1]. The smaller is the value, the closer is the scale to the center.

Fore Example

Executing the example requires that the repository contains a database with the ADHOC identifier. A dashboard must contain a speedometer.

Add links to the Adhoc, Drawing, Express, Metabase, Speedometer system assemblies.

Sub UserProc;
Var
    Speedometer: IPPSpeedometer;
    MB: IMetabase;
    AdhocReport: IAdhocReport;
    EaxSpeedometer: IEaxSpeedometer;
    Enalyzer: IEaxAnalyzer;
    DsObjs: IAdhocDataSourceObjects;
    Scales: IPPSpeedometerScales;
    Scale: IPPSpeedometerScale;
Begin
    MB := MetabaseClass.Active;
    // Get dashboard
    AdhocReport := MB.ItemById("ADHOC").Edit As IAdhocReport;
    // Get dashboard data sources
    DsObjs := AdhocReport.DataSourceObjects;
    // Get speedometer
    Enalyzer := DsObjs.Item(0).GetSourceObject As IEaxAnalyzer;
    EaxSpeedometer := Enalyzer.Speedometer;
    // Get speedometer parameters
    Speedometer := EaxSpeedometer.Speedometer;
    // Get collection of speedometer scales
    Scales := Speedometer.Scales;
    // Get data scale
    Scale := Scales.DataScale;
    // Change slope angle of scale start
    Scale.StartAngle := 45;
    // Change placement step for additional markers
    Scale.Step_ := 2000;
    // Change scale rendering area
    Scale.OuterRadius.Height := 0.6;
    Scale.OuterRadius.Width := 0.7;
    // Display coordinates of scale center
    Debug.Writeline("Scale center coordinates: " + Scale.CenterPosition.X.ToString +
        ":" + Scale.CenterPosition.Y.ToString);
    // Display tooltip text
    Debug.Writeline("Tooltip text: " + Scale.ToolTip);
    (Enalyzer As IMetabaseObject).Save;
End Sub UserProc;

After executing the example scale rendering area, placement step for additional markers, scale slope angle are changed. The console window displays coordinates of scale center and tooltip text.

Fore.NET Example

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

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.AdHoc;
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Speedometer;
Imports Prognoz.Platform.Interop.Drawing;
…
Public Shared Sub Main(Params: StartParams);
Var
    Speedometer: IPPSpeedometer;
    MB: IMetabase;
    AdhocReport: IAdhocReport;
    EaxSpeedometer: IEaxSpeedometer;
    Enalyzer: IEaxAnalyzer;
    DsObjs: IAdhocDataSourceObjects;
    Scales: IPPSpeedometerScales;
    Scale: PPSpeedometerScale;
Begin
    MB := Params.Metabase;
    // Get dashboard
    AdhocReport := MB.ItemById["ADHOC"].Edit() As IAdhocReport;
    // Get dashboard data sources
    DsObjs := AdhocReport.DataSourceObjects;
    // Get speedometer
    Enalyzer := DsObjs.Item[0].GetSourceObject() As IEaxAnalyzer;
    EaxSpeedometer := Enalyzer.Speedometer;
    // Get speedometer parameters
    Speedometer := EaxSpeedometer.Speedometer;
    // Get collection of speedometer scales
    Scales := Speedometer.Scales;
    // Get data scale
    Scale := Scales.DataScale;
    // Change slope angle of scale start
    Scale.StartAngle := 45;
    // Change placement step for additional markers
    Scale.@Step := 2000;
    // Change scale rendering area
    Scale.OuterRadius.Height := 0.6;
    Scale.OuterRadius.Width := 0.7;
    // Display coordinates of scale center
    System.Diagnostics.Debug.Writeline("Scale center coordinates: " + Scale.CenterPosition.X.ToString() +
        ":" + Scale.CenterPosition.Y.ToString());
    // Display tooltip text
    System.Diagnostics.Debug.Writeline("Tooltip text: " + Scale.ToolTip);
    (Enalyzer As IMetabaseObject).Save();
End Sub;