GFNTLOAD()
 Carga en memoria un fichero de fuente
------------------------------------------------------------------------------
 Sintaxis

     GFNTLOAD(<cFichFuente>) --> aFuente

 Argumentos

     <cFichFuente> es un valor de caracteres que representa el nombre
     del fichero de fuente que se va a cargar.

 Devuelve

     GFNTLOAD() devuelve un puntero a la región VMM donde se ha cargado la
     fuente. Posteriormente, es posible utilizar este valor como entrada de
     la función GFNTERASE().

 Descripción

        CA-Clipper admite dos tipos de fuentes:

        1. Fuentes de vídeo ROM-.FND

        Se utilizan en todas las llamadas estándar de terminal tales como
        DEVOUT(), TBROWSE() y GWRITEAT(). El tamaño de estas fuentes es
        siempre 16x8. Si desea utilizar un tamaño de fuente diferente, p. e.
         8x8, será preciso que cargue el fichero correspondiente.

        2. Fuentes de mapas de bits de Windows-.FNT

        Se pueden utilizar en la función GWRITEAT().

     ■ Utilización de las fuentes .FND:  Las fuentes .FND tienen 16
        píxeles de altura, es decir que se visualizan entre los píxeles 1 y
        16 de cada fila de la pantalla. CA-Clipper permite fijar el número
        de filas de píxeles que mide la fuente:

        GFNTSET(aFuente, nLimSup, nLimInf)

        Si sólo se desea modificar los valores de <nLimSup> y <nLimInf>, se
        debe especificar NIL en <aFuente>.

        De esta forma es posible visualizar un borde de un píxel de anchura
        alrededor de GET o MENU PROMPT, etc. sin tener que utilizar
        GWRITEAT(). Recuerde que DEVOUT() (@..SAY..) es más rápido que
        GWRITEAT().

     ■ Utilización de fuentes .FNT:  Las fuentes .FNT son
        proporcionales. Esto significa, por ejemplo, que los caracteres "m"
        e "i" no tienen el mismo número de píxeles de anchura.

        Para utilizar este tipo de fuentes, se debe cargar en memoria un
        fichero .FNT:

        aFuenteFnt := GFNTLOAD("MiFuente.FNT")

        GWRITEAT( X, Y, cCadena, nColor, LLG_MODE_SET, aFuenteFnt )

        Si se especifica el parámetro LLG_MODE_NIL en GWRITEAT(), es posible
        conocer la anchura que ocupa en pantalla la cadena de caracteres sin
        necesidad de dibujarla.

        <nAnchura> contendrá el número de píxeles de la cadena de
        caracteres:

        nAnchura:= GWRITEAT( X , Y, cCadena, nColor, LLG_MODE_NIL, ;aFuenteFnt)

        <nColumnas> contendrá el número de columnas:

        nColumnas := nAnchura / 8.

 Ejemplos

      Este ejemplo carga en memoria un fichero de fuente llamado
        MiFuente.FND:

        // FUNCTION MostrarUnaFuente (cCadena)
        LOCAL aFuente
        // Carga en la memoria el fichero MiFuente.FND
        aFuente := GFNTLOAD("MiFuente.FND")
        // Visualiza cCadena utilizando la fuente cargada
        GWRITEAT(X, Y, cCadena, nColor, LLG_MODE_SET, aFuente)
        // *Importante*  Debe borrar la fuente cuando acabe de
        // utilizarla, ya que en CA-Clipper no se libera de forma
        // automática la zona de memoria ocupada por una fuente.
        GFNTERASE(aFuente)
        RETURN

 Ficheros   La biblioteca asociada es LLIBG.LIB,
            el fichero fuente asociado es Llibg.ch.

 To download this example - click here.

See Also: GFNTSET() GFNTERASE()