Sub Class_Globals
Private Root As B4XView
Private xui As XUI
Private pnlGraph As B4XView
Private xcvsGraph As B4XCanvas
End Sub
'Initializes the object. You can add parameters to this method if needed.
Public Sub Initialize
End Sub
Private Sub B4XPage_Created (Root1 As B4XView)
Root = Root1
Root.LoadLayout("CantoLO")
B4XPages.SetTitle(Me, Main.sCanto)
xcvsGraph.Initialize(pnlGraph)
xcvsGraph.DrawText("prova di scrittura con DrawText", 20, 50, Font.DEFAULT, xui.Color_Blue, "LEFT")
End Sub