RowCount: Integer;
RowCount: System.Int32;
Свойство RowCount задаёт количество строк внешней легенды диаграмм.
Для использования свойства RowCount необходимо для свойства ItemPlacement установить в значение ChartExtLegPlacement.CustomRows.
При любом размере легенды будет использоваться заданное количество строк. При этом количество столбцов будет вычислено автоматически в зависимости от количества элементов внешней легенды и ее размеров.
Для выполнения примера предполагается наличие регламентного отчёта, на листе которого расположена диаграмма и внешняя легенда. К отчету добавлен модуль, из которого с помощью гиперссылки вызывается процедура UserProc. В инспекторе сборок модуля должны быть указаны ссылки на системные сборки Chart, Report, Tab.
Sub UserProc;
Var
ChartExLegend: IChartExternLegend;
Begin
ChartExLegend := (PrxReport.ActiveReport.ActiveSheet As IPrxTable).TabSheet.Objects.Item(1) As IChartExternLegend;
ChartExLegend.ItemPlacement := ChartExtLegPlacement.CustomRows;
ChartExLegend.RowCount := 5;
End Sub UserProc;
После выполнения примера для отображения элементов во внешней легенде будет использовано 5 строк.
Для выполнения примера предполагается наличие регламентного отчета, на листе которого расположена диаграмма и внешняя легенда. К отчету добавлена .NET сборка для обработки событий отчёта. В модуле указанной сборки в классе EventsClass описано событие OnBeforeOpenReport. Добавьте ссылки на системные сборки Chart и Tab.
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.celpCustomRows;
ChartExLegend.RowCount := 5;
End Sub OnBeforeOpenReport;
При открытии отчёта для отображения элементов во внешней легенде будет установлено 5 строк.
См. также: