ОтменаАрг.Отмена (CancelEventArgs.Cancel) Свойство

Использование

Чтение и запись.

Значение

Тип: Булево.

Возвращает или задает значение, указывающее, следует ли отменить событие.

Примечание

Пример

АргументыСобытия1 = Ф.ДеревоОтменаАрг(); // это наследуемый класс
Полный пример кода 

Копировать     Выделить всё


Перем Ф;

Процедура Дерево1_ПередРазвертыванием() Экспорт
	АргументыСобытия1 = Ф.ДеревоОтменаАрг();
	Сообщить("АргументыСобытия1.Действие = " + АргументыСобытия1.Действие);
	Сообщить("АргументыСобытия1.Узел.Текст = " + АргументыСобытия1.Узел.Текст);
	
	Если АргументыСобытия1.Узел.Текст = "Узел1" Тогда
		АргументыСобытия1.Отмена = Истина;
	КонецЕсли;
КонецПроцедуры

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Текст = "Узел1 не развернется.";
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

Дерево1 = Форма1.ЭлементыУправления.Добавить(Ф.Дерево());
Дерево1.ПередРазвертыванием = Ф.Действие(ЭтотОбъект, "Дерево1_ПередРазвертыванием");
Узел1 = Дерево1.Узлы.Добавить("Узел1");
Узел2 = Дерево1.Узлы.Добавить("Узел2");
Узлы1 = Узел1.Узлы;
Узлы2 = Узел2.Узлы;
ПодУзел1 = Узлы1.Добавить("ПодУзел1");
ПодУзел2 = Узлы2.Добавить("ПодУзел2");

Ф.ЗапуститьОбработкуСобытий();

Тестовый код 

Копировать     Выделить всё


Перем Ф, Узел;

Процедура Дерево1_ПередРазвертыванием() Экспорт
	АргументыСобытия1 = Ф.ДеревоОтменаАрг();
	Узел = АргументыСобытия1.Узел;
	
	Если АргументыСобытия1.Узел.Текст = "Узел1" Тогда
		АргументыСобытия1.Отмена = Истина;
	КонецЕсли;
КонецПроцедуры

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Ширина = 600;
Форма1.Высота = 400;
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

Дерево1 = Форма1.ЭлементыУправления.Добавить(Ф.Дерево());
Дерево1.ПередРазвертыванием = Ф.Действие(ЭтотОбъект, "Дерево1_ПередРазвертыванием");
Узел1 = Дерево1.Узлы.Добавить("Узел1");
Узел2 = Дерево1.Узлы.Добавить("Узел2");
Узлы1 = Узел1.Узлы;
ПодУзел1 = Узлы1.Добавить("ПодУзел1");
Узлы2 = Узел2.Узлы;
ПодУзел2 = Узлы2.Добавить("ПодУзел2");

Ф.РазрешитьСобытия = Истина;
Узел1.Развернуть();

Сообщить(?(Узел.Текст = "Узел1", "", "!!! ") + "ОтменаАрг.Отмена (CancelEventArgs.Cancel) Свойство" + " " + ТекущаяДата());

Смотрите также

ОтменаАрг (CancelEventArgs) Класс | Библиотека OneScriptForms