alimanam
چهارشنبه 28 اردیبهشت 1390, 15:17 عصر
با سلام
یکی از دوستان سوال داشتن که آیا میشه فونت کنترل ها رو فونتی انتخاب کرد که بر روی سیستم مقصد نصب نیست ؟!! یعنی فونت به صورت داینامیک از یه مسیر مثل مثلاً از یه فایل فونت کنار برنامه انتخاب بشه , جواب مثبت است به راحتی میشه این کار رو انجام داد :
Imports System.Drawing.Text
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim pfc As New PrivateFontCollection()
pfc.AddFontFile("Stencilia-Bold.ttf")
Label1.Font = New Font(pfc.Families(0), 60, FontStyle.Bold)
End Sub
End Class
موفق باشید ./
یکی از دوستان سوال داشتن که آیا میشه فونت کنترل ها رو فونتی انتخاب کرد که بر روی سیستم مقصد نصب نیست ؟!! یعنی فونت به صورت داینامیک از یه مسیر مثل مثلاً از یه فایل فونت کنار برنامه انتخاب بشه , جواب مثبت است به راحتی میشه این کار رو انجام داد :
Imports System.Drawing.Text
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim pfc As New PrivateFontCollection()
pfc.AddFontFile("Stencilia-Bold.ttf")
Label1.Font = New Font(pfc.Families(0), 60, FontStyle.Bold)
End Sub
End Class
موفق باشید ./