ТочкаНаЭлементе(<Икс>, <Игрек>)
Тип: Точка (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 = ТФ.Верхний.Добавить(ТФ.Индикатор(, , 60)); Индикатор1.Центр(); Индикатор1.Значение = 0.25; Индикатор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 = ТФ.Верхний.Добавить(ТФ.Индикатор(, , 60)); Индикатор1.Центр(); Индикатор1.Значение = 0.25; Индикатор1.ЦветоваяСхема = ТФ.Цвета.Ошибка; Индикатор1.СтильИндикатора = ТФ.СтильИндикатора.Полоса; Индикатор1.Икс = ТФ.Позиция.Абсолютно(40); Индикатор1.Игрек = ТФ.Позиция.Абсолютно(5); Индикатор1.Ширина = ТФ.Величина.Абсолютно(70); Индикатор1.Высота = ТФ.Величина.Абсолютно(20); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.ЗапуститьИЗавершить(); Сообщить(?( Точка.Икс = 5 и Точка.Игрек = 5 , "", "!!! ") + "Индикатор.ТочкаНаЭлементе (ProgressBar.ScreenToView) Метод" + " " + ТекущаяДата() + Символы.ПС);