Диалог.ВерхнийРодитель (Dialog.GetTopSuperView) Метод

Копировать

Перем ТФ, ВерхнийРодитель, Диалог1;

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

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

Диалог1 = ТФ.Верхний.Добавить(ТФ.Диалог("Диалог1", 3, 3, 30, 5));
Кнопка1 = ТФ.Кнопка("Кнопка1");
Кнопка2 = ТФ.Кнопка("Кнопка2");
Диалог1.ДобавитьКнопку(Кнопка1);
Диалог1.ДобавитьКнопку(Кнопка2);

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

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

Копировать

Перем ТФ, ВерхнийРодитель, Диалог1;

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

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

Диалог1 = ТФ.Верхний.Добавить(ТФ.Диалог("Диалог1", 3, 3, 30, 5));
Кнопка1 = ТФ.Кнопка("Кнопка1");
Кнопка2 = ТФ.Кнопка("Кнопка2");
Диалог1.ДобавитьКнопку(Кнопка1);
Диалог1.ДобавитьКнопку(Кнопка2);

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

Сообщить(?(
ТипЗнч(ВерхнийРодитель) = Тип("ТфВерхний")
, "", "!!! ") + "Диалог.ВерхнийРодитель (Dialog.GetTopSuperView) Метод" + " " + ТекущаяДата() + Символы.ПС);