ДиалогСохранения.ТочкаНаЭлементе (SaveDialog.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 = ТФ.Верхний.Добавить(ТФ.ДиалогСохранения("Диалог сохранения", "Сообщение", 2, 2));
ТипыФайлов = Новый Массив();
ТипыФайлов.Добавить(".txt");
ТипыФайлов.Добавить(".bin");
ТипыФайлов.Добавить(".xml");
ТипыФайлов.Добавить(".json");
ДиалогСохранения1.ДопустимыеФайлы = ТипыФайлов;
ДиалогСохранения1.ПоказатьДиалог();

ДиалогСохранения1.Икс = ТФ.Позиция.Абсолютно(40);
ДиалогСохранения1.Игрек = ТФ.Позиция.Абсолютно(5);

ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии");

ТФ.Запуск();

Копировать

Перем ТФ, ДиалогСохранения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");
ДиалогСохранения1.ДопустимыеФайлы = ТипыФайлов;
ДиалогСохранения1.ПоказатьДиалог();

ДиалогСохранения1.Икс = ТФ.Позиция.Абсолютно(40);
ДиалогСохранения1.Игрек = ТФ.Позиция.Абсолютно(5);

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

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