IBindingCheckBox.CaptionDefined

Синтаксис Fore

CaptionDefined: Boolean;

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

CaptionDefined: Boolean;

Описание

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

Комментарии

Если свойству CaptionDefined установлено значение True, то в строке связи, описывающей редактор значения, будет присутствовать параметр «TEXT». Значение данного параметра определяет свойство Caption.

Пример Fore

Sub CheckBoxBindingInfo(SourceBinding: String);
Var
    BM: IBindingManager;
    Binding: IBindingValue;
    CheckBoxBinding: IBindingCheckBox;
Begin
    BM := New BindingManager.Create;
    Binding := BM.CreateByValue(SourceBinding);
    If Binding.UI = "CheckBox" Then
        CheckBoxBinding := Binding As IBindingCheckBox;
        //Проверка наличия параметра ALIGN
        If CheckBoxBinding.AlignDefined Then
            Debug.WriteLine("ALIGN: " + CheckBoxBinding.Align.ToString);
        End If;
        //Проверка наличия параметра TEXT
        If CheckBoxBinding.CaptionDefined Then
            Debug.WriteLine("TEXT: " + CheckBoxBinding.Caption);
        End If;
        //Проверка наличия параметра VALUE
        If CheckBoxBinding.ValueDefined Then
            Debug.WriteLine("VALUE: " + CheckBoxBinding.Value.ToString);
        End If;
    End If;
End Sub CheckBoxBindingInfo;

Данная функция осуществляет проверку строки связи, передаваемой в качестве входного параметра SourceBinding. Если строка связи соответствует редактору в виде переключателя, то значения параметров, которые для него определены, будут выведены в консоль среды разработки.

Пример Fore.NET

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

Imports Prognoz.Platform.Interop.ForeSystem;

Sub CheckBoxBindingInfo(SourceBinding: String);
Var
    BM: BindingManager = New BindingManagerClass();
    Binding: IBindingValue;
    CheckBoxBinding: IBindingCheckBox;
Begin
    Binding := BM.CreateByValue(SourceBinding);
    If Binding.UI = "CheckBox" Then
        CheckBoxBinding := Binding As IBindingCheckBox;
        //Проверка наличия параметра ALIGN
        If CheckBoxBinding.AlignDefined Then
            System.Diagnostics.Debug.WriteLine("ALIGN: " + CheckBoxBinding.Align.ToString());
        End If;
        //Проверка наличия параметра TEXT
        If CheckBoxBinding.CaptionDefined Then
            System.Diagnostics.Debug.WriteLine("TEXT: " + CheckBoxBinding.Caption);
        End If;
        //Проверка наличия параметра VALUE
        If CheckBoxBinding.ValueDefined Then
            System.Diagnostics.Debug.WriteLine("VALUE: " + CheckBoxBinding.Value.ToString());
        End If;
    End If;
End Sub;

См. также:

IBindingCheckBox