НаШагНазад(<Подэлемент>)
Перемещает подэлемент в системе компоновки на один шаг в обратном направлении.
Кнопка0.НаШагНазад(Окно1);
Перем ТФ, Кнопка0, Окно1, Окно2, Окно3, Окно4; Функция ИндексыЭлементов() Стр = ""; Подэлементы1 = Кнопка0.Подэлементы; Для А = 0 По Подэлементы1.Количество - 1 Цикл Стр = Стр + "Элемент(" + А + ") = " + Кнопка0.Подэлементы.Получить(А).Текст + Символы.ПС; КонецЦикла; Возврат Стр; КонецФункции Процедура Окно0_назад() Экспорт Кнопка0.НаШагНазад(Окно1); ТФ.Верхний.Текст = ИндексыЭлементов(); КонецПроцедуры Процедура Окно1_назад() Экспорт Кнопка0.НаШагНазад(Окно2); ТФ.Верхний.Текст = ИндексыЭлементов(); КонецПроцедуры Процедура Окно2_назад() Экспорт Кнопка0.НаШагНазад(Окно3); ТФ.Верхний.Текст = ИндексыЭлементов(); КонецПроцедуры Процедура Окно3_назад() Экспорт Кнопка0.НаШагНазад(Окно4); ТФ.Верхний.Текст = ИндексыЭлементов(); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Кнопка0 = ТФ.Кнопка(); Кнопка0.Икс = ТФ.Позиция.Абсолютно(25); Кнопка0.Игрек = ТФ.Позиция.Абсолютно(1); Кнопка0.Ширина = ТФ.Величина.Абсолютно(90); Кнопка0.Высота = ТФ.Величина.Абсолютно(27); Граница1 = ТФ.Граница(); Граница1.СтильГраницы = ТФ.СтильГраницы.Закругленная; Кнопка0.Граница = Граница1; ТФ.Верхний.Добавить(Кнопка0); Окно1 = ТФ.Окно(); Окно1.Заголовок = "Окно0"; Окно1.Текст = "Окно0"; Окно1.Икс = ТФ.Позиция.Абсолютно(1); Окно1.Игрек = ТФ.Позиция.Абсолютно(10); Окно1.Ширина = ТФ.Величина.Абсолютно(60); Окно1.Высота = ТФ.Величина.Абсолютно(11); Кнопка0.Добавить(Окно1); Окно2 = ТФ.Окно("Окно1"); Окно2.Текст = "Окно1"; Окно2.Ширина = Окно1.Ширина; Окно2.Высота = Окно1.Высота; Окно2.ЦветоваяСхема = ТФ.ЦветоваяСхема(); Окно2.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Черный, ТФ.Цвет.ТемноСерый); Кнопка0.Добавить(Окно2); Окно2.ВышеПравее(Окно1, -14, -53); Окно3 = ТФ.Окно("Окно2"); Окно3.Текст = "Окно2"; Окно3.Ширина = Окно1.Ширина; Окно3.Высота = Окно1.Высота; Окно3.ЦветоваяСхема = ТФ.ЦветоваяСхема(); Окно3.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Черный, ТФ.Цвет.Зеленый); Кнопка0.Добавить(Окно3); Окно3.ВышеПравее(Окно2, -7, -53); Окно4 = ТФ.Окно("Окно3"); Окно4.Текст = "Окно3"; Окно4.Ширина = Окно1.Ширина; Окно4.Высота = Окно1.Высота; Окно4.ЦветоваяСхема = ТФ.ЦветоваяСхема(); Окно4.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Черный, ТФ.Цвет.Голубой); Кнопка0.Добавить(Окно4); Окно4.ВышеПравее(Окно3, -10, -53); Кнопка7 = ТФ.Кнопка("Окно0 назад"); Кнопка7.Икс = ТФ.Позиция.Абсолютно(1); Кнопка7.Игрек = ТФ.Позиция.Абсолютно(12); Кнопка7.Нажатие = ТФ.Действие(ЭтотОбъект, "Окно0_назад"); ТФ.Верхний.Добавить(Кнопка7); Кнопка8 = ТФ.Кнопка("Окно1 назад"); Кнопка8.Икс = ТФ.Позиция.Абсолютно(1); Кнопка8.Нажатие = ТФ.Действие(ЭтотОбъект, "Окно1_назад"); ТФ.Верхний.Добавить(Кнопка8); Кнопка8.Ниже(Кнопка7, 1); Кнопка9 = ТФ.Кнопка("Окно2 назад"); Кнопка9.Икс = ТФ.Позиция.Абсолютно(1); Кнопка9.Нажатие = ТФ.Действие(ЭтотОбъект, "Окно2_назад"); ТФ.Верхний.Добавить(Кнопка9); Кнопка9.Ниже(Кнопка8, 1); Кнопка10 = ТФ.Кнопка("Окно3 назад"); Кнопка10.Икс = ТФ.Позиция.Абсолютно(1); Кнопка10.Нажатие = ТФ.Действие(ЭтотОбъект, "Окно3_назад"); ТФ.Верхний.Добавить(Кнопка10); Кнопка10.Ниже(Кнопка9, 1); ТФ.Запуск();
Перем ТФ, Кнопка0, Окно1, Окно2, Окно3, Окно4, Текст; Процедура ПриОткрытии() Экспорт Текст = Кнопка0.Подэлементы.Получить(2).Текст; КонецПроцедуры Функция ИндексыЭлементов() Стр = ""; Подэлементы1 = Кнопка0.Подэлементы; Для А = 0 По Подэлементы1.Количество - 1 Цикл Стр = Стр + "Элемент(" + А + ") = " + Кнопка0.Подэлементы.Получить(А).Текст + Символы.ПС; КонецЦикла; Возврат Стр; КонецФункции Процедура Окно0_назад() Экспорт Кнопка0.НаШагНазад(Окно1); ТФ.Верхний.Текст = ИндексыЭлементов(); КонецПроцедуры Процедура Окно1_назад() Экспорт Кнопка0.НаШагНазад(Окно2); ТФ.Верхний.Текст = ИндексыЭлементов(); КонецПроцедуры Процедура Окно2_назад() Экспорт Кнопка0.НаШагНазад(Окно3); ТФ.Верхний.Текст = ИндексыЭлементов(); КонецПроцедуры Процедура Окно3_назад() Экспорт Кнопка0.НаШагНазад(Окно4); ТФ.Верхний.Текст = ИндексыЭлементов(); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Кнопка0 = ТФ.Кнопка(); Кнопка0.Икс = ТФ.Позиция.Абсолютно(25); Кнопка0.Игрек = ТФ.Позиция.Абсолютно(1); Кнопка0.Ширина = ТФ.Величина.Абсолютно(90); Кнопка0.Высота = ТФ.Величина.Абсолютно(27); Граница1 = ТФ.Граница(); Граница1.СтильГраницы = ТФ.СтильГраницы.Закругленная; Кнопка0.Граница = Граница1; ТФ.Верхний.Добавить(Кнопка0); Окно1 = ТФ.Окно(); Окно1.Заголовок = "Окно0"; Окно1.Текст = "Окно0"; Окно1.Икс = ТФ.Позиция.Абсолютно(1); Окно1.Игрек = ТФ.Позиция.Абсолютно(10); Окно1.Ширина = ТФ.Величина.Абсолютно(60); Окно1.Высота = ТФ.Величина.Абсолютно(11); Кнопка0.Добавить(Окно1); Окно2 = ТФ.Окно("Окно1"); Окно2.Текст = "Окно1"; Окно2.Ширина = Окно1.Ширина; Окно2.Высота = Окно1.Высота; Окно2.ЦветоваяСхема = ТФ.ЦветоваяСхема(); Окно2.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Черный, ТФ.Цвет.ТемноСерый); Кнопка0.Добавить(Окно2); Окно2.ВышеПравее(Окно1, -14, -53); Окно3 = ТФ.Окно("Окно2"); Окно3.Текст = "Окно2"; Окно3.Ширина = Окно1.Ширина; Окно3.Высота = Окно1.Высота; Окно3.ЦветоваяСхема = ТФ.ЦветоваяСхема(); Окно3.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Черный, ТФ.Цвет.Зеленый); Кнопка0.Добавить(Окно3); Окно3.ВышеПравее(Окно2, -7, -53); Окно4 = ТФ.Окно("Окно3"); Окно4.Текст = "Окно3"; Окно4.Ширина = Окно1.Ширина; Окно4.Высота = Окно1.Высота; Окно4.ЦветоваяСхема = ТФ.ЦветоваяСхема(); Окно4.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Черный, ТФ.Цвет.Голубой); Кнопка0.Добавить(Окно4); Окно4.ВышеПравее(Окно3, -10, -53); Кнопка7 = ТФ.Кнопка("Окно0 назад"); Кнопка7.Икс = ТФ.Позиция.Абсолютно(1); Кнопка7.Игрек = ТФ.Позиция.Абсолютно(12); Кнопка7.Нажатие = ТФ.Действие(ЭтотОбъект, "Окно0_назад"); ТФ.Верхний.Добавить(Кнопка7); Кнопка8 = ТФ.Кнопка("Окно1 назад"); Кнопка8.Икс = ТФ.Позиция.Абсолютно(1); Кнопка8.Нажатие = ТФ.Действие(ЭтотОбъект, "Окно1_назад"); ТФ.Верхний.Добавить(Кнопка8); Кнопка8.Ниже(Кнопка7, 1); Кнопка9 = ТФ.Кнопка("Окно2 назад"); Кнопка9.Икс = ТФ.Позиция.Абсолютно(1); Кнопка9.Нажатие = ТФ.Действие(ЭтотОбъект, "Окно2_назад"); ТФ.Верхний.Добавить(Кнопка9); Кнопка9.Ниже(Кнопка8, 1); Кнопка10 = ТФ.Кнопка("Окно3 назад"); Кнопка10.Икс = ТФ.Позиция.Абсолютно(1); Кнопка10.Нажатие = ТФ.Действие(ЭтотОбъект, "Окно3_назад"); ТФ.Верхний.Добавить(Кнопка10); Кнопка10.Ниже(Кнопка9, 1); Окно3_назад(); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.ЗапуститьИЗавершить(); Сообщить(?( Текст = "Окно3" , "", "!!! ") + "Кнопка.НаШагНазад (Button.SendSubviewBackwards) Метод" + " " + ТекущаяДата() + Символы.ПС);