Label problem

parijs

Active Member
Licensed User
Longtime User
Hi,
I created labels in designer lbla0, lbla1 ...
Use following code, but do not see text on the screen.

B4X:
'Activity module
Sub Process_Globals
End Sub
Sub Globals
  Dim lbla() As Label
  Dim lbla0, lbla1, lbla2, lbla3, lbla4 As Label
  Dim sd As String
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("1")
  lbla = Array As Label(lbla0,lbla1,lbla2,lbla3,lbla4)
  sd="test1"
  For i=0 To 4
        lbla(i).initialize("lbla" & i)
        lbla(i).Text= sd & i
        lbla(i).Color=Colors.Red
        lbla(i).TextColor=Colors.Yellow
  Next
  i=1
  lbla(i).Text="TEST"
  
End Sub

What am I doing wrong??
 
Top