СписокЭлементов.ПриАктивизацииЭлемента (ListView.ItemActivate) Свойство

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

Процедура СписокЭлементов1_ПриАктивизацииЭлемента() Экспорт
	Сообщить("СписокЭлементов1_ПриАктивизацииЭлемента " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры

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

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

Элементы = СписокЭлементов1.Элементы;
Тетраэдр = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Тетраэдр", 0));
Куб = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Куб", 1));
Октаэдр = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Октаэдр", 2));
Додекаэдр = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Додекаэдр", 3));
Икосаэдр = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Икосаэдр", 4));

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

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

Процедура СписокЭлементов1_ПриАктивизацииЭлемента() Экспорт
	// Сообщить("СписокЭлементов1_ПриАктивизацииЭлемента " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецПроцедуры

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

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

Элементы = СписокЭлементов1.Элементы;
Тетраэдр = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Тетраэдр", 0));
Куб = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Куб", 1));
Октаэдр = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Октаэдр", 2));
Додекаэдр = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Додекаэдр", 3));
Икосаэдр = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Икосаэдр", 4));

Сообщить(?(
СписокЭлементов1.ПриАктивизацииЭлемента.ИмяМетода = "СписокЭлементов1_ПриАктивизацииЭлемента"
, "", "!!! ") + "СписокЭлементов.ПриАктивизацииЭлемента (ListView.ItemActivate) Свойство" + " " + ТекущаяДата());