B4XTable1.MaximumRowsPerPage = 20
Sub SetColumnBold(columnID As String)
Dim fnt As B4XFont = xui.CreateDefaultBoldFont(16)
Dim column As B4XTableColumn = B4XTable1.GetColumn(columnID)
For i = 1 To column.CellsLayouts.Size - 1 'starts at 1 due to header
Dim pnl As B4XView = column.CellsLayouts.Get(i)
pnl.GetView(0).Font = fnt
Anything more than this , you might want to study sub CreateCustomFormat in the Table example B4XTable example ...
Thanks for your help!
It works for small tables, but I found that when using the code and if the table is bigger (100 * 100 elements (double)) the program hangs and exits with an exception. I'll try to post an example later