ТочкаНаЭлементе(<Икс>, <Игрек>)
Тип: Точка (Point).
Вычисляет местоположение указанной точки на терминале в координаты на элементе.
Точка = Прокручиваемый1.ТочкаНаЭлементе(45, 10);
Перем ТФ, Точка, Прокручиваемый1; Процедура ПриОткрытии() Экспорт Точка = Прокручиваемый1.ТочкаНаЭлементе(45, 10); Стр = "Левый верхний угол Прокручиваемый1 имеет X = 40 и Y = 5 |Для точки на терминале X = 45 и Y = 10 |Прокручиваемый1.ТочкаНаЭлементе(45, 10).Икс = " + Точка.Икс + " |Прокручиваемый1.ТочкаНаЭлементе(45, 10).Игрек = " + Точка.Игрек; ТФ.Уведомление().Показать(Стр, -1); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Прокручиваемый1 = ТФ.Верхний.Добавить(ТФ.Прокручиваемый(2, 2, 50, 15)); Прокручиваемый1.ЦветоваяСхема = ТФ.Цвета.Верхний; Прокручиваемый1.РазмерСодержимого = ТФ.Размер(100, 50); Прокручиваемый1.СмещениеСодержимого = ТФ.Точка(0, 0); Надпись1 = Прокручиваемый1.Добавить(ТФ.Надпись("Текст для Надпись1 Текст для Надпись1 Текст для Надпись1", 0, 0, 60, 25)); Надпись1.ЦветоваяСхема = ТФ.Цвета.Ошибка; Надпись1.АвтоРазмер = Ложь; Для А = 0 По 29 Цикл Надпись1.Текст = Надпись1.Текст + " |Текст для Надпись1 Текст для Надпись1 Текст для Надпись1"; КонецЦикла; Прокручиваемый1.Икс = ТФ.Позиция.Абсолютно(40); Прокручиваемый1.Игрек = ТФ.Позиция.Абсолютно(5); Прокручиваемый1.Ширина = ТФ.Величина.Абсолютно(70); Прокручиваемый1.Высота = ТФ.Величина.Абсолютно(20); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();
Перем ТФ, Точка, Прокручиваемый1; Процедура ПриОткрытии() Экспорт Точка = Прокручиваемый1.ТочкаНаЭлементе(45, 10); Стр = "Левый верхний угол Прокручиваемый1 имеет X = 40 и Y = 5 |Для точки на терминале X = 45 и Y = 10 |Прокручиваемый1.ТочкаНаЭлементе(45, 10).Икс = " + Точка.Икс + " |Прокручиваемый1.ТочкаНаЭлементе(45, 10).Игрек = " + Точка.Игрек; ТФ.Уведомление().Показать(Стр, -1); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Прокручиваемый1 = ТФ.Верхний.Добавить(ТФ.Прокручиваемый(2, 2, 50, 15)); Прокручиваемый1.ЦветоваяСхема = ТФ.Цвета.Верхний; Прокручиваемый1.РазмерСодержимого = ТФ.Размер(100, 50); Прокручиваемый1.СмещениеСодержимого = ТФ.Точка(0, 0); Надпись1 = Прокручиваемый1.Добавить(ТФ.Надпись("Текст для Надпись1 Текст для Надпись1 Текст для Надпись1", 0, 0, 60, 25)); Надпись1.ЦветоваяСхема = ТФ.Цвета.Ошибка; Надпись1.АвтоРазмер = Ложь; Для А = 0 По 29 Цикл Надпись1.Текст = Надпись1.Текст + " |Текст для Надпись1 Текст для Надпись1 Текст для Надпись1"; КонецЦикла; Прокручиваемый1.Икс = ТФ.Позиция.Абсолютно(40); Прокручиваемый1.Игрек = ТФ.Позиция.Абсолютно(5); Прокручиваемый1.Ширина = ТФ.Величина.Абсолютно(70); Прокручиваемый1.Высота = ТФ.Величина.Абсолютно(20); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.ЗапуститьИЗавершить(); Сообщить(?( Точка.Икс = 5 и Точка.Игрек = 5 , "", "!!! ") + "Прокручиваемый.ТочкаНаЭлементе (ScrollView.ScreenToView) Метод" + " " + ТекущаяДата() + Символы.ПС);