Compartir a través de

AFONT( ) (Función)

  • Artículo

Coloca en una matriz información acerca de las fuentes disponibles.

AFONT(ArrayName [, cFontName [, nFontSize]])

Valores devueltos

Logical

Parámetros

  • ArrayName
    Especifica la matriz de variables en que se colocan los nombres de las fuentes disponibles. Si la matriz no es suficientemente grande para contener todas las fuentes, Visual FoxPro aumentará automáticamente su tamaño. Si se especifica una matriz bidimensional existente, Visual FoxPro convertirá la matriz en una matriz unidimensional.

    Si la matriz se crea correctamente, AFONT( ) devolverá Verdadero (.T.); de lo contrario, AFONT( ) devolverá Falso (.F.).

  • cFontName
    Especifica una fuente para la que se coloca información en la matriz.

    Si la fuente especificada sólo admite tamaños de fuente discretos (8 puntos, 10 puntos, etc.), los tamaños de fuente se almacenarán en la matriz y AFONT( ) devolverá verdadero (.T.). Si la fuente especificada en cFontName es escalable (admite valores fraccionarios de tamaño de fuente), la matriz tendrá un solo elemento que contiene –1 y AFONT( ) devolverá verdadero (.T.).

    Si la fuente especificada no está disponible, no se creará la matriz y AFONT( ) devolverá falso (.F.).

  • nFontSize
    Especifica un tamaño de fuente para la fuente especificada en cFontName.

    Si el tamaño de fuente nFontSize está disponible para la fuente especificada en cFontName, la matriz tendrá un único elemento que contiene verdadero (.T.) y AFONT( ) devolverá verdadero (.T.). Si el tamaño de fuente no está disponible para la fuente especificada, no se creará la matriz y AFONT( ) devolverá falso (.F.).

Observaciones

AFONT( ) inserta en una matriz los nombres de las fuentes disponibles. También puede utilizarse para determinar qué tamaños de fuente hay disponibles o si una fuente es escalable. Utilice GETFONT( ) para mostrar un cuadro de diálogo que contiene las fuentes, los tamaños de fuente y los estilos disponibles.

Ejemplo

El ejemplo siguiente utiliza AFONT( ) para crear una matriz que contiene los nombres de todas las fuentes disponibles. Se muestra el nombre de cada fuente con un ejemplo. Si hay más de 10 fuentes instaladas solamente se muestran las 10 primeras.

CLEAR
=AFONT(gaFontArray)  && Array containing font names
gnNumFonts = ALEN(gaFontArray)  && Number of fonts
IF gnNumFonts > 10
   gnNumFonts = 10  && Display first 10 fonts
ENDIF

FOR nCount = 1 TO gnNumFonts
   ? ALLTRIM(gaFontArray(nCount))  && Display font name
   ?? '  This is an example of ' ;
      + ALLTRIM(gaFontArray(nCount)) FONT gaFontArray(nCount), 8
ENDFOR

Vea también

FONTMETRIC( ) | GETFONT( ) | TXTWIDTH( ) | SYSMETRIC( ) | WFONT( )