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