podmena_zakrytija_formy._novyj_pravilnyj_sposob_tonkij [wiki.hostingcloud.com.ua]

Эта страница только для чтения. Вы можете посмотреть её исходный текст, но не можете его изменить. Сообщите администратору, если считаете, что это неправильно.

<code>
&НаКлиенте
Перем ЗакрытиеРазрешено;
</code>

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

<code>
&НаКлиенте
Процедура ПередЗакрытиемЗавершение(РезультатВопроса, ДополнительныеПараметры) Экспорт
	
    Если РезультатВопроса = КодВозвратаДиалога.Да Тогда
	ЗакрытиеРазрешено = Истина;
	Закрыть();			
    КонецЕсли;	
	
КонецПроцедуры
</code>