Окно.Границы (Window.Bounds) Свойство

Копировать

Перем Окно1, Прямоугольник;

Процедура ПриОткрытии() Экспорт
	Прямоугольник = Окно1.Границы;
	Окно1.Текст = "Окно1.Границы = " + Прямоугольник + "
	|Окно1.Границы.Икс = " + Прямоугольник.Икс + "
	|Окно1.Границы.Игрек = " + Прямоугольник.Игрек + "
	|Окно1.Границы.Ширина = " + Прямоугольник.Ширина + "
	|Окно1.Границы.Высота = " + Прямоугольник.Высота + "
	|";
КонецПроцедуры

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

Окно1 = ТФ.Окно("Окно1");
Окно1.Высота = ТФ.Величина.Абсолютно(10);
Окно1.Текст = "Давным-давно в городке на берегу Средиземного моря жил старый столяр Джузеппе по прозванию Сизый Нос.
|Однажды ему попалось под руку полено, обыкновенное полено для топки очага в зимнее время.
|– Неплохая вещь, – сказал сам себе Джузеппе, – можно смастерить из него что-нибудь вроде ножки для стола…";
ТФ.Верхний.Добавить(Окно1);

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

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

Копировать

Перем Окно1, Прямоугольник;

Процедура ПриОткрытии() Экспорт
	Прямоугольник = Окно1.Границы;
	Окно1.Текст = "Окно1.Границы = " + Прямоугольник + "
	|Окно1.Границы.Икс = " + Прямоугольник.Икс + "
	|Окно1.Границы.Игрек = " + Прямоугольник.Игрек + "
	|Окно1.Границы.Ширина = " + Прямоугольник.Ширина + "
	|Окно1.Границы.Высота = " + Прямоугольник.Высота + "
	|";
КонецПроцедуры

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

Окно1 = ТФ.Окно("Окно1");
Окно1.Высота = ТФ.Величина.Абсолютно(10);
Окно1.Текст = "Давным-давно в городке на берегу Средиземного моря жил старый столяр Джузеппе по прозванию Сизый Нос.
|Однажды ему попалось под руку полено, обыкновенное полено для топки очага в зимнее время.
|– Неплохая вещь, – сказал сам себе Джузеппе, – можно смастерить из него что-нибудь вроде ножки для стола…";
ТФ.Верхний.Добавить(Окно1);

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

Сообщить(?(
Прямоугольник.Икс = 1
, "", "!!! ") + "Окно.Границы (Window.Bounds) Свойство" + " " + ТекущаяДата() + Символы.ПС);