ITabFormatNumericScale.GetMaxValue

Синтаксис Fore

GetMaxValue: Double;

Синтаксис Fore.NET

GetMaxValue: double;

Описание

Метод GetMaxValue возвращает максимальное значение числовой шкалы.

Комментарии

Если максимальное значение числовой шкалы не задано, то метод вернет значение «10».

Для определения минимального значения числовой шкалы используйте ITabFormatNumericScale.GetMinValue.

Пример Fore

Для выполнения примера в репозитории необходимо наличие регламентного отчета с идентификатором «REG_SCALE». Необходимо задать максимальные и минимальные значения цифровой шкалы для диапазона ячеек. Задание этих значений приведено в примере для ITabFormatNumericScale.TargetType.

Добавьте ссылки на системные сборки: Metabase, Report, Tab.

Sub UserProc;
Var
    MB: IMetabase;
    RegRep: IPrxReport;
    Tab: IPrxTable;
    Sheet: ITabSheet;
    Range: ITabRange;
    FormCond: ITabFormatCondition;
    Scale: ITabFormatNumericScale;
Begin
    // Получим репозиторий
    MB := MetabaseClass.Active;
    // Получим регламентный отчет
    RegRep := MB.ItemById("REG_SCALE").Bind As IPrxReport;
    // Получим активный лист отчета
    Tab := RegRep.ActiveSheet As IPrxTable;
    // Получим таблицу листа отчета
    Sheet := Tab.TabSheet;
    // Получим диапазон ячеек
    Range := Sheet.ParseRange("A0:K25");
    // Получим условный формат
    FormCond := Range.FormatConditions.Item(0);
    // Получим специфические настройки условного формата
    Scale := FormCond.Details As ITabFormatNumericScale;
    // Выведем в окно консоли минимальный и максимальный размер шрифта
    Debug.WriteLine("Максимальный размер шрифта = " + Scale.GetMaxValue.ToString);
    Debug.WriteLine("Минимальный размер шрифта = " + Scale.GetMinValue.ToString);
End Sub UserProc;

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

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Tab;
…
Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    RegRep: IPrxReport;
    Tab: IPrxTable;
    Sheet: ITabSheet;
    Range: ITabRange;
    FormCond: ITabFormatCondition;
    Scale: ITabFormatNumericScale;
Begin
    // Получим репозиторий
    MB := Params.Metabase;
    // Получим регламентный отчет
    RegRep := MB.ItemById["REG_SCALE"].Bind() As IPrxReport;
    // Получим активный лист отчета
    Tab := RegRep.ActiveSheet As IPrxTable;
    // Получим таблицу листа отчета
    Sheet := Tab.TabSheet;
    // Получим диапазон ячеек
    Range := Sheet.ParseRange("A0:K25");
    // Получим условный формат
    FormCond := Range.FormatConditions.Item[0];
    // Получим специфические настройки условного формата
    Scale := FormCond.Details As ITabFormatNumericScale;
    // Выведем в окно консоли минимальный и максимальный размер шрифта
    System.Diagnostics.Debug.WriteLine("Максимальный размер шрифта = " + Scale.GetMaxValue().ToString());
    System.Diagnostics.Debug.WriteLine("Минимальный размер шрифта = " + Scale.GetMinValue().ToString());
End Sub;

См. также:

ITabFormatNumericScale