投稿者 snowmansnow  (社会人) 投稿日時 2021/11/8 20:18:29

 こんばんは、魔界の仮面弁士様、るきお様

   .NET 5のクラスライブラリのサンプル動かせました。
   真似できるかわかりませんが、がんばります。

    >.NET を
    >NET と表記することに
    >違和感
     ごめんなさい。何回も注意されてます。

  >32bit 版と 64bit 版
      注意して、別々に作ります。(今回はx86で作ってみました)

  先日のフォントの続きで、
        魔界の仮面弁士様がGekka様のName使えますよ。と仰ってくれたのですが、
    自力で使えませんで、
    仕方なくFontFamilyのNameを取り出す過程(下記)で、クラスライブラリを作りたくなりました。
Imports System.Drawing
Imports System.Drawing.Text


Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        'PrivateFontCollectionオブジェクトを作成する 
        Dim fontCol As New System.Drawing.Text.PrivateFontCollection()
        fontCol.AddFontFile("C:\Users\Y2\AppData\Local\Microsoft\Windows\Fonts\ipamjm.ttf")
        'https://dobon.net/vb/dotnet/graphics/privatefontcollection.html 
        'PrivateFontCollectionに追加されているフォントの名前を列挙する 


        For Each ff As System.Drawing.FontFamily In fontCol.Families
            ListBox1.Items.Add(ff.Name)
            'https://www.adonetvb.com/DotNet/refItemsAdd.html 
        Next
        TextBox1.Text = ListBox1.Items(0)
        'https://turtle-engineers.com/vb-listbox-count/ 

    End Sub


End Class

これを改造して、フォントファイルの名前を取り出そうとしました。

るきお様のWEBは、.NET Coreでしたので、そちらも今回頂いたサンプル(インターフェース)で、
できるのではないかと思い、そちらもチャレンジしてみたいです。

時間がございましたら、Gekka様のNameについても御教授頂きたいです。
 
御2人ともありがとうございます。
勉強になります。