Верхний.ПолучитьАвтоРазмер (Toplevel.GetAutoSize) Метод

Копировать

Перем ТФ, Верхний1;

Процедура Кнопка1_Нажатие() Экспорт
	Размер = Верхний1.ПолучитьАвтоРазмер();
	Верхний1.Ширина = ТФ.Величина.Абсолютно(Размер.Ширина);
	Верхний1.Высота = ТФ.Величина.Абсолютно(Размер.Высота);
КонецПроцедуры

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

Верхний1 = ТФ.Верхний();
Верхний1.СтильКомпоновки = ТФ.СтильКомпоновки.Абсолютно;
Верхний1.Икс = ТФ.Позиция.Абсолютно(35);
Верхний1.Игрек = ТФ.Позиция.Абсолютно(1);
Верхний1.Ширина = ТФ.Величина.Абсолютно(50);
Верхний1.СтильКомпоновки = ТФ.СтильКомпоновки.Вычислено;
Верхний1.Высота = ТФ.Величина.Процент(80);
Верхний1.Граница = ТФ.Граница();
Верхний1.Граница.СтильГраницы = ТФ.СтильГраницы.Закругленная;
Верхний1.Текст = 
"В это время к Джузеппе зашёл его старинный приятель, шарманщик по имени Карло.
|Когда-то Карло в широкополой шляпе ходил с прекрасной шарманкой по 
|городам и пением и музыкой добывал себе на хлеб.
|Сейчас Карло был уже стар и болен, и шарманка его давно сломалась.
|– Здравствуй, Джузеппе, – сказал он, зайдя в мастерскую. 
|– Что ты сидишь на полу?
|– А я, видишь ли, потерял маленький винтик… Да ну его! – ответил 
|Джузеппе и покосился на полено. 
|– Ну а ты как живёшь, старина?";
ТФ.Верхний.Добавить(Верхний1);

Кнопка1 = ТФ.Кнопка();
Кнопка1.Икс = ТФ.Позиция.Абсолютно(1);
Кнопка1.Игрек = ТФ.Позиция.Абсолютно(1);
Кнопка1.Высота = ТФ.Величина.Абсолютно(3);
Кнопка1.Текст = "ПолучитьАвтоРазмер";
Кнопка1.Нажатие = ТФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
ТФ.Верхний.Добавить(Кнопка1);

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

Копировать

Перем ТФ, Верхний1, Размер;

Процедура ПриОткрытии() Экспорт
	Размер = Верхний1.ПолучитьАвтоРазмер();
	Верхний1.Ширина = ТФ.Величина.Абсолютно(Размер.Ширина);
	Верхний1.Высота = ТФ.Величина.Абсолютно(Размер.Высота);
КонецПроцедуры

Процедура Кнопка1_Нажатие() Экспорт
	Размер = Верхний1.ПолучитьАвтоРазмер();
	Верхний1.Ширина = ТФ.Величина.Абсолютно(Размер.Ширина);
	Верхний1.Высота = ТФ.Величина.Абсолютно(Размер.Высота);
КонецПроцедуры

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

Верхний1 = ТФ.Верхний();
Верхний1.СтильКомпоновки = ТФ.СтильКомпоновки.Абсолютно;
Верхний1.Икс = ТФ.Позиция.Абсолютно(35);
Верхний1.Игрек = ТФ.Позиция.Абсолютно(1);
Верхний1.Ширина = ТФ.Величина.Абсолютно(50);
Верхний1.СтильКомпоновки = ТФ.СтильКомпоновки.Вычислено;
Верхний1.Высота = ТФ.Величина.Процент(80);
Верхний1.Граница = ТФ.Граница();
Верхний1.Граница.СтильГраницы = ТФ.СтильГраницы.Закругленная;
Верхний1.Текст = "В это время к Джузеппе зашёл его старинный приятель, шарманщик по имени Карло.
|Когда-то Карло в широкополой шляпе ходил с прекрасной шарманкой по 
|городам и пением и музыкой добывал себе на хлеб.
|Сейчас Карло был уже стар и болен, и шарманка его давно сломалась.
|– Здравствуй, Джузеппе, – сказал он, зайдя в мастерскую. 
|– Что ты сидишь на полу?
|– А я, видишь ли, потерял маленький винтик… Да ну его! – ответил 
|Джузеппе и покосился на полено. 
|– Ну а ты как живёшь, старина?";
ТФ.Верхний.Добавить(Верхний1);

Кнопка1 = ТФ.Кнопка();
Кнопка1.Икс = ТФ.Позиция.Абсолютно(1);
Кнопка1.Игрек = ТФ.Позиция.Абсолютно(1);
Кнопка1.Высота = ТФ.Величина.Абсолютно(3);
Кнопка1.Текст = "АвтоРазмер";
Кнопка1.Нажатие = ТФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
ТФ.Верхний.Добавить(Кнопка1);

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

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