IChartCorridors.Count

Syntax

Count: Integer;

This property is read-only.

The Count property returns the current number of corridors in a chart.

To execute this example, there should be a regular report sheet with a bar chart on it. There should be more than two series in a chart.

Sub Cor;

Var

ActiveReport: IPrxReport;

Sheet: IPrxSheet;

PrxTable: IPrxTable;

TabSheet: ITabSheet;

C: IChart;

Corridor: IChartCorridors;

I: Integer;

Begin

ActiveReport := PrxReport.ActiveReport;

Sheet := ActiveReport.Sheets.Item(0);

PrxTable := Sheet As IPrxTable;

TabSheet := PrxTable.TabSheet;

C := TabSheet.Objects.Item(0).Extension As IChart;

Corridor := C.Corridors;

I := Corridor.Count

End Sub Cor;

After executing the example the I variable contains the number of chart corridors.