Clear;
Метод Clear осуществляет удаление всех диаграмм из списка подключенных к внешней легенде.
Для выполнения примера предполагается наличие регламентного отчета с идентификатором «Report». В отчете присутствуют объекты: диаграмма и внешняя легенда.
Sub Main;
Var
mb: IMetabase;
rep: IPrxReport;
legend: IPrxChartLegend;
chartlegend: IChartExternLegend;
items: IChartExternLegendItems;
Begin
mb:= MetabaseClass.Active;
rep:= mb.ItemById("OBJ42859").Edit As IPrxReport;
legend:= (rep.ActiveSheet As IprxTable).TabSheet.Objects.Item(1).Extension As IPrxChartLegend;
chartlegend:= legend As IChartExternLegend;
chartlegend.AxisIcon:= ChartLegendAxisIcon.Axis;
items:= chartlegend.InternalItems;
items.Swap(0,3);
chartlegend.Clear;
(rep As IMetabaseObject).Save;
End Sub Main;
После выполнения примера будут удалены все диаграммы из списка подключенных к внешней легенде.
См. также: