Процедура SetTextJustify

Модуль Graph

Устанавливает значения текстового выравнивания, используемые процедурами
OutText и OutTextXY.

Объявление:

Procedure SetTextJustify(Horiz, Vert : Word);

Режим: 

Замечания:

После вызова SetTextJustify весь выводимый текст будет выравниваться относительно текущего указателя (CP) заданным способом. Следующий отрывок программы выведет букву 'B' так, что точка (100, 100) окажется точно посередине этой буквы:

SetTextJustify(CenterText, CenterText);
OutTextXY(100, 100, 'ABC');

Заданные по умолчанию установки выравнивания могут быть установлены следующим образом : SetTextJustify (LeftText, TopText). Если к SetTextJustify будут переданы недопустимые параметры, то текущие установки выравнивания не будут изменены.

Нужно быть в графическом режиме.

Пример программы: settxtjs.pas

См. также: