Split(Index: Integer);
Split(System.Int32);
Index. Индекс элемента внешней легенды.
Метод Split позволяет разделить элемент внешней легенды диаграмм, индекс которого передается в качестве входного параметра Index.
Для выполнения примера предполагается наличие регламентного отчета с идентификатором «Report». В отчете присутствуют объекты: диаграмма и внешняя легенда.
Sub Main;
Var
mb: IMetabase;
rep: IPrxReport;
legend: IPrxChartLegend;
chartlegend: IChartExternLegend;
items: IChartExternLegendItems;
Begin
mb := MetabaseClass.Active;
rep := mb.ItemById("OBJ12399").Open(Null) As IPrxReport;
legend := ((rep.ActiveSheet As IprxTable).TabSheet.Objects.Item(1)) As IPrxChartLegend;
chartlegend := legend As IChartExternLegend;
items := chartlegend.InternalItems;
items.Split(3);
End Sub Main;
После выполнения примера четвертый элемент легенды будет разделен на составляющие.
Для выполнения примера предполагается наличие регламентного отчета с идентификатором «Report». В отчете присутствуют объекты: диаграмма и внешняя легенда.
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Chart;
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Tab;
...
Public Shared Sub Main(Params: StartParams);
Var
mb: IMetabase;
rep: IPrxReport;
legend: IPrxChartLegend;
chartlegend: IChartExternLegend;
items: IChartExternLegendItems;
Begin
mb := Params.Metabase;
rep := mb.ItemById["OBJ42859"].Edit() As IPrxReport;
legend := ((rep.ActiveSheet As IprxTable).TabSheet.Objects.Item[1]) As IPrxChartLegend;
chartlegend := legend As IChartExternLegend;
chartlegend.AxisIcon := ChartLegendAxisIcon.claiAxis;
items := chartlegend.InternalItems;
items.ResetOrder();
items.Split(3);
(rep As IMetabaseObject).Save();
End Sub;
После выполнения примера четвертый элемент легенды будет разделен на составляющие.
См. также: