ДиалогОткрытия.Верх (OpenDialog.Top) Свойство

Использование

Только чтение.

Значение

Тип: Позиция (Pos).

Возвращает объект Позиция (Pos), соответствующий координате по оси Y верхнего края элемента.

Примечание

Пример

Верх = ДиалогОткрытия1.Верх;
Полный пример кода 



Перем ТФ, ДиалогОткрытия1, Верх;

Процедура ПриОткрытии() Экспорт
	Верх = ДиалогОткрытия1.Верх;
	ТФ.Уведомление().Показать("Верх = " + Верх, -1);
КонецПроцедуры

Процедура ДиалогЗакрыт() Экспорт
	АргументыСобытия = ТФ.АргументыСобытия;
	Если АргументыСобытия.РезультатДиалога = ТФ.РезультатДиалога.ОК Тогда
		Текст = "
		|Отправитель = " + АргументыСобытия.Отправитель + "
		|Параметр = " + АргументыСобытия.Параметр + "
		|ПутьКаталога = " + АргументыСобытия.ПутьКаталога + "
		|ПутьФайла = " + АргументыСобытия.ПутьФайла + "
		|РезультатДиалога = " + АргументыСобытия.РезультатДиалога + "
		|Файлы = " + АргументыСобытия.Файлы + "
		|Элемент = " + АргументыСобытия.Элемент + "
		|";
	Иначе
		Текст = "
		|РезультатДиалога = " + АргументыСобытия.РезультатДиалога;
	КонецЕсли;
	ТФ.Верхний.Текст = Текст;
	ДиалогОткрытия = АргументыСобытия.Элемент;
КонецПроцедуры

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll");
ТФ = Новый ТерминалФормыДляОдноСкрипта();

ДиалогОткрытия1 = ТФ.ДиалогОткрытия("Диалог открытия", "Сообщение", , 5);

ТипыФайлов = Новый Массив();
ТипыФайлов.Добавить(".txt;.bin;.xml;.json");
ТипыФайлов.Добавить(".txt");
ТипыФайлов.Добавить(".bin");
ТипыФайлов.Добавить(".xml");
ТипыФайлов.Добавить(".json");
ДиалогОткрытия1.ДопустимыеФайлы = ТипыФайлов;

ТФ.Верхний.Добавить(ДиалогОткрытия1);
ДиалогОткрытия1.ДиалогЗакрыт = ТФ.Действие(ЭтотОбъект, "ДиалогЗакрыт");
ДиалогОткрытия1.ПоказатьДиалог();

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

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

Тестовый код 



Перем ТФ, ДиалогОткрытия1, Верх;

Процедура ПриОткрытии() Экспорт
	Верх = ДиалогОткрытия1.Верх;
	ТФ.Уведомление().Показать("Верх = " + Верх, -1);
КонецПроцедуры

Процедура ДиалогЗакрыт() Экспорт
	АргументыСобытия = ТФ.АргументыСобытия;
	Если АргументыСобытия.РезультатДиалога = ТФ.РезультатДиалога.ОК Тогда
		Текст = "
		|Отправитель = " + АргументыСобытия.Отправитель + "
		|Параметр = " + АргументыСобытия.Параметр + "
		|ПутьКаталога = " + АргументыСобытия.ПутьКаталога + "
		|ПутьФайла = " + АргументыСобытия.ПутьФайла + "
		|РезультатДиалога = " + АргументыСобытия.РезультатДиалога + "
		|Файлы = " + АргументыСобытия.Файлы + "
		|Элемент = " + АргументыСобытия.Элемент + "
		|";
	Иначе
		Текст = "
		|РезультатДиалога = " + АргументыСобытия.РезультатДиалога;
	КонецЕсли;
	ТФ.Верхний.Текст = Текст;
	ДиалогОткрытия = АргументыСобытия.Элемент;
КонецПроцедуры

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll");
ТФ = Новый ТерминалФормыДляОдноСкрипта();

ДиалогОткрытия1 = ТФ.ДиалогОткрытия("Диалог открытия", "Сообщение", , 5);

ТипыФайлов = Новый Массив();
ТипыФайлов.Добавить(".txt;.bin;.xml;.json");
ТипыФайлов.Добавить(".txt");
ТипыФайлов.Добавить(".bin");
ТипыФайлов.Добавить(".xml");
ТипыФайлов.Добавить(".json");
ДиалогОткрытия1.ДопустимыеФайлы = ТипыФайлов;

ТФ.Верхний.Добавить(ДиалогОткрытия1);
ДиалогОткрытия1.ДиалогЗакрыт = ТФ.Действие(ЭтотОбъект, "ДиалогЗакрыт");
ДиалогОткрытия1.ПоказатьДиалог();

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

Сообщить(?(
ТипЗнч(Верх) = Тип("ТфПозиция")
, "", "!!! ") + "ДиалогОткрытия.Верх (OpenDialog.Top) Свойство" + " " + ТекущаяДата() + Символы.ПС);

Смотрите также

Библиотека OneScriptTerminalGui