Clear;
Clear();
The Clear method removes all charts from the list of charts connected to the external legend.
Executing the example requires a regular report with the Report identifier. The report includes the following objects: a chart and an external legend.
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;
After executing the example all charts are removed from the list of charts connected to the external legend.
Executing the example requires a regular report with the Report identifier. The report includes the following objects: a chart and an external legend.
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].Extension As IPrxChartLegend;
chartlegend:= legend As IChartExternLegend;
chartlegend.AxisIcon:= ChartLegendAxisIcon.claiAxis;
items:= chartlegend.InternalItems;
items.Swap(0,3);
chartlegend.Clear();
(rep As IMetabaseObject).Save();
End Sub;
After executing the example all charts are removed from the list of charts connected to the external legend.
See also: