Клиппер 5. Справочник


Клиппер 5. Справочник - часть 335


Это указание должно быть явным, так как
    изменяется подсчет строк и режим отображения. Кроме того, при этом
    необходима прикомпоновка CT II-драйвера CT2US50.OBJ (см. табл. 6-4).
 
  Примечания
 
  . Видеоадаптеры не допускают смешивания шрифтов с различной
    пиксельной высотой.
 
  . Функцию FONTRESET() нельзя использовать, если загружен шрифт, для
    которого отсутствует аналог в ROM (то есть размер символа отличается
    от 8, 14, 16 пикселей). Поэтому перед ее вызовом необходимо перейти на
    допустимый режим.
 
  . Если EGA-адаптер не использует весь соответствующий диапазон
    памяти, то количество доступных шрифтовых областей может быть менее 4.
    Число доступных шрифтовых областей можно определить с помощью функции
    MAXFONT().
 
  Примеры
 
  . Загрузка всех 256 символов шрифта во вторую шрифтовую область:
 
    ? SETFONT(cFontString, 2)   // 0 - нормальная загрузка
    FONTSELECT(2)               // Вторая шрифтовая область для цветов
                                // с нормальной интенсивностью
 
  . Замена последних 128 символов шрифта в области 3:
 
    ? SETFONT(cFontString, 3, 128, 128) // 0 - нормальная загрузка
    FONTSELECT(3)                       // Третья шрифтовая область
                                        // для цветов с нормальной
                                        // интенсивностью
 
  . Удвоение (по возможности) высоты загруженного шрифта. Это не
    сложно, поскольку каждый байт в строке шрифта должен быть удвоен:
 
    cFont := GETFONT()
    SETFONT(CHARMIX(cFont, cFont), .T.)
 
  . Строку шрифта можно разложить на отдельные пиксельные строки.
    Здесь они выводятся в двоичном виде:
 
    cFont := GETFONT()
    nPixel := CHARPIX()
 
    FOR A = 0 TO 255
        FOR B = 1 TO nPixel
                nByte := ASC(SUBSTR(cFont, (nPixel * A) + B, 1))
                ? NTOC(nByte, 2, 8, "0")



Начало  Назад  Вперед



Книжный магазин