UseSerieDesign: Boolean;
UseSerieDesign: Boolean;
The UseSerieDesign property determines whether formatting for series of the internal legend corresponds to formatting of chart series.
This property is relevant only for linear and scatter series. When this property is used from the Fore or Fore.NET language with other chart types, chart formatting does not change.
By default this property is set to False. And formatting of series in a legend and on a chart may differ.
In the interface the property is set by the Use Series Decoration checkbox on the General tab in the Legend Format window.
To execute this example, add references to the Chart, Drawing, Metabase, Report, and Tab system assemblies. This example requires a report with the identifier OBJ_1 and a chart with the identifier PrxChart1 to be shown in the active sheet.
Sub UserProc;
Var
mb: IMetabase;
rep: IPrxReport;
chartlegend: IChartLegend;
object: Ichart;
SSize: IGxSizeF;
Begin
mb := MetabaseClass.Active;
rep := mb.ItemById("OBJ_1").Edit As IPrxReport;
object := (rep.ActiveSheet As IprxTable).TabSheet.Objects.Object("PrxChart1") As Ichart;
chartlegend := object.Legend;
chartlegend.UseSerieDesign := True;
SSize := New GxSizeF.Create(3,3);
chartlegend.SymbolSize := SSize;
(rep As IMetabaseObject).Save;
End Sub UserProc;
After executing the example in the legend:
Series formatting is set in accordance with series formatting in the chart.
Size of icons 3 by 3 mm is set.
To execute this example, add references to the Chart, Drawing, Metabase, Report, and Tab system assemblies. This example requires a report with the identifier OBJ_1 and a chart with the identifier PrxChart1 to be shown in the active sheet.
Imports Prognoz.Platform.Interop.Drawing;
Imports Prognoz.Platform.Interop.Chart;
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Tab;
Imports Prognoz.Platform.Interop.Metabase;
...
Sub UserProc(Params: StartParams);
Var
mb: IMetabase;
rep: IPrxReport;
chartlegend: IChartLegend;
object: Ichart;
SSize: GxSizeF = New GxSizeFClass();
Begin
mb := Params.Metabase;
rep := mb.ItemById["OBJ_1"].Edit() As IPrxReport;
object := (rep.ActiveSheet As IprxTable).TabSheet.Objects.Object["PrxChart1"] As Ichart;
chartlegend := object.Legend;
chartlegend.UseSerieDesign := True;
SSize.Create(3,3);
chartlegend.SymbolSize := SSize;
(rep As IMetabaseObject).Save();
End Sub UserProc;
After executing the example in the legend:
Series formatting is set in accordance with series formatting in the chart
Size of icons 3 by 3 mm is set.
See also: