lang="b4x"
For i = 1 To maxCol
Dim L As B4XView = Labels.Get(i).As(B4XView)
L.Text=Txt(nLine+m) 'Labels.Get(i).As(B4XView).Text
L.Height = -1
If i = 2 Then 'format of column 2
Dim jo As JavaObject = L
jo.RunMethod("setTextAlignment", Array("RIGHT"))
L.font = fx.CreateFont("", 14, True, False)
L.TextColor = xui.Color_Red
End If
m=m+1
Next