تغییر فونت ActionBar در appcompat

[moh3n 16]

سلام دوستان

 

چطوری میشه توی b4a فونت یا محل نوشته ActionBar رو تغییر داد

 

​

[moh3n 16]

دوستان عزیز جوابی نبود

[mohammad-alone 564]

Sub SetTypeface(parent As Panel, t As Typeface,txtsize As Int)
   For Each v As View In parent
      If v Is Label Then
         Dim lbl As Label = v
         lbl.Typeface = t
		 lbl.TextSize = txtsize
      Else If v Is Panel Then
         SetTypeface(v, t , txtsize)
      End If
   Next
End Sub


'----------------- و بعد این کد رو در روال قرار بدید


SetTypeface(TabLayout, Typeface.LoadFromAssets("iransans.ttf"),14)	

موفق و پیروز باشید