Флажок.ТочкаНаЭлементе (CheckBox.ScreenToView) Метод

Копировать

Перем ТФ, Точка, Флажок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 = ТФ.Верхний.Добавить(ТФ.Флажок("Ф_лажок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 = ТФ.Верхний.Добавить(ТФ.Флажок("Ф_лажок1"));

Флажок1.Икс = ТФ.Позиция.Абсолютно(40);
Флажок1.Игрек = ТФ.Позиция.Абсолютно(5);
Флажок1.Ширина = ТФ.Величина.Абсолютно(70);
Флажок1.Высота = ТФ.Величина.Абсолютно(20);

ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии");
ТФ.ЗапуститьИЗавершить();

Сообщить(?(
Точка.Икс = 5 и 
Точка.Игрек = 5
, "", "!!! ") + "Флажок.ТочкаНаЭлементе (CheckBox.ScreenToView) Метод" + " " + ТекущаяДата() + Символы.ПС);