AutoScaleMode: MapAutoScaleMode;
AutoScaleMode: Prognoz.Platform.Interop.Map.MapAutoScaleMode;
Свойство AutoScaleMode определяет тип автоматического расчета шкалы отчета.
Перед определением типа расчета необходимо свойство IMapScale.AutoCalculable установить в True.
Для выполнения примера в репозитории предполагается наличие регламентного отчёта с идентификатором REPORT, в который добавлена цветовая шкала.
Добавьте ссылки на системные сборки: Map, Metabase, Report.
Sub UserProc;
Var
MB: IMetabase;
Report: IPrxReport;
MapScale: IMapColorScale;
Begin
// Получим репозиторий
MB := MetabaseClass.Active;
// Получим регламентный отчёт
Report := MB.ItemById("REPORT").Edit As IPrxReport;
// Получим цветовую шкалу
MapScale := Report.Scales.Item(0).MapScale As IMapColorScale;
// Установим автоматический расчёт значений шкалы
MapScale.AutoCalculable := True;
// Зададим метод расчёта шкалы
MapScale.AutoScaleMode := MapAutoScaleMode.Uniform;
//Сохраним изменения
(Report As IMetabaseObject).Save;
End Sub UserProc;
Imports Prognoz.Platform.Interop.Map;
Imports Prognoz.Platform.Interop.Report;
…
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
Report: IPrxReport;
MapScale: IMapColorScale;
Begin
// Получим репозиторий
MB := Params.Metabase;
// Получим регламентный отчёт
Report := MB.ItemById["REPORT"].Edit() As IPrxReport;
// Получим цветовую шкалу
MapScale := Report.Scales.Item[0].MapScale As IMapColorScale;
// Установим автоматический расчёт значений шкалы
MapScale.AutoCalculable := True;
// Зададим метод расчёта шкалы
MapScale.AutoScaleMode := MapAutoScaleMode.masmUniform;
//Сохраним изменения
(Report As IMetabaseObject).Save();
End Sub;
Для шкалы регламентного отчета будет установлен автоматический расчет значений типа «Относительное разбиение».
См. также: