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

Копировать

Перем ТФ, СписокЭлементов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.ИндексВыбранного = 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.ЦветоваяСхема.Фокус = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Серый);

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

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