СтрокаСостояния.ЦветФокуса (StatusBar.GetFocusColor) Метод

Копировать

Перем ТФ, СтрокаСостояния1;

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

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

Процедура ЭлементСтрокиСостояния2_Нажатие() Экспорт
	ТФ.Верхний.Текст = ТФ.Верхний.Текст + "
	|Элемент2 Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
	|";
КонецПроцедуры

Процедура ЭлементСтрокиСостояния3_Нажатие() Экспорт
	ТФ.Верхний.Текст = ТФ.Верхний.Текст + "
	|Элемент3 Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
	|";
КонецПроцедуры

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

СтрокаСостояния1 = ТФ.СтрокаСостояния();
ТФ.Верхний.Текст = "Кликните по элементам в строке состояния";
ТФ.Верхний.Добавить(СтрокаСостояния1);

ЭлементСтрокиСостояния1 = ТФ.ЭлементСтрокиСостояния(ТФ.Клавиши.s_low, "Элемент1");
ЭлементСтрокиСостояния1.Нажатие = ТФ.Действие(ЭтотОбъект, "ЭлементСтрокиСостояния1_Нажатие");
СтрокаСостояния1.Элементы.Добавить(ЭлементСтрокиСостояния1);

ЭлементСтрокиСостояния2 = ТФ.ЭлементСтрокиСостояния(ТФ.Клавиши.d_low, "Элемент2");
ЭлементСтрокиСостояния2.Нажатие = ТФ.Действие(ЭтотОбъект, "ЭлементСтрокиСостояния2_Нажатие");
СтрокаСостояния1.Элементы.Добавить(ЭлементСтрокиСостояния2);

ЭлементСтрокиСостояния3 = ТФ.ЭлементСтрокиСостояния(ТФ.Клавиши.f_low, "Элемент3");
ЭлементСтрокиСостояния3.Нажатие = ТФ.Действие(ЭтотОбъект, "ЭлементСтрокиСостояния3_Нажатие");
СтрокаСостояния1.Элементы.Добавить(ЭлементСтрокиСостояния3);

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

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

Копировать

Перем ТФ, СтрокаСостояния1, ЦветФокуса;

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

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

Процедура ЭлементСтрокиСостояния2_Нажатие() Экспорт
	ТФ.Верхний.Текст = ТФ.Верхний.Текст + "
	|Элемент2 Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
	|";
КонецПроцедуры

Процедура ЭлементСтрокиСостояния3_Нажатие() Экспорт
	ТФ.Верхний.Текст = ТФ.Верхний.Текст + "
	|Элемент3 Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
	|";
КонецПроцедуры

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

СтрокаСостояния1 = ТФ.СтрокаСостояния();
ТФ.Верхний.Текст = "Кликните по элементам в строке состояния";
ТФ.Верхний.Добавить(СтрокаСостояния1);

ЭлементСтрокиСостояния1 = ТФ.ЭлементСтрокиСостояния(ТФ.Клавиши.s_low, "Элемент1");
ЭлементСтрокиСостояния1.Нажатие = ТФ.Действие(ЭтотОбъект, "ЭлементСтрокиСостояния1_Нажатие");
СтрокаСостояния1.Элементы.Добавить(ЭлементСтрокиСостояния1);

ЭлементСтрокиСостояния2 = ТФ.ЭлементСтрокиСостояния(ТФ.Клавиши.d_low, "Элемент2");
ЭлементСтрокиСостояния2.Нажатие = ТФ.Действие(ЭтотОбъект, "ЭлементСтрокиСостояния2_Нажатие");
СтрокаСостояния1.Элементы.Добавить(ЭлементСтрокиСостояния2);

ЭлементСтрокиСостояния3 = ТФ.ЭлементСтрокиСостояния(ТФ.Клавиши.f_low, "Элемент3");
ЭлементСтрокиСостояния3.Нажатие = ТФ.Действие(ЭтотОбъект, "ЭлементСтрокиСостояния3_Нажатие");
СтрокаСостояния1.Элементы.Добавить(ЭлементСтрокиСостояния3);

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

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