Процедура SetTextStyle ( font, orient, size: word) устанавливает шрифт font, ориентацию orient и размер size текста, выводимого на экран. Параметр font может принимать одну из констант:
* DefaultFont=0 {стандартный, каждый символ размером 8*8 пикселей} * TriplexFont=1 { Triplex шрифт} * SmallFont=2 {мелкий} * SansSerifFont=3 {SansSerif шрифт } * GothicFont=4 {готический }
В 7.0 версии Паскаля набор шрифтов значительно расширен, но для новых шрифтов не придуманы мнемонические константы, поэтому можно использовать такие номера шрифтов:
* - «рукописный» шрифт ( scri. chr); * - одноштриховой шрифт типа Courier ( simp. chr); * - наклонный шрифт типа Times Italic ( tscr. chr); * - шрифт типа Times Rovan (lcom.chr); * - шрифт типа Courier увеличенного размера ( euro. chr); * - крупный двухштриховой шрифт ( bold. chr).
Замечание: все шрифты, кроме стандартного (матричного), являются векторными, что позволяет изменять их размеры без ухудшения качества. Каждый из этих шрифтов размещается в отдельном файле. Для использования этих шрифтов необходимо разместить соответствующий файл в рабочем каталоге, в противном случае вызов этого шрифта игнорируется и подключается стандартный шрифт.
Каждый шрифт способен десятикратно изменять свои размеры. Размер шрифта задается параметром size, который может иметь значения от 1 до 10 (точечный или матричный шрифт – в диапазоне от 1 до 32).
Стиль вывода текста
ОтветитьУдалитьПроцедура SetTextStyle ( font, orient, size: word) устанавливает шрифт font, ориентацию orient и размер size текста, выводимого на экран. Параметр font может принимать одну из констант:
* DefaultFont=0 {стандартный, каждый символ размером 8*8 пикселей}
* TriplexFont=1 { Triplex шрифт}
* SmallFont=2 {мелкий}
* SansSerifFont=3 {SansSerif шрифт }
* GothicFont=4 {готический }
В 7.0 версии Паскаля набор шрифтов значительно расширен, но для новых шрифтов не придуманы мнемонические константы, поэтому можно использовать такие номера шрифтов:
* - «рукописный» шрифт ( scri. chr);
* - одноштриховой шрифт типа Courier ( simp. chr);
* - наклонный шрифт типа Times Italic ( tscr. chr);
* - шрифт типа Times Rovan (lcom.chr);
* - шрифт типа Courier увеличенного размера ( euro. chr);
* - крупный двухштриховой шрифт ( bold. chr).
Замечание: все шрифты, кроме стандартного (матричного), являются векторными, что позволяет изменять их размеры без ухудшения качества. Каждый из этих шрифтов размещается в отдельном файле. Для использования этих шрифтов необходимо разместить соответствующий файл в рабочем каталоге, в противном случае вызов этого шрифта игнорируется и подключается стандартный шрифт.
Параметр orient задает ориентацию выводимого текста:
1. HorizDir=1 {слева направо}
2. VertDir=2{снизу вверх}
Каждый шрифт способен десятикратно изменять свои размеры. Размер шрифта задается параметром size, который может иметь значения от 1 до 10 (точечный или матричный шрифт – в диапазоне от 1 до 32).