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