СписокЭлементов.ВыбранныйИзменен (ListView.SelectedItemChanged) Событие

Копировать

Перем ТФ, СписокЭлементов1, Текст;

Процедура ПриОткрытии() Экспорт
	СписокЭлементов1.ИндексВыбранного = 3;
КонецПроцедуры

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

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

Текст = "Выбирайте разные элементы списка.";
ТФ.Верхний.Текст = Текст;

Окно1 = ТФ.Верхний.Добавить(ТФ.Окно("", , , 60, 8));
Окно1.Центр();

СписокЭлементов1 = Окно1.Добавить(ТФ.СписокЭлементов(0, 0));
СписокЭлементов1.Заполнить();
СписокЭлементов1.ЦветоваяСхема = ТФ.Цвета.Меню;
ТФ.Верхний.ЦветоваяСхема = ТФ.Цвета.Диалог;

СписокЗначений1 = СписокЭлементов1.Источник;
СписокЗначений1.Добавить("Дядя Фёдор - мальчик, у которого прозвище ""Дядя"".", "Дядя Фёдор - прозвище шестилетнего мальчика, которое он получил за то, что ведёт себя как взрослый.");
СписокЗначений1.Добавить("Матроскин - кот, хозяйственный, имеет коров и собственное хозяйство.", "Матроскин");
СписокЗначений1.Добавить("Шарик - пёс, добрый, весёлый, простой, любит современные вещи.", "Шарик");
СписокЗначений1.Добавить("Галчонок. Очень хитрый, любит воровать еду пока никто не видит.", "Галчонок");
СписокЗначений1.Добавить("Игорь Иванович Печкин - почтальон, работающий в простоквашинском почтовом отделении.", "почтальон Печкин");
СписокЗначений1.Добавить("Вера Павловна - сестра Дяди Фёдора.", "Вера Павловна");
СписокЗначений1.Добавить("Тама-Тама - грызун неизвестной породы, изобретатель, художник.", "Тама-Тама");
СписокЗначений1.Добавить("Маргарита Егоровна (Мегеровна) - няня, нанятая родителями.", "Маргарита Егоровна");
СписокЗначений1.Добавить("Мама - мать Дяди Фёдора и Веры Павловны. Добрая, любящая. Хорошая хозяйка.", "Мама");
СписокЗначений1.Добавить("Папа - отец Дяди Фёдора и Веры Павловны. Добродушный, справедливый, с отличным чувством юмора.", "Папа");
СписокЗначений1.Добавить(3.14, "Число Пи");
СписокЗначений1.Добавить(ТФ, "ТерминалФормыДляОдноСкрипта");

ПолосаПрокрутки1 = ТФ.ПолосаПрокрутки(СписокЭлементов1);
ПолосаПрокрутки1.ЦветоваяСхема = ТФ.ЦветоваяСхема();
ПолосаПрокрутки1.ЦветоваяСхема.Фокус = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Серый);

СписокЭлементов1.ВыбранныйИзменен = ТФ.Действие(ЭтотОбъект, "СписокЭлементов1_ВыбранныйИзменен");

ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии");

ТФ.Запуск();

Копировать

Перем ТФ, СписокЭлементов1, Текст, ЗначениеПредставление;

Процедура ПриОткрытии() Экспорт
	СписокЭлементов1.ИндексВыбранного = 2;
КонецПроцедуры

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

Процедура ТаймерТик1() Экспорт
	ТФ.Завершить();
КонецПроцедуры

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

Текст = "Выбирайте разные элементы списка.";
ТФ.Верхний.Текст = Текст;

Окно1 = ТФ.Верхний.Добавить(ТФ.Окно("", , , 60, 8));
Окно1.Центр();

СписокЭлементов1 = Окно1.Добавить(ТФ.СписокЭлементов(0, 0));
СписокЭлементов1.Заполнить();
СписокЭлементов1.ЦветоваяСхема = ТФ.Цвета.Меню;
ТФ.Верхний.ЦветоваяСхема = ТФ.Цвета.Диалог;

СписокЗначений1 = СписокЭлементов1.Источник;
СписокЗначений1.Добавить("Дядя Фёдор - мальчик, у которого прозвище ""Дядя"".", "Дядя Фёдор - прозвище шестилетнего мальчика, которое он получил за то, что ведёт себя как взрослый.");
СписокЗначений1.Добавить("Матроскин - кот, хозяйственный, имеет коров и собственное хозяйство.", "Матроскин");
СписокЗначений1.Добавить("Шарик - пёс, добрый, весёлый, простой, любит современные вещи.", "Шарик");
СписокЗначений1.Добавить("Галчонок. Очень хитрый, любит воровать еду пока никто не видит.", "Галчонок");
СписокЗначений1.Добавить("Игорь Иванович Печкин - почтальон, работающий в простоквашинском почтовом отделении.", "почтальон Печкин");
СписокЗначений1.Добавить("Вера Павловна - сестра Дяди Фёдора.", "Вера Павловна");
СписокЗначений1.Добавить("Тама-Тама - грызун неизвестной породы, изобретатель, художник.", "Тама-Тама");
СписокЗначений1.Добавить("Маргарита Егоровна (Мегеровна) - няня, нанятая родителями.", "Маргарита Егоровна");
СписокЗначений1.Добавить("Мама - мать Дяди Фёдора и Веры Павловны. Добрая, любящая. Хорошая хозяйка.", "Мама");
СписокЗначений1.Добавить("Папа - отец Дяди Фёдора и Веры Павловны. Добродушный, справедливый, с отличным чувством юмора.", "Папа");
СписокЗначений1.Добавить(3.14, "Число Пи");
СписокЗначений1.Добавить(ТФ, "ТерминалФормыДляОдноСкрипта");

ПолосаПрокрутки1 = ТФ.ПолосаПрокрутки(СписокЭлементов1);
ПолосаПрокрутки1.ЦветоваяСхема = ТФ.ЦветоваяСхема();
ПолосаПрокрутки1.ЦветоваяСхема.Фокус = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Серый);

СписокЭлементов1.ВыбранныйИзменен = ТФ.Действие(ЭтотОбъект, "СписокЭлементов1_ВыбранныйИзменен");

ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии");
ТФ.Запуск();

Сообщить(?(
ЗначениеПредставление = "Шарик"
, "", "!!! ") + "СписокЭлементов.ВыбранныйИзменен (ListView.SelectedItemChanged) Событие" + " " + ТекущаяДата() + Символы.ПС);