Величина.Высота (Dim.Height) Метод

Копировать

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

Окно1 = ТФ.Окно();
Окно1.Заголовок = "Окно1";
Окно1.Икс = ТФ.Позиция.Абсолютно(1);
Окно1.Игрек = ТФ.Позиция.Абсолютно(1);
Окно1.Ширина = ТФ.Величина.Абсолютно(65);
Окно1.Высота = ТФ.Величина.Абсолютно(5);
ТФ.Верхний.Добавить(Окно1);

Окно2 = ТФ.Окно();
Окно2.Заголовок = "Окно2";
Окно2.Текст = "Окно2.Высота = ТФ.Величина.Высота(Окно1);";
Окно2.Ниже(Окно1, 1);
Окно2.Икс = Окно1.Икс;
Окно2.Ширина = ТФ.Величина.Ширина(Окно1);
Окно2.Высота = ТФ.Величина.Высота(Окно1);
ТФ.Верхний.Добавить(Окно2);

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

Копировать

Перем ТФ, Окно1, Высота;

Процедура ПриОткрытии() Экспорт
	Высота = ТФ.Величина.Высота(Окно1);
КонецПроцедуры

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

Окно1 = ТФ.Окно();
Окно1.Заголовок = "Окно1";
Окно1.Икс = ТФ.Позиция.Абсолютно(1);
Окно1.Игрек = ТФ.Позиция.Абсолютно(1);
Окно1.Ширина = ТФ.Величина.Абсолютно(65);
Окно1.Высота = ТФ.Величина.Абсолютно(5);
ТФ.Верхний.Добавить(Окно1);

Окно2 = ТФ.Окно();
Окно2.Заголовок = "Окно2";
Окно2.Текст = "Окно2.Высота = ТФ.Величина.Высота(Окно1);";
Окно2.Ниже(Окно1, 1);
Окно2.Икс = Окно1.Икс;
Окно2.Ширина = ТФ.Величина.Ширина(Окно1);
Окно2.Высота = ТФ.Величина.Высота(Окно1);
ТФ.Верхний.Добавить(Окно2);

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

Сообщить(?(
ТипЗнч(Высота) = ТипЗнч(Окно2.Высота)
, "", "!!! ") + "Величина.Высота (Dim.Height) Метод" + " " + ТекущаяДата() + Символы.ПС);