ЦветФокуса()
Тип: Атрибут (Attribute).
Возвращает текущую цветовую схему для текущего фокуса.
Диалог1.ЦветоваяСхема = ТФ.ЦветоваяСхема(); Диалог1.ЦветоваяСхема.Фокус = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Серый);
Перем ТФ, Диалог1, ЦветФокуса; Процедура ПриОткрытии() Экспорт ЦветФокуса = Диалог1.ЦветФокуса(); Стр = "ЦветФокуса() = " + ЦветФокуса + " |ОсновнойЦвет = " + ТФ.Цвет.Имя(ЦветФокуса.ОсновнойЦвет) + " |ЦветФона = " + ТФ.Цвет.Имя(ЦветФокуса.ЦветФона) + " |"; ТФ.Уведомление().Показать(Стр, -1); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Диалог1 = ТФ.Верхний.Добавить(ТФ.Диалог("Диалог1", 3, 3, 30, 5)); Кнопка1 = ТФ.Кнопка("Кнопка1"); Кнопка2 = ТФ.Кнопка("Кнопка2"); Диалог1.ДобавитьКнопку(Кнопка1); Диалог1.ДобавитьКнопку(Кнопка2); Диалог1.ЦветоваяСхема = ТФ.ЦветоваяСхема(); Диалог1.ЦветоваяСхема.Фокус = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Серый); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();
Перем ТФ, Диалог1, ЦветФокуса; Процедура ПриОткрытии() Экспорт ЦветФокуса = Диалог1.ЦветФокуса(); Стр = "ЦветФокуса() = " + ЦветФокуса + " |ОсновнойЦвет = " + ТФ.Цвет.Имя(ЦветФокуса.ОсновнойЦвет) + " |ЦветФона = " + ТФ.Цвет.Имя(ЦветФокуса.ЦветФона) + " |"; ТФ.Уведомление().Показать(Стр, -1); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Диалог1 = ТФ.Верхний.Добавить(ТФ.Диалог("Диалог1", 3, 3, 30, 5)); Кнопка1 = ТФ.Кнопка("Кнопка1"); Кнопка2 = ТФ.Кнопка("Кнопка2"); Диалог1.ДобавитьКнопку(Кнопка1); Диалог1.ДобавитьКнопку(Кнопка2); Диалог1.ЦветоваяСхема = ТФ.ЦветоваяСхема(); Диалог1.ЦветоваяСхема.Фокус = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Серый); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.ЗапуститьИЗавершить(); Сообщить(?( ТипЗнч(ЦветФокуса) = Тип("ТФАтрибут") , "", "!!! ") + "Диалог.ЦветФокуса (Dialog.GetFocusColor) Метод" + " " + ТекущаяДата() + Символы.ПС);