B4J Question b4xtable wrap text in rows

[spiroskaras]

Hi everyone.I check in designer property wrap text for a b4xtable and nothing is happening.
is there a way to enable wrap text with code ?

 

[Erel]

B4XTable1.MaximumRowsPerPage = 20
B4XTable1.BuildLayoutsCache(B4XTable1.MaximumRowsPerPage)
B4XTable1.RowHeight = 50dip
SetWrapText(NameColumn) 'for each relevant column

 

[spiroskaras]

Thank you Erel !!

 

[Erel]

I've missed the actual sub:

Private Sub SetWrapText(Col As B4XTableColumn)
    For i = 1 To Col.CellsLayouts.Size - 1
        Dim p As B4XView = Col.CellsLayouts.Get(i)
        Dim lbl As Label = p.GetView(Col.LabelIndex)
        lbl.WrapText = True
    Next
End Sub

 

[spiroskaras]

Thanks a lot !!!!