IBindingEditBox.MultiLineDefined

Синтаксис Fore

MultiLineDefined: Boolean;

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

MultiLineDefined: Boolean;

Описание

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

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

Пример Fore

Sub EditBoxBindingInfo(SourceBinding: String);
Var
    BM: IBindingManager;
    Binding: IBindingValue;
    EditBoxBinding: IBindingEditBox;
Begin
    BM := New BindingManager.Create;
    Binding := BM.CreateByValue(SourceBinding);
    If Binding.UI = "EditBox" Then
        EditBoxBinding := Binding As IBindingEditBox;
        //Проверка наличия параметра MAXLENGTH
        If EditBoxBinding.MaxLengthDefined Then
            Debug.WriteLine("MAXLENGTH: " + EditBoxBinding.MaxLength.ToString);
        End If;
        //Проверка наличия параметра MULTILINE
        If EditBoxBinding.MultiLineDefined Then
            Debug.WriteLine("MULTILINE: " + EditBoxBinding.MultiLine.ToString);
        End If;
        //Проверка наличия параметра READONLY
        If EditBoxBinding.ReadOnlyDefined Then
            Debug.WriteLine("READONLY: " + EditBoxBinding.ReadOnly.ToString);
        End If;
        //Проверка наличия параметра VALUE
        If EditBoxBinding.ValueDefined Then
            Debug.WriteLine("VALUE: " + EditBoxBinding.Value);
        End If;
    End If;
End Sub EditBoxBindingInfo;

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

Пример Fore.NET

Imports Prognoz.Platform.Interop.ForeSystem;

Sub EditBoxBindingInfo(SourceBinding: String);
Var
    BM: BindingManager = New BindingManagerClass();
    Binding: IBindingValue;
    EditBoxBinding: IBindingEditBox;
Begin
    Binding := BM.CreateByValue(SourceBinding);
    If Binding.UI = "EditBox" Then
        EditBoxBinding := Binding As IBindingEditBox;
        //Проверка наличия параметра MAXLENGTH
        If EditBoxBinding.MaxLengthDefined Then
            System.Diagnostics.Debug.WriteLine("MAXLENGTH: " + EditBoxBinding.MaxLength.ToString());
        End If;
        //Проверка наличия параметра MULTILINE
        If EditBoxBinding.MultiLineDefined Then
            System.Diagnostics.Debug.WriteLine("MULTILINE: " + EditBoxBinding.MultiLine.ToString());
        End If;
        //Проверка наличия параметра READONLY
        If EditBoxBinding.ReadOnlyDefined Then
            System.Diagnostics.Debug.WriteLine("READONLY: " + EditBoxBinding.@ReadOnly.ToString());
        End If;
        //Проверка наличия параметра VALUE
        If EditBoxBinding.ValueDefined Then
            System.Diagnostics.Debug.WriteLine("VALUE: " + EditBoxBinding.Value);
        End If;
    End If;
End Sub;

См. также: