IMapScale.AutoCalculate

Синтаксис

AutoCalculate(Layer: IMapLayer; DataAdapter: Object; AttributeName: String);

Параметры

Layer - слой карты.

DataAdapter - значение из куба, соответствующее территории с заданным атрибутом.

AttributeName - атрибут карты.

Описание

Метод AutoCalculate производит автоматический расчет значений для шкалы отчета.

Пример

В рассматриваемом примере предполагается существование объекта Report типа IPrxReport. Для регламентного отчета должна быть создана цветовая шкала, на листе отчета должна быть расположена карта, для которой создан картографичекий показатель.

Sub UserProc;

Var

Report: IPrxReport;

Map : IMap;

Layer :  IMapLayer;

Visual: IMapAreaVisual;

MapScale : IMapColorScale;

Begin

Map := (Report.ActiveSheet As IPrxTable).TabSheet.Objects.Item(0).Extension As IMap;

Layer := Map.Layers.FindByName("Regions");

Visual := Layer.Visuals.Item(0) As IMapAreaVisual;

MapScale := Report.Scales.Item(0).MapScale As IMapColorScale;

MapScale.AutoCalculable := True;

MapScale.AutoScaleMode := MapAutoScaleMode.Uniform;   

MapScale.AutoCalculate(Layer, Visual.DataAdapter, Visual.AttributeName);

End Sub UserProc;

После выполнения примера будет произведен расчет значений для шкалы отчета.

См. также:

IMapScale