IBindingDecimalEdit.MaxValue

Синтаксис Fore

MaxValue: Decimal;

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

MaxValue: Decimal;

Описание

Свойство MaxValue определяет значение параметра «MAXVAL» в строке связи.

Комментарии

Параметр «MAXVAL» определяет максимальное возможное значение, которое можно будет установить в редакторе.

Свойство MaxValue доступно для использования, если свойству MaxValueDefined установлено значение True. При изменении свойства MaxValue свойству MaxValueDefined автоматически устанавливается значение True.

Пример Fore

Function CreateDecimalEditBidning(DefaultValue: Decimal): String;
Var
    BM: IBindingManager;
    DecimalEditBinding: IBindingDecimalEdit;
Begin
    BM := New BindingManager.Create;
    DecimalEditBinding := BM.CreateByUi("DecimalEdit") As IBindingDecimalEdit;
    DecimalEditBinding.MinValue := DefaultValue - 100;
    DecimalEditBinding.MaxValue := DefaultValue + 100;
    DecimalEditBinding.Precision := 20;
    DecimalEditBinding.Step_ := 0.000000000000000000005;
    DecimalEditBinding.Value := DefaultValue;
    DecimalEditBinding.CorrectOnExit := True;
    Return DecimalEditBinding.AsString;
End Function CreateDecimalEditBidning;

Данная функция генерирует строку связи для использования редактора вещественных значений высокой точности. Значение, относительно которого указываются параметры редактора, передается посредством входного параметра DefaultValue. Точность значений в редакторе будет 20 знаков после запятой, шаг редактора - 0,000000000000000000005. При вводе в ячейку с редактором недопустимого значения (больше максимального или меньше минимального) и снятии фокуса с ячейки значение редактора будет заменено на ближайшее допустимое.

Пример Fore.NET

Imports Prognoz.Platform.Interop.ForeSystem;

Function CreateDecimalEditBidning(DefaultValue: Decimal): String;
Var
    BM: BindingManager = New BindingManagerClass();
    DecimalEditBinding: IBindingDecimalEdit;
Begin
    DecimalEditBinding := BM.CreateByUi("DecimalEdit") As IBindingDecimalEdit;
    DecimalEditBinding.MinValue := DefaultValue - 100;
    DecimalEditBinding.MaxValue := DefaultValue + 100;
    DecimalEditBinding.Precision := 3;
    DecimalEditBinding.@Step := 0.005;
    DecimalEditBinding.Value := DefaultValue;
    DecimalEditBinding.CorrectOnExit := True;
    Return DecimalEditBinding.AsString;
End Function;

Результат выполнения примера аналогичен результату примера на Fore.

См. также:

IBindingDecimalEdit