Чтение и запись.
Тип: Прямоугольник (Rect).
Возвращает или задает кадр для элемента. Кадр определяется относительно родителя.
Кадр = Дерево1.Кадр;
Перем ТФ, Кадр, Дерево1; Процедура ПриОткрытии() Экспорт Кадр = Дерево1.Кадр; ТФ.Уведомление().Показать("Кадр = " + Кадр, -1); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Дерево1 = ТФ.Верхний.Добавить(ТФ.Дерево(, , 40, 15)); Дерево1.ЦветоваяСхема = ТФ.ЦветоваяСхема(); Дерево1.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Серый); Узел1 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел1")); Узел2 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел2")); Узел3 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел3")); Узел1_1 = Узел1.Добавить(ТФ.УзелДерева("Узел1_1")); Узел1_2 = Узел1.Добавить(ТФ.УзелДерева("Узел1_2")); Узел1_1_1 = Узел1_1.Добавить(ТФ.УзелДерева("Узел1_1_1")); Дерево1.РазвернутьВсе(); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();
Перем ТФ, Кадр, Дерево1; Процедура ПриОткрытии() Экспорт Кадр = Дерево1.Кадр; ТФ.Уведомление().Показать("Кадр = " + Кадр, -1); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Дерево1 = ТФ.Верхний.Добавить(ТФ.Дерево(, , 40, 15)); Дерево1.ЦветоваяСхема = ТФ.ЦветоваяСхема(); Дерево1.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Серый); Узел1 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел1")); Узел2 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел2")); Узел3 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел3")); Узел1_1 = Узел1.Добавить(ТФ.УзелДерева("Узел1_1")); Узел1_2 = Узел1.Добавить(ТФ.УзелДерева("Узел1_2")); Узел1_1_1 = Узел1_1.Добавить(ТФ.УзелДерева("Узел1_1_1")); Дерево1.РазвернутьВсе(); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.ЗапуститьИЗавершить(); Сообщить(?( ТипЗнч(Кадр) = Тип("ТфПрямоугольник") , "", "!!! ") + "Дерево.Кадр (TreeView.Frame) Свойство" + " " + ТекущаяДата() + Символы.ПС);