رفتن به مطلب

آموزش تغییر فونت ابزار ها (editText va ....)


V4hid مهمان

ارسال‌های توصیه شده

با سلام

خوب یه آموزش به درد بخور دیگه

تو ابن روش ساده یاد میگیرین که چطور فونت ابزار هاتون رو تغییر بدین

واسه شروع یه ادیت تکست لازم داریم که از محل دیزاین اونو اضافه میکنیم

و یه دکمه واسه اعمال تغییرات

یه typeface هم لازم داریم

پس:

Sub Globals
Private Button1 As Button
Dim st As Typeface
Private EditText1 As EditText
End Sub

حالا یه فونت لازم داریم

باید فونت هاتون رو داخل پوشه file در محل سیو پروژه دخیره کنید

اینم کد تغیر فونت:

Sub Button1_Click
st = Typeface.LoadFromAssets("rr.ttf")
EditText1.Typeface = st

End Sub

موفق باشید

لینک ارسال
به اشتراک گذاری در سایت های دیگر

  • 1 ماه بعد...
  • 10 ماه بعد...

آقا خدا هر چی می خوای بت بده. خیلی دنبال این می گشتم. واقعا دسستون درد نکنه.

 

باسلام

خیلی ممنون ولی چه جوری میشه با یک خط فونت همه ی برنامه رو ( فونت همه ی ویو ها ) رو عوض کرد چون من تو برنامم باتون زیاد دارم میخوام همشون فونتشون یکی باشه

لینک ارسال
به اشتراک گذاری در سایت های دیگر

میشه همه فونت فیس هارو برابر یه فونت قرار داد ولی تا جای که یادمه با یه خط نمیشه 

البته میشه کتابخونه براش درست کرد کاری خاصی نداره 

لینک ارسال
به اشتراک گذاری در سایت های دیگر

برای مثال با این یه خط کد میتونین فونت همه ی لیبل های اکتیویتی رو تغییر بدین  :

 For Each v As Label In Activity.GetAllViewsRecursive
	v.Typeface=Typeface.LoadFromAssets("aa.ttf")
	Next
لینک ارسال
به اشتراک گذاری در سایت های دیگر

  • 2 هفته بعد...

دوستان بنظرتون چطور میشه به بعضی ابزارها که خاصیت فونت ندارن این قابلیت رو اضافه کرد؟؟

لینک ارسال
به اشتراک گذاری در سایت های دیگر

  • 3 ماه بعد...

 

برای مثال با این یه خط کد میتونین فونت همه ی لیبل های اکتیویتی رو تغییر بدین  :

 For Each v As Label In Activity.GetAllViewsRecursive
	v.Typeface=Typeface.LoadFromAssets("aa.ttf")
	Next

 

من دقیقاً همین کار رو میکنم ولی خطای زیر رو میده ...

 

Screenshot_2015_12_11_09_17_26.png

لینک ارسال
به اشتراک گذاری در سایت های دیگر

من دقیقاً همین کار رو میکنم ولی خطای زیر رو میده ...

Screenshot_2015_12_11_09_17_26.png

سلام این کدو تست کنید

For Each V As View In Activity.GetAllViewsRecursive     If V Is EditText Then       Dim elyas As EditText = V     elyas.TypeFace = TypeFace.LoadFromAssets("font.TTF")  
Next
   End If
لینک ارسال
به اشتراک گذاری در سایت های دیگر

  • 3 هفته بعد...

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...