Процедура 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
См. также: