Диалог.ЦветОбычного (Dialog.GetNormalColor) Метод

Синтаксис

ЦветОбычного()

Возвращаемое значение

Тип: Атрибут (Attribute).

Описание

Возвращает текущую цветовую схему если свойство Доступность (Enabled) включено.

Примечание

Пример

Диалог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.GetNormalColor) Метод" + " " + ТекущаяДата() + Символы.ПС);

Смотрите также

Библиотека OneScriptTerminalGui