Advertisement
2002ASP Miscellaneous #347

get Font types on computer

This code takes every font from the computer it is run on, and places it into a combo box. (not using printer.fonts but using screen.fonts)

AI

AI Summary: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

Source Code
original-source
''for loop adds all font types in computer to combo box
  fType.Clear  ''clears combo box
  For i = 0 To Screen.FontCount - 1 ''counts # of fonts
    fType.AddItem Screen.Fonts(i) ''adds font to combo box
  Next i
Original Comments (3)
Recovered from Wayback Machine