Android Question font

[Silkowner]

java.io.FileNotFoundException: /data/user/0/farzin.com.app/files/virtual_assets/shabnam.ttf: open failed: ENOENT (No such file or directory)

I want to put a ttf file in the assets file and then use it, but it gives an error.

    Dim shabnam As Typeface
    shabnam = Typeface.LoadFromAssets("Shabnam.ttf")

 

[pixet]

Find the .ttf file at the link below.

Shabnam Font​

Place the .ttf file in the Assets (Files) folder.
If your project is a B4XPages project, add
it to the B4XMainPage module.
You must configure it similarly to use your custom fonts.

' B4XMainPage'
'
' Modify your B4XMainPage as shown in this example.
'
Private Sub B4XPage_created (Root1 As B4XView)
    Root = Root1
    Root.loadLayout(MainPage")
    '
    ' Code to add
    Dim BF As B4XFont
    BF = xui.CreateFont(Typeface.LoadFromAssets("shabnam.ttf"), 38)
   
    lbl1.TextColor = xui.Color_Red
    lbl1.Font = BF
    lbl1.Text = "My text"
End Sub

 

[teddybear]

java.io.FileNotFoundException: /data/user/0/farzin.com.app/files/virtual_assets/shabnam.ttf: open failed: ENOENT (No such file or directory)

I want to put a ttf file in the assets file and then use it, but it gives an error.

    Dim shabnam As Typeface
    shabnam = Typeface.LoadFromAssets("Shabnam.ttf")

Did you put the Shabnam.ttf into Files folder?

 

[Pendrush]

Use lowercase for names. Rename file from Shabnam.ttf to shabnam.ttf and use

Dim shabnam As Typeface
shabnam = Typeface.LoadFromAssets("shabnam.ttf")

 

[TILogistic]

B4X

    Button1.Font = FontCustom("Shabnam.ttf", 16)
    Button1.Text = "ظعغقكلوى"
    Button1.TextColor = xui.Color_Blue

Public Sub FontCustom(FontName As String, FontSize As Int) As B4XFont
    'Add in main APP B4i #AppFont: FontName.ttf
    Dim FontResult As B4XFont
    #If B4J
    Dim fx As JFX
    FontResult = xui.CreateFont(fx.LoadFont(File.DirAssets,FontName,FontSize),FontSize)
    #Else If B4A
    FontResult = xui.CreateFont(Typeface.LoadFromAssets(FontName),FontSize)
    #Else
    FontResult = xui.CreateFont(Font.CreateNew2(FontName,FontSize),FontSize)
    #End If
    Return FontResult
End Sub