IBindingDecimalEdit.MaxValueDefined

Копировать пример

Sub DecimalEditBindingInfo(SourceBinding: String);
Var
    BM: IBindingManager;
    Binding: IBindingValue;
    DecimalEditBinding: IBindingDecimalEdit;
Begin
    BM := New BindingManager.Create;
    Binding := BM.CreateByValue(SourceBinding);
    If Binding.UI = "DecimalEdit" Then
        DecimalEditBinding := Binding As IBindingDecimalEdit;
        //Проверка наличия параметра CORRECTONEXIT
        If DecimalEditBinding.CorrectOnExitDefined Then
            Debug.WriteLine("CORRECTONEXIT: " + DecimalEditBinding.CorrectOnExit.ToString);
        End If;
        //Проверка наличия параметра MINVAL
        If DecimalEditBinding.MinValueDefined Then
            Debug.WriteLine("MINVAL: " + DecimalEditBinding.MinValue.ToString);
        End If;
        //Проверка наличия параметра MAXVAL
        If DecimalEditBinding.MaxValueDefined Then
            Debug.WriteLine("MAXVAL: " + DecimalEditBinding.MaxValue.ToString);
        End If;
        //Проверка наличия параметра PRECISION
        If DecimalEditBinding.PrecisionDefined Then
            Debug.WriteLine("PRECISION: " + DecimalEditBinding.Precision.ToString);
        End If;
        //Проверка наличия параметра STEP
        If DecimalEditBinding.StepDefined Then
            Debug.WriteLine("STEP: " + DecimalEditBinding.Step_.ToString);
        End If;
        //Проверка наличия параметра VALUE
        If DecimalEditBinding.ValueDefined Then
            Debug.WriteLine("VALUE: " + DecimalEditBinding.Value.ToString);
        End If;
    End If;
End Sub DecimalEditBindingInfo;