From Xojo Documentation


Used to access the names the installed fonts (0-based).



Part Type Description
result String The name of the font whose index number is passed. Result is in the appropriate WorldScript encoding.
index Integer The number of the font (0-based).


Fonts are accessed in alphabetical order where font 0 is the first font. Use the FontCount function to determine the number of fonts.

Under macOS, Font returns font families instead of fonts. This is closer to the older Carbon behavior, but it does not return identical results.

Using Custom Fonts in your Applications

Both macOS and Windows have techniques for loading fonts for a specific application.

On macOS, you can use ATSApplicationFontsPath key in Info.plist. You add this key, specifying the relative path of the fonts in the Resources folder of your app bundle.

For Windows, the open-source Windows Functionality Suite provides a method (TemporarilyInstallFont) to do this.


This is an example of a function that determines if the font named passed is installed on the user's computer:

Function FontAvailable(FontName As String) As Boolean
Dim fc As Integer
fc = FontCount - 1

For i As Integer = 0 To fc
If Font(i) = FontName Then
Return True
End If
Return False
End Function

See Also

FontCount function.