IChartExternLegend.ColCount

Syntax

ColCount: Integer;

Fore.NET Syntax

ColCount: System.Int32;

Description

The ColCount property determines the number of columns to be used for placing elements of the external legend.

Comments

To use the ColCount property, set the ItemPlacement property to ChartExtLegPlacement.CustomColumns.

The specified number of columns is always used regardless of the legend size. The number of rows is automatically calculated depending on the number of elements of the external legend and its size.

Fore Example

Executing the example, create a regular report with a chart and an external legend on the report sheet. A unit is added to the report and the UserProc procedure is called from this unit using the hyperlink. The inspector of unit assemblies must contain links to the Chart, Report, Tab system assemblies.

Sub UserProc;
Var
    ChartExLegend :IChartExternLegend;
Begin
    ChartExLegend := (PrxReport.ActiveReport.ActiveSheet As IPrxTable).TabSheet.Objects.Item(1) As IChartExternLegend;
    ChartExLegend.ItemPlacement := ChartExtLegPlacement.CustomColumns;
    ChartExLegend.ColCount := 5;
End Sub UserProc;

After executing the example five columns are used to display elements in the external legend.

Fore.NET Example

Executing the example requires a regular report with a chart and an external legend on the report sheet. The .NET assembly is added to the report to handle report events. The OnBeforeOpenReport event is described in the unit of the specified assembly in the EventsClass class. Add links to the Chart and Tab system assemblies.

Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Chart;
Imports Prognoz.Platform.Interop.Tab;
...

Public Override Sub OnBeforeOpenReport(Report:IPrxReport; Var Cancel:Boolean);
Var
    ChartExLegend :IChartExternLegend;
Begin
    Cancel := False;
    ChartExLegend:=(Report.ActiveSheet As IPrxTable).TabSheet.Objects.Item[1] As IChartExternLegend;
    ChartExLegend.ItemPlacement := ChartExtLegPlacement.celpCustomColumns;
    ChartExLegend.ColCount := 5;
End Sub OnBeforeOpenReport;

Opening the report sets five columns to display elements in the external legend.