Окно.НаправлениеТекста (Window.TextDirection) Свойство

Копировать

Перем ТФ, Окно1, НаправлениеТекста;

Процедура ПриОткрытии() Экспорт
	НаправлениеТекста = Окно1.НаправлениеТекста;
	Окно1.Заголовок = Окно1.Заголовок + " " + ТФ.НаправлениеТекста.Имя(НаправлениеТекста);
КонецПроцедуры

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

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

Окно1.НаправлениеТекста = ТФ.НаправлениеТекста.СправаНалевоСнизуВверх;

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

Копировать

Перем Окно1, НаправлениеТекста;

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

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

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

Окно1.НаправлениеТекста = ТФ.НаправлениеТекста.СправаНалевоСнизуВверх;

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

Сообщить(?(
НаправлениеТекста = ТФ.НаправлениеТекста.СправаНалевоСнизуВверх
, "", "!!! ") + "Окно.НаправлениеТекста (Window.TextDirection) Свойство" + " " + ТекущаяДата() + Символы.ПС);