Чтение и запись.
Тип: Граница (Border).
Экземпляр класса Граница Border для данного элемента.
Важно: Каждый раз при установке значения этого свойства создается новый экземпляр класса Граница (Border).
Граница1 = ТФ.Граница(ТФ.СтильГраницы.Двойная); Граница1.Заголовок = "Граница1"; Окно1.Граница = Граница1;
Перем ТФ, Окно1, Граница, Граница1; Процедура ПриОткрытии() Экспорт Граница1 = ТФ.Граница(); Граница1.СтильГраницы = ТФ.СтильГраницы.Двойная; Окно1.Граница = Граница1; Граница = Окно1.Граница; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Окно1 = ТФ.Окно("Окно1"); Окно1.Текст = "Когда я был маленький – очень, очень давно, – я читал одну книжку: |она называлась «Пиноккио, или Похождения деревянной куклы» |(деревянная кукла по-итальянски – буратино)."; Окно1.Икс = ТФ.Позиция.Абсолютно(1); Окно1.Игрек = ТФ.Позиция.Абсолютно(1); Окно1.Ширина = ТФ.Величина.Процент(80); Окно1.Высота = ТФ.Величина.Абсолютно(4); ТФ.Верхний.Добавить(Окно1); Граница1 = ТФ.Граница(ТФ.СтильГраницы.Двойная); Граница1.Заголовок = "Граница1"; Окно1.Граница = Граница1; Окно2 = ТФ.Окно("Окно2"); Окно2.Текст = "Я часто рассказывал моим товарищам, девочкам и мальчикам, занимательные приключения Буратино."; Окно2.Ниже(Окно1, 1); Окно2.Икс = Окно1.Икс; Окно2.Ширина = ТФ.Величина.Процент(80); Окно2.Высота = ТФ.Величина.Абсолютно(4); ТФ.Верхний.Добавить(Окно2); Окно2.Граница = Граница1; Окно3 = ТФ.Окно("Окно3", 1, 11, 55, 4); Окно3.Текст = "Но так как книжка потерялась, то я рассказывал каждый раз по-разному, выдумывал такие похождения, каких в книге совсем не было."; ТФ.Верхний.Добавить(Окно3); Окно3.Граница = Граница1; Окно3.Заголовок = "Окно3"; Окно4 = ТФ.Окно("Окно4"); Окно4.Текст = "Теперь, через много-много лет, я припомнил моего старого друга |Буратино и надумал рассказать вам, девочки и мальчики, необычайную историю |про этого деревянного человечка."; Окно4.Ниже(Окно3, 1); Окно4.Икс = Окно1.Икс; Окно4.Ширина = ТФ.Величина.Процент(80); Окно4.Высота = ТФ.Величина.Абсолютно(5); ТФ.Верхний.Добавить(Окно4); Окно5 = ТФ.Окно("Окно5", 1, 22, 55, 4); Окно5.Текст = "Cтоляру Джузеппе попалось под руку полено, которое пищало человеческим голосом."; ТФ.Верхний.Добавить(Окно5); Окно5.Граница = Граница1; ТФ.Запуск();
Перем ТФ, Окно1, Граница, Граница1; Процедура ПриОткрытии() Экспорт Граница = Окно1.Граница; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Окно1 = ТФ.Окно("Окно1"); Окно1.Текст = "Когда я был маленький – очень, очень давно, – я читал одну книжку: |она называлась «Пиноккио, или Похождения деревянной куклы» |(деревянная кукла по-итальянски – буратино)."; Окно1.Икс = ТФ.Позиция.Абсолютно(1); Окно1.Игрек = ТФ.Позиция.Абсолютно(1); Окно1.Ширина = ТФ.Величина.Процент(80); Окно1.Высота = ТФ.Величина.Абсолютно(4); ТФ.Верхний.Добавить(Окно1); Граница1 = ТФ.Граница(ТФ.СтильГраницы.Двойная); Граница1.Заголовок = "Граница1"; Окно1.Граница = Граница1; Окно2 = ТФ.Окно("Окно2"); Окно2.Текст = "Я часто рассказывал моим товарищам, девочкам и мальчикам, занимательные приключения Буратино."; Окно2.Ниже(Окно1, 1); Окно2.Икс = Окно1.Икс; Окно2.Ширина = ТФ.Величина.Процент(80); Окно2.Высота = ТФ.Величина.Абсолютно(4); ТФ.Верхний.Добавить(Окно2); Окно2.Граница = Граница1; Окно3 = ТФ.Окно("Окно3", 1, 11, 55, 4); Окно3.Текст = "Но так как книжка потерялась, то я рассказывал каждый раз по-разному, выдумывал такие похождения, каких в книге совсем не было."; ТФ.Верхний.Добавить(Окно3); Окно3.Граница = Граница1; Окно3.Заголовок = "Окно3"; Окно4 = ТФ.Окно("Окно4"); Окно4.Текст = "Теперь, через много-много лет, я припомнил моего старого друга |Буратино и надумал рассказать вам, девочки и мальчики, необычайную историю |про этого деревянного человечка."; Окно4.Ниже(Окно3, 1); Окно4.Икс = Окно1.Икс; Окно4.Ширина = ТФ.Величина.Процент(80); Окно4.Высота = ТФ.Величина.Абсолютно(5); ТФ.Верхний.Добавить(Окно4); Окно5 = ТФ.Окно("Окно5", 1, 22, 55, 4); Окно5.Текст = "Cтоляру Джузеппе попалось под руку полено, которое пищало человеческим голосом."; ТФ.Верхний.Добавить(Окно5); Окно5.Граница = Граница1; ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.ЗапуститьИЗавершить(); Сообщить(?( Граница <> Граница1 и Граница.СтильГраницы = Граница1.СтильГраницы , "", "!!! ") + "Окно.Граница (Window.Border) Свойство" + " " + ТекущаяДата() + Символы.ПС);