in Class_Globals
Dim f As Font
in Initialize
f = fx.LoadFont(File.DirAssets,"alpha.ttf",12)
Nothing display in button and label .....
the font cheatsheet in https://www.dafont.com/chess-alpha.font
Dim f As Font
in Initialize
f = fx.LoadFont(File.DirAssets,"alpha.ttf",12)
B4X:
Sub bttest_Click
Log(f.FamilyName) 'Chess Alpha
bttest.Font = f
bttest.Text = "azertyui"
lb.Font = f
'lb.TextSize = 10
lb.Text = Chr(98)
End Sub
Nothing display in button and label .....
the font cheatsheet in https://www.dafont.com/chess-alpha.font