Ответ в теме: 1с вопрос не модально

[Admin]

Привет, для этого нужно использовать процедуру глобального контекста интерактивной работы ‘ПоказатьВопрос’:

1С (Код)

&НаКлиенте Процедура ПриОткрытии(Отказ) Режим = РежимДиалогаВопрос.ДаНет; ДополнительныеПараметры = Новый Структура; ДополнительныеПараметры.Вставить("ДопПараметр", "craft1c.ru"); Оповещение = Новый ОписаниеОповещения("ПослеЗакрытияВопроса", ЭтотОбъект, ДополнительныеПараметры); ПоказатьВопрос(Оповещение, "Добавить сайт craft1c.ru в избранное?", Режим, 0); //После ПоказатьВопрос появится форма с вопросом, но при этом выполнении кода пойдет дальше Сообщить("craft1c.ru"); КонецПроцедуры &НаКлиенте Процедура ПослеЗакрытияВопроса(Результат, Параметры) Экспорт Если Результат = КодВозвратаДиалога.Нет Тогда Возврат; КонецЕсли; КонецПроцедуры

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26

&НаКлиенте Процедура ПриОткрытии(Отказ) Режим = РежимДиалогаВопрос.ДаНет; ДополнительныеПараметры = Новый Структура; ДополнительныеПараметры.Вставить("ДопПараметр", "craft1c.ru"); Оповещение = Новый ОписаниеОповещения("ПослеЗакрытияВопроса", ЭтотОбъект, ДополнительныеПараметры); ПоказатьВопрос(Оповещение, "Добавить сайт craft1c.ru в избранное?", Режим, 0); //После ПоказатьВопрос появится форма с вопросом, но при этом выполнении кода пойдет дальше Сообщить("craft1c.ru"); КонецПроцедуры   &НаКлиенте Процедура ПослеЗакрытияВопроса(Результат, Параметры) Экспорт Если Результат = КодВозвратаДиалога.Нет Тогда Возврат; КонецЕсли;   КонецПроцедуры

Такой подход еще называют асинхронными вызовами в 1С. После вызова метода ‘ПоказатьВопрос’, программа возвращается к вызывающему коду и продолжает его выполнение.