Пример:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
Действие = "ВыполнитьУдаление"; СписокКнопок = Новый СписокЗначений; СписокКнопок.Добавить(Действие, НСтр("ru = 'Выполнить удаление'", "ru")); СписокКнопок.Добавить(КодВозвратаДиалога.Отмена); Оповещение = Новый ОписаниеОповещения( "УдалитьВыполнитьВопросЗавершение", ЭтотОбъект, Действие); ПоказатьВопрос(Оповещение, НСтр("ru = 'После удаления настроек форма будет открываться с настройками по умолчанию.'", "ru"), СписокКнопок, , Действие); &НаКлиенте Процедура УдалитьВыполнитьВопросЗавершение(Результат, Действие) Экспорт Если Результат = Действие Тогда УдалитьНаСервере(); ОбновитьСписокФорм(); ПрименитьФильтр(); ПоказатьОповещениеПользователя(НСтр("ru = 'Настройки удалены'", "ru")); КонецЕсли; КонецПроцедуры |