Окно.Фокусируемый (Window.CanFocus) Свойство

Копировать

Перем Окно0, Окно1;

Процедура ПриОткрытии() Экспорт
	Стр = "";
	Подэлементы1 = Окно0.Подэлементы;
	Для А = 0 По Подэлементы1.Количество - 1 Цикл
		Стр = Стр + "Элемент(" + А + ") Фокусируемый = " + Подэлементы1.Получить(А).Фокусируемый + Символы.ПС;
	КонецЦикла;
	Окно0.Текст = Стр;
КонецПроцедуры

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

Окно0 = ТФ.Окно("Окно0");
Окно0.Икс = ТФ.Позиция.Абсолютно(25);
Окно0.Игрек = ТФ.Позиция.Абсолютно(1);
Окно0.Ширина = ТФ.Величина.Абсолютно(90);
Окно0.Высота = ТФ.Величина.Абсолютно(27);
ТФ.Верхний.Добавить(Окно0);

Окно1 = ТФ.Окно();
Окно1.Заголовок = "Окно1";
Окно1.Текст = "Окно1";
Окно1.Икс = ТФ.Позиция.Абсолютно(1);
Окно1.Игрек = ТФ.Позиция.Абсолютно(10);
Окно1.Ширина = ТФ.Величина.Абсолютно(60);
Окно1.Высота = ТФ.Величина.Абсолютно(11);
Окно0.Добавить(Окно1);

Окно2 = ТФ.Окно("Окно2");
Окно2.Текст = "Окно2";
Окно2.Икс = ТФ.Позиция.Абсолютно(9);
Окно2.Игрек = ТФ.Позиция.Абсолютно(12);
Окно2.Ширина = Окно1.Ширина;
Окно2.Высота = Окно1.Высота;
Окно2.ЦветоваяСхема = ТФ.ЦветоваяСхема();
Окно2.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Черный, ТФ.Цвет.ТемноСерый);
Окно0.Добавить(Окно2);

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

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

Копировать

Перем Окно0, Фокусируемый, Окно1;

Процедура ПриОткрытии() Экспорт
	Стр = "";
	Подэлементы1 = Окно0.Подэлементы;
	Для А = 0 По Подэлементы1.Количество - 1 Цикл
		Стр = Стр + "Элемент(" + А + ") = " + Подэлементы1.Получить(А).Фокусируемый + Символы.ПС;
	КонецЦикла;
	Окно1.Текст = Стр;
	Фокусируемый = Окно1.Фокусируемый;
КонецПроцедуры

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

Окно0 = ТФ.Окно("Окно0");
Окно0.Икс = ТФ.Позиция.Абсолютно(25);
Окно0.Игрек = ТФ.Позиция.Абсолютно(1);
Окно0.Ширина = ТФ.Величина.Абсолютно(90);
Окно0.Высота = ТФ.Величина.Абсолютно(27);
ТФ.Верхний.Добавить(Окно0);

Окно1 = ТФ.Окно();
Окно1.Заголовок = "Окно1";
Окно1.Текст = "Окно1";
Окно1.Икс = ТФ.Позиция.Абсолютно(1);
Окно1.Игрек = ТФ.Позиция.Абсолютно(10);
Окно1.Ширина = ТФ.Величина.Абсолютно(60);
Окно1.Высота = ТФ.Величина.Абсолютно(11);
Окно0.Добавить(Окно1);

Окно2 = ТФ.Окно("Окно2");
Окно2.Текст = "Окно2";
Окно2.Икс = ТФ.Позиция.Абсолютно(9);
Окно2.Игрек = ТФ.Позиция.Абсолютно(12);
Окно2.Ширина = Окно1.Ширина;
Окно2.Высота = Окно1.Высота;
Окно2.ЦветоваяСхема = ТФ.ЦветоваяСхема();
Окно2.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Черный, ТФ.Цвет.ТемноСерый);
Окно0.Добавить(Окно2);

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

Сообщить(?(
Фокусируемый
, "", "!!! ") + "Окно.Фокусируемый (Window.CanFocus) Свойство" + " " + ТекущаяДата() + Символы.ПС);