• Home
 · 
• Windows System Services
 · 
• Get List of Fonts Installed on the machine.

Get List of Fonts Installed on the machine.

Get List of Fonts Installed on the machine.

Rate Get List of Fonts Installed on the machine.

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Private Sub Form_Load()
    Dim i As Integer
    For i = 0 To Screen.FontCount - 1
        Combo1.AddItem Screen.Fonts(i)
    Next i
    Combo1.Text = Combo1.List(0)
End Sub