Вопрос Да-Нет на управляемых формах (РежимДиалогаВопрос.ДаНет)

Как задать вопрос пользователю с вариантами ответа "Да-Нет" ?

// Вызовем конструктор ОписаниеОповещения в котором:
// ВопросПродолжитьЗавершитьВыполнениеКоманды - Имя экспортной процедуры модуля которая будет вызвана;
// ЭтотОбъект - Программный модуль, процедура которого будет вызвана;
// ДополнительныеПараметры - Значение любого типа, которое при вызове будет передано в указанную процедуру последним параметром. Не обязательный.

ДополнительныеПараметры = Новый Структура("ПроизвольныйПараметр", "произвольное занчение параметра");

Оповещение = Новый ОписаниеОповещения("ВопросПродолжитьЗавершитьВыполнениеКоманды", ЭтотОбъект, ДополнительныеПараметры);

// Вызовем процедуру глобального контекста "ПоказатьВопрос" в котором:
// Оповещение - Содержит описание процедуры, которая будет вызвана после закрытия окна ввода значения
// ТекстВопроса - Текст задаваемого вопроса;
// Кнопки - Задает состав и текст кнопок диалога, а также, связанные с кнопками значения.

ТекстВопроса = "Объект будет удален! Продолжить?";
Кнопки = РежимДиалогаВопрос.ДаНет;

ПоказатьВопрос(Оповещение, ТекстВопроса, Кнопки,10);

// ВопросПродолжитьЗавершитьВыполнениеКоманды - Экспортная процедура указанная в ОписанииОповещения, которая будет вызвана
// после закрытия окна ввода значения со следующими параметрами:
// РезультатВопроса - результат выбора пользователя: значение системного перечисления или значение, связанное с нажатой кнопкой. В случае закрытия диалога по истечении времени - значение Таймаут,
// ДополнительныеПараметры - значение, которое было указано при создании объекта ОписаниеОповещения.
&НаКлиенте
Процедура ВопросПродолжитьЗавершитьВыполнениеКоманды(Результат, ДополнительныеПараметры) Экспорт
Если Результат = КодВозвратаДиалога.Да Тогда
//алгоритм заполнения
Иначе
Отказ = Истина;
Возврат;
КонецЕсли;
КонецПроцедуры

Поделиться заметкой:

0 коммент.:

Отправить комментарий