iOS Question Problem with Font.CreateNew2

Deleted member 103 · Jun 17, 2020

Hi,

For example, if the Font.Name of Label1 is "ArialMT", then label2 should also get the same Font.Name.

From iOS 13 it is no longer so, because Label2 gets a completely different font.name.
See also: https://stackoverflow.com/questions/58710412/how-to-load-ios-13-default-font-using-font-name

B4X:

    Dim myFont As Font   
    myFont = Font.CreateNew2(label1.Font.Name, 12)
    
    Dim label2 as Label
    label2.Initialize("")
    label2.font = myFont

Erel · Jun 18, 2020

This is how the OS behaves. What are you trying to do?

Deleted member 103 · Jun 18, 2020

Erel said:
This is how the OS behaves. What are you trying to do?

I think I found the error, the "NewButton" procedure was not correct.

B4X:

Dim btn1 As Button = NewButton("00:00:00.00", 12, Font.CreateNew2("ArialMT", 30), "")
Log("btn1.CustomLabel.Font.Name=" & btn1.CustomLabel.Font.Name)
    
Dim btn2 As Button
btn2.Initialize("", btn2.STYLE_SYSTEM)
btn2.CustomLabel.font = btn1.CustomLabel.font
Log("btn2.CustomLabel.Font.Name=" & btn2.CustomLabel.Font.Name)

Private Sub NewButton(Text As String, TextSize As Int, TextFont As Font, Event As String) As Button
    Dim btn As Button
    btn.Initialize(Event, btn.STYLE_SYSTEM)
    btn.SetBorder(1, Colors.Black, 3)
    'btn.CustomLabel.Font = TextFont.CreateNew(TextSize) 'Create wrong Fontname
    btn.CustomLabel.Font = TextFont.CreateNew2(TextFont.Name, TextSize) 'Create correct Fontname
    btn.Text = Text
    Return btn
End Sub

Log:
btn1.CustomLabel.Font.Name=ArialMT
btn2.CustomLabel.Font.Name=ArialMT

iOS Question Problem with Font.CreateNew2

Deleted member 103

Guest

Erel

B4X founder

Deleted member 103

Guest

Similar Threads

iOS Question Problem with Font.CreateNew2

Deleted member 103

Guest

Erel

B4X founder

Deleted member 103

Guest

Similar Threads

Privacy & Transparency

Privacy & Transparency