AskString

AskString (Визуальные функции)
Объект: Функции общего назначения Статус разработки: Реализована Тип: Функция Обращение к БД: Нет Исключения: Невозможно превратить в строку, число Визуальность: Да

• Начальная страница
• Общее описание
• Объекты
• Функции общего назначения

Функция выводит модальный диалог редактирования текста, заданного первым аргументом. Текст может содержать как одну строку, так быть и многострочным. Результат редактирования возвращается в переменной, задающей первый аргумент.

Синтаксис

AskString(<Текст для редактирования (STRING)>,<Заголовок диалога (STRING)>,<Максимальная длина строки (INT)>=256,<Тип строки (INT)>=0):<Пользователь нажал на ОК (INT)>

Аргументы

• <Текст для редактирования (STRING)> - (возможен аргумент-переменная (ByRef)) Переменная, содержащая строку, которую необходимо отредактировать.
• <Заголовок диалога (STRING)> - (необязательный аргумент) Заголовок диалога редактирования строки
• <Максимальная длина строки (INT)> - (необязательный аргумент) Задает максимально возможную длину строки (по умолчанию 256), для неограниченной длины строки, необходимо указать 0.
• <Тип строки (INT)> - (необязательный аргумент) Задает тип редактируемой строки:
  • 0 -- (по умолчанию) текст представляет собой одну строку, невозможен ввод многострочного текста.
  • 1 -- текст может содержать множество строк, диалог будет показан в виде окна, а не поля.
  • 2 -- текст может содержать множество строк, диалог будет показан в виде окна, а не поля, окно может быть прокручено только по вертикали, текст не выходит за пределы окна горизонатльно (word wrap).
  • -1 -- текст представляет собой одну строку, невозможен ввод многострочного текста, строка по умолчанию не будет выделена при показе диалога (удобно, если в основном происходит добавление текста в строку, а не редактирование нового текста).

Возвращаемое значение

Возвращает 1, если пользователь нажал "ОК", иначе возвращает 0.

Примеры

//Выбирает табельные номера работников в многострочном окне, сохраняет их в реквизит текущего элемента.
Стр:="";
If AskString(Стр,"Введите табельные номера через запятую:",0,1) Then
  aEl.ТабельныеНомераРаботников:=Replace(Стр,_NEWLINE,"");
EndIf;