MaxValueDefined: Boolean;
MaxValueDefined: boolean;
Свойство MaxValueDefined определяет, присутствует ли в строке связи параметр «MAXVAL».
Возможные значения:
True. В строке связи присутствует параметр «MAXVAL». Для задания значения данного параметра используйте свойство IBindingFloatSlider.MaxValue;
False. В строке связи отсутствует параметр «MAXVAL».
Данная процедура выполняет проверку строки связи, переданной в качестве входного параметра SourceBinding.
Sub FloatSliderBindingInfo(SourceBinding: String);
Var
BM: IBindingManager;
Binding: IBindingValue;
Slider: IBindingFloatSlider;
Begin
BM := New BindingManager.Create;
Binding := BM.CreateByValue(SourceBinding);
If Binding.UI = "FloatSlider" Then
Slider := Binding As IBindingFloatSlider;
//Проверка наличия параметра VALUE
If Slider.ValueDefined Then
Debug.WriteLine("Значение по умолчанию (VALUE): " + Slider.Value.ToString);
End If;
//Проверка наличия параметра MINVAL
If Slider.MinValueDefined Then
Debug.WriteLine("Минимальное значение (MINVAL): " + Slider.MinValue.ToString);
End If;
//Проверка наличия параметра MAXVAL
If Slider.MaxValueDefined Then
Debug.WriteLine("Максимальное значение (MAXVAL): " + Slider.MaxValue.ToString);
End If;
//Проверка наличия параметра STEP
If Slider.StepDefined Then
Debug.WriteLine("Шаг изменения значения (STEP): " + Slider.Step_.ToString);
End If;
End If;
End Sub FloatSliderBindingInfo;
Если строка связи, переданная в качестве входного параметра, соответствует редактору значения в виде ползунка вещественных значений, то в результате выполнения примера в окно консоли будут выведены параметры данного ползунка.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.ForeSystem;
…
Shared Sub CreateFloatSliderBidning(SourceBinding: String);
Var
BM: IBindingManager;
Binding: IBindingValue;
Slider: IBindingFloatSlider;
Begin
BM := New BindingManager.Create();
Binding := BM.CreateByValue(SourceBinding);
If Binding.UI = "FloatSlider" Then
Slider := Binding As IBindingFloatSlider;
//Проверка наличия параметра VALUE
If Slider.ValueDefined Then
System.Diagnostics.Debug.WriteLine("Значение по умолчанию (VALUE): " + Slider.Value.ToString());
End If;
//Проверка наличия параметра MINVAL
If Slider.MinValueDefined Then
System.Diagnostics.Debug.WriteLine("Минимальное значение (MINVAL): " + Slider.MinValue.ToString());
End If;
//Проверка наличия параметра MAXVAL
If Slider.MaxValueDefined Then
System.Diagnostics.Debug.WriteLine("Максимальное значение (MAXVAL): " + Slider.MaxValue.ToString());
End If;
//Проверка наличия параметра STEP
If Slider.StepDefined Then
System.Diagnostics.Debug.WriteLine("Шаг изменения значения (STEP): " + Slider.@Step.ToString());
End If;
End If;
End Sub CreateFloatSliderBidning;
См. также: