ВыбранныйЭлементСеткиИзмененАрг.НоваяНадпись (SelectedGridItemChangedEventArgs.NewLabel) Свойство

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

Перем Ф;

Процедура СеткаСвойств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.ВыбранныйЭлементСеткиИзменен = Ф.Действие(ЭтотОбъект, "СеткаСвойств1_ВыбранныйЭлементСеткиИзменен");

СеткаСвойств1.ВыбранныйЭлементСетки = СеткаСвойств1.ЭлементыСетки.Элемент(10);
СеткаСвойств1.ВыбранныйЭлементСетки = СеткаСвойств1.ЭлементыСетки.Элемент(11);

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

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

Перем Ф, АргументыНоваяНадпись, АргументыНовоеЗначение, АргументыСтараяНадпись, АргументыСтароеЗначение;

Процедура СеткаСвойств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.ВыбранныйЭлементСеткиИзменен = Ф.Действие(ЭтотОбъект, "СеткаСвойств1_ВыбранныйЭлементСеткиИзменен");

Если Ф.ПлатформаWin Тогда
	СеткаСвойств1.ВыбранныйЭлементСетки = СеткаСвойств1.ЭлементыСетки.Элемент(8);
	Форма1.Активизировать();
	СеткаСвойств1.ВыбранныйЭлементСетки = СеткаСвойств1.ЭлементыСетки.Элемент(6);
	Форма1.Активизировать();
	НоваяНадпись = АргументыНоваяНадпись;
	НовоеЗначение = АргументыНовоеЗначение;

	СеткаСвойств1.ВыбранныйЭлементСетки = СеткаСвойств1.ЭлементыСетки.Элемент(8);
	Форма1.Активизировать();
	СтараяНадпись = АргументыСтараяНадпись;
	СтароеЗначение = АргументыСтароеЗначение;

	Сообщить(?((НоваяНадпись = СтараяНадпись) и (НовоеЗначение = СтароеЗначение), "", "!!! ") + "ВыбранныйЭлементСеткиИзмененАрг.НоваяНадпись (SelectedGridItemChangedEventArgs.NewLabel) Свойство" + " " + ТекущаяДата());
Иначе
	Сообщить(?(Истина, "", "!!! ") + "ВыбранныйЭлементСеткиИзмененАрг.НоваяНадпись (SelectedGridItemChangedEventArgs.NewLabel) Свойство" + " " + ТекущаяДата());
КонецЕсли;