Italian Scrolling label

Sagenut said:

Se hai copiato pari passo l'errore potrebbe essere che per funzionare con le B4XPages devi avere

B4X:

TextEngine.Initialize(Root)

al posto di

B4X:

TextEngine.Initialize(Activity)

Click to expand...

Sagenut said:

Prova questo

Click to expand...

Private Sub B4XPage_Created (Root1 As B4XView)
   
    Root = Root1
    Root.LoadLayout("layPageMain")
   
    KeyBoard.Initialize("KeyBoard")
   
    'Inizializza la scrollinglabel da lasciare qui
    Initialize_ScrollingLabel

    Pages_Create
   
   
End Sub

private Sub Initialize_ScrollingLabel
    
    TextEngine.Initialize(Root)
    
    fldSongTitle.TextEngine = TextEngine
    fldSongTitle.WidthPerSecond = 70
    fldSongTitle.Gap = 50
    
End Sub