17
CenterText |
1 |
По центру |
RightText |
2 |
По правому краю |
Таблица 8
Константы выравнивания текста по вертикали
Константа |
Значение |
Примечание |
BottomText |
0 |
По нижней линии |
CenterText |
1 |
По центру |
TopText |
2 |
По верхней линии |
В качестве примера выведем X2 : SetTextJustify(CenterText,CenterText); OutTextXY(100,100, ‘X’); SetTextJustify(1,0); OutTextXY(108,100, ‘ 2’) ;
Значение степени будет расположено выше X, как это обычно делается при записи вручную. Аналогичным способом можно пространственно сформировать и вывести на экран практически любую формулу.
5 УСТАНОВКА ЦВЕТА И ПАЛИТРЫ
После старта InitGraph вся информация об установленной в зависимости от режима драйвера палитре находится в переменной стандартного типа PaletteType.
Получить информацию о текущей палитре можно с помощью процедуры
GetDefaultPalette(var Palette:PaletteType), где Palette — переменная типа PaletteType. Доступ к полям такой же, как и при работе с обычными переменными типа record. Очевидно, что восприятие любого графического изображения зависит прежде всего от цвета изображения и от фона, на котором оно создавалось. Для установки этих двух важнейших атрибутов используются процедуры SetColor и SetBkColor.
SetColor(Color:word) устанавливает цвет, используемый процедурами графического вывода, в значение, заданное параметром Color. До того момента, пока цвет не определен, для вывода используется цвет, имеющий максимальный номер палитры, и фон, устанавливаемый по минимальному номеру. Если Color задает недопустимый номер цвета, текущий цвет остается неизменным.
SetBkColor(Color:word) устанавливает новый цвет фона, который определяется значением Color.
В ряде случаев порядок следования цветов в стандартных палитрах может не удовлетворять программиста. Если требуется изменить расположение одного или нескольких цветов, можно воспользоваться процедурой SetPalette; если необходимо изменить всю палитру, следует воспользоваться процедурой SetAllPalette.