EnumFontFamiliesExで縦書き(@の付いたもの)も
他のフォントと同様に列挙されると思うが