Чтение и запись.
Тип: ЦветоваяСхема (ColorScheme).
Возвращает или задает цветовую схему для элемента. Если она не определена, будет возвращена цветовая схема родителя.
ЦветоваяСхема1 = ТФ.ЦветоваяСхема(); Окно1.ЦветоваяСхема = ЦветоваяСхема1;
Перем Окно1, Окно0; Процедура ПриОткрытии() Экспорт ЦветоваяСхема = Окно1.ЦветоваяСхема; Окно0.Текст = "Окно1.ЦветоваяСхема = " + ЦветоваяСхема; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Окно0 = ТФ.Окно("Окно0"); Окно0.Икс = ТФ.Позиция.Абсолютно(25); Окно0.Игрек = ТФ.Позиция.Абсолютно(1); Окно0.Ширина = ТФ.Величина.Абсолютно(90); Окно0.Высота = ТФ.Величина.Абсолютно(27); ТФ.Верхний.Добавить(Окно0); Окно1 = ТФ.Окно(); Окно1.Заголовок = "Окно1"; Окно1.Текст = "Окно1"; Окно1.Икс = ТФ.Позиция.Абсолютно(1); Окно1.Игрек = ТФ.Позиция.Абсолютно(10); Окно1.Ширина = ТФ.Величина.Абсолютно(60); Окно1.Высота = ТФ.Величина.Абсолютно(11); Окно0.Добавить(Окно1); ЦветоваяСхема1 = ТФ.ЦветоваяСхема(); Окно1.ЦветоваяСхема = ЦветоваяСхема1; ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();
Перем ЦветоваяСхема, Окно1; Процедура ПриОткрытии() Экспорт ЦветоваяСхема = Окно1.ЦветоваяСхема; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Окно0 = ТФ.Окно("Окно0"); Окно0.Икс = ТФ.Позиция.Абсолютно(25); Окно0.Игрек = ТФ.Позиция.Абсолютно(1); Окно0.Ширина = ТФ.Величина.Абсолютно(90); Окно0.Высота = ТФ.Величина.Абсолютно(27); ТФ.Верхний.Добавить(Окно0); Окно1 = ТФ.Окно(); Окно1.Заголовок = "Окно1"; Окно1.Текст = "Окно1"; Окно1.Икс = ТФ.Позиция.Абсолютно(1); Окно1.Игрек = ТФ.Позиция.Абсолютно(10); Окно1.Ширина = ТФ.Величина.Абсолютно(60); Окно1.Высота = ТФ.Величина.Абсолютно(11); Окно0.Добавить(Окно1); ЦветоваяСхема1 = ТФ.ЦветоваяСхема(); Окно1.ЦветоваяСхема = ЦветоваяСхема1; ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.ЗапуститьИЗавершить(); Сообщить(?( ТипЗнч(ЦветоваяСхема) = Тип("ТфЦветоваяСхема") , "", "!!! ") + "Окно.ЦветоваяСхема (Window.ColorScheme) Свойство" + " " + ТекущаяДата() + Символы.ПС);