ПолеВыбора.ВерхнийРодитель (ComboBox.GetTopSuperView) Метод

Копировать

Перем ТФ, ВерхнийРодитель, ПолеВыбора1;

Процедура ПриОткрытии() Экспорт
	ВерхнийРодитель = ПолеВыбора1.ВерхнийРодитель();
	ТФ.Уведомление().Показать("ВерхнийРодитель = " + ВерхнийРодитель, -1);
КонецПроцедуры

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

Верхний1 = ТФ.Верхний.Добавить(ТФ.Верхний(, , 50, 8));
Верхний1.Граница = ТФ.Граница(ТФ.СтильГраницы.Двойная);
Верхний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);
КонецПроцедуры

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

Верхний1 = ТФ.Верхний.Добавить(ТФ.Верхний(, , 50, 8));
Верхний1.Граница = ТФ.Граница(ТФ.СтильГраницы.Двойная);
Верхний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.Развернуть();

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

Сообщить(?(
ТипЗнч(ВерхнийРодитель) = Тип("ТфВерхний")
, "", "!!! ") + "ПолеВыбора.ВерхнийРодитель (ComboBox.GetTopSuperView) Метод" + " " + ТекущаяДата() + Символы.ПС);