Sub AppStart (Form1 As Form, Args() As String)
MainForm = Form1
'MainForm.RootPane.LoadLayout("Layout1") 'Load the layout file.
MainForm.Show
Dim bt As Button
Dim iconHex As String = "0xF0AB"
bt.Initialize("btmainarc")
bt.Font = fx.CreateFontAwesome(14)
' 'In iconhex i have the value
' bt.Text = "Text " & Chr(iconHex)
'In iconhex i have the value
Dim s As String = iconHex.Replace("0x", "")
Log(s)
bt.Text = "Text " & Chr(Bit.ParseInt(s, 16))
MainForm.RootPane.AddNode(bt,50,50,150,50)
End Sub