File [vb.net] 경로 또는 리소스(Resources) ttf 파일 폰트 변환
페이지 정보
본문
경로:)
Dim privateFonts As New System.Drawing.Text.PrivateFontCollection()
privateFonts.AddFontFile("C:\Program Files (x86)\Hnc\Office 2018\HOffice100\Shared\TTF\Hwp\Easop.ttf")
Dim fam As FontFamily = privateFonts.Families(0)
Dim font As New System.Drawing.Font(fam, 12)
Resources:)
Dim myFonts As PrivateFontCollection
Dim fontBuffer As IntPtr
myFonts = New PrivateFontCollection()
Dim font As Byte() = My.Resources.HYBSRB '// Easop
fontBuffer = Marshal.AllocCoTaskMem(font.Length)
Marshal.Copy(font, 0, fontBuffer, font.Length)
myFonts.AddMemoryFont(fontBuffer, font.Length)
Dim fam As FontFamily = myFonts.Families(0)
Dim fnt As Font = New Font(fam, 16)
예제:)
- 이전글[vb.net] 문자 회전해서 그리기(drawstring rotate text) 19.08.13
- 다음글[vb.net] DataGridView 특정 컬럼 오름차순 정렬 / 내림차순 정렬 19.07.16
댓글목록
등록된 댓글이 없습니다.