Android Question B4XTable add four button in the edit column

mike1967 said:

I'm trying to insert four buttons in the edit column of a B4XTable, but the fourth button is not displayed

Click to expand...

Private Sub B4XTable1_DataUpdated
    For i = 0 To B4XTable1.VisibleRowIds.Size - 1
        Dim p As B4XView = editCol.CellsLayouts.Get(i + 1)
        p.GetView(1).Visible = B4XTable1.VisibleRowIds.Get(i) > 0
        p.GetView(2).Visible = p.GetView(1).Visible
        p.GetView(3).Visible = p.GetView(1).Visible        
        p.GetView(4).Visible = p.GetView(1).Visible    'need to add this line if you want 4 buttons
    Next
End Sub

Mahares said:

Here it is:

B4X:

Private Sub B4XTable1_DataUpdated
    For i = 0 To B4XTable1.VisibleRowIds.Size - 1
        Dim p As B4XView = editCol.CellsLayouts.Get(i + 1)
        p.GetView(1).Visible = B4XTable1.VisibleRowIds.Get(i) > 0
        p.GetView(2).Visible = p.GetView(1).Visible
        p.GetView(3).Visible = p.GetView(1).Visible       
        p.GetView(4).Visible = p.GetView(1).Visible    'need to add this line if you want 4 buttons
    Next
End Sub

Click to expand...