IBindingDecimalSlider.MaxValueDefined

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

Sub DecimalSliderBindingInfo(SourceBinding: String);
Var
    BM: IBindingManager;
    Binding: IBindingValue;
    DecimalSlider: IBindingDecimalSlider;
Begin
    BM := New BindingManager.Create;
    Binding := BM.CreateByValue(SourceBinding);
    If Binding.UI = "DecimalSlider" Then
        DecimalSlider := Binding As IBindingDecimalSlider;
        //Проверка наличия параметра VALUE
        If DecimalSlider.ValueDefined Then
            Debug.WriteLine("Значение по умолчанию (VALUE): " + DecimalSlider.Value.ToString);
        End If;
        //Проверка наличия параметра MINVAL
        If DecimalSlider.MinValueDefined Then
            Debug.WriteLine("Минимальное значение (MINVAL): " + DecimalSlider.MinValue.ToString);
        End If;
        //Проверка наличия параметра MAXVAL
        If DecimalSlider.MaxValueDefined Then
            Debug.WriteLine("Максимальное значение (MAXVAL): " + DecimalSlider.MaxValue.ToString);
        End If;
        //Проверка наличия параметра STEP
        If DecimalSlider.StepDefined Then
            Debug.WriteLine("Шаг изменения значения (STEP): " + DecimalSlider.Step_.ToString);
        End If;
    End If;
End Sub DecimalSliderBindingInfo;