Swap(FromIndex: Integer; ToIndex: Integer);
FromIndex. Индекс элемента легенды, который будет заменен.
ToIndex. Индекс элемента легенды, на который будет заменен элемент.
Метод Swap позволяет менять местами заданные элементы внешней легенды.
Для выполнения примера предполагается наличие регламентного отчета с идентификатором «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).Extension As IPrxChartLegend;
chartlegend := legend As IChartExternLegend;
items := chartlegend.InternalItems;
items.Swap(0,3);
End Sub Main;
После выполнения примера первый и четвертый элементы легенды поменяются местами.
См. также: