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