Окно.ЦветФокуса (Window.GetFocusColor) Метод

Копировать

Перем Окно0, ЦветФокуса;

Процедура ПриОткрытии() Экспорт
	ЦветФокуса = Окно0.ЦветФокуса();
	Окно0.Текст = "Окно0.ЦветФокуса() = " + ЦветФокуса + "
	|ОсновнойЦвет = " + ЦветФокуса.ОсновнойЦвет + "
	|ЦветФона = " + ЦветФокуса.ЦветФона + "
	|";
КонецПроцедуры

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

Окно0 = ТФ.Окно();
Окно0.СтильКомпоновки = ТФ.СтильКомпоновки.Абсолютно;
Окно0.Икс = ТФ.Позиция.Абсолютно(1);
Окно0.Игрек = ТФ.Позиция.Абсолютно(1);
Окно0.СтильКомпоновки = ТФ.СтильКомпоновки.Вычислено;
Окно0.Ширина = ТФ.Величина.Процент(50);
Окно0.Высота = ТФ.Величина.Процент(50);
Окно0.Граница = ТФ.Граница();
Окно0.Граница.СтильГраницы = ТФ.СтильГраницы.Закругленная;
Окно0.Текст = "Окно0";
ТФ.Верхний.Добавить(Окно0);

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

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

Копировать

Перем Окно0, ЦветФокуса;

Процедура ПриОткрытии() Экспорт
	ЦветФокуса = Окно0.ЦветФокуса();
	Окно0.Текст = "Окно0.ЦветФокуса() = " + ЦветФокуса + "
	|ОсновнойЦвет = " + ЦветФокуса.ОсновнойЦвет + "
	|ЦветФона = " + ЦветФокуса.ЦветФона + "
	|";
КонецПроцедуры

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

Окно0 = ТФ.Окно();
Окно0.СтильКомпоновки = ТФ.СтильКомпоновки.Абсолютно;
Окно0.Икс = ТФ.Позиция.Абсолютно(1);
Окно0.Игрек = ТФ.Позиция.Абсолютно(1);
Окно0.СтильКомпоновки = ТФ.СтильКомпоновки.Вычислено;
Окно0.Ширина = ТФ.Величина.Процент(50);
Окно0.Высота = ТФ.Величина.Процент(50);
Окно0.Граница = ТФ.Граница();
Окно0.Граница.СтильГраницы = ТФ.СтильГраницы.Закругленная;
Окно0.Текст = "Окно0";
ТФ.Верхний.Добавить(Окно0);

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

Сообщить(?(
ТипЗнч(ЦветФокуса) = Тип("ТфАтрибут")
, "", "!!! ") + "Окно.ЦветФокуса (Window.GetFocusColor) Метод" + " " + ТекущаяДата() + Символы.ПС);