using System;
using System.Drawing;
using System.Drawing.Text;
class EnumFontFamily {
static void Main() {
InstalledFontCollection fonts = new InstalledFontCollection();
FontFamily[] ffArray = fonts.Families;
foreach (FontFamily ff in ffArray) {
Console.WriteLine(ff.Name);
}
// 出力例:
// Aharoni
// Andalus
// Angsana New
// AngsanaUPC
// Aparajita
// Arabic Typesetting
// Arial
// Arial Black
// Arial Narrow
// Arial Unicode MS
// ……以下省略……
}
}
// コンパイル方法:csc enumfontfamily.cs
' enumfontfamily.vb
Imports System
Imports System.Drawing
Imports System.Drawing.Text
Class EnumFontFamily
Shared Sub Main()
Dim fonts As New InstalledFontCollection()
Dim ffArray As FontFamily() = fonts.Families
For Each ff As FontFamily In ffArray
Console.WriteLine(ff.Name)
Next
' 出力例:
' Aharoni
' Andalus
' Angsana New
' AngsanaUPC
' Aparajita
' Arabic Typesetting
' Arial
' Arial Black
' Arial Narrow
' Arial Unicode MS
' ……以下省略……
End Sub
End Class